Previous Topic: Example 1 - Active Data Sets for Jobs XP700000 through XP799999Next Topic: TMS Report 49 - Active Data Sets for Jobs XP700000 Through XP799999

Utilities › TMSGRW Utility—Produce Customized Reports on TMC and Audit Records › TMS Report 49 - Instruction Report

TMS Report 49 - Instruction Report

The Instruction Report shows the control statements used. It is always printed as the first page of TMSGRW output. Any errors in the control statements are flagged on the Instruction Report, and a list of all TMSGRW errors is produced. TMSGRW error codes and messages are documented later in this section. Once RUN=SCAN is removed from the ALTER control statement, the report is generated as shown in the following report excerpts.

 TUESDAY, SEPTEMBER 26, 2005.268                  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 CJOB D-DSN A-VOLSEQ
   TITLE 'ACTIVE DATA SETS FOR JOBS XP700000 THROUGH XP799999'
   FOOTER 'SEND REPORT TO ADMINISTRATION, 2ND FLOOR'
   ALTER PRINTIMAGE=40X104 DSNB=YES
   ALTER INPUT=TMC
   DEFINE JOB1 CH 'XP700000'
   DEFINE JOB2 CH 'XP799999'
   *
   PROCESS-SECTION
   *
   WHEN JOB1 GT CJOB
    REJECT
   WHEN JOB2 GE CJOB
    LIST
   *
   REPORT-SECTION
   *
   NEWPAGE CJOB ON-FIRST 8
   PRINT CJOB    'CREATING,JOBNAME'
   PRINT DSN     'DATA SET NAME'
   PRINT VOLSEQ  'VOLUME,SEQUENCE'
   PRINT NUMDSNB 'FILE,SEQUENCE'
   PRINT EXPDT   'EXPIRATION,DATE' AS 'DDMMMYYYY'
   DUMP  OUTCODE 'HEX,OUTCODE'