Use to access the full value of the EXITPARAM
string. (FUNCTION_PARAM
of EXIT_PARAMS
will only provide up to 256 bytes of any EXITPARAM
.)
Syntax
For C:
#include "usrdecs" char *exit_parm; short len; short result; result = GET_EXITPARAM_VALUE (exit_parm, &len));
For TAL:
?source usrdect int result; string .ext exit_parm; int .ext5 len; result := GET_EXITPARAM_VALUE (exit_parm, len);
For COBOL:
?CONSULT =EXTRACT (or = REPLICAT) 01 EXIT-PARM PIC X(1000). 01 LEN PIC S9(4) COMP. 01 RESULT PIC S9(4) COMP. ENTER C"GET_EXITPARAM_VALUE" using exit_parm, len giving result.