Z updated JCL files on PROD Env

JCL/DTSFT469.jcl

@@ -0,0 +1,52 @@
+//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)
+//*
+//**