Question

我有一个触发器，用来测试一个打钟的个人是否在最后5分钟内打了他们的牌。如果他们没有他们的信息应该留给表clk_data，否则应该在日志表utl_logbook中创建一个记录，并且应该中止插入到clk_data。

当我运行良好的打孔时，插件的工作方式与宣传的一样。当它是一个糟糕的打击（在最后一拳的5分钟内）我得到以下错误：

SQL Error: ORA-20101: Too Soon
ORA-06512: at "TRUTRACK.INSERT_CLK_DATA", line 14
ORA-04088: error during execution of trigger 'TRUTRACK.INSERT_CLK_DATA'

交易已停止，但我没有在utl_logbook中记录它。

The trigger code:
create or replace
TRIGGER "INSERT_CLK_DATA" 
BEFORE INSERT ON clk_data 
FOR EACH row 

BEGIN
  DECLARE qty INTEGER := 0;
  BEGIN
    SELECT COUNT(*)
    INTO qty
    FROM clk_data
    WHERE clk_time BETWEEN (:new.clk_time - 5/(24*60)) AND (:new.clk_time + 5/(24*60))
    AND :new.payroll = clk_data.payroll;

    IF qty > 0 THEN

      INSERT INTO utl_logbook (time, source, message) VALUES (sysdate, 'INSERT_CLK_DATA', 'Clock punch within restricted window. Payroll ID:' || :new.payroll || ' Time: ' || :new.clk_time || ' Type: ' || :new.type);

      RAISE_APPLICATION_ERROR(-20101, 'Too Soon');

    END IF;

  END;
END;

Answer 1

当您可以使用pragma autonomous_transaction时，这可能是极少数情况之一。它允许您在不影响主要事务的情况下提交。请谨慎使用。详细了解autonomous transactions和autonomous_transaction pragma

以下是一个例子：

   -- our error logging table 

   create table tb_log(
      msg varchar2(123)
    )
    /

   -- our working table
   create table tb_table(
     col11 number
    )
    /

-- procedure that is going to log errors


NK@XE> create or replace procedure log_error(p_msg in varchar2)
  2    is
  3      pragma autonomous_transaction;
  4    begin
  5      insert into tb_log(msg)
  6        values(p_msg);
  7      commit;
  8    end;
NK@XE> /

Procedure created.

NK@XE> create or replace trigger tr_tb_table
  2    before insert on tb_table
  3    for each row
  4    begin
  5      if mod(:new.col1, 2) != 0
  6      then
  7         log_error('Error!');
  8         raise_application_error(-20000, 'Error has ocurred!');
  9      end if;
 10    end;
 11  /

Trigger created.

NK@XE> select * from tb_log;

no rows selected

NK@XE> select * from tb_table;

no rows selected

NK@XE> insert into tb_table(col1) values(1);

insert into tb_table(col1) values(1)
            *
ERROR at line 1:
ORA-20000: Error has ocurred!
ORA-06512: at "NK.TR_TB_TABLE", line 5
ORA-04088: error during execution of trigger 'NK.TR_TB_TABLE'


NK@XE> select * from tb_log;

MSG
--------------------------------------------------------------------------------
Error!

Answer 2

@ nicholas-krasnov提供了解决方案，只是为了详细说明推理 - 你在触发器体中抛出异常：

RAISE_APPLICATION_ERROR(-20101, 'Too Soon');

导致回滚事务。有关详细信息，请访问：

http://psoug.org/reference/exception_handling.html

如果语句失败，Oracle将回滚到保存点。通常，只会丢失失败的SQL语句，而不是整个事务。但是，如果语句引发未处理的异常，则主机环境将确定回滚的内容。

oracle触发器日志

2 个答案: