/********************************************************************************************************************************/
/* Created: 15-MAR-2001 23:37:14 by OpenVMS SDL EV1-33     */
/* Source:  15-MAR-2001 23:34:39 _$11$DUA933:[BUILD.SDL]CRF.SDI;1 */
/********************************************************************************************************************************/
/*** MODULE $CRFDEF ***/
#ifndef __CRFDEF_LOADED
#define __CRFDEF_LOADED 1
 
#pragma nostandard
 
#ifdef __cplusplus
    extern "C" {
#define __unknown_params ...
#else
#define __unknown_params
#endif
 
#if !defined(__VAXC) && !defined(VAXC)
#define __struct struct
#define __union union
#else
#define __struct variant_struct
#define __union variant_union
#endif
 
/*                                                                          */
/* CRF$INSRTREF ARGUMENT LIST                                               */
/*                                                                          */
struct crfdef {
    int crfdef$$_fill_1;                /* ARGUMENT COUNT                   */
    unsigned int crf$l_ir_ctltbl;       /* CRF CONTROL TABLE ADR            */
    unsigned int crf$l_ir_keyadr;       /* KEY ADDRESS                      */
    unsigned int crf$l_ir_refadr;       /* REFERENCE INDICATOR ADR          */
    unsigned short int crf$w_ir_reflag; /* REFERENCE INDICATOR FLAGS        */
    char crfdef$$_fill_2 [2];           /* UNUSED                           */
    unsigned char crf$b_ir_defind;      /* DEFINITION INDICATOR             */
    char crfdef$$_fill_3 [3];           /* UNUSED                           */
/*                                                                          */
/* CRF$INSRTKEY ARGUMENT LIST                                               */
/*                                                                          */
    } ;
struct crfdef1 {
    int crfdef$$_fill_4;                /* ARGUMENT COUNT                   */
    unsigned int crf$l_ik_ctltbl;       /* CRF CONTROL TABLE ADR            */
    unsigned int crf$l_ik_keyadr;       /* ADDRESS OF KEY                   */
    unsigned int crf$l_ik_valadr;       /* ADDRESS OF VALUE                 */
    unsigned short int crf$w_ik_valflg; /* VALUE FLAGS                      */
    char crfdef$$_fill_5 [2];           /* UNUSED                           */
/*                                                                          */
/* CRF$OUT ARGUMENT LIST                                                    */
/*                                                                          */
    } ;
struct crfdef2 {
    int crfdef$$_fill_6;                /* ARGUMENT COUNT                   */
    unsigned int crf$l_ou_ctltbl;       /* CRF CONTROL TABLE ADR            */
    unsigned int crf$l_ou_linwid;       /* OUTPUT LINE WIDTH                */
    unsigned char crf$b_ou_pag1;        /* ! LINES/PAGE 1                   */
    char crfdef$$_fill_7 [3];           /* UNUSED                           */
    unsigned char crf$b_ou_sucpag;      /* ! LINES/SUCCESSIVE PAGES         */
    char crfdef$$_fill_8 [3];           /* UNUSED                           */
    unsigned char crf$b_ou_prtind;      /* REF PRINT INDICATOR              */
    char crfdef$$_fill_9 [3];           /* UNUSED                           */
    unsigned char crf$b_ou_savind;      /* SAVE INDICATOR                   */
/*                                                                          */
/* CRF CONTROL TABLE OFFSETS                                                */
/*                                                                          */
    } ;
struct crfdef3 {
    unsigned int crf$l_hasht;           /* HASH TABLE ADDRESS               */
    unsigned int crf$l_lastkey;         /* LAST KEY LOOKED AT ADDRESS       */
    __union  {
        unsigned char crf$b_keytype;    /* TYPE OF KEY IN TABLE             */
        __struct  {
            unsigned crf$v_binary : 1;  /* 1 = KEY IS BINARY 0 = ASCII      */
            unsigned crf$v_fill_0 : 7;
            } crf$r_keytype_bits;
        } crf$r_keytype_overlay;
    unsigned char crf$b_flags;          /* MISC. FLAGS FOR FUTURE EXPANSION  */
    unsigned short int crf$w_errsts;    /* SECONDARY ERROR STATUS CODE      */
    unsigned int crf$l_entries;         /* NUMBER OF ENTRIES IN CROSS REFERENCE  */
    unsigned int crf$l_dynmem [2];      /* LISTHEAD OF DYNAMIC MEMORY       */
    unsigned int crf$l_maxblk;          /* SIZE (IN BYTES) OF BLOCK TO ALLOCATE  */
    unsigned int crf$l_memexp;          /* SIZE (IN PAGES) OF BLOCK TO ALLOCATE  */
    int crfdef$$_fill_10 [8];           /* SPARES                           */
    unsigned int crf$l_error;           /* ERROR ROUTINE ADDRESS            */
    unsigned int crf$l_output;          /* OUTPUT ROUTINE ADDRESS           */
    unsigned int crf$l_k1fmtbl;         /* KEY1 FIELD FORMAT TBL ADR        */
    unsigned int crf$l_k2fmtbl;         /* KEY2 FIELD FORMAT TBL ADR        */
    unsigned int crf$l_v1fmtbl;         /* VAL1 FIELD FORMAT TBL ADR        */
    unsigned int crf$l_v2fmtbl;         /* VAL2 FIELD FORMAT TBL ADR        */
    unsigned int crf$l_r1fmtbl;         /* REF1 FIELD FORMAT TBL ADR        */
    unsigned int crf$l_r2fmtbl;         /* REF2 FIELD FORMAT TBL ADR        */
    } ;
 
#if !defined(__VAXC) && !defined(VAXC)
#define crf$b_keytype crf$r_keytype_overlay.crf$b_keytype
#define crf$v_binary crf$r_keytype_overlay.crf$r_keytype_bits.crf$v_binary
#endif		/* #if !defined(__VAXC) && !defined(VAXC) */
 
 
#ifdef __cplusplus
    }
#endif
#pragma standard
 
#endif /* __CRFDEF_LOADED */