ORA-04091：表XX发生了变化，触发器/函数不能读它

Posted 2023-03-19 eyesfree

原文地址：https://blog.csdn.net/sword_happy/article/details/92608265

异常原因:

在触发器的执行过程中出现了受事务影响的语句:

示例:

1.  
   CREATE OR REPLACE TRIGGER "TIB_PROJ_COMP_TREE"
2.  
   BEFORE INSERT ON PROJ_COMP_TREE
3.  
   FOR EACH ROW
4.  
   DECLARE
5.  
   PRAGMA AUTONOMOUS_TRANSACTION;--没有这句话就会触发异常
6.  
   MAX_LINE_NO NUMBER;
7.  
   BEGIN
8.  
   IF :NEW.PC_LEVEL > 0 AND :NEW.DEF_USR_ID IS NOT NULL THEN
9.  
   SELECT (NVL(MAX(CODE), 0) + 1)--这句话受到事务影响
10.  
    INTO MAX_LINE_NO
11.  
    FROM PROJ_COMP_TREE
12.  
    WHERE PROJ_COMP_NO = :NEW.PROJ_COMP_NO
13.  
    AND LEAF = :NEW.LEAF
14.  
    AND P_PC_SEQ = :NEW.P_PC_SEQ;
15.  
    :NEW.CODE := MAX_LINE_NO;
16.  
    IF :NEW.P_PC_SEQ = \'0\' THEN
17.  
    IF :NEW.LEAF = \'1\' THEN
18.  
    :NEW.PC_SEQ := LPAD(MAX_LINE_NO, 4, \'0\');
19.  
    ELSE
20.  
    :NEW.PC_SEQ := LPAD(MAX_LINE_NO, 2, \'0\');
21.  
    END IF;
22.  
    ELSE
23.  
    IF :NEW.LEAF = \'1\' THEN
24.  
    :NEW.PC_SEQ := :NEW.P_PC_SEQ || LPAD(MAX_LINE_NO, 4, \'0\');
25.  
    ELSE
26.  
    :NEW.PC_SEQ := :NEW.P_PC_SEQ || LPAD(MAX_LINE_NO, 2, \'0\');
27.  
    END IF;
28.  
    END IF;
29.  
    END IF;
30.  
    END;

类似的,当触发器中出现Insert,Update等SQL语句,也会触发此异常;

解决方法,需要在Declare中声明使用自治事务;

1.  
   ...
2.  
   DECLARE
3.  
   --声明使用自治事务
4.  
   PRAGMA AUTONOMOUS_TRANSACTION;
5.  
   ...

此时,触发器不会出现异常,但是真正的效果可能会和想要达到的目标效果不一致;

具体情况还是要具体分析;