3-42
If
a group is described with USAGE IS INDEX, all the elementary items in
the group are assumed to be index data items. The group itself cannot be
an index data item and cannot be referenced in a SEARCH or SET statement
or a relation condition. The group can be referenced in a MOVE or an input-
output statement; but no conversion takes place.
SYNCHRONIZED, JUSTIFIED, PICTURE, VALUE, and editing clauses cannot
be used to describe group or elementary items for which usage is INDEX.
Examples:
1.
01 PRINT-LINE.
02 FILLER PIC X(8) USAGE DISPLAY VALUE 'EMPLOYEE'.
02 NAME PIC X(16) USAGE DISPLAY VALUE SPACES.
The described item would appear in memory as follows:
E M P L
0 Y E E
~
~
~
~
A A
~
~
A A A A
~
~
~
~
2.
77 SUB-TOTAL PIC 9999V99 USAGE COMP VALUE ZEROS.
This item appears in memory as follows:
1
0
1
0
1
0
1°1°1
0
1
assumed decimal point
3.
01 OUTPUT-RECORD.
02 RECORD-SIZE USAGE COMP-1 VALUE 120.
02 FILLER PICTURE X(13) USAGE DISPLAY VALUE
'MASTER-FILE-A
I.
02 FILE-DATE PICTURE X(8) VALUE SPACES.
60229400
Need help?
Do you have a question about the 3300 and is the answer not in the manual?