一、 什么是触发器？
数据库触发器是一个存储的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;