//DTSFT469 JOB (HS,0000,0000,P),NDNH-WAGE-EXACT2,CLASS=S,MSGCLASS=X,
//***      TYPRUN=SCAN,
//*        USER=#DOADTS,
//         NOTIFY=ECNTZL1,
//         REGION=4M
//****
//    SET  UINODE='PROD'
//    SET MSTNODE='PROD'
//    SET PRGNODE='PROD'
//    SET LVLNODE='CONV'
//****
//*  PRODUCE THE QUARTERLY WAGE EXTRACT FOR OFFICE OF TAX AND REVENUE (OTR)AND OAG
//*
//*  EXECUTE 5 BUSINESS DAYS AFTER THE QUARTER ENDS (QTR DECLARED DELQ)
//*  RECORDS ARE SELECTED THAT WERE UPDATED DURING THE QUARTER
//****
//PROCLIB  JCLLIB ORDER=DOESTAX.&PRGNODE..PROCS.BATCH.LIB
//LOADLIBS INCLUDE MEMBER=DTSIJLIB
//****
//** BE SURE TO CHNG THE PARM IN DOESTAX.CONV.USER.PARMLIB(DTSBX465)
//**   (OR, FOR NOW, THE ONE BELOW AT THE END OF THIS JOB)
//STEP0400 EXEC PGM=FTP                                               
//SYSFTPD  DD DISP=SHR,DSN=SYS2.TCPIP.ODC3.PARMLIB(FTCMGAW9)          
//SYSIN    DD *                                                       
FWFRIENDLY TRUE                                                       
//SYSPRINT DD SYSOUT=*,HOLD=YES                                       
//OUTPUT   DD SYSOUT=*                                                
//INPUT    DD DSN=DOESTAX.&MSTNODE..APPL.PARMLIB(DTSFX465),DISP=SHR   
/*                                                                    
//
//EMAIL    EXEC PGM=IEBGENER,
//         REGION=4M
//SYSPRINT DD SYSOUT=*
//OUT1     OUTPUT DEST=U1003,
//  USERDATA=('TO:TARA.WRIGHT@ACF.HHS.GOV',
//            'TO:HAROLD.JOHNSON@DC.GOV',
//            'TO:CAROLYN.TAYLORSON@SSA.GOV',
//            'TO:SEAN.JOSIAH@DC.GOV',
//            'TO:JOY.DIGGS@DC.GOV',
//            'TO:ALEXIS.WASHINGTON@ACF.HHS.GOV',
//            'TO:PRUDVI.PALLA@DC.GOV',
//            'TO:LYNNETTA.THOMPSON@ACF.HHS.GOV',
//         'SUBJECT:DC QUARTERLY WAGE NAME SUBMISSION',
//         'FILEDESC: DOES WAGES WITH NAMES               ',
//         'FILENAME:DOESWAGE.TXT'),
//         MAILFROM=DUTAS@DC.GOV
//SYSUT1   DD DSN=DOESTAX.CONV.OAG.WAGES.TXT,DISP=SHR
//SYSUT2   DD SYSOUT=A,OUTPUT=*.OUT1
//SYSIN    DD DUMMY
//SYSUDUMP DD SYSOUT=(*,,DUMP)
//*
//**