1 /* --------------- BEGIN include file tape_archive_attributes.incl.pl1 --------------- */
 2 
 3 dcl 1 ta_attributes aligned based (attribute_seg_ptr),
 4     2 version_no fixed bin,
 5     2 own_length_in_chars fixed bin (21),
 6     2 branch like status_branch aligned,
 7     2 safety_switch bit (1) aligned,
 8     2 entrypt_is_bounded bit (1) aligned,
 9     2 entrypt_bound bit (14) aligned,
10     2 max_length fixed bin (19),
11     2 future_expansion (22) bit (36) aligned,
12     2 acl_count fixed bin,
13     2 n_components fixed bin,
14     2 names (binary (ta_attributes.nnames)) char (32) unaligned,
15     2 acl_list (ta_attributes.acl_count) aligned,
16       3 username char (32),
17       3 modes bit (36),
18       3 pad bit (72),
19     2 component_bc (0:ta_attributes.n_components-1) fixed bin (24);
20 
21 %include status_structures;
22 
23 /* ---------------- END include file tape_archive_attributes.incl.pl1 ---------------- */