Utilities and Procedures › CATVMFRE - Reorganize the Volume Master File › CATVMFRE Procedure JCL

CATVMFRE Procedure JCL

The following procedure is used to reorganize the Volume Master File.

//*************************************************************
//*   **** PROCNAME=CATVMFRE ****     *
//*************************************************************
//** PROCEDURE TO REORGANIZE THE CA TLMS VOLUME MASTER FILE   *
//*************************************************************
//CATVMFRE PROC A='*',
//    BUFNO='80',
//    BKUPVMF='CAI.TLMS.BKUPVMF',
//    LOAD='CAI.CTAPLINK',
//    OPTS='CAI.CTAPOPTN(TLMSIPO)',
//    SORTLIB='SYS1.SORTLIB',
//    VMF='CAI.TLMS.VMF',
//    SPCVMF='(CYL,(5,5))',
//    WORK='SYSDA'
//*
//*************************************************************
//**   EXECUTE VOLUME MASTER FILE UTILITY     *
//*************************************************************
//REORGVMF EXEC PGM=TLMSVMFU,PARM='++REORG'
//*
//STEPLIB DD DSN=&LOAD,DISP=SHR
//*
//TLMSOPTS DD DSN=&OPTS,DISP=SHR
//*
//SORTLIB DD DSN=&SORTLIB,DISP=SHR
//*
//CAIVMF DD DSN=&VMF,DISP=SHR
//*
//CAIVMFS DD DSN=&VMF,DISP=SHR,
//      DCB=(BUFNO=&BUFNO,OPTCD=C)
//*
//CAIBVMF DD DSN=&BKUPVMF,DISP=OLD
//*
//SORTWK01 DD UNIT=&WORK,SPACE=&SPCVMF
//*
//SYSPRINT DD DCB=BLKSIZE=133,SYSOUT=&A
//*
//SYSOUT DD SYSOUT=&A
//*
//SYSUDUMP DD SYSOUT=&A
//*
//*************************************************************