IBM Support

4038 or 4087 and HANDLE ABEND routine does not gain control in CICS TS

Question & Answer


Question

Why doesn't my HANDLE ABEND routine get control when my CICS transaction abends with an abend 4038? In this particular case, the abend 4038 is due to the COBOL application dynamically calling a module that is not available; this could be due to specifying an incorrect module name on the CALL or the module might not exist.

Answer

Language Environment (LE) is handling this error differently than COBOL handled it in the past. You no longer receive an abend 0096 or abend 1096 that can be handled, but rather the abend 4038 or 4087 that can not be handled. LE requests abend 4038 and 4087 (abend4038 abend4087) a cancel option. The cancel disables the HANDLE ABEND requests that the application made.

To resolve this problem, you can install the LE user handler called CEEWUCHA. It will generate abends that will allow CICS Transaction Server for z/OS (CICS TS) to pass control back to the applications HANDLE ABEND routines. CEEWUCHA will work with the newer COBOL for MVS/ESA and Enterprise releases.

CEEWUCHA provides compatibility that extends beyond the older VS COBOLII and PL/I releases. It will alter the default abend actions that LE makes so that the actions are similar to the abend processing that COBOLII and PL/I performed.

This is one possible explanation for your problem. If your problem is not resolved by these suggestions, you should go ahead and open a service request with IBM Level2 so they can analyze your problem to determine the cause. Before opening a problem, take a look at Collect troubleshooting data for LE 40xx abend problems in CICS TS for z/OS. This CICS Mustgather has information on the diagnostic information you should collect for the CICS Level2 Team when you receive an LE 40xx abends.

Related information: LE messages CEE3501S and CEE1000S

[{"Business Unit":{"code":"BU058","label":"IBM Infrastructure w\/TPS"},"Product":{"code":"SSGMGV","label":"CICS Transaction Server"},"Platform":[{"code":"PF035","label":"z\/OS"}],"Component":"LE370","Version":"","Line of Business":{"code":"LOB35","label":"Mainframe SW"}}]

Product Synonym

CICS/TS CICSTS CICS TS CICS Transaction Server

Document Information

Modified date:
26 February 2020

UID

dwa1205807