THURSDAY JANUARY 22, 2015 Y O U R C O M P A N Y N A M E ROxxxxx PAGE=00001 TMS REPORT-49 INSTRUCTION REPORT CONTROL-SECTION * SORT A-DSN A-VOLSEQ A-CDATE TITLE 'TAPES WITH EXPIRATION DATE OF CATALOG' DEFINE CATDATE DT 'CATALOG' * PROCESS-SECTION * WHEN EXPDT EQ CATDATE LIST * REPORT-SECTION * PRINT VOLSER PRINT EXPDT PRINT DSN PRINT CDATE
THURSDAY JANUARY 22, 2015 Y O U R C O M P A N Y N A M E PAGE=00002 TMS REPORT-49 TAPES WITH EXPIRATION DATE OF CATALOG VOLSER EXPDT DSN CDATE 760142 CATALOG MORTO02.GDGV.G0072V00 01-12-2015 760168 CATALOG MORTO02.GDGV.G0073V00 01-22-2015 760169 CATALOG MORTO02.GDGV.G0073V00 01-22-2015 760170 CATALOG MORTO02.GDGV.G0073V00 01-22-2015 760171 CATALOG MORTO02.GDGV.G0073V00 01-22-2015
THURSDAY JANUARY 22, 2015 Y O U R C O M P A N Y N A M E PAGE=00003 TMS REPORT-49 TAPES WITH EXPIRATION DATE OF CATALOG 0000000 RECORDS READ BY INCLUDE(S) 00000012 RECORDS READ BY SYSIN 00002200 RECORDS READ INTO SORT 00000005 RECORDS SELECTED FOR OUTPUT
|
Copyright © 2013 CA Technologies.
All rights reserved.
|
|