CREATE PROCEDURE BLA_BLA...


DEFINE ...

  DEFINE SQL_error_var  SMALLINT;     -- SQL код
  DEFINE ISAM_error_var SMALLINT;     -- ISAM код
  DEFINE error_data_var VARCHAR( 250 ); -- текст ошибки
  DEFINE v_milestone    SMALLINT; -- номер "этапа" :)

  BEGIN
      BEGIN ON EXCEPTION SET SQL_error_var, ISAM_error_var, error_data_var
        INSERT INTO tmpSPError(SQL_error, ISAM_error, error_data)
          VALUES (SQL_error_var, ISAM_error_var, error_data_var);
        RAISE EXCEPTION - 746 ,  0 ,
          "Ошибка в ХП BLA_BLA на этапе " || v_milestone;
      END EXCEPTION;

    LET v_milestone =  1 ;
    .... первый кусок кода
    LET v_milestone =  2 ;
    .... второй кусок кода
   ...
END;

END PROCEDURE;