VMS Help
COBOL, DATA_DIVISION, clauses, VALUE_IS, 2format THROUGH
*Conan The Librarian
|
The VALUE IS clause defines the values associated with
condition-names, the initial value of Working-Storage Section data
items, the value of Report Section printable items, the compile-time
initialization of variables to the address of data, and to external
constants.
Format 2 -
{ VALUE IS } { { EXTERNAL external-name }
{ VALUES ARE } { { REFERENCE data-name }
{ { low-val }
[ { THRU } { EXTERNAL external-name } ] }
[ { THROUGH } { REFERENCE data-name } ] } ...
{ high-val } ] }
is a numeric or nonnumeric literal. It is the lowest value in a
range of values associated with a condition-name in a level 88 data
description entry.
is a numeric or nonnumeric literal. It is the highest value in a
range of values associated with a condition-name in a level 88 data
description entry.
names a data item in the File or Working-Storage Section.
Data-name may be qualified.
names a COBOL link-time bound constant. It must define a word or
longword integer value.