PK19975: DFR GETS INFINITE LOOP IN DFRNWPD9 WITH Z/OS 1.7

Obtain the fix for this APAR.

APAR status

• Closed as program error.

Error description

• DFR tries to get the LPMB address but fails as the address
  field contains zero and DFR cannot get it.
  The looping instructions appear somewhere near or between x'220'
  and x'338' into the routine.
  

Local fix

Problem summary

• ****************************************************************
  * USERS AFFECTED: All IMS DEDB Fast Recovery Version 2         *
  *                 Release 2 (FMID=H1J2220) users who use IMS   *
  *                 V8 or IMS V9 in z/OS 1.7.                    *
  ****************************************************************
  * PROBLEM DESCRIPTION: DFR gets infinite loop in DFRNWPD8 and  *
  *                      DFRNWPD9 with z/OS 1.7.                 *
  ****************************************************************
  * RECOMMENDATION: Apply the maintenance for this APAR.         *
  ****************************************************************
  DFR refers LPMB to examine physical record size.
  In z/OS 1.7, DFR fails to get the LPMB address.
  Because the address field contains zero.
  To get physical record size, DFR should use IGGCSI00 interface
  instead of LPMB address field.
  

Problem conclusion

• The following macro/modules have been modified.
  -DFRDMAC8/DFRDMAC9
  Add a new field, DMACPRSZ to save physical record size of the
  area.
  -DFRINTF8/DFRINTF9
  Add code to initialize DMACPRSZ after DMAC is created.
  -DFRNWPD8/DFRNWPD9
  Modify code to get physical record size by using IGGCSI00
  interface.
  

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:

  UK12005

Modules/Macros

•    DFRDMAC8 DFRDMAC9 DFRINTF8 DFRINTF9 DFRNWPD8
  DFRNWPD9
  

Fix information

• Fixed component name

  DEDB FAST RECOV

• Fixed component ID

  5655E3200

Applicable component levels

• R220 PSY UK12005

     UP06/02/24 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.