
TYPE
  fst$rollback_procedure = ^procedure (condition_status: ost$status);

*copyc ost$status
