42 lines
1.5 KiB
Plaintext
42 lines
1.5 KiB
Plaintext
//DTSRT718 JOB (UI,4300,3400,T),JHP.PROD.RPT718,
|
|
// CLASS=P,MSGCLASS=X,
|
|
//**** TYPRUN=SCAN,
|
|
// NOTIFY=ECNTSUP
|
|
/*ROUTE PRINT U@PRT65 - BY Z/OS UPGRADE
|
|
//**
|
|
// SET LVLNODE='PROD'
|
|
// SET TPSFILE1='DOESTAX.PROD.RPT718.YR2024' <<<< CHANGE BEF RUN
|
|
// SET PRINTER1='DOESTAX.PROD.AUDIT.YR2024' <<<< CHANGE BEF RUN
|
|
// SET PICKLST='DOESTAX.PROD.PICKLST.AUDIT.YR2024' << CHANGE BEF RUN
|
|
// SET LDEST=U@PRT65
|
|
//*----------------------------------------------------------------+
|
|
//* JOB: TPS RUN FROM RPT718 - REPORT FIELD AUDIT
|
|
//* (PROD.RPT718 IS PRODUCED BY RUNRQ718)
|
|
//*
|
|
//* AUDITS ARE RUN FOR THE WHOLE CAL YEAR 010114 - 123114 ZL1
|
|
//*
|
|
//* THE PRINTER FILE IS NOW CREATED ON DASD. SEE SET STATEMENT
|
|
//* FOR THE DATASET NAME. DOWNLOAD THE FILE FOR INPUT TO A SPREAD SHEET
|
|
//* GEORGE BROWN 4/15/2004
|
|
//*
|
|
//*
|
|
//**---------------------------------------------------------------
|
|
//* DEFINITION FOR PARMIN:
|
|
//* COLS 1-3 RANDOM NUMBER
|
|
//* 5-8 NUMBER TO BE SAMPLED
|
|
//* - 4 DIGITS RIGHT JUSTIFIED
|
|
//* - ENTER LEADING ZEROES IF NEEDED
|
|
//* 10-11 SAMPLE TYPE
|
|
//* - A1,A2,E1,O1, OR O2 (1ST CHARACTER IS ALPHA)
|
|
//* 13-16 YYYY
|
|
//*================================================================|
|
|
//PROCLIB JCLLIB ORDER=DOESTAX.&LVLNODE..PROCLIB
|
|
//**
|
|
//LOADLIBS INCLUDE MEMBER=DTSIJLIB
|
|
//**
|
|
//STEP0100 EXEC DTSTP718
|
|
//STEP0100.PARMIN DD *
|
|
701,0060,A1,2024
|
|
/*
|
|
//
|