COBOL Manual for TNS and TNS/R Programs

Program Compilation
HP COBOL Manual for TNS and TNS/R Programs—522555-006
11-90
LARGEDATA
If item is a data name, the COBOL85 compiler allocates space for it in the user
extended area; the NMCOBOL compiler allocates space for it in the large data
area. If the data name is a file record area, the same thing occurs only if all of
these conditions are true:
•
The data name is that of the first record area for the file.
•
The filename is specified in a SAME RECORD AREA clause.
•
The filename is the first one in the file section of all of the names specified in
the clause.
If the data name is a file record area and not all of the preceding are true, the
compiler ignores the LARGEDATA directive.
If item is a filename, the associated record area is allocated in the user extended
space unless both:
•
The filename is specified in a SAME RECORD AREA clause.
•
A file description entry for another file in the SAME RECORD AREA clause has
been processed already and a LARGEDATA directive does not apply to it.
You can compile a program with more than one LARGEDATA directive.
Default: None
Placement: Anywhere
Scope: If LARGEDATA specifies constants, or has no item, and precedes the
PROCEDURE DIVISION header in the program that contains it, then it
applies to the program that contains it and to subsequent programs. If
LARGEDATA specifies constants, or has no item, and follows the
PROCEDURE DIVISION header in the program that contains it, then it
applies only to subsequent programs.
Dependencies: Program must be compiled with ENV COMMON or ENV LIBRARY.
References: ENV