Determine which data elements the report should contain. You might also want to put blank spaces at the beginning of each line to adjust its location on the page. Add this statement to the control file:
PRINT BLANK 8 VOLSER EXPDT CDATE CUSERID LUSERID.
Your finished control file should look like this:
FILE TMC VMTAPE TMC COMPUTE ENDDATE AS P5JULIAN PLUS '7' DISPLAY '9999999'. SELECT IF FLAG! HAS ANY BITS OFF '04'. IF EXPDT GT P5 JULIAN AND EXPDT LT ENDDATE. WRITE VOLSER EXPDT CDATE CUSERID LUSERID END IF. END STEP. SORT VOLSER WITHIN EXPDT. PRINT HEADING ' ' 'VM:TAPE 7-DAY SCRATCH REPORT' ' '. PRINT BLANK 8 VOLSER EXPDT CDATE CUSERID LUSERID.
|
Copyright © 2013 CA.
All rights reserved.
|
|