//**************************************
//*** 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,UNIT=TAPE,
//   	VOL=SER=111345,DISP=(NEW,PASS)
//SYSIN		DD	*
 REPRO INFILE(SYSUT1) OUTFILE(SYSUT2)
/*
//SYSUT1	DD	*
 "input stream" data (80 columns max!) 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)
//