  TYPE
    bat$tape_fatal_recovery_modes = set of bat$tape_fatal_recovery_mode;

  TYPE
    bat$tape_fatal_recovery_mode = (bac$tfrm_fatal_data_write,
          bac$tfrm_fatal_write, bac$tfrm_fatal_read, bac$tfrm_fatal_rewind,
          bac$tfrm_fatal_write_tapemark, bac$tfrm_repositioning_error,
          bac$tfrm_reassignment_error);

