COBOL Manual for TNS and TNS/R Programs

Procedure Division Verbs
HP COBOL Manual for TNS and TNS/R Programs—522555-006
9-22
CALL
parameter-1
is a data item defined in the Linkage, File, Working-Storage, or Extended-
Storage Section. It must be one of:
•
An elementary data item
•
A level-01 data item
•
A level-77 data item
•
A data item whose level is other than 01 or 77 is aligned on a 2-byte
boundary
If parameter-1 is subscripted, its first occurrence must be on a 2-byte
boundary and the number of occurrences must be even.
The number of parameter-1 s must be the same as the number of
parameters defined in the USING phrase of the called program. The size of
each parameter must be the same as the size of the corresponding parameter
in the called program. See Linkage Section.
If the called program is not written in COBOL, parameter-1 must be exactly
the data type that the called program expects.
parameter-2
is a data item defined in the Linkage, File, Working-Storage, or Extended-
Storage Section. It must be one of these data types:
If you are concerned about portability, use COMP-5 rather than NATIVE-2,
NATIVE-4, or NATIVE-8.
on-phrase
parameter-2 Corresponding Formal Parameter
Numeric data item described as COMP-5
with PICTURE S9(4) or NATIVE-2
16-bit data item
Numeric data item described as COMP-5
with PICTURE S9(9) or NATIVE-4
32-bit data item (2 words for a TNS
program, 1 word for a native program)
Numeric data item described as COMP-5
with PICTURE S9(18) or NATIVE-8
64-bit data item (four words for a TNS
program, 2 words for a native program)
1-character alphanumeric data item Single character
excp-imperative-statement
EXCEPTION
ON
VST615.vsd