//DTSCHGQ3 JOB (UI,4300,3400,T),QTRLY-CWC-FED-CHGRS,CLASS=P,MSGCLASS=X, 00010017
//**       TYPRUN=SCAN,                                                 00011017
//*        USER=#DOADTS,                                                00014021
//         NOTIFY=ECNTSUP,REGION=0M                                     00014021
/*ROUTE PRINT U@PRT65               -  BY Z/OS UPGRADE
//****                                                                  00040000
//****                                                                  00042026
//  SET PRGNODE='PROD'           /* CHANGE PARMS BEFORE RUNNING JOB     00050017
//  SET LVLNODE='PROD'                                                  00060017
//  SET UINODE='PROD'                                                   00060124
//  SET MSTNODE='PROD'           /* QRTLY RUN FOR CWC & FED EMPLOYERS   00061032
//  SET CHGNODE='PROD'                                                  00070017
//  SET CHGMNBR='CHGM002'                                               00071004
//  SET CHGMSSN='CHGM030'                                               00072014
//  SET   QTRLY='CWC241' <<<<<<<<< CHANGE PARM <<<<<<<<<<<<<<<          00080038
//  SET   LDEST=U@PRT65      ALSO CHANGE LINE 30                        00090000
//  SET LVDHOLD='YES'                                                   00100027
//  SET   LHOLD='YES'                                                   00101027
//*****                                                                 00110000
//PROCLIB  JCLLIB ORDER=DOESTAX.&PRGNODE..PROCS.BATCH.LIB                       00130000
//LOADLIBS INCLUDE MEMBER=DTSIJLIB                                      00140009
//****                                                                  00150000
//*  QUARTERLYCHARGE REPORTING PROCESS FOR CWC AND FED EMPLYRS          00160032
//****                                                                  00480000
//STEP0200 EXEC DTSUXCWC                                                00490000
//****                                                                  00480000
//*>>>>>>>>PARM MUST BE CHANGED BEFORE RUNNING JOB (START/END DATES)    00160032
//****                                                                  00480000
//STEP0100.SYSIN DD *                                                   00491032
RPT,010124,033124,NNYYNN,000000
//****                                                                  00504000
//STEP0300 EXEC DTSCHGQ3                                                00510031
//                                                                      00504000
//ZMAIL    EXEC PGM=IEBGENER,
//         REGION=4M
//SYSPRINT DD SYSOUT=*
//OUT1     OUTPUT DEST=U1003,
//  USERDATA=('TO:TANISE.BROWN@DC.GOV',
//            'TO:DOES_ONPOINT@DC.GOV',
//         'CC:VERA.ORLANDO@DC.GOV',
//         'CC:SRUJANI.CHANDRAGIRI@DC.GOV',
//         'CC:ZARATH.LALPUTAN@DC.GOV',
//         'SUBJECT: QUARTERLY CWC FILE AVAILABLE FOR PROCESSING   )',
//         'FILEDESC: LAST COMPLETED CWC QUARTERLY FILE FROM DUTAS',
//         'FILENAME:DOESTAX.PROD.CHG.BD220.CWC.QTRYYQ.TXT'),
//         MAILFROM=DUTAS@DC.GOV
//SYSUT1   DD DSN=DOESTAX.PROD.CHG.BD220.CWC.&QTRLY,DISP=SHR
//SYSUT2   DD SYSOUT=A,OUTPUT=*.OUT1
//SYSIN    DD DUMMY
//SYSUDUMP DD SYSOUT=(*,,DUMP)
//*
//FSDES    EXEC PGM=IEBGENER,
//         REGION=4M
//SYSPRINT DD SYSOUT=*
//OUT1     OUTPUT DEST=U1003,
//  USERDATA=('TO:RAJINI.JUJJAVARAPU@DC.GOV',
//         'CC:SRUJANI.CHANDRAGIRI@DC.GOV',
//         'CC:ZARATH.LALPUTAN@DC.GOV',
//         'SUBJECT: QTR FSDES FILE AVAILABLE FOR PROCESSING   )',
//         'FILEDESC: LAST COMPLETED FSDES FILE FROM DUTAS',
//         'FILENAME:DOESTAX.PROD.FSDES.TXT'),
//         MAILFROM=DUTAS@DC.GOV
//SYSUT1   DD DUMMY
//SYSUT2   DD SYSOUT=A,OUTPUT=*.OUT1
//SYSIN    DD DUMMY
//SYSUDUMP DD SYSOUT=(*,,DUMP)
//*
//****                                                                  00520000