TLMS018 report to have only the non scratch volumes

Document ID : KB000093927
Last Modified Date : 14/06/2018
Show Technical Document Details
Question:
Running the following TLMS018 report

//REPORT EXEC CATERL18, 
// PRM='DSN,SYSA:N TLMS RAPORTTI' 
//SORTWK01 DD UNIT=SYSDA,SPACE=(TRK,90) 
//SORTWK02 DD UNIT=SYSDA,SPACE=(TRK,90) 
//SORTWK03 DD UNIT=SYSDA,SPACE=(TRK,90) 
//SORTWK04 DD UNIT=SYSDA,SPACE=(TRK,90) 
//CATECOGO.SYSIN18 DD * 
DSN VOLSER SCRATCH SCRDT FILESEQ VOLSEQ VOLUME_COUNT CJOB CDATE 
DSN_KEEP_DATE 
/* 

Client would like to get only the volume non scratch, and not both. 
 
Answer:
In the TLERPT18 member from the CTAPEARL library we have: 

!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!! 
! SUPPRESS PRINTING OF SCRATCH TAPES (CHANGE '!#' TO ' ' ! 
!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!! 

!#IF SCRATCH_IND = 'Y' 
!# GOTO GETTAG 
!#ENDIF 


To have only the VOLUMEs in NON-SCRATCH status, we need to uncomment this part.