Rational Developer for System z
Enterprise COBOL for z/OS, Version 4.1, Compiler and Runtime Migration Guide


Timing of abend for runtime detected errors

The timing of abends between Language Environment and VS COBOL II is different for runtime detected errors (such as IGZ0061S division by zero or IGZ0006S subscript out of range). This difference in the timing of abends affects the behavior of CICS HANDLE ABEND.

Under Language Environment, the following events occur when there is a runtime detected error (with ABTERMENC(ABEND) in effect):

  1. A Language Environment software-generated condition is signalled.
  2. The Language Environment condition manager gives control to any user condition handlers that have been registered.
  3. If the condition has not been handled, the enclave is terminated and Language Environment issues a 4038 abend.

With VS COBOL II, the following events occur when there is a runtime detected error:

  1. An error message is written.
  2. An abend 1xxx is issued.

Under Language Environment, when a runtime detected error occurs, the enclave (run unit) that contains the code is terminated before the abend is issued. Thus, code at a label referenced in the CICS HANDLE ABEND command does not get control.

Under VS COBOL II, an abend is issued while the run unit still exists, so code at the HANDLE ABEND label is executed.

For behavior compatible with VS COBOL II, use the sample user condition handler code, CEEWUCHA, that is provided with Language Environment in the SCEESAMP data set.

When you use CEEWUCHA under Language Environment, the following events occur when there is a runtime detected error (with ABTERMENC(ABEND) in effect):

  1. A Language Environment software generated condition is signalled.
  2. The Language Environment condition manager gives control to any user condition handlers that have been registered.
  3. The CEEWUCHA user condition handler gets control and causes the following to occur:
    • An error message is written.
    • A Language Environment dump is produced.
    • An abend 1xxx is issued.

Terms of use | Feedback

This information center is powered by Eclipse technology. (http://www.eclipse.org)