COBOL Manual for TNS and TNS/R Programs

Data Division
HP COBOL Manual for TNS and TNS/R Programs—522555-006
7-93
Descriptions of Noncontiguous Elementary Items
(Level 77)
Descriptions of Noncontiguous Elementary
Items (Level 77)
In the Working-Storage or Extended-Storage Section, you do not need to use the
record structure to define elementary items that bear no hierarchical relationship to one
another. Instead, you can classify and define them as noncontiguous elementary items.
Use a separate data description entry that begins with the special level number 77 for
each of these items.
data-name-1
is the name of the noncontiguous elementary item.
FILLER
is a place holder for a data item to which the program never refers.
data-name-2
is the name of a data item being redefined. See REDEFINES Clause.
77
data-name-1
SIGN clause
OCCURS clause
SYNCHRONIZED clause
JUSTIFIED clause
VALUE clause
BLANK WHEN ZERO clause
INDEX
USAGE IS
PICTURE clause
REDEFINES
data-name-2
FILLER
VST110.vsd