触发器、内置程序包
1、技术目标
- 应用触发器
- 使用内置程序包
2、什么是触发器
- 触发器是当特定事件出现时自动执行的存储过程
- 特定事件可以是执行更新的DML语句和DDL语句
- 触发器不能被显式调用,存储过程可以显示调用
触发器的功能 有:
- 自动生成数据
- 自定义复杂的安全权限
- 提供审计和日志记录
- 启用复杂的业务逻辑
触发器可以与特定的表或视图相关联,用于检查对表/视图所做的数据修改,
当执行insert、delete、update语句时,可激活触发器代码
3、如何创建触发器
创建触发器的语法 为:
CREATE [OR REPLACE] TRIGGER trigger_name
{AFTER | BEFORE | INSTEAD OF}
{insert | delete | update [OF column[, column] ...]}
[OR {insert | delete | update [OF column[, column] ...] }]
ON
[schema.]table_or_view_name
[REFERENCING [NEW AS new_row_name] [OLD AS old_row_name]]
[FOR EACH ROW]
[WHEN (condition)]
[DECLARE
variable_declation]
BEGIN
statements;
[EXCEPTION
exception_handlers]
END [trigger_name];
语法说明:
AFTER | BEFORE,指在事件发生之前或之后激活触发器
INSTEAD OF,表示可以执行触发器代码来代替导致触发器调用的事件
insert | delete | update,指定构成触发器事件的数据操纵类型,
update可指定列列表
REFERENCING,指定新行(即将更新)和旧行(更新前)的其他名称,
默认为NEW和OLD
table_or_view_name,指要创建触发器的表或视图的名称
FOR EACH ROW,指定是否对受影响的每行都执行触发器,即行级触发器,
如不使用此句,则为语句级触发器
WHEN,限制执行触发器的条件,该条件可包括新旧数据值的检查
DECLARE...END,一个标准的PL/SQL块
使用: 在Emp表创建触发器,
- CREATE OR REPLACE TRIGGER biu_emp_deptno
- --在添加或修改deptNo字段之前触发
- BEFORE INSERT OR UPDATE OF deptNo
- ON Emp
- --行级触发器
- FOR EACH ROW
- --列deptNo的新值不等于40
- WHEN (New.deptNo <> 40)
- BEGIN
- --将comm列设置为0
- :New.comm := 0;
- END;
- /
CREATE OR REPLACE TRIGGER biu_emp_deptno
--在添加或修改deptNo字段之前触发
BEFORE INSERT OR UPDATE OF deptNo
ON Emp
--行级触发器
FOR EACH ROW
--列deptNo的新值不等于40
WHEN (New.deptNo <> 40)
BEGIN
--将comm列设置为0
:New.comm := 0;
END;
/
注意:使用SHOW ERRORS命令可查看创建触发器时出现的错误
4、触发器的组成部分
触发器由以下3个部分 组成:
触发语句 ,定义激活触发器的 DML 事件和 DDL 事件,如:
BEFORE INSERT OR UPDATE OF deptNo
ON Emp
--行级触发器
FOR EACH ROW
这段代码表示,当对Emp表执行insert语句或对Emp表的
deptNo列执行update语句时,触发器会在受影响的每一行
上执行一次
触发限制 ,执行触发器的条件,该条件必须为真才能激活触发器,如:
--列deptNo的新值不等于40,触发器会执行
WHEN (New.deptNo <> 40)
触发操作 ,一些 SQL 语句和代码,在发出了触发器语句且触发限制的
值为真时运行,如:
BEGIN
--将comm列设置为0
:New.comm := 0;
END;
5、触发器的类型及使用
触发器有如下的类型:
每种触发器的作用:
使用1: 应用行级触发器,
- --创建表TEST_TRG
- CREATE TABLE TEST_TRG (ID NUMBER, NAME VARCHAR2(20));
- --创建序列SEQ_TEST
- CREATE SEQUENCE SEQ_TEST;
- --为TEST_TRG表创建行级触发器
- CREATE OR REPLACE TRIGGER BI_TEST_TRG
- --在insert(添加)或者update(修改)ID字段时触发
- BEFORE INSERT OR UPDATE OF ID
- ON TEST_TRG --指定TEST_TRG表
- FOR EACH ROW --设置为行级触发器
- --触发器语句部分
- BEGIN
- --判断是不是insert语句
- IF INSERTING THEN
- --如果是insert操作,将序列的值设置给ID列
- SELECT SEQ_TEST.NEXTVAL INTO :NEW.ID FROM DUAL;
- ELSE
- --如果不是insert操作,不能修改ID列的值
- RAISE_APPLICATION_ERROR(-20020, '不允许更新ID值!');
- END IF;
- END;
- /
--创建表TEST_TRG
CREATE TABLE TEST_TRG (ID NUMBER, NAME VARCHAR2(20));
--创建序列SEQ_TEST
CREATE SEQUENCE SEQ_TEST;
--为TEST_TRG表创建行级触发器
CREATE OR REPLACE TRIGGER BI_TEST_TRG
--在insert(添加)或者update(修改)ID字段时触发
BEFORE INSERT OR UPDATE OF ID
ON TEST_TRG --指定TEST_TRG表
FOR EACH ROW --设置为行级触发器
--触发器语句部分
BEGIN
--判断是不是insert语句
IF INSERTING THEN
--如果是insert操作,将序列的值设置给ID列
SELECT SEQ_TEST.NEXTVAL INTO :NEW.ID FROM DUAL;
ELSE
--如果不是insert操作,不能修改ID列的值
RAISE_APPLICATION_ERROR(-20020, '不允许更新ID值!');
END IF;
END;
/
注意:如果一个触发器由多种语句触发,可用INSERTING、UPDATING、
DELETING这些关键字进行检查,对应语句类型
使用2: 应用语句级触发器,
- CREATE OR REPLACE TRIGGER trgdemo
- AFTER INSERT OR UPDATE OR DELETE
- ON order_master
- BEGIN
- --根据语句类型输出信息
- IF UPDATING THEN
- DBMS_OUTPUT.PUT_LINE('已更新ORDER_MASTER中的数据');
- ELSIF DELETING THEN
- DBMS_OUTPUT.PUT_LINE('已删除ORDER_MASTER中的数据');
- ELSIF INSERTING THEN
- DBMS_OUTPUT.PUT_LINE('已在ORDER_MASTER中插入数据');
- END IF;
- END;
- /
CREATE OR REPLACE TRIGGER trgdemo
AFTER INSERT OR UPDATE OR DELETE
ON order_master
BEGIN
--根据语句类型输出信息
IF UPDATING THEN
DBMS_OUTPUT.PUT_LINE('已更新ORDER_MASTER中的数据');
ELSIF DELETING THEN
DBMS_OUTPUT.PUT_LINE('已删除ORDER_MASTER中的数据');
ELSIF INSERTING THEN
DBMS_OUTPUT.PUT_LINE('已在ORDER_MASTER中插入数据');
END IF;
END;
/
注意:语句级触发器时CREATE TRIGGER命令所创建触发器的默认类型
使用3: 应用INSTEAD OF触发器,同时向两个表中插入值,
- --创建视图
- CREATE VIEW ord_view AS
- SELECT order_master.orderno, order_master.ostatus,
- order_detail.qty_deld, order_detail.qty_ord
- FROM order_master, order_detail
- WHERE order_master.orderno = order_detail.orderno;
- --创建INSTEAD OF触发器
- CREATE OR REPLACE TRIGGER order_mast_insert
- INSTEAD OF UPDATE ON ord_view
- --为NEW关键字取别名n
- REFERENCING NEW AS n
- FOR EACH ROW
- DECLARE
- --定义游标,访问order_master表
- CURSOR ecur IS SELECT * FROM order_master
- WHERE order_master.orderno = :n.orderno;
- --定义游标,访问order_detail表
- CUSEOR dcur IS
- select * from order_detail
- WHERE order_detail.orderno = :n.orderno;
- --定义游标变量
- a ecur%ROWTYPE;
- b dcur%ROWTYPE;
- BEGIN
- --打开游标
- OPEN ecur;
- OPEN dcur;
- --读取行
- FETCH ecur into a;
- FETCH dcur into b;
- --判断是否有行
- IF dur%NOTFOUND THEN --没有
- --添加记录
- INSERT INTO order_master (orderno, ostatus)
- VALUES (:n.orderno, :n.ostatus);
- ELSE --有
- --修改记录
- UPDATE order_master SET order_master.ostatus = :n.ostatus
- WHERE order_master.orderno = :n.orderno;
- END IF;
- IF ecur%NOTFOUND THEN
- INSERT INTO order_detail (qty_ord, qty_deld, orderno)
- VALUES(:n.qty_ord, :n.qty_deld, :n.orderno);
- ELSE
- UPDATE order_detail SET
- order_detail.qty_ord = :n.qty_ord,
- order_detail.qty_deld = :n.qty_deld
- WHERE order_detail.orderno = :n.orderno;
- END IF;
- --关闭游标
- CLOSE ecur;
- CLOSE dcur;
- END;
- /
--创建视图
CREATE VIEW ord_view AS
SELECT order_master.orderno, order_master.ostatus,
order_detail.qty_deld, order_detail.qty_ord
FROM order_master, order_detail
WHERE order_master.orderno = order_detail.orderno;
--创建INSTEAD OF触发器
CREATE OR REPLACE TRIGGER order_mast_insert
INSTEAD OF UPDATE ON ord_view
--为NEW关键字取别名n
REFERENCING NEW AS n
FOR EACH ROW
DECLARE
--定义游标,访问order_master表
CURSOR ecur IS SELECT * FROM order_master
WHERE order_master.orderno = :n.orderno;
--定义游标,访问order_detail表
CUSEOR dcur IS
select * from order_detail
WHERE order_detail.orderno = :n.orderno;
--定义游标变量
a ecur%ROWTYPE;
b dcur%ROWTYPE;
BEGIN
--打开游标
OPEN ecur;
OPEN dcur;
--读取行
FETCH ecur into a;
FETCH dcur into b;
--判断是否有行
IF dur%NOTFOUND THEN --没有
--添加记录
INSERT INTO order_master (orderno, ostatus)
VALUES (:n.orderno, :n.ostatus);
ELSE --有
--修改记录
UPDATE order_master SET order_master.ostatus = :n.ostatus
WHERE order_master.orderno = :n.orderno;
END IF;
IF ecur%NOTFOUND THEN
INSERT INTO order_detail (qty_ord, qty_deld, orderno)
VALUES(:n.qty_ord, :n.qty_deld, :n.orderno);
ELSE
UPDATE order_detail SET
order_detail.qty_ord = :n.qty_ord,
order_detail.qty_deld = :n.qty_deld
WHERE order_detail.orderno = :n.orderno;
END IF;
--关闭游标
CLOSE ecur;
CLOSE dcur;
END;
/
注意:使用INSTEAD OF触发器有如下的限制,
- 只能在行级使用,不能在语句级使用
- 只能应用于视图,不能应用于表
使用4: 应用模式(DDL)触发器,对用户删除的对象进行日志记录,
创建模式触发器的语法 为:
CREATE OR REPLACE TRIGGER trigger_name
{BEFORE | AFTER} trigger_event
ON [schema.]SCHEMA
WHEN (trigger_condition)
trigger_body;
- --创建日志记录表
- CREATE TABLE dropped_obj
- (
- obj_name VARCHAR2(30),
- obj_type VARCHAR2(20),
- drop_date DATE
- );
- --创建触发器
- CREATE OR REPLACE TRIGGER log_drop_obj
- --在执行drop语句后触发
- AFTER DROP ON SCHEMA
- BEGIN
- --将被删除对象的信息添加到日志记录表中
- INSERT INTO dropped_obj
- VALUES (ORA_DICT_OBJ_NAME, ORA_DICT_OBJ_TYPE, SYSDATE);
- END;
- /
--创建日志记录表
CREATE TABLE dropped_obj
(
obj_name VARCHAR2(30),
obj_type VARCHAR2(20),
drop_date DATE
);
--创建触发器
CREATE OR REPLACE TRIGGER log_drop_obj
--在执行drop语句后触发
AFTER DROP ON SCHEMA
BEGIN
--将被删除对象的信息添加到日志记录表中
INSERT INTO dropped_obj
VALUES (ORA_DICT_OBJ_NAME, ORA_DICT_OBJ_TYPE, SYSDATE);
END;
/
使用5: 应用数据库级触发器,在数据库启动后执行,
CREATE OR REPLACE TRIGGER system_startup
--系统启动时触发
AFTER STARTUP ON DATEBASE
BEGIN
--加入所需代码
END;
/
6、启动、禁用、删除触发器,查看触发器信息
启用和禁用触发器:
ALTER TRIGGER 触发器名 DISABLE; --禁用
ALTER TRIGGER 触发器名 ENABLE; --启用
删除触发器:
DROP TRIGGER 触发器名;
查看触发器信息,使用USER_TRIGGERS数据字典:
使用1: 查看为表EMP设置的触发器名
select TRIGGER_NAME from USER_TRIGGERS
WHERE TABLE_NAME = 'EMP';
使用2: 查看触发器BIU_EMP_DEPTNO的类型、触发事件、触发条件,
select TRIGGER_TYPE, TRIGGERING_EVENT, WHEN_CLAUSE
from USER_TRIGGERS
WHERE TRIGGER_NAME = 'BIU_EMP_DEPTNO';
7、内置程序包
Oracle提供了许多内置程序包,用于扩展数据库功能,数据库用户SYS
拥有所有程序包,程序包被定义为公有同义词,并将执行权限授予了
PUBLIC用户组,任何用户都可访问,部分内置程序包如下:
8、总结
- 触发器是当特定事件出现时自动执行的存储过程
- 触发器分为 DML 触发器、DDL 触发器和数据库级触发器三种类型
- DML触发器的三种类型为行级触发器、语句级触发器和INSTEAD OF触发器
- 了解一些常用的内置程序包