COBOL Manual for TNS and TNS/R Programs

Procedure Division Verbs
HP COBOL Manual for TNS and TNS/R Programs—522555-006
9-19
CALL
X/Open CALL statement transfers control from an HP COBOL program to a program
written in another language.
If the called program is not a function, or the calling program was compiled by the
COBOL85 compiler with the ENV LIBRARY directive, the X/Open CALL statement
does not change the value of RETURN-CODE.
If the value of the function is greater than 99,999, arithmetic overflow occurs.
If the called program is not a function, or was compiled by the COBOL85 compiler with
the ENV LIBRARY directive, the called program cannot change the value of RETURN-
CODE.
If a called program changes the value of RETURN-CODE, the calling program can
access that value when control returns to the calling program.
If the program was not compiled with the PORT directive, RETURN-CODE is
inaccessible.
called-entity
Note. If you use the X/Open CALL statement in the OSS environment, see Mixed-Language
Programs.
CALL
called-entity
USING phrase
on-phrase
historical-on-phrase
END-CALL
not-on-phrase
VST132.vsd
identifier
program-name
OF
IN
file-mnemonic
VST133.vsd