DUTAS re-platformed to Raincode - Initial Source Code
This commit is contained in:
42
JCL/DTSDCGOV.jcl
Normal file
42
JCL/DTSDCGOV.jcl
Normal file
@ -0,0 +1,42 @@
|
||||
//DTSDCGOV JOB (UI,4300,3400,T),CHGDC.MNE,CLASS=P,MSGCLASS=X, 00010014
|
||||
//** TYPRUN=SCAN, 00011014
|
||||
// USER=#DOADTS, 00011014
|
||||
// NOTIFY=ECNTSUP,REGION=0M 00014018
|
||||
/*ROUTE PRINT U@PRT65 - BY Z/OS UPGRADE
|
||||
//**** 00040000
|
||||
// SET UINODE='PROD' /* MONTHLY RUN FOR DC GOVT ONLY 00050020
|
||||
// SET PGMNODE='PROD' 00051022
|
||||
// SET LVLNODE='PROD' 00060014
|
||||
// SET MSTNODE='PROD' 00061014
|
||||
// SET CHGNODE='PROD' 00070014
|
||||
// SET CHGMNBR='CHGM002' 00071002
|
||||
// SET CHGMSSN='CHGM030' 00072009
|
||||
// SET QTRLY='SPECXX' 00080000
|
||||
// SET LDEST=U@PRT65 00090000
|
||||
// SET LHOLD='YES' 00100000
|
||||
//***** 00110000
|
||||
//PROCLIB JCLLIB ORDER=DOESTAX.&PGMNODE..PROCLIB 00130022
|
||||
//LOADLIBS INCLUDE MEMBER=DTSIJLIB 00140009
|
||||
//**** 00150000
|
||||
//* PERIODIC CHARGE REPORTING PROCESS CAN GENERATE CHARGE STATEMENTS 00160000
|
||||
//******************** DC GOVERNMENT VIEW DIRECT REPORT****** 00170020
|
||||
//**** 00480000
|
||||
//STEP0200 EXEC DTSUXCGP 00490000
|
||||
//STEP0100.SYSIN DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSCHGDC), 00491020
|
||||
// DISP=SHR 00500020
|
||||
//STEP0100.CHGPARM DD DISP=SHR /* CHARGE PARM 00500105
|
||||
//STEP0100.DTSFVRO1 DD DISP=SHR /* CHG.BD205.RPT 00500221
|
||||
//STEP0500.BD220CHG DD DISP=SHR /* CHG.BD220.RPT 00500305
|
||||
//**** 00504000
|
||||
//STEP0300 EXEC DTSCGRPT 00510000
|
||||
//STEP0100.RPC100R1 DD DUMMY /* RATED (W) 00511017
|
||||
//STEP0100.RPC100R2 DD DUMMY /* FISC.AGNT. 00511101
|
||||
//STEP0100.RPC110R3 DD DUMMY /* NOT NEEDED HERE 00511101
|
||||
//STEP0100.RPC110R1 DD DUMMY /* S-I (I) 00511217
|
||||
//STEP0100.CSV130R1 DD DUMMY /* FSDES UPLOAD FILE 00511217
|
||||
//STEP0100.RPC130R2 DD DUMMY /* FSDES UPLOAD FILE 00511217
|
||||
//STEP0100.RPC160R1 DD SYSOUT=(V,DTSCG4Q1),HOLD=NO 00511319
|
||||
//STEP0100.TPSCHRG DD DUMMY /* TPS FILE 00512000
|
||||
//STEP0100.DTSFBTCO DD DUMMY /* BTC FILE 00513000
|
||||
//DOESLBLP.DOESLBL1 DD DUMMY /* LABELS 00514000
|
||||
// 00514000
|
||||
Reference in New Issue
Block a user