DFHSR0001 OC4 AKEA in program when using Xpediter

Question & Answer

Question

Why is my CICS Transaction Server for z/OS (CICS TS) application failing with the following abend ASRA?

DFHSR0001 applid An abend (code 0C4/AKEA) has occurred at offset X'FFFFFFFF' in program progname.

I can see from trace that program DBUGCXI, running at the XPCFTCH exit point, is altering the entry point of the abending program. This appears to be the cause of the abend ASRA. DBUGCXI is part of Xpediter, Compuware’s mainframe application debugging and analysis tool.

Answer

Apply PTF(PA01996) from Compuware to fix Xpediter module DBUGCXI and the abend ASRA in IGZXLPKA.

To confirm that this will resolve your problem, use IPCS command VERBX DFHPD690 'TR=1' (where "710" is for CICS TS 5.4) to display the CICS trace in the system dump of the abend ASRA. You should see the program being invoked (MYPROGRM in this case):

 PG 0901 PGPG  ENTRY - FUNCTION(INITIAL_LINK) PROGRAM_NAME(MYPROGRM)

This program is loaded at 17047000:

 LD 0002 LDLD EXIT - FUNCTION(ACQUIRE_PROGRAM) RESPONSE(OK)
 ENTRY_POINT(97047000) LOAD_POINT(17047000) PROGRAM_LENGTH(4B70)

Then you'll see program DBUGCXI running at the XPCFTCH exit point alter the entry point of the program (to 800E706C in this trace entry):

 QR    AP D501 UEH   EVENT RETURN-FROM-USER-EXIT-PROGRAM DBUGCXI         
                     WITH RETURN CODE 4
                     RET-94717B84
                     11:37:58.6979076069 00.0000085708 =0065227
 QR    AP F242 PCLI  EVENT XPCFTCH-ADDRESS-MODIFIED ADDRESS(800E706C)<<  
                     PROGRAM(MYPROGRM)
                     RET-94160A8E
                     11:37:58.6979077583 00.0000001513 =0065228

In this case, the failing instruction was E30040040094 or LLC R0,X'4'(,R4) and within COBOL module IGZXLPKA. Register 4 (R4) 00586EC4 was bad, not addressable in the dump.

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

Product Synonym

CICS/TS CICSTS CICS TS CICS Transaction Server

Was this topic helpful?

Document Information

Modified date:
17 September 2019

UID

dwa1517546

Tips