PM84832: IMS DEDB FAST RECOVERY ENHANCEMENT IN SUPPORT OF IMS V12 APAR PM69149

Obtain the fix for this APAR.

APAR status

• Closed as new function.

Error description

• IMS DEDB Fast Recovery enhancement in support of IMS V12 APAR
  PM69149 (PTF UK83042).
  

Local fix

Problem summary

• ****************************************************************
  * USERS AFFECTED: All IMS DEDB FAST RECOVERY Version 2         *
  *                 Release 2 (FMID=H1J2220) users who use an    *
  *                 extended format OLDS in IMS V12.             *
  ****************************************************************
  * PROBLEM DESCRIPTION: This APAR is DFR version for IMS V12    *
  *                      APAR PM69149 (PTF is UK83042).          *
  *                      - PM69149                               *
  *                      When an extended format OLDS dataset    *
  *                      has multiple extents on a volume,       *
  *                      the total size of the OLDS is not       *
  *                      calculated properly resulting in an     *
  *                      ABEND S0C1 which is preceded by an      *
  *                      ABEND D37-04.                           *
  *                      *                                       *
  *                      This condition is because the space for *
  *                      OLDS was allocated without using        *
  *                      SPACE=(CYL,(xx),,CONTIG).               *
  *                      The CONTIG parameter is still required  *
  *                      for allocating an extended format OLDS. *
  *                      IMS V12 APAR:PM69149 is a problem that  *
  *                      was encountered because of a customer   *
  *                      user error.                             *
  *                      However, that problem uncovered the     *
  *                      fact that DFSFDLA0 was really not       *
  *                      calculating sizes properly.             *
  *                      So APAR:PM69149 fixed the sizing        *
  *                      calculation, but the documentation is   *
  *                      still accurate about what is supported. *
  ****************************************************************
  * RECOMMENDATION: Apply the maintenance for this APAR.         *
  ****************************************************************
  - PM84832 for IMS DEDB Fast Recovery
  DFR calculates the size of an extended format OLDS by adding up
  the size of each individual extent.
  When an OLDS contains multiple extents on a volume, a problem
  in DFRFDLAC results in the extent descriptor of the first
  extent to be counted for each extent. So if three extents
  exist, the size of the first extent is counted 3 time. This
  is because the pointer to the extent descriptor is not properly
  incremented after processing an extent and thus always points
  to the first extent.
  

Problem conclusion

Temporary fix

Comments

• The following module has been modified.
  *
  DFRFDLAC - This module was changed to increment the correct
             pointer to the extent descriptor before processing
             the 2nd and all subsequent extents on a volume in
             order to get an accurate size calculation.
  *
  

APAR Information

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

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

  UK92541

Modules/Macros

•    DFRFDLAC
  

Fix information

• Fixed component name

  DEDB FAST RECOV

• Fixed component ID

  5655E3200

Applicable component levels

• R220 PSY UK92541

     UP13/03/16 P F303

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.