Examples for DO SYSOUT

DO SYSOUT Example 1

If a job finishes executing OK, delete (purge) the sysout (DO SYSOUT OP D). If the job finishes executing with condition code 0050-0059 in step STEP02, set the end status of the job to OK and release the sysout for printing. If the job abends, move the sysout to class D.

Figure 215 DO SYSOUT Parameter – Example 1

JOB: SACALC01 LIB CTM.PROD.SCHEDULE                       TABLE: SALARY

COMMAND ===>                                            SCROLL===> CRSR

+---------------------------------------------------------------------+

  OUT                                                                 

  AUTO-ARCHIVE Y          SYSDB    Y      MAXDAYS      MAXRUNS         

  RETENTION:  # OF DAYS TO KEEP 030  # OF GENERATIONS TO KEEP          

  SYSOUT OP   (C,D,F,N,R)                                         FROM

  MAXRERUN     RERUNMEM                             INTERVAL   FROM    

  STEP RANGE         FR (PGM.PROC)          .          TO        .     

  ON PGMST ANYSTEP  PROCST          CODES OK                        A/O

    DO SYSOUT    OPT D PRM                                          FRM

  ON PGMST STEP02   PROCST          CODES C005*                    A/O

    DO OK                                                              

    DO SYSOUT    OPT R PRM                                         FRM

    DO                                                                 

  ON PGMST ANYSTEP  PROCST          CODES U**** S****               A/O

    DO SYSOUT    OPT C PRM D                                        FRM

    DO                                                                 

  ON PGMST          PROCST          CODES                           A/O

    DO                                                                 

  SHOUT WHEN           TIME       +     DAYS     TO             URGN   

    MS                                                                 

======= >>>>>>>>>>>>>>> END OF SCHEDULING PARAMETERS <<<<<<<<<<<< =====

COMMANDS: EDIT, DOC, PLAN, JOBSTAT                            11.17.00

DO SYSOUT Example 2 – Use of the Sysout Archiving Facility

The MSGCLASS of the job is X (a held class). Reports are produced in class D. The desired actions are:

• Archive the JCL messages and all the held output in class X, that is, the SYSPRINT data sets, job log, and so on.
• If the job finishes executing OK, release the reports for print and delete the MSGCLASS sysouts.
• If the job finishes executing NOTOK, delete the reports and keep the MSGCLASS (JCL, job log, and so on) output in hold status.

  Figure 216 DO SYSOUT Parameter – Example 2

JOB: GPLUPDT1 LIB CTM.PROD.SCHEDULE                      TABLE: PRODGPL

COMMAND ===>                                            SCROLL===> CRSR

+---------------------------------------------------------------------+

  =====================================================================

  OUT                                                                  

  RETENTION:  # OF DAYS TO KEEP 030  # OF GENERATIONS TO KEEP          

  AUTO-ARCHIVE Y          SYSDB    Y      MAXDAYS      MAXRUNS         

  SYSOUT OP   (C,D,F,N,R)                                          FROM

  MAXRERUN     RERUNMEM                            INTERVAL    FROM    

  STEP RANGE         FR (PGM.PROC)          .          TO        .     

  ON PGMST ANYSTEP  PROCST          CODES *****                    A/O

    DO SYSOUT   OPT F PRM GPL.%%JOBNAME.D%%ODATE.N%%JOBID.T%%TIME FRM X

    DO                                                                 

  ON PGMST ANYSTEP  PROCST          CODES OK                        A/O

    DO SYSOUT    OPT D PRM                                        FRM X

    DO SYSOUT    OPT R PRM                                        FRM D

    DO                                                                 

  ON PGMST ANYSTEP  PROCST          CODES NOTOK                    A/O

    DO SYSOUT    OPT D PRM                                        FRM D

    DO                                                                 

  ON PGMST          PROCST          CODES                           A/O

    DO                                                                 

  SHOUT WHEN           TIME       +     DAYS     TO             URGN   

COMMANDS: EDIT, DOC, PLAN, JOBSTAT                            11.17.00

Notice the use of the AutoEdit symbols in the name of the file to be archived. The symbol %%JOBNAME, or %%$MEMNAME if the job name is not known, is replaced with the job name, %%ODATE by the original scheduling date, and so on, producing a file name such as "PRD.PADD0040.D010306.N01342.T170843."

The file can be viewed by using ISPF Browse. A list of the outputs of the job can be produced using ISPF option 3.4. For example, retrieval by the prefix "PRD.PAPD0040.D0103" lists all the names of the sysouts of the job in the month of March 2001. It is possible to browse, edit, and print the desired sysout.

Note: The File operation (SYSOUT archival) is intended for small sysouts (such as JCL, sort messages) and not for large volume reports. When the Control-M monitor is performing file operations, it does not analyze the results of other jobs. Therefore, if large files are archived, production throughput may suffer.