1 /* BEGIN vrm_key_source_list.incl.pl1 -- jaw, 6/1/78 */
 2 
 3 /* HISTORY:
 4 
 5    81-07-18 Jim Gray : added pointer to the rm_attr_info for display purposes
 6 
 7    81-07-19 Jim Gray : added condition that will  used  against  the
 8    key value for display purposes
 9    82-09-29  R. Harvey: Stolen and modified for vfile_relmgr_
10 
11 */
12 
13 
14 dcl 1 key_source_list aligned based (key_source_list_ptr),  /* source info for key encoding */
15     2 number_of_values fixed bin,                           /* no. values in key */
16     2 val_info (ksl_number_of_values refer (key_source_list.number_of_values)),
17 /*      3 condition_code fixed bin,                         /* encoding for condition used on this key attr */
18       3 val_ptr ptr,                                        /* to value */
19       3 desc_ptr ptr;                                       /* to descriptor */
20 
21 dcl  key_source_list_ptr ptr;
22 dcl  ksl_number_of_values fixed bin;
23 
24 /* END vrm_key_source_list.incl.pl1 */
25