PI69843: ABEND413 RC08 WHEN REORG WITH HARDCODED UNLDDDN DD'S GOING TO TAPE IS RUN ON AN EMPTY TABLESPACE

Obtain the fix for this APAR.

APAR status

• Closed as program error.

Error description

• DB2 V11 has been enhanced so that if a tablespace is empty (does
  not have active tables in it) then Reorg will skip the
  processing of writing to the sysrec/UNLDDDN dataset during the
  UNLOAD phase.
  However if the user have hardcoded DD's for the unload dataset
  that go to tape, and reorg is run on multiple tablespaces, then
  when there is an empty tablespace and the write to the tape
  label is skipped, then the next non-empty tablespace being
  unloaded on the next label of the same volume will get
  an abend413 because the specified label/file sequence is
  incorrect.
  For example, with the following DD's hardcoded in the REORG job:
  //DDN00001 DD DSN=S0115.RGH.DB011501.TS011502,
  //  DISP=(MOD,CATLG,CATLG),VOL=(,RETAIN,,99),UNIT=VSMLC,LABEL=1
  //DDN00002 DD DSN=S0115.RGH.DB011501.TS011511,
  //  DISP=(MOD,CATLG,CATLG),VOL=(,RETAIN,,99,REF=*.DDN00001),
  //  UNIT=AFF=DDN00001,LABEL=2
  //DDN00003 DD DSN=S0115.RGH.DB011501.TS011505,
  //  DISP=(MOD,CATLG,CATLG),VOL=(,RETAIN,,99,REF=*.DDN00002),
  //  UNIT=AFF=DDN00001,LABEL=3
  ...
  with the following Reorg statement:
  REORG TABLESPACE DB011501.TS011502 UNLDDN DDN00001 ........
  REORG TABLESPACE DB011501.TS011511 UNLDDN DDN00002 ........
  REORG TABLESPACE DB011501.TS011505 UNLDDN DDN00003 ........
  .
  This job will fail with the following message when the second
  tablespace is empty:
  IEC145I 413-08,IFG0194K,J0115014,DSNUPROC,DDN00003,4BF1,,
  DSNU016I DSNUGBAC - UTILITY BATCH MEMORY EXECUTION ABENDED,
    REASON=X'0413'
  

Local fix

• Use LISTDEF for the UNLDDDN in place of hardcoding the DD's.
  

Problem summary

• ****************************************************************
  * USERS AFFECTED:                                              *
  * All DB2 12 for z/OS users of REORG utility                   *
  ****************************************************************
  * PROBLEM DESCRIPTION:                                         *
  * ABENDA13-10 or ABEND413-34 following MSGDSNU260I on REORG    *
  * utility with unload data sets directed to tape and defined   *
  * by DD cards.                                                 *
  ****************************************************************
  * RECOMMENDATION:                                              *
  * Apply corrective PTF when available                          *
  ****************************************************************
  User ran multiple REORG TABLESPACE utilities in one job step and
  defined the unload data sets with DD cards and UNIT
  specification of TAPE, in which the next UNLOAD DD card is
  referred back to the previous one.
  
  One of the REORG utility issued message DSNU260I -TABLESPACE
  obj-qual.obj-name IS EMPTY and did not allocate an unload data
  set for it.
  
  When the following REORG tried to open and write to the data
  set, it failed with ABENDSA13 RC10 or ABENDS413 RC34 because the
  referred-to data set was never allocated.
  

Problem conclusion

• REORG TABLESPACE code was changed to allocate the unload data
  set as long as it is provided by DD card or template. REORG will
  still tolerate an absent unload data set for a table space
  containing no table.
  

Temporary fix

Comments

APAR Information

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

  PI69694

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

  UI43685

Modules/Macros

• DSNURORG
  

Fix information

• Fixed component name

  DB2 OS/390 & Z/

• Fixed component ID

  5740XYR00

Applicable component levels

• RC10 PSY UI43685

     UP17/01/20 P F701

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.