The Parse Service Routine builds
a five-word PDE to describe a VARIABLE operand. The PDE has the following
format:
Offset decimal |
Meaning |
---|
0 |
A pointer to the data-name |
4 |
Length1 |
5 |
Reserved |
6 |
Flags |
7 |
Reserved |
8 |
A pointer to the PDE for the first qualifier |
12 |
A pointer to the program-id name |
16 |
Length2 |
17 |
Number of Qualifiers |
18 |
Number of Subscripts |
19 |
Reserved |
- Pointer to the data-name:
- contains a pointer to the data-name. If a program-id qualifier
precedes the data-name, this pointer points to the first character
after the period of the program-id qualifier.
- Length1:
- contains the length of the data-name.
- Flags:
- Byte 1:
Setting |
Meaning |
---|
0... .... |
The operand is missing. |
1... .... |
The operand is present. |
.1.. .... |
Constant. |
..1. .... |
Variable. |
...1 .... |
Statement number. |
.... xxxx |
Reserved. |
- Pointer to the PDE for the first qualifier:
- contains a pointer to the PDE describing the first qualifier of
the data-name, if any. This field contains X'FF000000' if
no qualifiers are entered.
Note: The format of the PDE for a data-name
qualifier follows this description.
- Pointer to the program-id name:
- contains a pointer to the program-id name, if entered. This field
contains zero if the optional program-id name is not present.
- Length2:
- contains the length of the program-id name, if entered. Contains
zero if the optional program-id name is not present.
- Number of Qualifiers:
- contains the number of qualifiers entered for this data-name.
(For example, if data-name A of B is entered, this field would contain
1.)
- Number of Subscripts:
- contains the number of subscripts entered for this data-name.
(For example, if data-name A(1,2) is entered, this field would contain
2.)
The format of a data-name qualifier is:
Offset decimal |
Meaning |
---|
0 |
A pointer to the data-name qualifier |
4 |
Length |
5 |
Reserved |
6 |
Reserved |
7 |
Reserved |
8 |
A pointer to the PDE for the next qualifier |
- Pointer to the data-name qualifier:
- contains a pointer to the data-name qualifier.
- Length:
- contains the length of the data-name qualifier.
- Pointer to the PDE for the next qualifier:
- contains a pointer to the PDE describing the next qualifier, if
any. This field contains X'FF000000' for the last qualifier.