1 /* BEGIN INCLUDE FILE...gcos_user_table_hdr_.incl.pl1 */
 2 
 3 dcl  gutp ptr internal static init (null),                                                /* pointer to table origin */
 4 
 5      1 gcos_user_table_ based (gutp),
 6      2 gut_version_no fixed bin,                            /* to identify table format */
 7      2 gut_hdr_len fixed bin,/* currently 128, includes global_ctl */
 8 
 9      2 gut_global_ctl_len fixed bin,/* currently 64 */
10      2 gut_entry_len fixed bin,/* currently 32 */
11      2 gut_last_update fixed bin (71),
12      2 gut_updater_id char (32),
13      2 gut_max_count fixed bin,
14      2 gut_active_count fixed bin,
15      2 gut_first_entry_index fixed bin,
16      2 gut_last_entry_index fixed bin,
17      2 gut_filler (46) fixed bin,                           /* rounds hdr to 64 words */
18 
19      2 gut_global_ctl,/* currently 64 words total */
20      3 gut_global_ctl_filler (64) fixed bin,
21 
22      2 gut_entry (gut_max_count),
23      3 gut_entry_status fixed bin,                          /* 0 => inactive, 1 => active */
24      3 gut_entry_filler (31) fixed bin;
25 
26 /* END INCLUDE FILE...gcos_user_table_hdr_.incl.pl1 */