C
C  IHINDEX    POINTS TO THE HEAD OF A SECOND LEVEL INDEX
C  IHLIST     POINTS TO THE HEAD OF THE FIRST LEVEL LIST
C  NINDEX     IS THE NUMBER OF INDICES NEEDED 
C  NTRIG      IS THE NUMBER OF SEARCHES THAT CAUSES A NEW ENTRY IN
C             THE SECOND LEVEL INDEX
C  MXENTRY    THE MAXIMUM NUMBER ENTRIES IN THE SECOND LEVEL INDEX
C  ICLIST     POINTS TO THE LAST ENTRY IN THE FIRST LEVEL INDEX ACCESSED
C             BY A COPYXXX ROUTINE
C  INFILE     NUMBER OF TRANSACTIONS IN A FILE
C  ITLIST     POINTS TO THE LAST ENTRY OF THE FIRST LEVEL INDEX
C  INDICES    THE DEFINITION OF THE INDICES FOR A RUN (NINDEX, 2 KEYS),
C  NATTRIB    NUMBER OF ATTRIBUTE VALUES FOR A FILE
C  IPINDEX    POINTER TO START OF INDICES FOR A FILE IN INDICES
C  NTOTINDEX  TOTAL NUMBER OF INDICES DEFINED FOR ALL FILES
C  ICFILE     THE ID NUMBER OF THE LAST FILE DEFINED
C  ICINDEX    THE ID NUMBER OF THE LAST INDEX DEFINED
C
      COMMON /COMFILE/ IHINDEX(100,3), IHLIST(100,3), NINDEX(100),
     1                 NTRIG, MXENTRY, ICLIST(100),   IN_FILE(100),
     2                 ITLIST(100,3),  INDICES(300,2), NATTRIB(100),
     3                 IPINDEX(100), NTOTINDEX, ICFILE, ICINDEX