00001 *****                                                             05/22/01
00002 *                                                                 DTSIIEAE
00003 *    DTSIIEAE  ALTERNATE INDEX FILE                                  LV001
00004 *              ELECTRONIC FILER ID SEARCH RECORD DEFINITION.      DTSIIEAE
00005 *                                                                 DTSIIEAE
00006 *    FUNCTION: ONE EXISTS FOR EACH ACTIVE ITEM.                   DTSIIEAE
00007 *              INPUT: ELF-ID OR ELF-ID AND DATA TYPE              DTSIIEAE
00008 *              RETURN: LOG NUMBER OF ACTIVE ITEM.                 DTSIIEAE
00009 *                                                                 DTSIIEAE
00010 *              01/17/2001  INITIAL DEVELOPMENT.  GD               DTSIIEAE
00011 *                                                                 DTSIIEAE
00012 *****                                                             DTSIIEAE
00013                                                                   DTSIIEAE
00014          10  IEAE-KEY-AREA.                                       DTSIIEAE
00015              15  IEAE-REC-TYPE           PIC S9(04)       COMP.   DTSIIEAE
00016                  88  IEAE-EAE-88             VALUE +13.           DTSIIEAE
00017              15  IEAE-ELF-ID             PIC S9(07)       COMP-3. DTSIIEAE
00018              15  IEAE-DATA-TYPE-CD       PIC  X(02).              DTSIIEAE
00019                  88  IEAE-PRINT-UC30-88      VALUE '01'.          DTSIIEAE
00020                  88  IEAE-BEN-CHARGE-88      VALUE '02'.          DTSIIEAE
00021                  88  IEAE-WAGE-ONLY-88       VALUE '11'.          DTSIIEAE
00022                  88  IEAE-WAGE-TAX-88        VALUE '12'.          DTSIIEAE
00023              15  IEAE-LOG-NO             PIC  9(10).              DTSIIEAE
00024              15  IEAE-KEY-FILLER         PIC  X(46).              DTSIIEAE