PI41673: AFTER APPLYING MAINTENANCE TO CICS, YOU RECIEVE LE ABEND4088 REASON 63 AFTER AN ABEND ASP3 15/07/21 PTF PECHANGE

Obtain the fix for this APAR.

APAR status

• Closed as program error.

Error description

• After applying maintenance to CICS - in this case RSU 1410,
  you notice different behavior after a CICS Transaction
  ABENDASP3.  You receive the following:
  CEE1000S  ABCODE = 4088 REASON = 00000063
  .
  Reviewing a dump from the 4088 abend, the kernel error
  table shows the following entries:
  Num Err_Time KE_NUM Error Type      Err_Code  Module   Offset
  01  02:00:28 0083   TRAN ABEND PERC ---/ASP3  DFHPCP   000696
  02  02:00:28 0083   TRAN ABEND PERC ---/ASP3  DFHSPP   0005AA
  03  02:00:28 0083   TRAN ABEND PERC ---/ASP3  DFHEISP  000698
  04  02:00:28 0083   TRAN ABEND PERC ---/ASP3  DFHEIP   000AD6
  05  02:00:28 0083   TRAN ABEND PERC ---/ASP3  DFHEPC   000226
  06  02:00:28 0083   PROGRAM CHECK   0C4/AKEA  CEEPLPKA 1C8B22
  07  02:00:28 0083   TRAN ABEND PERC ---/4088  DFHEPC   000724
  .
  CICS called LE for Rununit_End_Invocation, and LE experienced
  a program check.
  They determined this is due to an incorrect bit setting CICS
  passed to them in argument 10 = celinfo.
  You can see this Celinfo in data area 4 of  the AP 1948 trace
  entry:
  .
  APLI EVENT CALL-TO-LE/370 - Rununit_End_Invocation
         Program_name(xxxxx)
   4-0000  86340000 C1E2D7F3 00000000 00000000
             **
  The second byte has the x'08' bit off, indicating we have
  passed 31 bit registers, yet we have passed 64 bit registers.
  This causes LE to pick up incorrect register value for R13.
  
  Additional Symptom(s) Search Keyword(s): KIXREVDAM
  loop 0C4  ASPQ ABENDU4088 abend4088 ABEND0C4 ABENDS0C4
  DO_LE370_RUNUNIT_END_INVOCATION after a transaction abend
  

Local fix

Problem summary

• ****************************************************************
  * USERS AFFECTED: All                                          *
  ****************************************************************
  * PROBLEM DESCRIPTION: After applying the PTF of APAR PM36890, *
  *                      an application abend is followed by a   *
  *                      4088 or 4082 abend in Language          *
  *                      Environment.                            *
  ****************************************************************
  * RECOMMENDATION:                                              *
  ****************************************************************
  The fix for PM36890 altered DFHAPLI1 so that if 64 bit registers
  are not available at the time of an abend it will unset the bit
  that indicates to Language Environment that the registers are in
  64 bit format, and pass the program check registers to LE in 32
  bit format. However CICS also passes a second set of registers
  to LE - the registers at the time of the last EXEC CICS command
  - and in this case, these were in 64 bit format. DFHAPLI1 unset
  the LE indicator bit and passed the 32 bit program check
  registers to LE, but failed to do the same for the registers at
  the time of the last EXEC CICS command. LE attempted to address
  storage pointed to by one of these registers, but the incorrect
  format resulted in an abend.
  Depending on the problem scenario, the result could be either
  abend4082 or abend4088.
  Keyword: termcode_bit12
  

Problem conclusion

• UI20470 UI20471 UI20751 UI21317
  DFHAPLI1 has been changed to pass the registers at the last EXEC
  CICS command in 32-bit format if the registers at the time of
  the abend are also in 32 bit format.
  

Temporary fix

• FIX AVAILABLE BY PTF ONLY
  

Comments

APAR Information

• APAR is sysrouted FROM one or more of the following:

• APAR is sysrouted TO one or more of the following:

  PI44740 UI30360 UI30361

Modules/Macros

