一则父子表下trigger抛出ORA-04091异常的变通处理
07月 1st, 2008 |post by Kevin.yuan |【转载时请务必以超链接形式标明文章原始出处和作者信息】
trigger抛出ORA-04091异常,无非是当前trigger下的事务access了一mutating table,比较常见的就是trigger访问了自身上的表.在一个指定on delete cascade模式下的父子表中,trigger中如果有对其相关的父/子表的访问,依然会抛出ORA-04091.这是比较隐性的.
拿oracle的示例表emp和dept来做这个试验.
dept的表结构如下:
create table DEPT
(DEPTNO NUMBER(2) not null primary key,
DNAME VARCHAR2(14),
LOC VARCHAR2(13));
emp表结构如下:
create table EMP
(EMPNO NUMBER(4),
ENAME VARCHAR2(10),
JOB VARCHAR2(9),
MGR NUMBER(4),
HIREDATE DATE,
SAL NUMBER(7,2),
COMM NUMBER(7,2),
DEPTNO NUMBER(2),
foreign key(deptno) references dept(deptno) on delete cascade);
emp和dept是一对父子表,关联column为DEPTNO.
接下来创建1个 table:emp_log 和1个语句级 trigger: emp_del_trg.取一个
最简单的业务功能,emp_del_trg的作用就是当表emp记录被删除的时候,触发器将删除的记录的 EMPNO,DNAME和删除时间写入到emp_log中,当子表依赖的父表相关记录删除的时候,emp_log不做处理.
表emp_log的结构如下:
create table EMP_LOG
(ENAME VARCHAR2(20),
DNAME VARCHAR2(20),
DATES DATE );
触发器trigger代码如下:
create or replace trigger emp_del_trg after delete on emp for each row
begin
insert into emp_log
select :old.ename, dname, sysdate from dept where deptno = :old.deptno;
end;
来看看这个触发器是否能正常工作,首先删除emp的记录.
SQL> delete from emp where rownum<5;
4 rows deleted
SQL> select * from emp_log;
ENAME DNAME DATES
——————– ——————– ———–
SMITH RESEARCH 2008-7-1 18
ALLEN SALES 2008-7-1 18
WARD SALES 2008-7-1 18
JONES RESEARCH 2008-7-1 18
SQL> rollback;
Rollback complete
看似trigger工作正常,删除dept的记录呢?
SQL> delete from dept where rownum<3;
delete from dept
ORA-04091: 表 KEVINYUAN.DEPT 发生了变化, 触发器/函数不能读它
ORA-06512: 在 “KEVINYUAN.EMP_DEL_TRG”, line 2
ORA-04088: 触发器 ‘KEVINYUAN.EMP_DEL_TRG’ 执行过程中出错
ORA-04091错误如约而至.不难解释,因为父子表指定了级联删除,删除dept的记录
从而引起删除emp表上的相应数据,然后触发了emp_del_trg,由于trigger里有对dept的访问,对当前事务说,dept就是一个mutating table,这是不被允许的.
如何来解决这个问题而实现这个简单的业务逻辑功能呢?当然,从表结构逻辑设计上来讲,可以将dept表上的dname字段add到emp表,或者不要显式的指定references,用程序来维护数据的完整性和约束,然后调整业务代码.最直接的方法，在trigger中声明一个ora-04091的exception，对此异常不做处理，也可完成目的。
我们不妨做一下变通处理.将行级级触发器变通成语句级触发器.看下面的处理.
1.创建一个package:emp_pkg .
- CREATE OR REPLACE PACKAGE emp_pkg AS
- /* ----------------------------------
- --Author:Kevin.yuan
- --create_time: 2008 -07-01
- ---------------------------------- */
- TYPE crArray IS TABLE OF emp%ROWTYPE INDEX BY BINARY_INTEGER;
- oldRows crArray; --accept the old values of emp
- oldEmpty crArray; --initialize values
- END emp_pkg;
2.创建一个语句级trigger,用来触发trigger的时候清空初始化数据.
- CREATE OR REPLACE TRIGGER emp_bd_st BEFORE DELETE ON emp
- /*----------------------------------
- Author:Kevin.yuan
- create_time: 2008 -07-01
- ---------------------------------- */
- BEGIN
- emp_pkg.oldRows := emp_pkg.oldEmpty;
- END emp_bd_st;
3.创建一个行级trigger:emp_d,问题的核心和关键就在这里,这个trigger
并不参与业务逻辑,只是将触发到的数据载入到emp_pkg.oldRows记录表里面去.
- CREATE OR REPLACE TRIGGER emp_d AFTER DELETE ON emp FOR EACH ROW
- /* ----------------------------------
- --Author:Kevin.yuan
- --create_time: 2008 -07-01
- ---------------------------------- */
- DECLARE
- --ct is the position of the deleted records
- ct INTEGER := emp_pkg.oldRows.COUNT + 1;
- BEGIN
- emp_pkg.oldRows(ct).ename := :OLD.ename;
- emp_pkg.oldRows(ct).deptno := :OLD.deptno;
- END emp_d;
4.创建一个语句级trigger:emp_d_st,前面3步都是为这一步服务的,这一步
真正参与业务逻辑处理.
- CREATE OR REPLACE TRIGGER emp_d_st AFTER DELETE ON emp
- /* ----------------------------------
- --Author:Kevin.yuan
- --create_time: 2008 -07-01
- ---------------------------------- */
- DECLARE
- BEGIN
- FOR i IN 1 .. emp_pkg.oldRows.COUNT LOOP
- INSERT INTO emp_log
- (ename, dname, dates)
- select emp_pkg.oldRows(i) .ename, dname, sysdate
- from dept
- WHERE deptno = emp_pkg.oldRows(i).deptno;
- END LOOP;
- END emp_d_st;
来看一下变通后的触发器是否满足我们的业务要求:
SQL> alter trigger emp_del_trg disable;
Trigger altered
删除emp数据
SQL> delete from emp where rownum<3;
2 rows deleted
SQL> select * from emp_log;
ENAME DNAME DATES
——————– ——————– ———–
SMITH RESEARCH 2008-7-1 19
ALLEN SALES 2008-7-1 19
SQL> rollback;
Rollback complete
删除dept数据.
SQL> delete from dept;
4 rows deleted
SQL> select * from emp_log;
ENAME DNAME DATES
——————– ——————– ———–
至此,目的实现.由于用了多于常规数量的触发器,对系统性能会造成一定影响,而且,无疑会加重系统后期业务维护负担,因此,良好的数据库逻辑设计和代码编写思路是很必要的,否则,只能走另外一些路径,不过,这个由行级触发器变语句级别触发器的思路,还是有必要的，当trigger中无法避免的需要access自身表的时候，这无疑是个可以借鉴的解决方案。
THE END;
另外一种方法：
在declare中加入语句PRAGMA AUTONOMOUS_TRANSACTION;
最后再提交操作方法，此方法的缺点是触发器是一个事务，外
面程序又是一个事务