//DTSRQ701 JOB (UI,4300,3400,T),PROD.FUTA.CERT1, // MSGCLASS=X,CLASS=A, // NOTIFY=ECNTSUP, //**** TYPRUN=SCAN, // REGION=0M //**** //* FUTA CERTIFICATION - PART 1 (DTSRQ701) //* - PART 2 (DTSRQ704) //* - PART 3 (DTSRQ702) //* - PART 4 (DTSRQ706) <<< NO LONGER NEEDED BY IRS //**** //* THE ANNUAL IRS FUTA CERTIFICATION PROCESS //**** // SET FISCALYR='CY2010' //**** //* THE DASD FILE IS FOR USE BY DTSRQ704 (PART 2) //* (CHANGE CALENDAR YEAR AS NEEDED) //**** //**** //* LOAD THE IRS FILE TO DASD //**** //STEP0100 EXEC PGM=IEBGENER //SYSUT1 DD DSN=DOESTAX.CONV.FUTACERT.UPLOAD,DISP=SHR 00070080 //SYSUT2 DD DSN=DOESTAX.CONV.FUTACERT.&FISCALYR., 00100080 // DISP=(NEW,CATLG,DELETE), // UNIT=SYSDA, // SPACE=(CYL,(1,1),RLSE), // DCB=(SYS3.MODEL,RECFM=FB,LRECL=295,BLKSIZE=8260) //SYSOUT DD SYSOUT=* //SYSPRINT DD SYSOUT=* //SYSUDUMP DD SYSOUT=* //SYSIN DD DUMMY //****