PH34885: After APAR PH33105 FUNCTION UUID4 performance improvement, UUID4 abends 0C4 in a CICS environment. 21/03/16 PTF PECHANGE

Obtain the fix for this APAR.

APAR status

• Closed as program error.

Error description

• After APAR PH33105, UUID4 hopes to use the hardware random
  number generator, and records whether this feature is available
  or not in the COBOL region control block upon first use of
  UUID4. This control block is allocated during CICS/LE
  initialization using the CICS key, so if CICS storage protection
  is enabled, UUID4 will abend S0C4.
  
  Environments other than CICS are unaffected.
  

Local fix

• Temporarily run the caller of UUID4 with EXECKEY(CICS).
  

Problem summary

• ****************************************************************
  * USERS AFFECTED: Users of Enterprise COBOL 6.3 with programs  *
  *                 that use the UUID4 intrinsic function under  *
  *                 CICS.                                        *
  ****************************************************************
  * PROBLEM DESCRIPTION: ABEND 0C4 occurs when UUID4 intrinsic   *
  *                      function is used under CICS with        *
  *                      storage protection on.                  *
  ****************************************************************
  * RECOMMENDATION: Apply the provided PTF.                      *
  ****************************************************************
  The UUID4 intrinsic function makes use of the PRNO hardware
  instructions to do computations when the instructions are
  available. Information about the availability of the hardware
  instructions is stored in a runtime control block. This control
  block is protected by CICS storage protection. The update
  process that manages the information uses the wrong storage key
  to update the runtime control block, resulting in an ABEND 0C4.
  

Problem conclusion

• Under CICS, the check for PRNO hardware availability is
  moved to a point prior to the COBOL Runtime control block
  storage become protected by CICS storage protection. The issue
  about storage key protection is avoided.
  

Temporary fix

Comments

APAR Information

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

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

  UI74556 UI74561

Modules/Macros

• IGZBALCT IGZCER4  IGZCEV4  IGZCMGEN IGZCMGUE IGZEDCCT IGZIBMCT
  IGZIGZCT IGZLLIBV IGZXAPI  IGZXCDA  IGZXD24  IGZXDMR  IGZXLPIO
  IGZXLPKA IGZXLPKB IGZXLPKC IGZXLPKD IGZXLPKE IGZXLPKF IGZXLPKG
  IGZXPK2
  

Fix information

• Fixed component name

  LE ENT COBOL LI

• Fixed component ID

  568819812

Applicable component levels

• R7B0 PSY UI74556

     UP21/03/30 P F103 {

• R7C0 PSY UI74561

     UP21/03/30 P F103 {

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.