Files
DUTAS/JCL/DTSCHGDW.jcl

44 lines
3.4 KiB
Plaintext

//DTSCHGDW JOB (UI,4300,3400,T),CHGDC.WKE,CLASS=P,MSGCLASS=X, 00010017
//** TYPRUN=SCAN, 00011017
// USER=#DOADTS, 00012024
// NOTIFY=ECNTSUP,REGION=0M 00013020
/*ROUTE PRINT U@PRT65 - BY Z/OS UPGRADE
//**** 00040000
// SET UINODE='PROD' /* WEEKLY RUN FOR DC GOVT. 00050019
// SET PRGNODE='PROD' 00051022
// SET LVLNODE='PROD' 00060017
// SET CHGNODE='PROD' 00070017
// SET CHGMNBR='CHGM002' 00071002
// SET CHGMSSN='CHGM030' 00072009
// SET QTRLY='SPECXX' 00080000
// SET LDEST=U@PRT65 00090000
// SET LHOLD='YES' 00100000
// SET LVDHOLD='YES' 00101020
//***** 00110000
//PROCLIB JCLLIB ORDER=DOESTAX.&PRGNODE..PROCS.BATCH.LIB 00130000
//LOADLIBS INCLUDE MEMBER=DTSIJLIB /* PROD PROGS 00140017
//**** 00150000
//* WEEKLY CHARGE REPORTING PROCESS FOR DC GOVERNMENT 00160022
//**** 00480000
//STEP0200 EXEC DTSUXCGP 00490000
//STEP0100.SYSIN DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSCHGDW), 00491022
// DISP=SHR 00500022
//STEP0100.CHGPARM DD DISP=SHR /* CHARGE PARM 00500105
//STEP0100.DTSFVRO1 DD DISP=SHR /* CHG.BD205.RPT 00500323
//STEP0500.BD220CHG DD DISP=SHR /* CHG.BD220.RPT 00500513
//**** 00504000
//STEP0300 EXEC DTSCHGQ1 00510021
//STEP0100.RPC100R1 DD DUMMY /* RATED (W) 00511001
//STEP0100.RPC100R2 DD DUMMY /* FISC.AGNT. 00511101
//STEP0100.RPC100R3 DD DUMMY /* FISC.AGNT. 00511220
//STEP0100.RPC110R1 DD DUMMY /* S-I (I) 00511320
//STEP0100.RPC110R2 DD DUMMY /* S-I (I) 00511420
//STEP0100.RPC120R1 DD DUMMY /* S-I (I) 00511520
//STEP0100.RPC130R1 DD DUMMY /* S-I (I) 00511620
//STEP0100.RPC160R1 DD SYSOUT=0 00511820
//STEP0100.DTSFBTCO DD DUMMY /* BTC FILE 00513000
//STEP0100.TPSCHRG DD DUMMY /* TPS FILE 00513125
//DOESLBLP.DOESLBL1 DD DUMMY /* LABELS 00514000
//**** 00515020
//* 00516020