//DTSCHGCC JOB (UI,4300,3400,T),CHGCC.CNV,CLASS=P,MSGCLASS=X,           00010012
//**       TYPRUN=SCAN,                                                 00020011
//         USER=#DOADTS,
//         NOTIFY=ECNTSUP,REGION=0M                                     00031015
/*ROUTE PRINT U@PRT65               -  BY Z/OS UPGRADE
//****                                                                  00040000
//  SET PGMNODE='PROD'              /* MONTHLY FOR DC CONV. CNTR.       00050022
//  SET  UINODE='PROD'                                                  00060015
//  SET LVLNODE='PROD'                                                  00060115
//  SET MSTNODE='PROD'                                                  00061010
//  SET CHGNODE='PROD'                                                  00070010
//  SET CHGMNBR='CHGM002'                                               00071000
//  SET CHGMSSN='CHGM030'                                               00072006
//  SET   QTRLY='DCC202'                                                00080000
//  SET   LDEST='LOCAL'                                                 00090000
//  SET   LHOLD='YES'                                                   00100000
//*****                                                                 00110000
//PROCLIB  JCLLIB ORDER=DOESTAX.&PGMNODE..PROCS.BATCH.LIB                       00130022
//LOADLIBS INCLUDE MEMBER=DTSIJLIB                                      00140006
//****                                                                  00150000
//*  PERIODIC CHARGE REPORTING PROCESS CAN GENERATE CHARGE STATEMENTS   00160000
//**** ********* FOR THE DC CONVENTION CENTER ONLY   ***************    00161020
//****                                                                  00480000
//STEP0200 EXEC DTSUXCGP                                                00490000
//STEP0100.SYSIN DD DSN=DOESTAX.&LVLNODE..APPL.PARMLIB(DTSCHGCC),       00491020
//         DISP=SHR                                                     00500020
//STEP0100.CHGPARM  DD  DISP=SHR       /* CHARGE PARM                   00500103
//STEP0100.DTSFVRO1 DD  DISP=SHR       /* CHG.BD205.RPT                 00500203
//STEP0500.BD220CHG DD  DISP=SHR       /* CHG.BD220.RPT                 00500303
//****                                                                  00504000
//STEP0300 EXEC DTSCGRPT                                                00510000
//STEP0100.RPC100R1  DD  DUMMY            /* RATED  (W)                 00511014
//STEP0100.CSV130R1  DD  DUMMY            /* FSDES FILE                 00511014
//STEP0100.RPC130R2  DD  DUMMY            /* FISC.AGNT.                 00511100
//STEP0100.RPC100R2  DD  DUMMY            /* FISC.AGNT.                 00511100
//STEP0100.RPC110R1  DD  DUMMY            /* S-I    (I)                 00511214
//STEP0100.RPC110R2  DD  DSN=DOESTAX.DEVL.CNVCHG.R1207,DISP=SHR         00511316
//STEP0100.RPC110R3  DD  DUMMY            /* S-I    (I)                 00511214
//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:CAMILLE.GERALD@DC.GOV',
//            'CC:SRUJANI.CHANDRAGIRI@DC.GOV',
//         'SUBJECT: DC CONVENTION CENTER CHARGES  )',
//         'FILEDESC: DC CONVENTION CHARGES               ',
//         'FILENAME:CONVCHGS.TXT')
//SYSUT1   DD DISP=SHR,
//         DSN=DOESTAX.DEVL.CNVCHG.R1207
//SYSUT2   DD SYSOUT=A,OUTPUT=*.OUT1
//SYSIN    DD DUMMY
//SYSUDUMP DD SYSOUT=(*,,DUMP)
//*