Condition-Handling Services

The following table shows the LE condition-handling callable services that are supported by this COBOL system.

Routine	Description	Supported?
CEE3CIB	Return pointer to Condition Information Block	No *
CEE3GRN	Get name of routine that incurred condition	No *
CEE3GRO	Get offset of condition	No *
CEE3SPM	Query/modify LE/370 Hardware Condition Enablement	No *
CEE3SRP	Set resume point	No *
CEEDCOD	Decompose a condition token	Yes
CEEGPID	Retrieve the LE/370 version and platform ID	Yes
CEEGQDT	Retrieve q_data_token	No *
CEEHDLR	Register user-written condition handler	No *
CEEHDLU	Unregister user-written condition handler	No *
CEEITOK	Return initial condition token	No *
CEEMRCE	Move resume cursor explicit	No *
CEEMRCR	Move resume cursor	No *
CEENCOD	Construct a condition token	Yes
CEESGL	Signal a condition	No *

Note:

Calls to unsupported routines marked by '*' are accepted but no action occurs. In the FEED_BACK condition (FC) code, the severity is set to 4, the message number to 9999, and the facility-ID to MFX.
Calls to unsupported routines marked by '**' are not accepted and if used in a COBOL program result in the fatal run-time system error 173 ("Called program file not found in drive/directory").
CBL_GET_ERROR_INFO and cobgeterrorinfo offer similar functionality to the CEE3GRN and CEE3GRO routines, and are expected to be used in similar circumstances.