PI41362: ABENDU0799 RC02 DBFCMP10 OR DBFCMP11. COMPRESSION EXIT EXPANDS SEGMENT TO > CI SIZE-120.

Obtain the fix for this APAR.

APAR status

• Closed as program error.

Error description

• Customer implemented compression exit on DEDB. IMS will allow
  exit to actually expand a segment on a compression call, up
  to DBD maximum segment size plus 10. This was happening in
  this case, the exit expanded the segment to DBD maximum size
  plus 1 byte. The U0799 RC02 occurred in DBFCMP10 ( or DBFCMP11
  in 64-bit system ) because IMS also checks that the new size
  is not greater than CI size-120. There is no apparent reason
  for the constant 120 since the IMS overhead per CI is much
  less than this. DBDGEN also checks for maximum segment size
  being less than CI Size-120. DBFCMP1x can be changed to
  allow an expanded segment to be larger than CI Size-120,
  perhaps CI Size-110.
  

Local fix

Problem summary

• ****************************************************************
  * USERS AFFECTED: IMSFP V12 DEDB user with segment             *
  *                 compression exit.                            *
  ****************************************************************
  * PROBLEM DESCRIPTION: ABENDU0799 RC02 DBFCMP10 OR DBFCMP11.   *
  *                      COMPRESSION EXIT EXPANDS SEGMENT        *
  *                      WITH SIZE > CI SIZE-120.                *
  ****************************************************************
  * RECOMMENDATION: INSTALL CORRECTIVE SERVICE FOR APAR/PTF      *
  ****************************************************************
  Customer implemented compression exit on DEDB. IMS will allow
  exit to actually expand a segment on a compression call, up
  to DBD maximum segment size plus 10. This was happening in
  this case, the exit expanded the segment to DBD maximum size
  plus 1 byte. The U0799 RC02 occurred in DBFCMP10 ( or DBFCMP11
  in 64-bit system ) because IMS also checks that the new size
  is not greater than CI size-120. There is no apparent reason
  for the constant 120 since the IMS overhead per CI is much
  less than this. DBDGEN also checks for maximum segment size
  being less than CI Size-120.
  

Problem conclusion

• GEN:
  KEYWORDS:
  
  *** END IMS KEYWORDS ***
  The following changes have been made to correct the reported
  problem:
  
  DBFCMP10, DBFCMP11:
    Modify code to allow an expanded segment to have size up to
    CI Size-110.
  

Temporary fix

• *********
  * HIPER *
  *********
  

Comments

APAR Information

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

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

  PI41377 UI28324

Modules/Macros

• DBFCMP10 DBFCMP11
  

Fix information

• Fixed component name

  IMS V12

• Fixed component ID

  5635A0300

Applicable component levels

• R200 PSY UI28324

     UP15/06/13 P F506 ¢

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.