COBOL Manual for TNS/E Programs (H06.03+)

Procedure Division Verbs
HP COBOL Manual for TNS/E Programs—520347-003
9-19
CALL
If the program is compiled with the PORT directive, CALL behaves like the X/Open
CALL statement (which is not an element of COBOL). The 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, 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, 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