
  TYPE
    dst$system_message_levels = (dsc$fatal_error, dsc$critical_error,
      dsc$unrecovered_error, dsc$recovered_error, dsc$informative_message);
