PK04841: ABENDAEYD ABEND0C4 IN DFHEIP OFFSET X'C66' AFTER CEMT INQUIRE PROGRAM

Obtain the fix for this APAR.

APAR status

• Closed as program error.

Error description

• A terminal user with INQUIRE authority but not SET authority
  issues a CEMT I PROGRAM(progname) followed by SET PROGRAM from
  the same CEMT task, and an abendAEYD occurs. The AEYD abend is
  due to an abend0C4 in DFHEIP, offset x'C66' in the Hired Gun
  checking routine, label EICCHGUN (or EICHGN). The failure occurs
  on an OI instruction (9600 2000) with Reg2 pointing to an area
  in key0 extended private storage. The PSW is in key8.
  .
  CICS trace shows that we are processing an EXEC CICS INQUIRE
  PROGRAM END command that was issued by DFHEMT01. At time of the
  0C4 abend, byte 3 of Arg0 passed on the EXEC CICS call contains
  x'08', which causes DFHEIP to attempt to "touch" what we think
  is the associated output parameter. However, only one parameter
  is passed on a INQUIRE PROGRAM END request, and we end up
  checking storage that happens to be key0 storage, causing the
  program check.
  

Local fix

Problem summary

• ****************************************************************
  * USERS AFFECTED: All.                                         *
  ****************************************************************
  * PROBLEM DESCRIPTION: Abend 0C4 in DFHEIP.                    *
  ****************************************************************
  * RECOMMENDATION:                                              *
  ****************************************************************
  When exiting CEMT following a CEMT SET PROGRAM command which was
  issued during a generic CEMT INQUIRE PROGRAM request,  CEMT
  generates an EXEC CICS INQUIRE PROGRAM END. This command should
  pass 1 parameter but its ARG0 contained a value in bytes 3 and 4
  indicating there was an associated output parameter. This caused
  the command to reference key0 storage and program check.  This
  problem will only occur when CMDPROT=YES.
  
  Additional Keywords: S0C4 ABENDS0C4 AEYF ABENDAEYF SRPCNCHK
  

Problem conclusion

• DFHEIN01 has been modified, the 3rd and 4th bytes of ARG0 will
  now get explicitly cleared when terminating a CEMT browse.
  

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:

  UK05430

Modules/Macros

•    DFHEIN01 DFHEMT01 DFHESP01
  

Fix information

• Fixed component name

  CICSTS 3.1 Z/OS

• Fixed component ID

  5655M1500

Applicable component levels

• R400 PSY UK05430

     UP05/07/19 P F507

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.