//DTSPACHD JOB (UI,4300,03410,P),'SEND-ACH-DEBIT-WF',REGION=4000K, // USER=#DOADTS, // CLASS=A,MSGCLASS=X,NOTIFY=ECNTZL1 /*ROUTE PRINT U@PRT65 //* // SET LVLNODE='CONV' // SET MSTNODE='PROD' // SET IMPNODE='CONV' // SET BTCNODE='DEVL' // SET PRGNODE='CONV' // SET LVDHOLD='YES' //* //PROCLIB JCLLIB ORDER=DOESTAX.&PRGNODE..PROCLIB //LOADLIBS INCLUDE MEMBER=DTSIJLIB //** //******************************************************************** //**** FTP ESSP ACH PAYMENTS TO WELLS FARGO USING FTPS ON THE //**** MAINFRAME. THIS JOB WILL RUN DAILY AT 4:00 PM 1/30/15 zl1 //**** MAINFRAME. THIS JOB WILL RUN DAILY AT 6:00 PM 1/09/16 zl1 //**** //******************************************************************** //* job split in two jobs this job will run a 6:00pm //* report job will run a 5:00pm to verify deposit before transmitting //******************************************************************** //*** COPY essp ach payments to backup ach file. //** see job dtsrachd 09/01/16 zl1 //******************************************************************** //** //******************************************************************* //*************** put production ach files only ************* //******************************************************************* //**** //*** FILES COMING FROM ESSP WILL UPLOAD (FTP) TO MAINFRAME DAILY. //**** //*** THIS JOB WILL USE FTPS (FTP WITH SSL CERT) TO TRANSMIT FILE. //**** //****!!!!!!---- THIS CERT EXPIRES EACH YEAR IN DECEMBER ----!!!!!! //**** //*** ALL WELLS FARGO CERT ARE INSTALLED ON DOES LPARS 0S19 & OS16 //******************************************************************** //*----------------------------------------------------- //* BATCH EXECUTION OF FTP UNDER TLS TO REMOTE HOST WF FTPS //*----------------------------------------------------- //STEPWF EXEC PGM=FTP, // PARM='-r TLS safetrans.wellsfargo.com' //NETRC DD DISP=SHR,DSN=DOESTAX.CONV.USER.PARMLIB(DTSPWFIN) //SYSFTPD DD DISP=SHR,DSN=SYS2.TCPIP.ODC3.PARMLIB(FTCDATA) // DD * FWFRIENDLY TRUE //SYSPRINT DD SYSOUT=*,HOLD=YES //INPUT DD DSN=DOESTAX.CONV.USER.PARMLIB(DTSPWFAD),DISP=SHR //* //******************************************************************** //*** send email ach transimmited to wells fargo. //** //******************************************************************** //** //ESSPMAIL EXEC PGM=IEBGENER,COND=(0,LT), // REGION=4M //SYSPRINT DD SYSOUT=* //OUT1 OUTPUT DEST=U1003, // USERDATA=('TO:PANKAJ.SHARMA@SAGITEC.COM', // 'TO:karthik.sadasivam@sagitec.com', // 'TO:MARGARET.HERNANDEZ@DC.GOV', // 'TO:ESAYAS.LEMMA@DC.GOV', // 'TO:NANCY.HUDAK@DC.GOV', // 'TO:ZARATH.LALPUTAN@DC.GOV', // 'SUBJECT: ESSP ach payments transmitted to wells fargo', //* 'FILEDESC: DAILY ESSP-DUTAS UPLOAD ', // 'FILENAME:essp_ach.TXT') //SYSUT1 DD DSN=DOESTAX.CONV.ESSP.ACHDD.TXT,DISP=SHR //SYSUT2 DD SYSOUT=A,OUTPUT=*.OUT1 //SYSIN DD DUMMY //SYSUDUMP DD SYSOUT=(*,,DUMP) // //********************************************************************