Files
DUTAS/JCL/DTSRQ330.jcl

28 lines
2.1 KiB
Plaintext

//DTSRQ330 JOB (UI,4300,3400,T),DTSBE330,CLASS=P, 00000199
// MSGCLASS=X, 00000261
// NOTIFY=ECNTSUP, 00000399
//**** TYPRUN=SCAN, 00000499
// REGION=0M 00000522
/*ROUTE PRINT U@PRT65 - BY Z/OS UPGRADE
//**** 00000625
//** 00000799
//** CREATE DAILY CREDITS AND DEBITS ESTABLISHED REPORT. 00000899
//** (*NO* MSTR UPDATE) 00000999
//** 00001099
//**** 00003090
// SET LVLNODE='PROD' 00003199
// SET MSTNODE='PROD' 00003299
// SET LHOLD='YES' 00003399
//**** 00003499
//PROCLIB JCLLIB ORDER=DOESTAX.PROD.PROCS.BATCH.LIB 00003599
//**** 00003636
//LOADLIBS INCLUDE MEMBER=DTSIJLIB 00003736
//**** 00004486
//STEP0100 EXEC DTSUX330, 00004999
// RUNTYPE='QE' 00005099
//STEP0100.EXTPARM DD DSN=DOESTAX.PROD.APPL.PARMLIB(DTSRQ330), 00005299
// DISP=SHR 00005599
//* 00005699
//STEP0200 EXEC DTSRP330 PRINT REPORT 00005799
//**** 00041699