Previous Topic: CATVMFRL - Reload the Volume Master FileNext Topic: Starter JCL


CATVMFRL Procedure JCL

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

//**********************************************************
//*          **** PROCNAME=CATVMFRL ****                   *
//**********************************************************
//**     PROCEDURE TO RELOAD CA TLMS VOLUME MASTER FILE    *
//**********************************************************
//*
//CATVMFRL PROC A='*',
//		  BKUPVMF='CAI.TLMS.BKUPVMF',
//		  BUFNO='80',
//		  LOAD='CAI.CTAPLINK',
//		  OPTS='CAI.CTAPOPTN(TLMSIPO)',
//		  VMF='CAI.TLMS.VMF'
//*
//**********************************************************
//**        EXECUTE VOLUME MASTER FILE UTILITY             *
//**********************************************************
//RELOAD	EXEC PGM=TLMSVMFU,PARM='++RELOAD'
//*
//STEPLIB	DD DSN=&LOAD,DISP=SHR
//*
//TLMSOPTS	DD DSN=&OPTS,DISP=SHR
//*
//CAIVMFS	DD DSN=&VMF,DISP=OLD,
//		   DCB=(BUFNO=&BUFNO,OPTCD=C)
//*
//CAIBVMF	DD DSN=&BKUPVMF,DISP=OLD
//*
//SYSPRINT	DD DCB=BLKSIZE=133,SYSOUT=&A
//*
//SYSOUT	DD SYSOUT=&A
//*
//SYSUDUMP	DD SYSOUT=&A
//*
//*********************************************************