
  PROCEDURE [XREF] bap$get_open_information
    (    file_identifier: amt$file_identifier;
         attachment_information: ^SEQ ( * );
         catalog_information: ^SEQ ( * );
         cycle_attribute_sources: ^SEQ ( * );
         cycle_attribute_values: ^SEQ ( * );
         instance_information: ^SEQ ( * );
         resolved_file_reference: ^SEQ ( * );
         user_defined_attributes: ^SEQ ( * );
     VAR user_defined_attribute_size: ost$non_negative_integers;
     VAR status: ost$status);

?? PUSH (LISTEXT := ON) ??
*copyc amt$file_identifier
*copyc ost$non_negative_integers
*copyc ost$status
?? POP ??
