Process 3--Allocating Work Files

Operations › CA IDMS/DB Reorg Processing--VM/ESA Environment › Process 3--Allocating Work Files

Process 3--Allocating Work Files

The CA IDMS/DB Reorg's file PAGUTIL needs direct access, either VSAM or BDAM. If the PAGUTIL file is VSAM, the following JCL explanation applies.

VSAM files written under VM/ESA are written using VSE/ESA VSAM. To use VSAM under VM/ESA, you must have z/OS, OS/390, or VSE/ESA format disks defined and accessible in your VM/ESA configuration. A sample EXEC USRVSAM to access the appropriate minidisk and create the required VSAM space appears below.

 TRACE OFF; SIGNAL ON ERROR
 /*                                                                   */
    DELETE         -
                   (vsam.work.space) -
                    CLUSTER
    DEFINE CLUSTER ( -
                   NAME(vsam.work.space) -
                   RECORDS(record.numbers) -
                   NUMBERED -
                   RECSZ(8168 8168) -
                   usetype -
                   VOLUMES(volser) -
                   ) -
           DATA    ( -
                   NAME(vsam.work.space.DATA) -
                   )

Following is a sample input file for the AMSERV command shown in Process 3--Allocating Work Files. Name this file mastcat AMSERV fm.

           DEFINE    MASTERCATALOG
                     (NAME(mastcat)--
                     VOLUME (dsk    )--
                     CYL (n)--
                     FILE (IJSYSCT))

Once you have VSAM space defined and allocated, the VSAM PAGUTIL file can be defined with the command:

AMSERV vsamwork

Following is a sample input file for the AMSERV command to define the VSAM PAGUTIL file. The file is named: vsamwork AMSERV fm. See sample statements in member USRDCAM.

           DEL       (vsam.work.space)CLUSTER
           DEFINE    CLUSTER (NAME(vsam.work.space)--
                     RECORDS (record.numbers)
                     NUMBERED--
                     RECORDSIZE (8168 8168)--
                     usetype--
                     VOLUMES (dskxxx))
                     DATA (NAME(vsam.work.space.DATA)

If the PAGUTIL file is to be relative BDAM, use the following JCL.

 DEF T3380 cuu CYL nn
 PUSH 'PAGUTL'
 FORMAT cuu fm (BLK 4K
 RESERVE USREXEC PAGUTIL fm6
 FILEDEF PAGUTIL fm ft fm6 (DSORG DA
 FILEDEF PAGUT@@ fm ft fm6 (DSORG DA

Key for VM/ESA JCL:

Parameter	Description
vsam.work.space	The file name of the VSAM PAGUTIL file to be used by CA IDMS/DB Reorg.
record.numbers	The number of records to be allocated in the VSAM 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.
mastcat	The file name of the VSAM master catalog.
dskxxx	The name of the minidisk on which to allocate a the VSAM files.
n	The number of cylinders to be allocated for the master catalog.
cuu	The appropriate minidisk device address for the BDAM PAGUTIL file.
nn	The number of cylinders required to hold the BDAM PAGUTIL file, based upon a block size of 8168. See :tref refid=T5003. for the number of PAGUTIL records.
fm	The file mode for the relevant file.
fm ft fm6	The file name, file type, and file mode (respectively) of the BDAM PAGUTIL file. The file mode number must be 6.

Note: PAGUT@@ must have the same file id as PAGUTIL.