The text read off it
[90.02.05]
If, in the above example, the Data organization for DATANAME was:
| NAME | LEVEL | TYPE | FORMAT |
|---|---|---|---|
| *DATA | |||
| ARECORD | 01 | RECORD | |
| ITEM | 02 | A(6) | |
| DATANAME | 02 | A(6) |
and ARECORD is located in an input buffer, the relative word position of DATANAME would be 1 and the symbolic instruction
CAL DATANAME,4
would generate the machine instruction:
CAL 1,4
The form of a Base Locator word is:
PZE LOC,,BYTE
where LOC is the word address of the first word of the data organization, and BYTE is the position in that word (0-5) of the first data item. By definition, a 'simple' Base Locator is one with BYTE always 0. Input records are located by 'simple' Base Locators. A 'complex' Base Locator, by definition, is one that locates items after a variable length array. The BYTE of a 'complex' Base Locator may range from 0 through 5 depending on the byte length of the array.
IV. PI - Positional Indicator
Positional Indicator cells are a type of 'pointer word'. These pointer words locate items within an array. When a CT operation such as SET causes a subscript to change value, the corresponding positional indicator is modified. A modification of this type might appear in the listing as:
CLA CP)+1
ADD PI)6
STO PI)6
Storage for Positional Indicators is reserved immediately following the Base Locators by the instruction:
PI) BSS N
N is the total number of Positional Indicators.
