触发器四(学习笔记)

时间:2021-01-07 05:10:32

REFERENCING子句:

使用“:new.字段”或者是“:old.字段”标记不清,那么也可以通过REFERENCING子句为这两个标识符设置别名,例如可以将“:new”设置为:emp_new,或者将“:old”设置为:emp_old。
create or replace trigger myempaddsal_trigger before update on myemp REFERENCING OLD AS myemp_old NEW AS myemp_new for each row declare
   
begin
  IF ABS((:myemp_new.sal - :myemp_old.SAL) / :myemp_old.SAL) > 0.1 THEN raise_application_error(-20005,'工资最大涨幅不能超过10%'); END IF; end myempaddsal_trigger;

使用WHEN子句定义触发条件:

在WHEN子句中也可以用":new"和":old"访问修改前后的数据,在WHEN子句中使用new和old时可以不加前面的":"号
示例一、增加员工中判断员工工资是否存在,如果工资为0则报错
--创建触发器
create or replace trigger myemptestadd1 before insert on myemp for each ROW WHEN(new.Sal=0) declare

begin raise_application_error(-20003,:NEW.EMPNO||'的工资为0,不合规定!'); end myemptestadd1; --执行添加
DECLARE
BEGIN
INSERT INTO myemp(empno,ename,job,mgr,sal,deptno)VALUES(9999,'Bdqn','MNAGER',7788,0,10); EXCEPTION WHEN OTHERS THEN dbms_output.put_line(SQLERRM); END; --结果
ORA-20003: 9999的工资为0,不合规定! ORA-06512: 在 "TESTS.MYEMPTESTADD1", line 4 ORA-04088: 触发器 'TESTS.MYEMPTESTADD1' 执行过程中出错

示例二、要求工资只能涨不能降

--创建触发器
create or replace trigger myemptestadd1 before UPDATE on myemp for each ROW WHEN(new.Sal<old.Sal) declare

begin raise_application_error(-20003,:old.EMPNO||'的工资只能涨不能降!'); end myemptestadd1; --执行错误的更新
DECLARE
BEGIN
 UPDATE myemp SET sal=2000 WHERE empno=7788; EXCEPTION WHEN OTHERS THEN dbms_output.put_line(SQLERRM); END; --结果
ORA-20003: 7788的工资只能涨不能降! ORA-06512: 在 "TESTS.MYEMPTESTADD1", line 4 ORA-04088: 触发器 'TESTS.MYEMPTESTADD1' 执行过程中出错

触发器谓词:

 

在触发器定义中专门提供了三个触发器谓词:INSERTING、UPDATING、DELETING
 
No. 触发器谓词 描述
1 INSERTING 如果触发语句为INSERT,返回TRUE,否则返回FALSE
2 UPDATING 如果触发语句为UPDATE,返回TRUE,否则返回FALSE
3 DELETING 如果触发语句为DELETE,返回TRUE,否则返回FALSE
 

 

示例三、使用日志表deptlog表记录相关操作dept表

-创建deptlog表 CREATE TABLE deptlog( logid NUMBER, TYPE VARCHAR2(20)       NOT NULL, deptno NUMBER(2), logdate DATE, dname Varchar2(14)      NOT NULL, loc Varchar2(13)      NOT NULL, CONSTRAINT pk_logid PRIMARY KEY(logid) ); --创建序列
CREATE SEQUENCE deptlog_seq; --创建触发器
create or replace trigger dept_trigger before INSERT OR UPDATE OR DELETE on dept for each row declare
 
BEGIN
   IF inserting THEN
     INSERT INTO deptlog(logid,type,deptno,logdate,dname,loc) VALUES(deptlog_seq.nextval,'insert',:new.Deptno,SYSDATE,:NEW.DNAME,:new.Loc); ELSIF updating THEN 
      INSERT INTO deptlog(logid,type,deptno,logdate,dname,loc) VALUES(deptlog_seq.nextval,'update',:new.Deptno,SYSDATE,:NEW.DNAME,:new.Loc); ELSIF deleting THEN
         INSERT INTO deptlog(logid,type,deptno,logdate,dname,loc) VALUES(deptlog_seq.nextval,'delete',:old.Deptno,SYSDATE,:old.DNAME,:old.Loc); END IF; end dept_trigger; --测试数据
INSERT INTO dept(deptno,dname,loc)VALUES(87,'测试','SZ'); INSERT INTO dept(deptno,dname,loc)VALUES(43,'公关','SZ'); UPDATE dept SET dname='拓展部' WHERE deptno=66; DELETE FROM dept WHERE deptno=87; commit; --查询
SELECT * FROM dept; --查询表
SELECT * FROM deptlog;

使用FOLLOWS子句

为一个表创建了多个触发器,在触发时,是不会按照用户希望的顺序执行触发的,

在FOR EACH ROW后增加FOLLOWS 触发器1名称,表示在 触发器1后触发

 

--创建3个相同的触发器
--触发器1
create or replace trigger dept1
  before INSERT OR UPDATE OR DELETE on dept  
  for each row
declare
  
begin
  dbms_output.put_line('执行第1个触发器 dept1');
end dept1;
--触发器2
create or replace trigger dept2
  before INSERT OR UPDATE OR DELETE on dept  
  for each ROW
  follows dept1
declare
  
begin
  dbms_output.put_line('执行第2个触发器 dept2');
end dept1;
--触发器3
create or replace trigger dept3
  before INSERT OR UPDATE OR DELETE on dept  
  for each ROW
    follows dept2
declare
  
begin
  dbms_output.put_line('执行第3个触发器 dept3');
end dept1;

 

执行更新,删除,添加操作

INSERT INTO dept(deptno,dname,loc)VALUES(87,'测试','SZ');
INSERT INTO dept(deptno,dname,loc)VALUES(43,'公关','SZ');
UPDATE dept SET dname='拓展部' WHERE deptno=66;
DELETE FROM dept WHERE deptno=87;

结果:

执行第1个触发器 dept1
执行第2个触发器 dept2
执行第3个触发器 dept3

按指定顺序触发