• DFHAPCR  DFHAPCR1 DFHAPLI1 DFHAPLJP DFHAPLJ1 DFHAPLX1 DFHAPRT
  DFHCZTRI DFHECEAH DFHECEAM DFHECEAS DFHECEAT DFHECEB  DFHECEC
  DFHECEI  DFHECIS  DFHECRL  DFHECSC  DFHEIBAM DFHEIDTI DFHEIIC
  DFHEIQBA DFHEPAS  DFHEPC   DFHEPEV  DFHEPRL  DFHICP   DFHICXM
  DFHIEIE  DFHIIRR  DFHIIXM  DFHISXF  DFHISXS  DFHJSON  DFHKEDS
  DFHKETCB DFHMESOC DFHMESOE DFHMESOK DFHMLJS  DFHMLPC  DFHMLTF
  DFHMQTM  DFHPCXDF DFHPGCH  DFHPGCP  DFHPGCR  DFHPGCRT DFHPIAD
  DFHPIAT  DFHPIA1  DFHPICA  DFHPICC  DFHPIDM  DFHPIDSH DFHPIDSQ
  DFHPIDUF DFHPIII  DFHPIIW  DFHPILN  DFHPILSQ DFHPIMM  DFHPIPL
  DFHPIPM  DFHPIPM2 DFHPIPS  DFHPIRE  DFHPIRI  DFHPIRM  DFHPIRS
  DFHPIRT  DFHPISC  DFHPISF  DFHPISN  DFHPISN2 DFHPIST  DFHPITC
  DFHPITC1 DFHPITC2 DFHPITC3 DFHPITE  DFHPITH  DFHPITL  DFHPITQ
  DFHPITQ1 DFHPITRI DFHPITS  DFHPIUE  DFHPIWR  DFHPIWT  DFHPIXI
  DFHPIXM  DFHPIXO  DFHRLBR  DFHRLDM  DFHRLPK1 DFHRLPM  DFHRLRG1
  DFHRLRO  DFHRLRS1 DFHRLST  DFHRLVC  DFHRZDM  DFHRZIX  DFHRZLN
  DFHRZNR2 DFHRZRG2 DFHRZRM  DFHRZRS1 DFHRZSO  DFHRZSO1 DFHRZTA
  DFHRZTCX DFHRZTRI DFHRZTR1 DFHRZXM  DFHSJBD  DFHSJCC  DFHSJDM
  DFHSJDS  DFHSJDUF DFHSJGC  DFHSJIN  DFHSJINT DFHSJIS  DFHSJJI
  DFHSJJS  DFHSJPI  DFHSJPTI DFHSJRL  DFHSJSA  DFHSJSM  DFHSJST
  DFHSJTH  DFHSJTHT DFHSJTRI DFHSOAD  DFHSOCK  DFHSOCKT DFHSODM
  DFHSODS  DFHSODUF DFHSOIS  DFHSOL   DFHSOLI  DFHSOLS  DFHSOLX
  DFHSOM01 DFHSOM02 DFHSOM03 DFHSOPL  DFHSORD  DFHSORL  DFHSOSE
  DFHSOSES DFHSOST  DFHSOS00 DFHSOS01 DFHSOS02 DFHSOS03 DFHSOS04
  DFHSOS05 DFHSOS06 DFHSOS07 DFHSOS08 DFHSOS09 DFHSOS10 DFHSOS11
  DFHSOS12 DFHSOS13 DFHSOS14 DFHSOS15 DFHSOS16 DFHSOS17 DFHSOS18
  DFHSOS19 DFHSOS20 DFHSOS21 DFHSOS22 DFHSOS23 DFHSOTB  DFHSOTI
  DFHSOTRI DFHSOUE  DFHSOXM  DFHSPEJB DFHSPEJC DFHSPEJE DFHSPISB
  DFHSPISC DFHSPISE DFHSPSOB DFHSPSOC DFHSPSOE DFHSPWBB DFHSPWBC
  DFHSPWBE DFHTCDUF DFHTIMF  DFHTIMFT DFHWBA   DFHWBAP  DFHWBAPF
  DFHWBBLI DFHWBCL  DFHWBCLI DFHWBDM  DFHWBDUF DFHWBQM  DFHWBSO
  DFHWBSR  DFHWBSV  DFHWBXM  DFHWBXN  DFHWSADH DFHWSATH DFHWSATR
  DFHWSATX DFHW2AC  DFHW2ER  DFHW2FD  DFHW2FI  DFHW2FR  DFHW2SD
  DFHW2TS  DFHW2W2  DFHXSCT  DFHXSEJ  DFHXSTS  DFHZIS2
  

Fix information

• Fixed component name

  CICS TS Z/OS V4

• Fixed component ID

  5655S9700

Applicable component levels

• R600 PSY UI30360

     UP15/08/28 P F508 {

• R700 PSY UI30361

     UP15/08/28 P F508 {

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.