1 /* BEGIN vrm_index.incl.pl1 -- jaw, 5/12/78 */
 2 
 3 /* Renamed 9/29/82 by R. Harvey */
 4 
 5 /* This structure defines the header that gets put onto the beginning of
 6    each key stored into a database */
 7 
 8 
 9 dcl 1 index aligned based (index_ptr),                      /* layout of mdbm_index for all file types */
10     2 rel_id bit (12) unal,                                 /* relation id */
11     2 index_id bit (8) unal,                                /* id of index within rel */
12     2 mbz bit (7) unal,                                     /* pad to char. */
13     2 index_value char (index_value_length) unal;           /* index value; max 253 chars */
14 
15 dcl  index_ptr ptr;
16 dcl  index_value_length fixed bin (35);
17 
18 /* END vrm_index.incl.pl1 */
19