At my customer's site, there is an LE abend exit (written by programmers
of my customer),
which gets control first when problems occur under LE control (much like
ESPIE,
but for every LE interrupt). The abend exit has access to the CIB and
the registers there
and can produce a readable (site specific) short error diagnose, which
is much
more readable than the normal CEEDUMP.
I wrote the subroutine for this LE exit (in 2005) which does the
reporting of the error,
but not the exit itself; this was done by an (intern) co-worker,
so I am not familiar with the details of the LE exit and its interfaces.
But the CIB is part of it.
Kind regards
Bernd
Am 20.04.2021 um 19:38 schrieb Steff Gladstone:
Greetings,
I would like to be able to locate, under CICS, the CIB representing the
original abend (ideally in the XPCTA GLUE exit) before LE intercepted it
and substituted its own 4038 user abend. Not surprisingly, the CEE3CIB
callable routine abends on S0C4.
Anybody know how to do this?
All the best,
Steff Gladstone
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN