00001 *****                                                             05/22/01
00002 *                                                                 DTSIEEMH
00003 *    DTSIEEMH  ELECTRONIC MEDIA EMPLOYER HISTORY.  ONE               LV001
00004 *              RECORD EXISTS FOR ALL SUCCESSFULLY PROCESSED       DTSIEEMH
00005 *              SUBMISSIONS.                                       DTSIEEMH
00006 *                                                                 DTSIEEMH
00007 *****                                                             DTSIEEMH
00008      SKIP1                                                        DTSIEEMH
00009          10  EEMH-KEY-AREA.                                       DTSIEEMH
00010              15  EEMH-REC-TYPE           PIC S9(04)       COMP.   DTSIEEMH
00011                  88  EEMH-EMH-88                 VALUE +05.       DTSIEEMH
00012              15  EEMH-EMP-NO             PIC S9(07)       COMP-3. DTSIEEMH
00013              15  EEMH-REPORTING-DATE     PIC S9(09)       COMP-3. DTSIEEMH
00014              15  EEMH-DATA-TYPE-CD       PIC  X(02).              DTSIEEMH
00015                  88  EEMH-PRT-UC30-88         VALUE '01'.         DTSIEEMH
00016                  88  EEMH-BEN-CHARGE-DATA-88  VALUE '02'.         DTSIEEMH
00017                  88  EEMH-WAGE-88             VALUE '03'.         DTSIEEMH
00018                  88  EEMH-IRS-QTR-FEIN-88     VALUE '04'.         DTSIEEMH
00019                  88  EEMH-IRS-940-CERT-88     VALUE '05'.         DTSIEEMH
00020                  88  EEMH-IRS-WKLY-XMATCH-88  VALUE '06'.         DTSIEEMH
00021                  88  EEMH-RR-RETIRE-88        VALUE '07'.         DTSIEEMH
00022                  88  EEMH-BANK-RECON-OUT-88   VALUE '08'.         DTSIEEMH
00023                  88  EEMH-BANK-RECON-IN-88    VALUE '09'.         DTSIEEMH
00024                  88  EEMH-1099-88             VALUE '10'.         DTSIEEMH
00025              15  EEMH-LOG-NO             PIC  9(10).              DTSIEEMH
00026              15  EEMH-KEY-FILLER         PIC  X(01).              DTSIEEMH
00027      SKIP1                                                        DTSIEEMH
00028          10  EEMH-DATA-AREA.                                      DTSIEEMH
00029              15  EEMH-RESULT-CD          PIC X(02).               DTSIEEMH
00030                  88  EEMH-RC-FAILED-88        VALUE '01'.         DTSIEEMH
00031                  88  EEMH-RC-PART-SUCCESS-88  VALUE '03'.         DTSIEEMH
00032                  88  EEMH-RC-SUCCESSFUL-88    VALUE '04'.         DTSIEEMH
00033              15  EEMH-ELF-ID             PIC  S9(07)       COMP-3.DTSIEEMH
00034              15  EEMH-EMP-SEQ-NO         PIC   9(04).             DTSIEEMH
00035              15  EEMH-FILLER             PIC X(30).               DTSIEEMH