The text read off it
[02.05.02]
The length of a record is normally determined on the basis of fields defined within it. Length may also be given to a record through use of a pictorial with the RECORD entry itself.
2. COND
a) Normally this type code is associated with several entries naming and describing the values a particular field may have. These entries must be preceded by a higher level entry defining the format of the fields and must all have the same level number and include the COND type code.
3. REDEF (see iii under Data Description on page 90.01.03 for limitation).
a) When the REDEF type code is used, it should appear on a line with no additional coding except a serial number and the name of the item being redefined. The first item appearing thereafter must have the same level number as the item referenced by the REDEF.
b) When a REDEF is first encountered, the contents of the storage assignment counter are saved by the compiler, and assignment proceeds according the REDEF. The effect of a REDEF is terminated upon encountering an item of a level above or equal to the level of the item referenced by the REDEF or upon encountering another REDEF. Termination of the former type causes the storage assignment counter to be restored and assignment proceeds in the normal manner.
c) Compound names are formed without regard to REDEFs (or other type codes) and as a function of the level and position within the program of the simple names only. Consider the following examples, in which the completely qualified name of H is A G H in both instances.
EXAMPLE 1 -
Data Name Level Type Description
A 01
B 02
C 03
D 03
E 02
F 03
REDEF B
G 02
REDEF C
H 03