00001 *****                                                             05/22/01
00002 *                                                                 DTSIIEAL
00003 *    DTSIIEAL  ALTERNATE INDEX FILE                                  LV001
00004 *              LOG NUMBER SUFFIX SEARCH RECORD DEFINITION.        DTSIIEAL
00005 *                                                                 DTSIIEAL
00006 *    FUNCTION: ONE EXISTS FOR EACH LOG RECORD ON FILE.            DTSIIEAL
00007 *              INPUT: 6 DIGIT LOG NUMBER SUFFIX.                  DTSIIEAL
00008 *              RETURN: THE FULL 10 DIGIT LOG NUMBER               DTSIIEAL
00009 *                                                                 DTSIIEAL
00010 *              01/20/2001  INITIAL DEVELOPMENT.  GD               DTSIIEAL
00011 *                                                                 DTSIIEAL
00012 *****                                                             DTSIIEAL
00013                                                                   DTSIIEAL
00014          10  IEAL-KEY-AREA.                                       DTSIIEAL
00015              15  IEAL-REC-TYPE           PIC S9(04)       COMP.   DTSIIEAL
00016                  88  IEAL-EAL-88             VALUE +12.           DTSIIEAL
00017              15  IEAL-LOG-NO-SFX         PIC  9(06).              DTSIIEAL
00018              15  IEAL-LOG-NO             PIC  9(10).              DTSIIEAL
00019              15  IEAL-COMPLETE-DATE      PIC S9(09) COMP-3.       DTSIIEAL
00020              15  IEAL-KEY-FILLER         PIC  X(41).              DTSIIEAL