00001 *****                                                             07/01/08
00002 *                                                                 DTSIILEN
00003 *    DTSIILEN    ALTERNATE INDEX FILE RECORD LENGTH.                 LV008
00004 *                                                                 DTSIILEN
00005 *                                                                 DTSIILEN
00006 *                08/25/1998  REVIEWED AND MODIFIED FOR DC.  EHH   DTSIILEN
00007 *                01/20/2001  MODIFIED FOR ELECTRONIC MEDIA        DTSIILEN
00008 *                            TRACKING SYSTEM.  GD                 DTSIILEN
00009 *                04/18/2003  MODIFIED FOR ELECTRONIC PAYMENT      DTSIILEN
00010 *                            (TRT, TRE)        GD                 DTSIILEN
00011 *                02/08/2008  ADDED IRFD REC FOR REFUNDS   GD      DTSIILEN
00012 *                                                                 DTSIILEN
00013 *****                                                             DTSIILEN
00014                                                                   DTSIILEN
00015          10  ILEN-LENGTH         PIC S9(04)   COMP  VALUE +64.    DTSIILEN
00016                                                                   DTSIILEN
00017          10  ILEN-MAX-REC-ID     PIC S9(04)   COMP  VALUE +22.    DTSIILEN
00018                                                                   DTSIILEN
00019          10  ILEN-PREFIX-AREA.                                    DTSIILEN
00020              15  ILEN-BTB-PREFIX     PIC  X(04)  VALUE 'IBTB'.    DTSIILEN
00021              15  ILEN-EIN-PREFIX     PIC  X(04)  VALUE 'IEIN'.    DTSIILEN
00022              15  ILEN-FAN-PREFIX     PIC  X(04)  VALUE 'IFAN'.    DTSIILEN
00023              15  ILEN-FID-PREFIX     PIC  X(04)  VALUE 'IFID'.    DTSIILEN
00024              15  ILEN-OPN-PREFIX     PIC  X(04)  VALUE 'IOPN'.    DTSIILEN
00025              15  ILEN-OPS-PREFIX     PIC  X(04)  VALUE 'IOPS'.    DTSIILEN
00026              15  ILEN-PES-PREFIX     PIC  X(04)  VALUE 'IPES'.    DTSIILEN
00027              15  ILEN-TDS-PREFIX     PIC  X(04)  VALUE 'ITDS'.    DTSIILEN
00028              15  ILEN-ZIP-PREFIX     PIC  X(04)  VALUE 'IZIP'.    DTSIILEN
00029              15  ILEN-BTN-PREFIX     PIC  X(04)  VALUE 'IBTN'.    DTSIILEN
00030              15  ILEN-ENM-PREFIX     PIC  X(04)  VALUE 'IENM'.    DTSIILEN
00031              15  ILEN-EAL-PREFIX     PIC  X(04)  VALUE 'IEAL'.    DTSIILEN
00032              15  ILEN-EAE-PREFIX     PIC  X(04)  VALUE 'IEAE'.    DTSIILEN
00033              15  ILEN-EBX-PREFIX     PIC  X(04)  VALUE 'IEBX'.    DTSIILEN
00034              15  ILEN-EOP-PREFIX     PIC  X(04)  VALUE 'IEOP'.    DTSIILEN
00035              15  ILEN-ESR-PREFIX     PIC  X(04)  VALUE 'IESR'.    DTSIILEN
00036              15  ILEN-EER-PREFIX     PIC  X(04)  VALUE 'IEER'.    DTSIILEN
00037              15  ILEN-EET-PREFIX     PIC  X(04)  VALUE 'IEET'.    DTSIILEN
00038              15  ILEN-EPR-PREFIX     PIC  X(04)  VALUE 'IEPR'.    DTSIILEN
00039              15  ILEN-TRT-PREFIX     PIC  X(04)  VALUE 'ITRT'.    DTSIILEN
00040              15  ILEN-TRE-PREFIX     PIC  X(04)  VALUE 'ITRE'.    DTSIILEN
00041              15  ILEN-RFD-PREFIX     PIC  X(04)  VALUE 'IRFD'.    DTSIILEN
00042                                                                   DTSIILEN
00043          10  FILLER REDEFINES ILEN-PREFIX-AREA.                   DTSIILEN
00044              15  ILEN-PREFIX OCCURS 22 TIMES                      DTSIILEN
00045                              INDEXED BY ILEN-IDX                  DTSIILEN
00046                                      PIC  X(04).                  DTSIILEN