X'0004' DEFAULT REASON CODE IF NONE SET

Explanation

The AIBREASN code in REG0 = 0 when the ERROR routine was called.

Programmer response

Trace back to the caller of the ERROR routine. This is an IMS internal error.