
 TYPE
    fst$open_attachment_information = record
      access_modes: fst$file_access_options,
      error_exit_procedure: amt$error_exit_procedure,
      error_exit_procedure_name: pmt$entry_point_reference,
      error_limit: amt$error_limit,
      label_exit_procedure: amt$label_exit_procedure,
      label_exit_procedure_name: pmt$entry_point_reference,
      message_control: amt$message_control,
      open_position: amt$open_position,
      open_share_modes: fst$file_access_options,
      private_read: boolean,
      sequential_access: boolean,
      share_modes: fst$file_access_options,
      tape_error_options: amt$tape_error_options,
      transfer_size: fst$transfer_size,
    recend;

*copyc amt$error_exit_procedure
*copyc amt$error_limit
*copyc amt$label_exit_procedure
*copyc amt$message_control
*copyc amt$open_position
*copyc amt$tape_error_options
*copyc fst$file_access_options
*copyc fst$transfer_size
*copyc pmt$entry_point_reference
*copyc pmt$processor_attributes
