//DTSCHGM1 JOB (UI,4300,3400,T),CHGXX.MNE,CLASS=P,MSGCLASS=X,           00010021
//**       TYPRUN=SCAN,                                                 00011021
//         NOTIFY=ECNTSUP,REGION=0M                                     00013022
/*ROUTE PRINT U@PRT65               -  BY Z/OS UPGRADE
//****                                                                  00040000
//  SET  UINODE='PROD'              /* MONTHLY FOR DC GOVT.             00050026
//  SET PGMNODE='PROD'                                                  00051027
//  SET LVLNODE='PROD'                                                  00060021
//  SET MSTNODE='PROD'                                                  00061021
//  SET CHGNODE='PROD'                                                  00070021
//  SET CHGMNBR='CHGM002'                                               00071000
//  SET CHGMSSN='CHGM030'                                               00072015
//  SET   QTRLY='SPECM2'                                                00080000
//  SET   LDEST='LOCAL'                                                 00090000
//  SET LVDHOLD='YES'                                                   00091024
//  SET   LHOLD='YES'                                                   00100000
//*****                                                                 00110000
//PROCLIB  JCLLIB ORDER=DOESTAX.&PGMNODE..PROCLIB                       00130027
//LOADLIBS INCLUDE MEMBER=DTSIJLIB                                      00140010
//****                                                                  00150000
//****** MONTHLY CHARGE REPORTING FOR DC GOVERNMENT                     00160025
//****                                                                  00480000
//STEP0200 EXEC DTSUXMCC                                                00490000
//STEP0100.SYSIN DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSCHGM1),       00491025
//         DISP=SHR                                                     00500025
//*TEP0100.CHGPARM  DD  DISP=SHR       /* CHARGE PARM                   00500103
//*TEP0100.DTSFVRO1 DD  DISP=SHR       /* CHG.BD205.RPT                 00500203
//*TEP0500.BD220CHG DD  DISP=SHR       /* CHG.BD220.RPT                 00500303
//****                                                                  00501000
//STEP0300 EXEC DTSCHGQ1                                                00511025
//STEP0100.RPC100R1  DD  DUMMY            /* RATED (W)                  00512024
//STEP0100.CSV130R1  DD  DUMMY            /* FISC.AGNT.                 00513024
//STEP0100.RPC130R2  DD  DUMMY            /* FISC.AGNT.                 00513024
//STEP0100.RPC100R2  DD  DUMMY            /* FISC.AGNT.                 00513024
//STEP0100.RPC100R3  DD  DUMMY            /* FISC.AGNT.                 00514024
//STEP0100.RPC110R1  DD  DUMMY            /* S-I   (I)                  00515024
//STEP0100.RPC110R2  DD  DUMMY            /* S-I   (I)                  00516024
//STEP0100.RPC110R3  DD  DUMMY            /* S-I   (I)                  00516024
//STEP0100.RPC120R1  DD  DUMMY            /* S-I   (I)                  00517024
//STEP0100.RPC130R1  DD  DUMMY            /* S-I   (I)                  00518024
//STEP0100.RPC160R1  DD  SYSOUT=0                                       00519024
//STEP0100.TPSCHRG   DD  DUMMY            /* TPS FILE                   00519124
//STEP0100.DTSFBTCO  DD  DUMMY            /* BTC FILE                   00519124
//DOESLBLP.DOESLBL1  DD  DUMMY            /* LABELS                     00519324
//****                                                                  00519424
//*                                                                     00519524