oracle触发器实例

一、 什么是触发器？ 数据库触发器是一个存储的PL/SQL程序块，它与一个基表联系，当在表上执行特定的数据库维护（插入、删除、更新这三种操作）时，隐含地执行一个PL/SQL程序块。 二、触发器的作用： 。防止非法的数据库操纵、维护数据库安全 。对数据库的操

一、　什么是触发器？
         数据库触发器是一个存储的PL/SQL程序块，它与一个基表联系，当在表上执行特定的数据库维护（插入、删除、更新这三种操作）时，隐含地执行一个PL/SQL程序块。

二、触发器的作用：
              。防止非法的数据库操纵、维护数据库安全
              。对数据库的操作进行审计，存储历史数据
              。完成数据库初始化处理
              。控制数据库的数据完整性
              。进行相关数据的修改
              。完成数据复制
              。自动完成数据库统计计算
              。限制数据库操作的时间、权限等，控制实体的安全性

 
 三、触发器的组成：
            1、触发时间：触发器事件的时间次序（before,afer)[2]

            2、触发事件：什么SQL语句会引起触发器触发(Insert, delete, update)[3]

            3、触发子体：触发器触发时要执行的操作(一个完整的PL/SQL程序)

            4、触发类型：触发器被执行的次数(语句级、行级）[2] //语句级只执行一次，行级会执行多次。

                 [*]一个表上最多可以创建12个不同类型的触发器：3*2*2 = 12

 

 四、创建触发器注意事项：
             1、在触发器中可以调用存储过程、包；在存储过程中不得调用触发器。

             2、在触发器中不得使用commit, rollback,savepoint语句。

             3、在触发器中不得间接调用含有commit,rollback, savepoint的语句的存储过程及函数。

 

 五、创建语句级触发器：
                   语句级触发器： 请参考PowerPoint教程：存储过程1.ppt[Page19]　该触发器在数据库操作时只执行一次。
                说明：
                      。update中的of是可选项，用于指定语句要修改的列
                      。要创建的触发器已经存在时，使用replace选项

1.   //例1：before型触发器：   

2.   Create or replace trigger DelEmp   

3.     before delete on emp   

4.     Begin  

5.      if (To_Char(sysdate,'dy') in ('星期六','星期日') or  

6.           To_number(To_Char(sysdate,'hh24'))  not between  8   and 18)   

7.      then dbms_output.put_line('现在是非工作时间,请退出!!!');   

8.      end if;   

9.     End;  

[触发器数据字典]
SQL> select table_owner, table_name,trigger_body from user_triggers wheretrigger_name='DELEMP';

1.  //例2：After型触发器：   

2.  Create or replace trigger InsertEmp  

3.  after insert on emp     // 如果是before，就会比after的结果少一名。   

4.  Declare  

5.   v_empcount number(7);   

6.  Begin  

7.   select count(*) into v_empcount from emp;  

8.   dbms_output.put_line('目前员工总数已达到：'|| v_empcount|| '名。');   

9.  End;  

 

1.  //例3：多个触发条件   

2.  Create or replace trigger ChangeEmp  

3.  before delete or insert or update on emp  

4.  Begin  

5.     if (To_Char(sysdate,'dy') in ('星期六','星期日') or  

6.          To_number(To_Char(sysdate,'hh24'))  not between 8 and 18)  

7.     then dbms_output.put_line('现在是非工作时间,请不要修改数据!!!');  

8.     end if;  

9.  End;   

10.   

11. // 更完善的写法：   

12. Create or replace trigger ChangeEmp  

13.   before delete or insert or update  on emp  

14.   Begin  

15.    if (DELETING and (To_Char(sysdate,'dy') in ('星期六','星期日') or  

16.         To_number(To_Char(sysdate,'hh24'))  not between  8   and 18))  

17.    then dbms_output.put_line('现在是非工作时间,不要删除数据！');  

18.   

19.    elsif (UPDATING and (To_Char(sysdate,'dy') in ('星期六','星期日') or  

20.         To_number(To_Char(sysdate,'hh24'))  not between  8 and 18))  

21.    then dbms_output.put_line('现在是非工作时间,不要更新数据！');  

22.   

23.    elsif (INSERTING and (To_Char(sysdate,'dy') in ('星期六','星期日') or  

24.         To_number(To_Char(sysdate,'hh24'))  not between  8   and 18))  

25.    then dbms_output.put_line('现在是非工作时间,不要插入数据！');  

26.   

27.    end if;  

28.   End;   

 

        六、创建行级触发器：
           等级触发器：增加选项for each row, 使触发器在每一行上触发。

            1、创建行级触发器注意事项：
                     (1) 在行级触发器中，在列名前增加old表示该列修改前值，增加new表示该列修改后值。
                     (2) 在PL/SQL中引用时，前边增加冒号。
 

1.  [例4: 行级触发器] //必须是对所有的行进行操作才行。   

2.  Create or Replace trigger UpdateEmp  

3.  Before update on emp   

4.  for each row   

5.  Begin  

6.   dbms_output.put_line(:old.sal||'--------->'||:new.sal);  

7.  End;  

 

1.  [例5：保存历史数据，这种使用方法很重要，用来保存关键表的历史数据]   

2.  CReate or Replace trigger ChangeEmp  

3.  Before update or delete on emp  

4.  for each row  

5.  Begin  

6.   Insert into oldemp(empno, ename,job,hiredate,sal)  

7.   values(:old.empno,:old.ename,:old.job,sysdate,:old.sal);  

8.  End;  

9.    

10. SQL> create table oldemp  

11.  as select empno, ename,job,hiredate,sal from emp where 1>2;  

1.  [例6：修改外键]   

2.  Create or Replace trigger UpdateDept  

3.  after update on dept  

4.  for each row  

5.  Begin  

6.   update emp   

7.    set emp.deptno = :new.deptno  

8.    where emp.deptno = :old.deptno;  

9.  End;  

1.  [例7：删除外键、删除相关数据]   

2.  Create or Replace trigger DeleteDept  

3.  before delete on dept  

4.  for each row  

5.  Begin  

6.   delete from emp where deptno = :old.empno;  

7.  End;  

 

        七、触发器管理
            1、使触发器失效：

1.  SQL> alter trigger 触发器名称 disable;  // 失效  

2.  SQL> Alter Trigger 触发器名称 enable;  // 生效  

3.    

4.  SQL> Alter table 表名 DISABLE all triggers; // 一个表上的所有触发器失效  

5.  SQL> Alter table 表名 ENABLE all triggers; // 使一个表上的所有触发器生效  

6.    

7.  SQL> Drop Trigger 触发器名;  // 删除触发器;  

 

 

 

 

 

 

--test表执行DML语句时，将相关信息记录到日志表
--创建测试表
CREATE TABLE test ( t_id NUMBER(4), t_name VARCHAR2(20), t_age NUMBER(2), t_sexCHAR );
--创建记录测试表
CREATE TABLE test_log ( l_user VARCHAR2(15), l_type VARCHAR2(15), l_dateVARCHAR2(30) );
--创建触发器
CREATE OR REPLACE TRIGGER test_trigger
AFTER DELETE OR INSERT OR UPDATE ON test
DECLARE v_type test_log.l_type%TYPE;
BEGIN
IF INSERTING THEN
--INSERT触发
v_type := 'INSERT';
DBMS_OUTPUT.PUT_LINE('记录已经成功插入，并已记录到日志');
ELSIF UPDATING THEN
--UPDATE触发
v_type := 'UPDATE';
DBMS_OUTPUT.PUT_LINE('记录已经成功更新，并已记录到日志');
ELSIF DELETING THEN v_type := 'DELETE';
DBMS_OUTPUT.PUT_LINE('记录已经成功删除，并已记录到日志');
END IF;
INSERT INTO test_log VALUES(user,v_type, TO_CHAR(sysdate,'yyyy-mm-ddhh24:mi:ss'));
END;
/
--下面我们来分别执行DML语句
INSERT INTO test VALUES(101,'zhao',22,'M');
UPDATE test SET t_age = 30 WHERE t_id = 101;
DELETE test WHERE t_id = 101;
--然后查看效果
SELECT * FROM test;
SELECT * FROM test_log;
--实例2------------------------
--创建触发器，它将映射emp表中每个部门的总人数和总工资
--创建映射表
CREATE TABLE dept_sal AS
SELECT deptno,COUNT(empno) AS total_emp,SUM(sal) AS total_sal FROM emp GROUP BYdeptno;
DESC dept_sal;
--创建触发器
CREATE OR REPLACE TRIGGER emp_info
AFTER INSERT OR UPDATE OR DELETE ON emp
DECLARE CURSOR cur_emp IS
SELECT deptno,COUNT(empno) AS total_emp,SUM(sal) AS total_sal FROM emp GROUP BYdeptno;
BEGIN DELETE dept_sal;
--触发时首先删除映射表信息
FOR v_emp IN cur_emp LOOP
--DBMS_OUTPUT.PUT_LINE(v_emp.deptno || v_emp.total_emp || v_emp.total_sal);
--插入数据
INSERT INTO dept_sal VALUES(v_emp.deptno,v_emp.total_emp,v_emp.total_sal);
END LOOP;
END;
/
--对emp表进行DML操作
INSERT INTO emp(empno,deptno,sal) VALUES('123','10',10000);
SELECT * FROM dept_sal;
DELETE EMP WHERE empno=123;
SELECT * FROM dept_sal;
--实例3------------------------
--创建触发器，它记录表的删除数据
--创建表
CREATE TABLE employee ( id VARCHAR2(4) NOT NULL, name VARCHAR2(15) NOT NULL,age NUMBER(2) NOT NULL, sex CHAR NOT NULL ); DESC employee;
--插入数据
INSERT INTO employee VALUES('e101','zhao',23,'M');
INSERT INTO employee VALUES('e102','jian',21,'F');
--创建记录表
CREATE TABLE old_employee AS SELECT * FROM employee;
DESC old_employee;
--创建触发器
CREATE OR REPLACE TRIGGER tig_old_emp
AFTER DELETE ON employee
FOR EACH ROW
--语句级触发，即每一行触发一次
BEGIN
INSERT INTO old_employee
VALUES(:old.id,:old.name,:old.age,:old.sex);
--:old代表旧值
END;
/ --下面进行测试
DELETE employee;
SELECT * FROM old_employee;
--实例4------------------------
--创建触发器，利用视图插入数据 --创建表
CREATE TABLE tab1 (tid NUMBER(4) PRIMARY KEY,tname VARCHAR2(20),tageNUMBER(2));
CREATE TABLE tab2 (tid NUMBER(4),ttel VARCHAR2(15),tadr VARCHAR2(30));
--插入数据
INSERT INTO tab1 VALUES(101,'zhao',22);
INSERT INTO tab1 VALUES(102,'yang',20);
INSERT INTO tab2 VALUES(101,'13761512841','AnHuiSuZhou');
INSERT INTO tab2 VALUES(102,'13563258514','AnHuiSuZhou');
--创建视图连接两张表
CREATE VIEW tab_view AS
SELECT tab1.tid,tname,ttel,tadr FROM tab1,tab2 WHERE tab1.tid = tab2.tid; --创建触发器
CREATE OR REPLACE TRIGGER tab_trigger
INSTEAD OF INSERT ON tab_view
BEGIN
INSERT INTO tab1(tid,tname) VALUES(:new.tid,:new.tname);
INSERT INTO tab2(ttel,tadr) VALUES(:new.ttel,:new.tadr);
END;
/
--现在就可以利用视图插入数据
INSERT INTO tab_view VALUES(105,'zhaoyang','13886681288','beijing');
--查看效果
SELECT * FROM tab_view;
--实例5------------------------
--创建触发器，比较emp表中更新的工资
CREATE OR REPLACE TRIGGER sal_emp BEFORE UPDATE ON emp FOR EACH ROW BEGIN IF:OLD.sal > :NEW.sal THEN DBMS_OUTPUT.PUT_LINE('工资减少');
ELSIF :OLD.sal ELSE DBMS_OUTPUT.PUT_LINE('工资未作任何变动');
END IF;
DBMS_OUTPUT.PUT_LINE('更新前工资 ：' || :OLD.sal);
DBMS_OUTPUT.PUT_LINE('更新后工资 ：' || :NEW.sal);
END;
/ --执行UPDATE查看效果
UPDATE emp SET sal = 3000 WHERE empno = '7788';
--实例6------------------------
--创建触发器，将操作CREATE、DROP存储在log_info表
--创建表
CREATE TABLE log_info ( manager_user VARCHAR2(15), manager_date VARCHAR2(15),manager_type VARCHAR2(15), obj_name VARCHAR2(15), obj_type VARCHAR2(15) );
--创建触发器
CREATE OR REPLACE TRIGGER trig_log_info
AFTER CREATE OR DROP ON SCHEMA
BEGIN INSERT INTO log_info
VALUES(USER,SYSDATE,SYS.DICTIONARY_OBJ_NAME,SYS.DICTIONARY_OBJ_OWNER,SYS.DICTIONARY_OBJ_TYPE);
END;
/
--测试语句
CREATE TABLE a(id NUMBER);
CREATE TYPE aa AS OBJECT(id NUMBER);
/
DROP TABLE a;
DROP TYPE aa;
--查看效果
SELECT * FROM log_info;
--相关数据字典-----------------------------------------------------//
SELECT * FROM USER_TRIGGERS;
SELECT * FROM ALL_TRIGGERS;
SELECT * FROM DBA_TRIGGERS;
--必须以DBA身份登陆才能使用此数据字典
--启用和禁用
ALTER TRIGGER trigger_name DISABLE;
ALTER TRIGGER trigger_name ENABLE;