70 lines
4.2 KiB
Plaintext
70 lines
4.2 KiB
Plaintext
//RUNCHGZC JOB (UI,4300,3400,T),CHGDC.MNE,CLASS=P,MSGCLASS=X, 00010014
|
|
//** TYPRUN=SCAN, 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='SPECDC' 00080000
|
|
// SET LDEST=U@PRT65 00090000
|
|
// SET LHOLD='YES' 00100000
|
|
//***** 00110000
|
|
//PROCLIB JCLLIB ORDER=DOESTAX.&PGMNODE..PROCS.BATCH.LIB 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.RPC100R2 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.AUGCHG.R0818,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:ZARATH.LALPUTAN@DC.GOV',
|
|
//* 'CC: CAMILLE.GERALD@DC.GOV',
|
|
//* 'CC: RYAN.LEE-MOORE@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.AUGCHG.R0818
|
|
//SYSUT2 DD SYSOUT=A,OUTPUT=*.OUT1
|
|
//SYSIN DD DUMMY
|
|
//SYSUDUMP DD SYSOUT=(*,,DUMP)
|
|
//*
|