Example 4: Expanding a three-area database to five areas (generating five outputs)

The following figure shows example JCL statement for expanding a three-area database to five areas (five outputs).

The database is under the control of a "general" randomizer. Five output files are produced.

First, gather the region-size calculation data:

  • The database name is TSSDBD4.
  • The three areas are defined with:
         SIZE=4096,                                                        C
         UOW=(20,8),                                                       C
         ROOT=(120,14)
  • The additional two areas in the new configuration are defined with the same values.
  • The output files reside on tape. Since the maximum block size for this device is large (32 K), and there are multiple output files, the output file DD statements are coded with DCB=BLKSIZE=16000.
  • The maximum number of IOVF CIs used by any UOW in this area is seven.

The JCL stream for this unload job can now be set up:

  1. The EXEC statement for FABCUR1 is coded with REGION=xxxx. Where xxxx is the value that is estimated based on the worksheet provided in Region size requirements for DEDB Unload.
  2. The control statements stream is coded as follows:
         DBDNAME=TSSDBD4 RMODTYPE=G STATS 
     
         AREACTL=ALL 
     
         TASKCTL=(,7) 
    
  3. DD statements for the areas being processed must be included:
         //TSS4AR01  DD DSN=TSSV.TSSDBD4.TSS4AR01,DISP=OLD
         //TSS4AR02  DD DSN=TSSV.TSSDBD4.TSS4AR02,DISP=OLD
         //TSS4AR03  DD DSN=TSSV.TSSDBD4.TSS4AR03,DISP=OLD
  4. The DD statements for the output files, and associated SORT control statement data sets, must be included:
         //DURD001O DD DSN=HPFP.UR.FILE001.SEGDATA,
         //            DISP=(NEW,CATLG,DELETE),
         //            UNIT=TAPE,
         //            DCB=BLKSIZE=16000
         //DURS001O DD DSN=HPFP.UR.FILE001.SORTCARD,
         //            DISP=(NEW,CATLG,DELETE),
         //            UNIT=SYSDA,
         //            SPACE=(TRK,(1,1))
             .
             .
             .
         //DURD005O DD DSN=HPFP.UR.FILE005.SEGDATA,
         //            DISP=(NEW,CATLG,DELETE),
         //            UNIT=TAPE,
         //            DCB=BLKSIZE=16000
         //DURS005O DD DSN=HPFP.UR.FILE005.SORTCARD,
         //            DISP=(NEW,CATLG,DELETE),
         //            UNIT=SYSDA,
         //            SPACE=(TRK,(1,1))
  5. Set up JCL to sort the output files. The sort is required since a "general" randomizer distributes segments across all the RAPs in the database, and the total number of RAPs in the database has been changed (that is, a given database record root and dependents is usually not chained off of the same RAP as in the old configuration of the database).

Now you can run the unload job.