The following procedure is used to produce reports from the Retention Master File.
//************************************************************* //* **** PROCNAME=CATRMFP **** * //************************************************************* //* PROCEDURE TO PRINT CA TLMS RETENTION MASTER FILE * //************************************************************* //CATRMFP PROC A='*', // LOAD='CAI.CTAPLINK', // OPTS='CAI.CTAPOPTN(TLMSIPO)', // PRM=' ', // RMF='CAI.TLMS.RMF', // RMF='CAI.TLMS.VMF' //* //* //REPTRMF EXEC PGM=TLMSRMFP,PARM='&PRM' //* //STEPLIB DD DSN=&LOAD,DISP=SHR //* //TLMSOPTS DD DSN=&OPTS,DISP=SHR OPTIONS WHEN TLMS IS DOWN //* //CAIRMF DD DSN=&RMF,DISP=OLD RETENTION MASTER FILE //* //CAIVMF DD DSN=&VMF,DISP=SHR VOLUME MASTER FILE(TLMS014) //* //SYSPRINT DD DCB=BLKSIZE=133,SYSOUT=&A REPORTS //* //SYSUDUMP DD SYSOUT=&A ABEND DUMPS //* //SYSIN DD DUMMY OVERRIDE FOR COMMANDS //* //*********************************************************
|
Copyright © 2014 CA.
All rights reserved.
|
|