Previous Topic: ProcessNext Topic: Starter JCL


CATVMFV Procedure JCL

Use the following procedure to verify the Volume Master File:

//*********************************************************************
//*             ****  PROCNAME=CATVMFV  ****                          *
//*********************************************************************
//**      PROCEDURE TO VERIFY THE CA TLMS VOLUME MASTER FILE          *
//*********************************************************************
//CATVMFV  PROC A='*',                                                 
//             BUFNO='80',                                             
//             LOAD='CAI.CTAPLINK',                                    
//             OPTS='CAI.CTAPOPTN(TLMSIPO)',                           
//             PRM='',                                                
//             SORTLIB='SYS1.SORTLIB',                                 
//             SPCVMF='(CYL,(5,5))',                                   
//             WORK='SYSALLDA',                                        
//             VMF='CAI.TLMS.VMF'                                      
//*                                                                    
//*********************************************************************
//**           VERIFY VOLUME MASTER FILE                             **
//*********************************************************************
//VERIFY   EXEC PGM=TLMSVMFV,PRM='&PRM'                               
//*                                                                    
//STEPLIB  DD  DSN=&LOAD,DISP=SHR                                      
//*                                                                    
//CAIVMFS  DD  DSN=&VMF,DISP=SHR,                                      
//             DCB=(BUFNO=&BUFNO,OPTCD=C)                              
//*                                                                    
//TLMSOPTS DD  DSN=&OPTS,DISP=SHR                                      
//*                                                                    
//SORTLIB  DD  DSN=&SORTLIB,DISP=SHR                                   
//*                                                                    
//SORTWK01 DD  UNIT=&WORK,SPACE=&SPCVMF                                
//*                                                                    
//SYSPRINT DD  DCB=BLKSIZE=133,SYSOUT=&A                               
//*                                                                    
//SYSOUT   DD  SYSOUT=&A                                               
//*                                                                    
//SYSUDUMP DD  SYSOUT=&A                                                
//*                                                                     
//*********************************************************************