//**** 00000010 //* EXTRACT EMPLOYER DATA FROM TAX MAINFRAME FILES 00001700 //* INTO COMMA-SEPARATED FILES FOR WEB DATABASE 00001700 //* 00001700 //* RUNS DAILY FOLLOWING TAX UPDATE (DTSPDAY1) 00001700 //** 00001700 //DTSBX433 PROC //* //STEP0400 EXEC PGM=IEBGENER,REGION=4M //SYSPRINT DD SYSOUT=* //OUT1 OUTPUT DEST=U1003, // USERDATA=('TO:PANKAJ.SHARMA@SAGITEC.COM', // 'TO:ARAVIND.VITTA@SAGITEC.COM', // 'TO:PRABHU.TEGUR@SAGITEC.COM', // 'CC:SRUJANI.CHANDRAGIRI@DC.GOV', // 'CC:ZARATH.LALPUTAN@DC.GOV', // 'CC:RAJINI.JUJJAVARAPU@DC.GOV', // 'SUBJECT: DAILY X104 AND X141 FILES FROM PRIOR DAY ...'), // MAILFROM=DUTAS@DC.GOV //** 'FILEDESC: X104 AND X141 FILES READY FOR PICKUP ') //** 'FILENAME:DAILY FILES') //*YSUT1 DD DUMMY //*SYSUT2 DD SYSOUT=A,OUTPUT=*.OUT1 //*SYSIN DD DUMMY //SYSUT1 DD DSN=DOESTAX.CONV.X104.X141.FILES.TXT,DISP=SHR //SYSUT2 DD SYSOUT=A,OUTPUT=*.OUT1 //SYSIN DD DUMMY //SYSUDUMP DD SYSOUT=(*,,DUMP) //*********************************************************************