C$CALLERR

Retrieves the reason why the last CALL statement failed. For accurate information, it must be called before any other CALL statement is executed.

Usage

CALL "C$CALLERR" 
    USING ERR-CODE, ERR-MESSAGE

Parameters

ERR-CODE PIC X(2)

This parameter receives one of the following values:

01 Program file missing or inaccessible
02 Called file not a COBOL program
03 Corrupted program file
04 Inadequate memory available to load program
05 Unsupported object code version number
06 Recursive CALL of a program
07 Too many external segments
08 Large-model program not supported (returned only by run-time systems that do not support large-model programs)
09 Exit Windows and run "share.exe" to run multiple copies of "wrun32.exe" (returned only by Windows run-time systems)
14 Japanese objects are not supported (returned only by run-time systems that do not support Japanese objects)

ERR-MESSAGE PIC X(n) (optional)   

This routine may optionally be passed a second alphanumeric parameter. This parameter is filled in with a descriptive message about the error encountered.