COBOL Manual for TNS and TNS/R Programs

Program Compilation
HP COBOL Manual for TNS and TNS/R Programs—522555-006
11-89
LARGEDATA
item
is one of:
•
An unsigned integer constant between 0 and 32767
•
A filename
•
A level-01 data name
•
A level-77 data name
If LARGEDATA is specified without item, the COBOL85 compiler uses the value
256 and the NMCOBOL compiler uses the value 64. If the LARGEDATA directive is
not specified, the COBOL85 compiler uses LARGEDATA 0 and the NMCOBOL
compiler uses LARGEDATA 64.
If item is a constant:
•
If item is zero, the COBOL85 compiler allocates space for data items whose
definitions are not in the Extended-Storage Section in user data space unless
the item is directly or indirectly specified by name in a LARGEDATA directive.
An item is indirectly specified if it is a file record area and the filename is
specified in a LARGEDATA directive (it is as if the LARGEDATA directive were
never specified with a constant). The NMCOBOL compiler allocates all such
data items in the small data area.
•
If item is less than the default, the compiler uses the default instead.
•
If item is greater than or equal to the default, the COBOL85 compiler
allocates space for data items and record areas that are at least item bytes in
the user extended area, and the NMCOBOL compiler allocates space for them
in the large data area. If a file description entry is followed by more than one
record description entry and the length of any record description entry other
than the first is greater than or equal to item, allocation depends on the first
record or on the filename.
LARGEDATA
item
(
item
,
)
item
VST725.vsd