//DTSCCGM1 JOB (UI,4300,3400,T),CHGCC.MNE,CLASS=P,MSGCLASS=X,           00010001
//**       TYPRUN=SCAN,                                                 00020000
//         NOTIFY=ECNTSUP,REGION=0M                                     00031000
/*ROUTE PRINT U@PRT65               -  BY Z/OS UPGRADE
//****                                                                  00040000
//  SET PGMNODE='PROD'              /* MONTHLY FOR DC CONV. CNTR.       00050004
//  SET  UINODE='PROD'                                                  00060000
//  SET LVLNODE='PROD'                                                  00060100
//  SET MSTNODE='PROD'                                                  00061000
//  SET CHGNODE='PROD'                                                  00070000
//  SET CHGMNBR='CHGM002'                                               00071000
//  SET CHGMSSN='CHGM030'                                               00072000
//  SET   QTRLY='SPECXX'                                                00080000
//  SET   LDEST=U@PRT65                                                 00090000
//  SET   LHOLD='YES'                                                   00100000
//  SET LVLHOLD='YES'                                                   00101001
//*****                                                                 00110000
//PROCLIB  JCLLIB ORDER=DOESTAX.&PGMNODE..PROCS.BATCH.LIB                       00130004
//LOADLIBS INCLUDE MEMBER=DTSIJLIB                                      00140000
//****                                                                  00150000
//*  PERIODIC CHARGE REPORTING PROCESS CAN GENERATE CHARGE STATEMENTS   00160000
//**** ********* FOR THE DC CONVENTION CENTER ONLY   ***************    00161000
//****                                                                  00480000
//STEP0200 EXEC DTSUXMCC                                                00490000
//STEP0100.SYSIN DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSCHGCC),       00491000
//         DISP=SHR                                                     00500000
//STEP0100.CHGPARM  DD  DISP=SHR       /* CHARGE PARM                   00500100
//STEP0100.DTSFVRO1 DD  DISP=SHR       /* CHG.BD205.RPT                 00500200
//STEP0500.BD220CHG DD  DISP=SHR       /* CHG.BD220.RPT                 00500300
//****                                                                  00504000
//STEP0300 EXEC DTSCGRPT                                                00510000
//STEP0100.RPC100R1  DD  DUMMY            /* RATED  (W)                 00511000
//STEP0100.RPC100R2  DD  DUMMY            /* FISC.AGNT.                 00511100
//STEP0100.RPC110R1  DD  DUMMY            /* S-I    (I)                 00511200
//STEP0100.RPC110R2  DD  DSN=DOESTAX.DEVL.CNVCHG.R1207,DISP=SHR         00511301
//STEP0100.TPSCHRG   DD  DUMMY            /* TPS FILE                   00512000
//STEP0100.DTSFBTCO  DD  DUMMY            /* BTC FILE                   00513000
//DOESLBLP.DOESLBL1  DD  DUMMY            /* LABELS                     00514000
//*                                                                     00517001