DFHAP0701 applid An abend (code abcode) has occurred in exit program progname at exit point xxxxxxxx.

Explanation

An abnormal end (abend) or program check has occurred in the program progname. This implies that there is an error in the error program, that unexpected data has been input, or storage has been overwritten.

The code is a three digit hexadecimal MVS code (if applicable), followed by a four digit alphanumeric CICS code. The MVS code is a system completion code (for example, 0C1 or D37). If an MVS code is not applicable, this field is filled with three hyphens. The CICS code is an abend code or a number referring to a CICS message (for example, AKEA is a CICS abend code; 1310 refers to message DFHTS1310).

System action

CICS makes an exception entry in the trace table and returns a zero return code to the exit point. CICS also produces a system dump unless:

  • You have specifically suppressed dumps in the dump table, or

  • The exit point is XDUREQ. No dump is taken in order to avoid recursive dumping.

Either CICS continues unless you have specified in the dump table that CICS should terminate.

Or This is a critical error and CICS is terminated, even if you have specified in the dump table that CICS should not terminate. If this is the case, a zero return code is returned to the CICS management module.

User response

There might be a logic error in the user exit program progname. DISABLE the exit program from all exit points, by using the EXITALL operand in the EXEC CICS DISABLE, and correct the error.

For programming information about coding user exit programs see the Developing system programs for CICS.

Module

DFHSUEX, DFHUEH

XMEOUT parameters/Message inserts

  1. applid
  2. abcode
  3. progname
  4. xxxxxxxx

Destination

Console