PH16970: C03 ABEND OCCURRED AFTER CALLING DFSURDD0 WITH LINKX.

Obtain the fix for this APAR.

APAR status

• Closed as program error.

Error description

• The customer created a program that calls DFSURDD0 with a
  LINKX macro. The call was successful, but abendC03 occurred
  at job termination. It was caused by DFSURDD0 not closing
  the DCB for the RDDS.  DFSURDD0 opens the RDDS but does not
  close it specifically.
  

Local fix

• If you ATTACH DFSURDD0 with ECB= and then wait on the ECB, the
  close for the dataset may occur under the covers, avoiding the
  abendC03.
  

Problem summary

• ****************************************************************
  * USERS AFFECTED:                                              *
  * All IMS V15 DFSURDD0 utility users.                          *
  ****************************************************************
  * PROBLEM DESCRIPTION:                                         *
  * ABENDC03 at the termination of the program calling DFSURDD0  *
  * with LINKX.                                                  *
  ****************************************************************
  * RECOMMENDATION:                                              *
  * INSTALL CORRECTIVE SERVICE FOR APAR/PTF                      *
  ****************************************************************
  The customer experienced ABENDC03 when using LINKX in a program
  to call DFSURDD0.
  
  Utility DFSURDD0 opens RDDS without closing its DCB
  specifically. There isn't a problem when the utility runs
  stand-alone; the DCB is closed as job step TCB terminates.
  However when DFSURDD0 was called by LINKX, at the return, LINKX
  left the DCB open after freeing the storage allocated by the
  module. At the termination of the calling program, its job step
  TCB tried to close the DCB but failed because the DCB's storage
  had been freed so DCB  was no longer valid. The TCB could not
  close the DCB as terminating,  thus led to ABENDC03.
  

Problem conclusion

•    Modules Changed
   ===============
  
      - DFSURDD0 has been modified to close RDDS DCB specifically.
  

Temporary fix

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

Comments

APAR Information

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

  PH16037

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

  UI66282

Modules/Macros

• DFSURDD0
  

Fix information

• Fixed component name

  IMS V15

• Fixed component ID

  5635A0600

Applicable component levels

• R500 PSY UI66282

     UP19/11/26 P F911 ¢

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.