1 /* Begin include file menu_list_info.incl.pl1 BIM July 1981 */
 2 /* format: style3 */
 3 
 4 declare   menu_list_info_ptr  pointer;
 5 declare   1 menu_list_info    aligned based (menu_list_info_ptr),
 6             2 version         fixed bin,
 7             2 n_names         fixed bin,
 8             2 name_string_length
 9                               fixed bin (21),
10             2 names           (menu_list_n_names refer (menu_list_info.n_names)) aligned,
11               3 position      fixed bin (21),
12               3 length        fixed bin (21),
13             2 name_string     character (menu_list_name_string_length refer (menu_list_info.name_string_length))
14                               unaligned;
15 
16 
17 declare   menu_list_n_names   fixed bin;
18 declare   menu_list_name_string_length
19                               fixed bin (21);
20 
21 declare   menu_list_info_version_1
22                               fixed bin init (1) internal static options (constant);
23 
24 /* End include file menu_list_info.incl.pl1 */