//**********************************
//*** PAYROLL - A THREE STEP JOB ***
//**********************************
//PAYROLL      JOB     11347,SMITH,
//             CLASS=B,MSGLEVEL=(0,1),TIME=20
//*** STEP ONE ***************************************
//CRETAP       EXEC    PGM=IDCAMS
//SYSPRINT     DD      SYSOUT=A
//SYSUT2       DD      DSN=PAYDATA,DISP=(NEW,PASS),
//             UNIT=TAPE,VOL=SER=111345
//SYSIN        DD      *
 REPRO INFILE(SYSUT1) OUTFILE(SYSUT2)
/*
//SYSUT1       DD      *
 "input stream" data (80 columns max!) would go here
/*
//*** STEP TWO ***************************************
//PRTCHKS      EXEC    PGM=PAYROLL1
//SYSPRINT     DD      SYSOUT=A
//CHKOUT       DD      SYSOUT=B
//PAYIN        DD      DSN=PAYDATA,DISP=(OLD,PASS)
//*** STEP THREE *************************************
//PRTREG       EXEC    PGM=PAYROLL2
//SYSPRINT     DD      SYSOUT=A
//REGOUT       DD      SYSOUT=C,COPIES=2,OUTLIM=5000
//PAYIN        DD      DSN=PAYDATA,DISP=(OLD,CATLG)
//