Question & Answer
Question
Why are my COBOL application modules getting an abend0C1 abendASRA in CICS Transaction Server for z/OS (CICS TS)? I am sure that the exception can be different depending on the application but, in this case, before the abend I see:
XML PARSE WS-XML
PROCESSING PROCEDURE 1000-XML-HANDLER
ON EXCEPTION
The dump of the abend shows:
DUMPCODE: ASRA
DATE/TIME: 4/05/15 10:35:56 (LOCAL)
MESSAGE: (None)
SYMPTOMS: SYMPTOMS= AB/UASRA PIDS/5655Y0400 FLDS/DFHABAB RIDS/PROGRAMX
and this is what I see in the Kernel Error table:
00000046 10:28:50 00B7 PROGRAM_CHECK 0C1/AKEA UNKNOWN UNKNOWN
00000047 10:28:50 00B7 TRAN_ABEND_PERCOLATE ---/ASRA DFHSR1 000006EC
00000048 10:28:50 00B7 TRAN_ABEND_PERCOLATE ---/ASRA DFHEPC 000001AA
00000049 10:34:51 00B7 PROGRAM_CHECK 0C1/AKEA UNKNOWN UNKNOWN
0000004A 10:34:51 00B7 TRAN_ABEND_PERCOLATE ---/ASRA DFHSR1 000006EC
Answer
In this case, CICS TS was installed along with COBOL Version 5 and a new CEECCSD definition was being used. COBOL shipped new modules that are missing from the CICS System Definition (CSD) file. Here are the program definitions that need to be added to Group(CEE) of the CSD:
DEFINE PROGRAM(IGZXLPKB) GROUP(CEE) <-- new
DEFINE PROGRAM(IGZXLPKD) GROUP(CEE) <-- new
DEFINE PROGRAM(IGZXLPKE) GROUP(CEE) <-- new
DEFINE PROGRAM(IGZXLPKF) GROUP(CEE) <-- new
DEFINE PROGRAM(IGZXLPKG) GROUP(CEE) <-- new
DEFINE PROGRAM(IGZXPK2) GROUP(CEE) <-- new
For more information, refer to Enterprise COBOL for z/OS technote 1697364: Action Required (CICS/Link Pack Area): New runtime library modules for Enterprise COBOL V5
A request for enhancement (RFE) has been submitted for CICS to remove the need for a Systems Programmer from having any role in installing LE (or Language) resource definitions in CICS. This RFE requests that LE and CICS software completely handle the task of installing the necessary definitions in CICS. If you would like to increase the chances of this enhancement request being completed, click on RFE 72589 then signon using your IBMid, scroll to the bottom of the page, and click on "vote" to vote for it.
Product Synonym
CICS/TS CICSTS CICS TS CICS Transaction Server
Was this topic helpful?
Document Information
Modified date:
20 July 2021
UID
dwa1234145