A fix is available
APAR status
Closed as program error.
Error description
Customer is running CICS IA 5.2 when a transaction does a EXEC CICS WRITEQ TD request and CICS IA gets control via GLUE CICS EXIT XTDEREQC. CICS IA Program CIUXCCD1 is running at this exit point but then suffers abend0c4 pic10 since register 10 is bad. . Error occurred in program CIUXCCD1 at offset 00000A7E under the CICS RB in basespace Execution key at Program Check/Abend: 8 Instruction Length: 6 Interrupt Code: 0010 Exception Address: 00684800 AMODE: 31 Branch Event Address: 2D378A98 Module CIUXCCD1 + X'A98' CICS Error Instruction Address: 2D378A7E Module CIUXCCD1 + X'A7E' CICS Registers: R0: ACF8252E Module CIU69XPI + X'52E' R1: 2C994214 635522540 bytes of storage R2: 001018A8 4974424 bytes of storage a R3: AD378000 Module CIUXCCD1 + X'0' R4: 00000000 2048 bytes of storage addr R5: 00000034 1996 bytes of storage addr R6: 2C96DB98 635679848 bytes of storage R7: 2CDF0000 630951936 bytes of storage R8: 2C9941D8 635522600 bytes of storage R9: 2C99420C 635522548 bytes of storage R10: 006841B8 Storage invalid R11: 2C96DC28 635679704 bytes of storage R12: 00101100 Task 01725 User EIB + X'0' R13: 2C994140 635522752 bytes of storage R14: AD3781CA Module CIUXCCD1 + X'1CA' R15: ACF82000 Module CIU69XPI + X'0' CICS trace : AP 00E1 EIP ENTRY WRITEQ-TD AP E110 EISR ENTRY TRACE_ENTRY AP E160 EXEC ENTRY WRITEQ AP E111 EISR EXIT TRACE_ENTRY/OK AP D500 UEH EVENT LINK-TO-USER-EXIT-PROGRAM CIUXCCO1 AT EXIT POINT XEIIN AP D501 UEH EVENT RETURN-FROM-USER-EXIT-PROGRAM CIUXCCO1 WITH RETURN CODE 0 AP F600 TDA ENTRY WRITE_TRANSIENT_DATA CESE AP F601 TDA EXIT WRITE_TRANSIENT_DATA/OK AP D500 UEH EVENT LINK-TO-USER-EXIT-PROGRAM CIUXCCD1 AT EXIT POINT XTDEREQC AP 0920 APIQ ENTRY INQ_APPLICATION_DATA US 0401 USXM ENTRY INQUIRE_TRANSACTION_USER US 0402 USXM EXIT INQUIRE_TRANSACTION_USER/OK 52573F40 AP 0921 APIQ EXIT INQ_APPLICATION_DATA/OK 00101100 LD 0001 LDLD ENTRY IDENTIFY_PROGRAM 005E0752 LD 0002 LDLD EXIT IDENTIFY_PROGRAM/EXCEPTION INSTANCE_NOT_FOUND AP D50E UEH *EXC* RECOVERY CIUXCCD1
Local fix
Problem summary
**************************************************************** * USERS AFFECTED: * * All users of CICS IA version 5.3 * **************************************************************** * PROBLEM DESCRIPTION: * * Customer is running CICS IA 5.3 when a * * transaction does a EXEC CICS WRITEQ TD * * request and CICS IA gets control via * * GLUE CICS EXIT XTDEREQC. CICS IA Program * * CIUXCCD1 is running at this exit point * * but then suffers abend 0c4 pic10 since a * * address in the register 10 is bad. * **************************************************************** * RECOMMENDATION: * * Apply the PTF and execute HOLD.ACTION. * **************************************************************** Abend 0c4 from CIUXCCD1 since a AMODE determination was incorrect. The subroutine CHECK_DSPL checks AMODE for R15 register in RSA by the value of the appropriate bit of the same register, but this value has been empted previously, so procedure fixed 24 bit address mode even in the case of 31 bit address mode.
Problem conclusion
The subroutine CHECK_DSPL need not check AMODE, because it uses the content in register as the address.
Temporary fix
Comments
APAR Information
APAR number
PI54002
Reported component name
CICS IA V5
Reported component ID
5655Y2200
Reported release
530
Status
CLOSED PER
PE
NoPE
HIPER
NoHIPER
Special Attention
NoSpecatt / Xsystem
Submitted date
2015-12-11
Closed date
2016-02-02
Last modified date
2016-03-02
APAR is sysrouted FROM one or more of the following:
APAR is sysrouted TO one or more of the following:
PI56218 UI35085
Modules/Macros
CIU53XPI CIU62XPI CIU63XPI CIU64XPI CIU65XPI CIU66XPI CIU67XPI CIU68XPI CIU69XPI CIU70XPI CIUACM61 CIUBCXPI CIUXACD1 CIUXACE2 CIUXACI1 CIUXACL2 CIUXACO2 CIUXACO3 CIUXACP1 CIUXACR2 CIUXACR3 CIUXACS1 CIUXACT1 CIUXCCD1
Fix information
Fixed component name
CICS IA V5
Fixed component ID
5655Y2200
Applicable component levels
R530 PSY UI35085
UP16/02/23 P F602
Fix is available
Select the PTF appropriate for your component level. You will be required to sign in. Distribution on physical media is not available in all countries.
[{"Business Unit":{"code":"BU058","label":"IBM Infrastructure w\/TPS"},"Product":{"code":"SSPPUS","label":"CICS Interdependency Analyzer for z\/OS"},"Component":"","ARM Category":[],"Platform":[{"code":"PF025","label":"Platform Independent"}],"Version":"5.3","Edition":"","Line of Business":{"code":"LOB35","label":"Mainframe SW"}},{"Business Unit":{"code":"BU054","label":"Systems w\/TPS"},"Product":{"code":"SG19M","label":"APARs - z\/OS environment"},"Component":"","ARM Category":[],"Platform":[{"code":"PF025","label":"Platform Independent"}],"Version":"5.3","Edition":"","Line of Business":{"code":"","label":""}}]
Document Information
Modified date:
02 March 2016