
 TYPE
    fst$attachment_option = record

      case selector: fst$file_attachment_choices of
{
{ When an attachment option of type pmt$entry_point_reference
{ is selected, the caller of the request must provide a program variable
{ of type pmt$entry_point_reference and initialize this record to point
{ to the initialized program variable.  The value of the parameter will be
{ obtained from the address provided.
{
      = fsc$access_and_share_modes =
        access_modes: fst$access_modes,
        share_modes: fst$share_modes,
      = fsc$allowed_device_classes =
        allowed_device_classes: fst$device_classes,
      = fsc$allowed_exceptions =
        allowed_exceptions: fst$exception_conditions,
      = fsc$create_file =
        create_file: boolean,
      = fsc$delete_data =
        delete_data: boolean,
      = fsc$error_exit_procedure =
        error_exit_procedure: amt$error_exit_procedure,
      = fsc$error_exit_procedure_name =
        error_exit_procedure_name: ^pmt$entry_point_reference,
      = fsc$error_limit {Advanced Access Method files only} =
        error_limit: amt$error_limit,
      = fsc$exception_detection =
        exception_detection: fst$cycle_damage_symptoms,
      = fsc$explicit_detach_allowed {fsp$attach_file only} =
        explicit_detach_allowed: boolean,
      = fsc$file_server_options =
        file_server_options: fst$file_server_options,
      = fsc$free_behind =
        free_behind: boolean,
      = fsc$hide_attachment =
        hide_attachment: boolean,
      = fsc$label_exit_procedure =
        label_exit_procedure: amt$label_exit_procedure,
      = fsc$label_exit_procedure_name =
        label_exit_procedure_name: ^pmt$entry_point_reference,
      = fsc$message_control {Advanced Access Method files only} =
        message_control: amt$message_control,
      = fsc$null_attachment_option =
        ,
      = fsc$open_position =
        open_position: amt$open_position,
      = fsc$open_share_modes =
        open_share_modes: fst$file_access_options,
      = fsc$password =
        password: ost$name,
      = fsc$private_read =
        private_read: boolean,
      = fsc$scope {fsp$attach_file only} =
        scope: fst$attachment_scope,
      = fsc$sequential_access =
        sequential_access: boolean,
      = fsc$tape_attachment =
        tape_attachment: fst$tape_attachment,
      = fsc$tape_error_options =
        tape_error_options: amt$tape_error_options,
      = fsc$transfer_size =
        transfer_size: fst$transfer_size,
      = fsc$validation_ring =
        validation_ring: ost$ring,
      = fsc$wait_for_attachment =
        wait_for_attachment: fst$wait_for_attachment,
      casend,
    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$access_modes
*copyc fst$attachment_scope
*copyc fst$device_classes
*copyc fst$exception_conditions
*copyc fst$file_access_options
*copyc fst$file_attachment_choices
*copyc fst$file_server_options
*copyc fst$share_modes
*copyc fst$tape_attachment
*copyc fst$transfer_size
*copyc fst$wait_for_attachment
*copyc osd$virtual_address
*copyc pmt$entry_point_reference
*copyc pmt$processor_attributes

