触发 RAISE_APPLICATION_ERROR 但执行内部命令

Question

我正在处理以下 PL/SQL trigger：

CREATE OR REPLACE TRIGGER trigger_1
BEFORE UPDATE ON worker
FOR EACH ROW
DECLARE
BEGIN
  IF :OLD.type = 'PRESIDENT' THEN
    INSERT INTO trigger_log VALUES (sysdate, 'Nope.', 'No change.');
    RAISE_APPLICATION_ERROR(-20111, 'Can not change!');
  END IF;
END;

在这里，当PRESIDENT 的payment 即将更改时，我想取消worker 表上的UPDATE 命令。同时，我希望将此命令记录到名为trigger_log 的表中。问题是，当我 RAISE_APPLICATION_ERROR 更新被取消时，日志记录 (INSERT INTO trigger_log) 也被取消了。我怎样才能RAISE_APPLICATION_ERROR 或抛出EXCEPTION，但仍然要在TRIGGER 内运行所有命令？

Answer 1

在引发错误之前，您必须提交您的INSERT-Statement。

也许想想AUTONOMOUS_TRANSACTION

编辑
正如其他人已经说过的那样，您不应该也不能在触发器内commit（异常自主事务）。所以考虑使用 Tom Thomas 的解决方案或调用 logging-procedure/-package。

Answer 2

您可以从触发器中调用stored procedure。该存储过程应声明为PRAGMA AUTONOMOUS_TRANSACTION。试试这样，

    CREATE OR REPLACE 
    PROCEDURE log_error_p
    AS
         PRAGMA AUTONOMOUS_TRANSACTION;
    BEGIN
         INSERT INTO trigger_log VALUES (SYSDATE, 'Nope.', 'No change.');
         COMMIT;
    END;

--

   CREATE OR REPLACE TRIGGER trigger_1
    BEFORE UPDATE ON worker
    FOR EACH ROW
    DECLARE
    BEGIN
         IF :OLD.TYPE = 'PRESIDENT' THEN
              log_error_p();
         RAISE_APPLICATION_ERROR(-20111, 'Can not change!');
         END IF;
    END;
    /

Answer 3

首先，永远不要在触发器中使用提交或回滚。这是一个编码标准。至于你的问题，我认为这比 raise_application_error 更好

CREATE OR REPLACE TRIGGER trigger_1
BEFORE UPDATE ON worker
REFERENCING OLD as o AND NEW as n
FOR EACH ROW
DECLARE
     InsertException EXCEPTION;
BEGIN
     IF o.TYPE = 'PRESIDENT' THEN
          RAISE InsertException;
     END IF;
EXCEPTION
     WHEN InsertException THEN
     INSERT INTO trigger_log VALUES (SYSDATE, 'Nope.', 'No change.');
     DBMS_OUTPUT.PUT_LINE(SQLERRM);
END;
/