Files
DUTAS/JCL/DTSCHGDC.jcl
2025-07-21 11:20:11 -04:00

73 lines
4.4 KiB
Plaintext

//DTSCHGDC JOB (UI,4300,3400,T),CHGDC.MNE,CLASS=P,MSGCLASS=X, 00010014
//** TYPRUN=SCAN, 00011014
// USER=#DOADTS, 00014018
// 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='DCG203' 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 ONLY ******************* 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.CSV130R1 DD DUMMY /* FSDES FILE 00500105
//STEP0100.RPC100R2 DD DUMMY /* FISC.AGNT. 00511101
//STEP0100.RPC130R2 DD DUMMY /* FISC.AGNT. 00511101
//STEP0100.RPC110R1 DD DUMMY /* S-I (I) 00511217
//STEP0100.RPC110R3 DD DUMMY /* S-I (I) 00511217
//STEP0100.RPC160R1 DD DSN=DOESTAX.DEVL.CNVCHG.R1107,DISP=SHR 00511319
//STEP0100.TPSCHRG DD DUMMY /* TPS FILE 00512000
//STEP0100.DTSFBTCO DD DUMMY /* BTC FILE 00513000
//DOESLBLP.DOESLBL1 DD DUMMY /* LABELS 00514000
// 00520000
/*JOBPARM LINES=99999
/*OUTPUT REPT DEST=LOCAL,FORMS=REPT
//***************************************************************
//* U1000 CONVERTS OUTPUT TO RICHTEXT .RTF
//* INCLUDE JOB SEPARATORS
//* U1001 CONVERTS OUTPUT TO RICHTEXT .RTF
//* OMITS ALL JOB SEPARATORS INFORMATION
//* U1002 CONVERTS OUTPUT TO ACROBAT FORMAT (.PDF)
//* OMITS ALL JOB SEPARATORS INFORMATION
//* U1003 CONVERTS OUTPUT TO SIMPLE TEXT FORMAT (.TXT)
//* OMITS ALL JOB SEPARATORS INFORMATION
//***************************************************************
//EMAIL EXEC PGM=IEBGENER,
// REGION=4M
//SYSPRINT DD SYSOUT=*
//OUT1 OUTPUT DEST=U1003,
// USERDATA=('TO:GERALD.SMART@DC.GOV',
// 'CC: CAMILLE.GERALD@DC.GOV',
// 'CC: RYAN.MOORE-LEE@DC.GOV',
// 'CC: SIA.KIAWU@DC.GOV',
// 'CC: LOUANN.CUDJOE@DC.GOV',
// 'CC: MOHAMED.HMAEY@DC.GOV',
// 'FILEDESC: DC GOVT MONTHLY CHARGES ',
// 'FILENAME:CONVCHGS.TXT')
//SYSUT1 DD DISP=SHR,
// DSN=DOESTAX.DEVL.CNVCHG.R1107
//SYSUT2 DD SYSOUT=A,OUTPUT=*.OUT1
//SYSIN DD DUMMY
//SYSUDUMP DD SYSOUT=(*,,DUMP)
//*