Previous Topic: Process 2--Gathering InformationNext Topic: Process 4--Reorganizing the Database


Process 3--Allocating Work Files

This process allocates all of the work files to disk. One of CA IDMS/DB Reorg's files, PAGUTIL, needs to be direct access, either VSAM or relative record BDAM. If the PAGUTIL file is VSAM, use the following control statements for IDCAMS. Refer to Target or Distribution source library member USRIDCAM.

 DELETE (vsam.work.space) CLUSTER
 DEFINE CLUSTER         ( -
                                 NAME(vsam.work.space) -
                                 RECORDS(record.numbers) -
                                 NUMBERED -
                                 RECORDSIZE(8168 8168) -
                                 usetype -
                                 VOLUMES(volume.name) -
                                 ) -
                 DATA         ( -
                                 NAME(vsam.work.space.DATA) -
                                 )

If the PAGUTIL file is to be relative record BDAM, the following allocation JCL applies:

 /*
 //PAGUTIL    DD     DSN=DBREORG.PAGUTIL,DISP=(,CATLG),
                     UNIT=DISK,SPACE=(8168,(record.numbers)),
                     DCB=DSORG=DA
 //PAGUT@@    DD     DSN=*.PAGUTIL,VOL=REF=*.PAGUTIL,
                     DISP=SHR,DCB=DSORG=DA

You can pre-allocate these data sets but the DCB=DSORG=DA parameter must be coded for each of these DD statements within the JCL of the step that actually accesses the dataset.

If CA IDMS/DB Reorg is updating an integrated index sorted by db-key, space should be allocated for three additional files after the OPTALLOC step.

 //*
 //*          NON-VSAM WORK FILES
 //*
 //*          INSURE THAT ANY PREVIOUSLY CREATED WORK FILES ARE DELETED
 //*
 //DELETE EXEC PGM=IEFBR14
 //dbmsdds        DD       DSN=work.files.dbmsdds,DISP=(MOD,DELETE),
 //                        UNIT=disk,SPACE=(TRK,0)
 //ALLOCATE EXEC PGM=IEFBR14
 //dbmsdds        DD       DSN=work.files.dbmsdds,DISP=(,CATLG,DELETE),
 //                        VOL=SER=volser,UNIT=disk,
 //                        SPACE=(number.tracks)

Key for Allocating Work Files JCL:

Parameter

Description

a

The appropriate SYSOUT class for your installation.

vsam.work.space

The dataset name of the one VSAM file to be used by CA IDMS/DB Reorg.

record.numbers

The number of records to be allocated in the VSAM or BDAM work space.

usetype

The appropriate type: REUSE or UNIQUE. If you specify UNIQUE, you must DELETE and DEFINE this cluster prior to each execution of the PRIALLOC step.

volume.name

Volume to contain the cluster or component.

dbmsdds

The DDnames required by the CA IDMS/DB Reorg Utility. You must supply a DD statement for each of these work files: PRIOPTA, SECOPTA, EXTRACT, PRIREAL, UNALLOC, SECREAL, ALLOCX, SECALX2, SECIIX2, and DBREC. If CA IDMS/DB Reorg is updating an area containing integrated index sets sorted by db-key, you must allocate space for IIXEXOL, IIXSRKY, and IIXEXTR, after the OPTALLOC step.

work.files.dbmsdds

The dataset names assigned to the work files used by the CA IDMS/DB Reorg Utility. (It is suggested that each dataset name include the required DDNAME.)

disk

An appropriate unit designation for the work file.

volser

The volume serial number of the disk or tape to be used for the work file.

number.tracks

The number of tracks needed for the work file if it resides on disk. This number is based on the number of records and the blocking factor of the work file and the track capacity of your disk.