1

我有一个触发器，它应该测试打卡的人是否在过去 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;
4

2 回答 2

3

这可能是您可以雇用的极少数情况之一pragma autonomous_transaction。它将允许您提交而不影响您的主要事务。谨慎使用。了解有关自主事务和自主事务编译指示的更多信息

这是一个例子：

   -- 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!
于 2012-10-09T17:58:57.730 回答
1

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

RAISE_APPLICATION_ERROR(-20101, 'Too Soon');

这会导致事务回滚。可以找到完整的详细信息：

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

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

于 2012-10-09T18:43:40.947 回答