1 /* BEGIN INCLUDE FILE ... archive_component_info.incl.pl1 ... WOS 01/13/81 */ 2 /* Structure describing an archive component, used by archive_ */ 3 4 dcl archive_component_info_ptr pointer; 5 6 dcl 1 archive_component_info aligned based (archive_component_info_ptr), 7 2 version fixed bin, 8 2 comp_bc fixed bin (24), 9 2 comp_ptr pointer, 10 2 name char (32) unaligned, 11 2 time_modified fixed bin (71), 12 2 time_updated fixed bin (71), 13 2 comp_lth fixed bin (19), 14 2 access bit (36) unaligned; 15 16 dcl ARCHIVE_COMPONENT_INFO_VERSION_1 fixed bin internal static options (constant) init (1); 17 18 /* BEGIN INCLUDE FILE ... archive_component_info.incl.pl1 ... WOS 01/13/81 */