
  PROCEDURE [INLINE] bai$fetch_tape_error_options
    (VAR tape_error_options: amt$tape_error_options;
     VAR status: ost$status);

?? PUSH (LISTEXT := ON) ??
{ The purpose of this request is to return the current tape_error_options
{ for the file indicated.

*copy bah$inline_proc_documentation

    tape_error_options := tape_descriptor^.error_options;

  PROCEND bai$fetch_tape_error_options;

*copyc bat$task_file_table
*copyc ost$status
?? POP ??
