Call invocation return code variables

For call invocation, the return code is returned in register 15 or, in FORTRAN and Pascal programs, in registers 15 and 0. In APL2®, the return code is placed on the execution stack by the ISPEXEC function.

FORTRAN and Pascal

FORTRAN and Pascal programs can examine the return code by using an integer variable, such as lastrc in this example:

lastrc = ISPLNK (service name, parameter1, parameter2, ...)

PL/I

PL/I programs can examine the return code by using the PLIRETV built-in function. These declaration statements are required:

DECLARE ISPLINK EXTERNAL ENTRY OPTIONS(ASM INTER RETCODE);
DECLARE PLIRETV BUILTIN;

or alternatively:

DECLARE ISPEXEC EXTERNAL ENTRY OPTIONS(ASM INTER RETCODE);
DECLARE PLIRETV BUILTIN;

COBOL

COBOL programs can examine the return code by using the built-in RETURN-CODE variable.