Pathway/iTS SCREEN COBOL Reference Manual (G06.24+, H06.03+, Pathway/iTS 1.0+)

Data Division
Compaq NonStop™ Pathway/iTS SCREEN COBOL Reference Manual—426750-001
5-5
Level Numbers 01-49
Sets of elementary items can be referred to by combining them into groups. Groups, in
turn, can be combined into groups; an elementary item, therefore, can belong to more
than one group.
Level Numbers 01-49
Level numbers 01 through 49 describe the hierarchy of data items. The structure itself is
assigned level number 01.
The system of level numbers shows the relationship of elementary items to group items.
Data items within a group are assigned level numbers higher than that of the group item.
Level numbers within the group need not be consecutive, but they must be ordered so
that the higher the level number the lower the entry in the hierarchy.
A group includes all group and elementary items following it until a level number less
than or equal to the level number of that group is encountered. All items or groups
immediately subordinate to a given group item must be described using identical level
numbers greater than the level number of that group item.
An example of level numbering is the following:
01 address-data.
05 office-number.
10 district PIC 99.
10 region PIC 999.
05 office-address.
10 street PIC X(25).
10 city PIC X(15).
10 state PIC X(5).
10 zip-code PIC 9(5).
01 personnel-data.
05 office-manager PIC X(35).
05 no-of-employees PIC 9(4).
05 tax-groups.
10 hourly PIC 9(3).
15 part-time PIC 99.
15 full-time PIC 99.
10 exempt PIC 9(4).
Level Numbers 66, 77, and 88
Three additional types of data entries can exist in the Working-Storage Section and
Linkage Section: level 66, level 77, and level 88. Entries that begin with these level
numbers do not define the hierarchy of the item described.
Level number entries define items as follows:
•
Level 66 specifies elementary items or groups introduced by a RENAMES clause.
These entries are used to regroup contiguous elementary data items.
•
Level 77 specifies an independent data item that is not a subdivision of another data
item. The data item is not itself subdivided.