//FTPESSP01 JOB //* //******************************************************************** //* // CODEPAGE=1252,AUTOENCODE=YES, //*FILES MUST CONVERT TO BINARY FOR RAINCODE TO PROCESS ZL1 //** //STEP001 EXEC PGM=SFTP,PARM='(EXIT' //INPUT DD * 10.57.110.147 dutasrc Today728rc! binary cd /Dutasrc/inbound_uibs GET DOES_Bencharges.txt + DOESTAX.CONV.UIBSCHRG.DAILY.UPLOAD (REPLACE QUIT //SYSPRINT DD SYSOUT=* //OUTOUT DD SYSOUT=* //SYSPUT DD SYSOUT=*,DCB=BLKSIZE=133 //SYSGET DD *,DCB=BLKSIZE=80 // // //* ZL1 10/19/25. //* WELLS FARGO PAYMENT FILE MUST REMAIN IN ASCII FOR BANK TO PROCESS //** //STEP001 EXEC PGM=FTP,PARM='(EXIT' //INPUT DD * 10.57.110.147 21 dutasrc Today728rc! cd //Dutasrc/essp/inbound_essp ASCII GET ECNTSUP.DOESTAX.CONV.FROMESSP.ACHDPAYT + ECNTSUP.DOESTAX.CONV.FROMESSP.ACHDPAYT (REPLACE QUIT //SYSPRINT DD SYSOUT=* //OUTOUT DD SYSOUT=* //SYSPUT DD SYSOUT=*,DCB=BLKSIZE=133 //SYSGET DD *,DCB=BLKSIZE=80 //*