PI72436: ABEND0C4 in DECENA01, DECENB01, and DECENC01 when called by IMS High Performance Fast Path Utility processing after APAR PI58702

Obtain the fix for this APAR.

APAR status

• Closed as program error.

Error description

• Any IMS data encrypted using an exit built with a pre-PI58702
  level of DECENA01, DECENB01, or DECENC01 code cannot be
  properly decrypted using an exit built with the PI58702, or
  later, level of code. See APAR PI58702 for the migration
  actions that must be performed so that the data can be properly
  decrypted.
  
  APAR PI58702 changed the exits to use the area pointed to by
  PSTLOGWA for an internal work area.  This does not work when
  the exits are called by the IMS High Performance Fast Path, as
  they pass a value of 0 rather than a PST address in R1 when the
  exit is called.  The exits function properly when they are
  called by IMS DLI, BMP, DBCTL, or utility processsing, because
  a PST address is always passed in R1 as documented for the
  compression/decompression exit interface in the IMS books.  IMS
  High Performance utility processing documents in their books
  that they deviate from the IMS exit interface and pass a value
  of 0 in R1.
  
  New function APAR PI57908 shipped exit DECENAA1 and APAR
  PI55772 shipped exit DECENBB1 with the same issue in their base
  code, and will also be addressed.
  

Local fix

Problem summary

• ****************************************************************
  * USERS AFFECTED: All users                                    *
  ****************************************************************
  * PROBLEM DESCRIPTION: APAR PI58702 changed the exits to use   *
  *                      the area pointed to by PSTLOGWA for an  *
  *                      internal work area. This does not work  *
  *                      when the exits are called by the IMS    *
  *                      High Performance Fast Path, as they     *
  *                      pass a value of 0 rather than a PST     *
  *                      address in R1 when the exit is called.  *
  *                      The exits function properly when they   *
  *                      are called by IMS DLI, BMP, DBCTL, or   *
  *                      utility processsing, because a PST      *
  *                      address is always passed in R1 as       *
  *                      documented for the compression/         *
  *                      decompression exit interface in the IMS *
  *                      books. IMS High Performance utility     *
  *                      processing documents in their books     *
  *                      that they deviate from the IMS exit     *
  *                      interface and pass a value of 0 in R1.  *
  *                                                              *
  *                      New function APAR PI57908 shipped exit  *
  *                      DECENAA1 and APAR PI55772 shipped exit  *
  *                      DECENBB1 with the same issue in their   *
  *                      base code, and will also be addressed.  *
  ****************************************************************
  * RECOMMENDATION:                                              *
  ****************************************************************
  

Problem conclusion

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:

  UI43291

Modules/Macros

• DECENAA1 DECENA01 DECENBB1 DECENB01 DECENCDV
  DECENC01 DECENC05 DECENC07 DECF00U5 DECF0005 DECF0010 DECHB0
  DECHI0   DECIMSCB DECIMSDV DECPI0   DECSSI10 H29F120J
  

Fix information

• Fixed component name

  DATA ENCRYPTION

• Fixed component ID

  5655P0300

Applicable component levels

• R120 PSY UI43291

     UP16/12/17 P F612 Ø

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.