3-10
Format 4:
88 condition-name
1
VALUE IS
l
VALUES ARE\
literal-1 [THRU literal-2]
[, literal-3 [THRU literal-411 ..••
Format 5:
1
PIC
l
77 data-name-l PIcTURE pS ... [USAGE IS] ... [VALUE IS]. ..
etc.
All semicolons and commas are optional in the data description, but the entry
must be terminated by a period.
Format 1 is used at the 01 level only.
It
may be used when the complete
record description is contained in the COBOL library. The COpy statement
is described
in
section 6.1.
Format 2 has a level number in the range 1-49. The clauses are written in
any order with one exception: the REDEFINES clause, when used, must
immediately follow the data name.
PICTURE must be specified for every
elementary item unless USAGE is
L~DEX,
COMP-l, or COMP-2. The
following clauses may be specified only at the elementary item level:
PICTURE, SYNCHRONIZED, JUSTIFIED, and BLANK WHEN ZERO.
Format:3 is used with the RENAMES clause for alternate naming of elementary
items or group items not at the 01 level. The level number must always be 66.
The RENAMES clause must not be used with independent, level 77, entries.
Format 4 is used for condition name entries. Each condition name requires a
separate entry with the level number
88.
A condition name is a data name
assigned to the condition; VALUE(S) specifies the value, values, or range of
values associated with the condition name. A condition name entry must follow
the entry describing the variable item with which it is associated. A condition
name can be associated with any elementary or group item except the following:
another condition name, a level 66 item, a group of items requiring
special handling such as synchronization or usage, an index data item.
Format 5 describes independent items. An independent item is elementary,
and is not part of a record or in the File Section. The level number must be
77. Independent items are described with the same clauses used in format 2
for elementary items.
60229400
Need help?
Do you have a question about the 3300 and is the answer not in the manual?