COBOL Manual for TNS and TNS/R Programs
HP COBOL Limits
HP COBOL Manual for TNS and TNS/R Programs—522555-006
20-6
Number
•
Procedure names in a program (COBOL85 compiler only)
The default maximum number of procedure names (paragraph names and section
names) in a program is approximately 1K. You can change the default with the
PARAM SYMBOL-BLOCKS command (see PARAM SYMBOL-BLOCKS).
•
Records
°
External (COBOL85 compiler only)
A record (or file) that has the EXTERNAL attribute belongs to the run unit itself,
and is available to any program in the run unit that declares it consistently.
Up to 24 Extended-Storage Section records can have the EXTERNAL
attribute. Each such record consumes 2 units of allocation. Call the number of
such records actually used N.
The allocation units remaining for EXTERNAL records of Working-Storage
Section, EXTERNAL records of File Section, and the EXTERNAL files
associated with those records is:
240 - ( 2 * N )
Each Working-Storage Section EXTERNAL record (together with any
redefinitions of it) consumes one unit of allocation. Each File-Section
EXTERNAL file consumes one unit of allocation for its record area (together
with any redefinitions of it).
°
Internal
There is no explicit limit on the number of internal records (records that do not
have the EXTERNAL attribute) in a main program, a called program, or a run
unit.
•
Receivers
°
In an INITIALIZE Statement
The maximum number of receivers in an INITIALIZE statement is 127.
°
In a MOVE statement
The maximum number of receivers in a MOVE statement is 255.
•
References to level-88 condition-names in a program (NMCOBOL only)
A condition-name can be defined in the Environment Division (associated with an
external switch) or in the Data Division (as a level-88 item). The Procedure Division
of a program can have a maximum of 32,767 references to level-88 condition-
names. There is no limit to the number of references to condition-names for
external switches.
•
Subjects in an EVALUATE statement
The maximum number of receivers in an EVALUATE statement is 127.