  CONST
    rac$status_condition = rac$error_base + 1000;

*copyc rac$error_base
