00001 *****                                                             02/04/99
00002 *                                                                 DTSIR704
00003 *    DTSIR704    FUTA SUCCESSFUL CERTIFICATIONS REPORT RECORD.       LV002
00004 *                                                                    CL**2
00005 *                                                                    CL**2
00006 *                02/04/1999  REVIEWED AND MODIFIED FOR DC.  EHH      CL**2
00007 *                                                                    CL**2
00008 *****                                                                CL**2
00009                                                                      CL**2
00010          10  R704-LENGTH         PIC S9(04)  COMP.                   CL**2
00011                                                                      CL**2
00012          10  R704-SORT-AREA.                                         CL**2
00013              15  R704-REC-TYPE           PIC  X(03)  VALUE '704'.    CL**2
00014              15  R704-FEIN               PIC S9(09)       COMP-3.    CL**2
00015              15  R704-TAX-YEAR-MONTH.                                CL**2
00016                  20  R704-TAX-YEAR       PIC  9(04).                 CL**2
00017                  20  R704-TAX-MONTH      PIC  9(02).                 CL**2
00018                                                                      CL**2
00019          10  R704-DATA-AREA.                                         CL**2
00020              15  R704-EMP-NO             PIC S9(07)       COMP-3.    CL**2
00021              15  R704-DOC-LOC-NO         PIC  X(13).                 CL**2
00022              15  R704-CHECK-DIGIT        PIC  X(02).                 CL**2
00023              15  R704-FORM-INDICATOR     PIC  X(01).                 CL**2
00024              15  R704-ONTIME             PIC S9(09)V99    COMP-3.    CL**2
00025              15  R704-GRACE              PIC S9(09)V99    COMP-3.    CL**2
00026              15  R704-LATE               PIC S9(09)V99    COMP-3.    CL**2
00027              15  R704-ONTIME-SCHED-H     PIC S9(09)V99    COMP-3.    CL**2
00028              15  R704-LATE-SCHED-H       PIC S9(09)V99    COMP-3.    CL**2
00029              15  R704-WAGE-RATE-CNT      PIC S9(04)       COMP.      CL**2
00030              15  R704-WAGE-RATE-AREA OCCURS 4.                       CL**2
00031                  20  R704-TAXABLE-WAGES  PIC S9(11)V99    COMP-3.    CL**2
00032                  20  R704-RATE           PIC S9(01)V9(04) COMP-3.    CL**2