*COMDECK CCLFN                                                          000310
*****   BEGINNING OF COMMON BLOCK -CLFN-   *****                        000320
          USE    /CLFN/                                                 000330
LFNS      BSS    42                                                     000340
LFNIND    BSS    1                 INDEX INTO CLFN                      000350
 CATAFIT  BSS    LFIT              CATALOG FIT
PERMI     BSS    1                 FLAG - PERMISSION TO WRITE IN CATALOG000370
PFCATAL   BSS    1                 FLAG - CATALOG IS PERM OR NOT        000380
HIGHKEY   BSS    1                 HIGHEST ACCEPTABLE KEY IN -GETN-     000390
LOWKEY    BSS    1                 LOWEST ACCEPTABLE KEY IN -GET-       000400
MAJORKL   BSS    1                 LENGTH OF KEY IN CHARACTERS          000410
 RPTFIT   BSS    LFIT              REPORT FIT 
          USE    0                                                      000430
*****    END OF COMMON BLOCK -CLFN-   *****                             000440
