Question & Answer
Question
Why am I receiving an abend 0C4 in module DFHSIB1 at offset x'1BA4' after introducing a new terminal control table (DFHTCT) in my CICS Transaction Server for z/OS (CICS TS) region? The program check is reported as:
DFHAP0001 An abend (code 0C4/AKEX) has occurred at offset X'FFFF' in module DFHAPDM
But, in the dump I can see that the abend 0C4 is actually within module DFHSIB1 at offset x'1BA4'. I have double checked the coding of the DFHTCT and all appears to be correct.
Answer
At offset 1BA4 in DFHSIB1, the module is trying to copy the VTAM APPLID into the TCTFX.
The failing instruction is a MVC to Key0 storage. DFHSIB1 is trying to copy the APPLID from the DFHSIT
into the TCT Prefix. The assembled DFHTCTXX has been loaded at 0008B700. This is part of the RDSA. The system initialization table (SIT) specifies RENTPGM=PROTECT, so the RDSA has been allocated from Key 0 storage.
Assembled TCTs would normally be loaded into the CDSA (key 8). But in this case, the TCT is in the RDSA because the DFHTCTxx table was link edited with the RENT option, making it reentrant and eligible to be loaded into read only storage.
You should verify the link edit steps for DFHTCTxx. If compiled with the RENT option, recompile it with NORENT instead to resolve this problem.
Product Synonym
CICS/TS CICSTS CICS TS CICS Transaction Server
Was this topic helpful?
Document Information
Modified date:
27 September 2018
UID
dwa1442462