Files
DUTAS/JCL/DTSRQ306.jcl

31 lines
1.1 KiB
Plaintext

//DTSRQ306 JOB (UI,4300,3400,T),PROD.BD510,CLASS=S,MSGCLASS=X,
// NOTIFY=ECNTSUP,
//**** TYPRUN=SCAN,
//**** USER=#DOADTS,
// REGION=0M
/*ROUTE PRINT U@PRT65 - BY Z/OS UPGRADE
//****
// SET LVLNODE='PROD'
// SET LHOLD='YES'
//****
//* ON REQUEST REPORT DTSBR306 -
//* ACCT SUMMARY RPT (PARM IS FOR TIME PERIOD)
//****
//PROCLIB JCLLIB ORDER=DOESTAX.&LVLNODE..PROCS.BATCH.LIB
//LOADLIBS INCLUDE MEMBER=DTSIJLIB
//**
//* NO BACKUP NEEDED BEFORE THIS REPORT
//**
//STEP0200 EXEC DTSUD510,
// RUNTYPE='OR'
//STEP0100.SYSIN DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSRQ306),
// DISP=SHR
//* REPORT RECORD SORT
//STEP0250 EXEC DTSRSORT
//* REPORT GENERATION
//STEP0300 EXEC DTSRQRPT
//STEP0100.RPT306R1 DD HOLD=YES 00630200
//STEP0100.RPT980R1 DD HOLD=YES 00630200
//DOESLBLP.DOESLBL1 DD DUMMY LABELS 00630200
//*