COMKTIP 
COMMON
          CTEXT  COMKTIP - *TAF* INITIALIZATION PARAMETERS. 
          SPACE  4,10 
          BASE   DECIMAL
*         COMMENT  COPYRIGHT CONTROL DATA SYSTEMS INC.  1992. 
 TIP      SPACE  4,10 
**        TIP - *TAF* INITIALIZATION PARAMETERS.
*         G. W. PROPP.       78/08/31.
*         L. E. LOVETT.      80/04/01.
          SPACE  4,10 
**        THE FOLLOWING TABLE IS USED TO PASS INITIALIZATION
*         PARAMETERS BETWEEN DECK *TAF* AND DECK *AAMI*.
  
  
 TTIP     BSS    0           TABLE OF INITIALIZATION PARAMETERS 
          LOC    0
 TIFN     BSS    1           FILE NAME
 TIKW     BSS    0           KEY RELATIVE POSITION
 TIFO     BSS    1           FILE ORGANIZATION
 TIKP     BSS    0           KEY BEGINNING CHARACTER POSITION 
 TIPD     BSS    1           PROCESSING DIRECTION 
 TIUS     BSS    1           USERS
 TILK     BSS    1           LOCKS
 TIKL     BSS    1           KEY LENGTH 
 TIRL     BSS    1           RECORD LENGTH
 TIAL     BSS    0           ALTERNATE KEY LENGTH 
 TIHR     BSS    1           FWA OF HASHING ROUTINE 
 TIXN     BSS    1           INDEX FILE NAME
 TINK     BSS    1           NUMBER OF ALTERNATE KEYS 
 TIKO     BSS    1           ALTERNATE KEY ORDINAL
 TIMK     BSS    1           MAXIMUM KEY LENGTH 
 TILN     BSS    1           LOGICAL NAME TABLE ENTRY 
 TIAM     BSS    1           FWA OF MEMORY FOR ALLOCATION 
 TILW     BSS    1           LWA OF MEMORY FOR ALLOCATION 
 TIDB     BSS    1           DATA BASE IDENTIFIER 
 TIQN     BSS    1           NUMBER OF *QRF* FILES FOR DATA BASE
 TIMD     BSS    1           MODE FOR FILE ATTACH 
 TIPN     BSS    1           PACK-NAME
 TIDV     BSS    1           DEVICE TYPE
 TIFW     BSS    1           FORCED-WRITE INDICATOR  (FWI)
 TIRF     BSS    1           RECOVERABLE-FILE INDICATOR  (RFI)
 TIAE     BSS    1           ATTACH ERROR FLAG
          LOC    *O 
 TTIPL    EQU    *-TTIP      LENTGH OF INITIALIZATION TABLE 
          ENDX
