1 /* BEGIN mrds_search_vars.incl.pl1 -- jaw, 2/26/79 */
 2 
 3 dcl 1 search_vars aligned based (sv_ptr),                   /* info on all variables */
 4     2 nvars fixed bin,                                      /* number of variables */
 5     2 new_val (sv_nvars_init refer (search_vars.nvars),     /* indicates new values to be moved */
 6      sv_nvars_init refer (search_vars.nvars)) bit (1) unal,
 7     2 info (sv_nvars_init refer (search_vars.nvars)) like rtrv_info; /* data for each var. */
 8 
 9 dcl  sv_ptr ptr;
10 dcl  sv_nvars_init fixed bin;
11 
12 /* END mrds_search_vars.incl.pl1 */
13