Previous Topic: PRINTJOBNext Topic: Using the Optical Disk Interface


SARBCH Examples

The following are some SARBCH examples.

Example 1

The two most recent generations of archived SYSOUT are listed.

//EXAMPLE1 JOB ACCOUNT,PROGRAMMER
//STEP1    EXEC PGM=SARBCH
//STEPLIB  DD DSN=CAI.CVDELOAD,DISP=SHR
//SYSPRINT DD SYSOUT=*
//REPORT   DD SYSOUT=*
//SYSIN    DD *
/DBASE NAME=VIEW.SYSTEM1
/LIST
/LIST GEN=-1
/*

Example 2

The most recent SYSOUT group for job A0627WE is printed to special forms 2PT.

//EXAMPLE2 JOB ACCOUNT,PROGRAMMER
//STEP1    EXEC PGM=SARBCH
//STEPLIB  DD DSN=CAI.CVDELOAD,DISP=SHR
//SYSPRINT DD SYSOUT=*
//SYSIN    DD *
/DBASE NAME=VIEW.SYSTEM1
/PRINT ID=A0627WE FORM=2PT
/*

Example 3

The report having a SYSOUT ID of M35AST03R1 created two generations ago is loaded to existing data set USER.M35AST03.R1.

//EXAMPLE3 JOB ACCOUNT,PROGRAMMER
//STEP1    EXEC PGM=SARBCH,PARM='VIEW.SYSTEM1'
//STEPLIB  DD DSN=CAI.CVDELOAD,DISP=SHR
//SARLOAD  DD DSN=USER.M35AST03.R1,DISP=OLD
//SYSPRINT DD SYSOUT=*
//SYSIN    DD *
/LOAD ID=A35AST03R1 GEN=-2
/*

Example 4

This example builds the control records that let users use JOB mode to access all occurrences of job TESTJOB1 that were run between March 1, 2015 and April 1, 2015.

//EXAMPLE3 JOB ACCOUNT,PROGRAMMER
//STEP1    EXEC PGM=SARBCH,PARM='VIEW.SYSTEM1'
//STEPLIB  DD DSN=CAI.CVDELOAD,DISP=SHR
//SYSPRINT DD SYSOUT=*
//SYSIN    DD *
/ADDJOB JOBNAME=TESTJOB1 DATE=03/01/2015:04/01/2015
/*