Example 5: HALDB processing

This example illustrates how to use PSSR to sort an entire database data set that is unloaded by the IMS HD Reorganization Unload utility. This method enables you to reorganize a HALDB.

In this example, it is assumed that there is no logical relationship in the database. The typical tasks are as follows:

  1. Create an image copy of the old HALDB.
  2. Unload the HALDB with the IMS HD Reorganization Unload utility or an equivalent program, such as IMS High Performance Unload for z/OS® FABHURG1 (with *HD format) or FABHFSU (with UL format).
  3. Create a new DBD. For HALDB, change the partition information using a partition definition utility if necessary.
  4. Sort the unloaded database data set with PSSR, using the FABSPSSI procedure.
  5. Delete the cluster for the old HALDB, and define a new one.
  6. Reload the database with the IMS HD Reorganization Reload utility or an equivalent program, such as IMS HP Load.
  7. Create an image copy of the new HALDB.
  8. Run IMS High Performance Pointer Checker for z/OS HD Pointer Checker utility, using the image copy as input.

The PSSR JCL can be used to sort the unloaded data set into the SORTOUT data set:

//PSSRSORT EXEC FABSPSSI,
//       IMSHDUN=’UNLOAD.DATASET’
//STEPHD.SORTOUT DD DSN=SORTOUT.DATASET,DISP=NEW,
//       SPACE=(CYL,(10,1)),
//       UNIT=SYSDA,VOL=SER=000000,
//       DCB=UNLOAD.DATASET
//STEPHD.CTL DD *
PHDB01
/*