dml触发器 oracle 记录session_oracle最后dml记录 - CSDN
精华内容
参与话题
  • 15.1为何使用自治事务 无法回滚的审计一般情况下利用触发器禁止某些对表的更新等操作时,若记录日志,则触发器最后抛出异常时会造成日志回滚。利用自治事务可防止此点。避免变异表即在触发器中操作触发此触发器的表...

    在触发器中操作触发此触发器的表,用PRAGMA AUTONOMOUS_TRANSACTION选项。

    15.1为何使用自治事务 无法回滚的审计

    一般情况下利用触发器禁止某些对表的更新等操作时,若记录日志,则触发器最后抛出异常时会造成日志回滚。利用自治事务可防止此点。

    避免变异表

    即在触发器中操作触发此触发器的表

    在触发器中使用DDL 写数据库

    对数据库有写操作(INSERT、UPDATE、DELETE、CREATE、ALTER、COMMIT)的存储过程或函数是无法简单的用SQL来调用的,此时可以将其设为自治事务,从而避免ORA-14552(无法在一个查询或DML中执行DDL、COMMIT、ROLLBACK)、ORA-14551(无法在一个查询中执行DML操作)等错误。需要注意的是函数必须有返回值,但仅有IN参数(不能有OUT或IN/OUT参数)。

    开发更模块化的代码

    在大型开发中,自治事务可以将代码更加模块化,失败或成功时不会影响调用者的其它操作,代价是调用者失去了对此模块的控制,并且模块内部无法引用调用者未提交的数据。

    15.2 如何工作 事务控制

    DECLARE整个块都是属于父事务的,自治事务从离PRAGMA后的第一个BEGIN开始,只要此BEGIN块仍在作用域,则都属于自治事务。例如在DECLARE模块中声明一个写数据库的函数,则此函数虽然在自治事务所在存储过程执行,但其属于父事务;而自治事务中调用的任何函数和存储过程、激发的任何触发器等均为此自治事务的一部分。

    自治事务可以嵌套,嵌套深度等只受INIT.ORA参数TRANSACTIONS(同时并发的事务数,缺省为SESSIONS的1.1倍)制约。

    作用域

    1. 包中的变量

    自治事务可看到并修改父事务的变量,父事务也会察觉到这一改变,且不存在回滚问题。

    2. 会话设置/参数

    自治事务与父事务共享同一个会话环境,通过ALTER SESSION作的修改对整个会话均有效。但SET TRANSACTION是事务级的,仅对提起修改的事务有效。

    3. 数据库修改

    父事务已提交的修改对自治事务可见,未提交的对自治事务不可见,自治事务的修改对父事务是否可见取决于隔离级别(Isolation Level)。

    对于游标,取决于其打开的位置,若其在父事务中打开,则之前父事务未提交的修改对其是有效的,在自治事务中这些修改也可见;而在自治事务中打开,则父事务未提交的修改不可见。

    若使用缺省的READ COMMITTED隔离级别,则自治事务的修改对父事务可见;若改用SERIALIZABLE,则不可见。

    4. 锁

    父事务与自治事务是完全不同的事务,因此无法共享锁等。

    结束一个自治事务必须提交一个COMMIT、ROLLBACK或执行DDL。

    保存点无法在自治事务中回滚到父事务中的一个保存点,只能在内部使用保存点。

    15.3 最后说明 不支持分布式事务截至8.1.7在自治事务中不支持分布式事务

    仅可用PL/SQL 全部事务回滚若自治事务出错,则全部回滚,即便父事务有异常处理模块。

    事务级临时表每个会话仅一个事务可访问事务级临时表(多个会话中的事务可并发操作)。

    15.4 可能遇到的错误
    ORA-06519 – 检查到活动自治事务,回滚——退出自治事务时没有提交、回滚或DDL操作

    ORA-14450 – 试图访问正在使用的事务级临时表

    ORA-00060 – 等待资源时检查到死锁

    -- 附一简单的例子

    create or replace procedure ddl_proc(str_sql in varchar2 )
    is
    pragma AUTONOMOUS_TRANSACTION;
    BEGIN
           execute immediate str_sql;
    END;

    在trigger里面,可以用ddl_proc执行DDL,DML

    展开全文
  • Oracle数据库中的触发器

    千次阅读 2015-02-16 10:02:59
    Oracle中的触发器触发器是一种特殊的额存储过程,它在发生某种数据库时间时由Oracle系统自动触发。触发器通常用于加强数据库的完整性约束和业务规则等,对于表来说,触发器可以实现比CHECK约束更为复杂的约束。

    Oracle数据库中的触发器

    触发器是一种特殊的存储过程,它在发生某种数据库事件时由Oracle系统自动触发。触发器通常用于加强数据库的完整性约束和业务规则等,对于表来说,触发器可以实现比CHECK约束更为复杂的约束。
    Oracle中的触发器的类型主要有DML触发器、替代触发器、系统事件触发器和DDL触发器。

    触发器的分类

    • DML触发器
      DML触发器由DML语句触发,例如INSERT、UPDATE和DELETE语句,其对应的trigger_event具体内容如下:
    {INSERT|DELETE|UPDATE[OF column[,...]]}

    针对所有的DML事件,按照触发器的触发时间可以将DML触发器分为BEFORE触发器和AFTER触发器,分别表示在DML事件发生之前与之后采取行动。


    1. BEFORE行触发器
      在开发数据库应用时,为了确保数据符合商业或企业规则,应该使用约束对输入数据加以限制,在某些情况下约束可能无法是想复杂的商业逻辑或企业规则,此时因考虑BEFORE行触发器。
    2. AFTER行触发器
      为了审计DML操作,可以使用语句级触发器或Oracle提供的审计功能,而为了审计数据变化,则应使用AFTER行触发器。

    另外,DML触发器也可以分为语句级触发器和行级触发器,语句级触发器针对某一条语句触发一次,而行级触发器针对语句所影响的每一行都触发一次。
    可以将DML操作细化到列,即针对某列进行DML操作时激活触发器。
    在进行行级触发器中,为了获取某列在DML操作前后的数据,Oracle提供了两种特殊的标示符::OLD和:NEW,通过:OLD.column_name和:NEW.column_name分别获取该列的旧数据和新数据。INSERT触发器只能使用:NEW,DELETE只能使用:OLD,而UPDATE则两种都可以使用。

    例1:

    1.首先以SYSDBA身份登录,创建用户SIEGE,赋予相关权限(此步可省略):

    CREATE USER siege IDENTIFIED BY "123456";
    GRANT CREATE SESSION TO siege;
    GRANT CREATE TABLE TO siege;
    GRANT CREATE TABLESPACE TO siege;
    GRANT CREATE VIEW TO siege;
    GRANT CREATE ANY TRIGGER TO SIEGE;
    CREATE TABLESPACE learning; 
    DATAFILE 'D:\oraclexe\app\oracle\oradata\XE\leaning.dbf'
    SIZE 100M
    AUTOEXTEND ON NEXT 5M MAXSIZE 200M;
    
    ALTER USER SIEGE DEFAULT TABLESPACE leaning;
    ALTER USER SIEGE QUOTA UNLIMITED ON leaning;  

    2.创建student表和record表,并插入相关数据:

    CREATE TABLE student(
        sid  NUMBER(4),
        sname VARCHAR2(10),
        sage NUMBER(4)
    );
    CREATE TABLE record(
        content VARCHAR2(80),
        rtime timestamp
    );
    INSERT INTO student VALUES(1001,'CANDY',24);
    INSERT INTO student VALUES(1002,'TRACY',25);
    INSERT INTO student VALUES(1003,'SAM',23);

    3.创建student表的触发器:

    CREATE OR REPLACE TRIGGER update_student_trigger
    AFTER UPDATE 
    ON student
    FOR EACH ROW
    BEGIN
       INSERT INTO RECORD VALUES('执行了UPDATE操作,执行该操作前的数据为:sid='||:OLD.sid,SYSDATE);
    END     update_student_trigger;

    4.测试触发器:
    修改student表数据:

    UPDATE student SET  sage=26;

    此时查看record数据,发现更新了3条数据,说明该触发器为行触发器:

    1 执行了UPDATE操作,执行该操作前的数据为:sid=1001 15-FEB-15 00.03.42.000000
    2 执行了UPDATE操作,执行该操作前的数据为:sid=1002 15-FEB-15 00.03.42.000000
    3 执行了UPDATE操作,执行该操作前的数据为:sid=1003 15-FEB-15 00.03.42.000000

    • INSTEAD OF触发器
      INSTEAD OF触发器(替代触发器),用于执行一个替代操作来代替触发事件的操作,例如针对INSERT事件的INSTEAD OF触发器,它由INSERT语句触发,当出现INSERT语句时,该语句不会被执行,而是执行INSTEAD OF触发器中定义的语句。
      不过,Oracle中的INSTEAD OF触发器不能针对表,而只能针对视图。并不是视图的所有列都支持, 例如对列进行了数学或函数计算,则不能对该列进行DML操作,这时可以使用INSTEAD OF触发器。

    例2:

    针对例1中的student表进行创建视图,其语句如下:

    CREATE VIEW student_view 
    AS 
    SELECT sid,sname,sage+1 NEW_age
    FROM student 
    WITH CHECK OPTION;

    创建好视图后,进行插入操作:

    INSERT INTO student_view VALUES(1004,'PETER',22);

    此时,报ORA-01773错误。对此我们应该对student_view创建INSTEAD OF触发器:

    CREATE OR REPLACE TRIGGER insteadof_student_view
    INSTEAD OF INSERT 
    ON student_view 
    FOR EACH ROW
    BEGIN 
    INSERT INTO student (sid,sname,sage) 
    VALUES(:NEW.sid,:NEW.sname,:NEW.new_age);
    END insteadof_student_view;
    

    创建好触发器后,再次执行上面的插入语句,则可以成功进行插入了。

    • 系统事件触发器
      系统事件触发器在发生如数据库启动或关闭等系统事件时触发。创建系统事件触发器需要使用ON DATABASE子句,即表示创建的触发器是数据库级触发器,同时创建系统事件触发器需要具有DBA权限。系统事件如下:

      系统事件 说明
      LOGOFF 用户从数据库注销
      LOGON 用户登录数据库
      SERVERERROR 服务器发生错误
      SHUTDOWN 关闭数据库实例

    例3:

    以SYSDBA身份登录,创建table_event:

    CREATE TABLE  table_event(
           event VARCHAR2(30),
           time DATE
    )
    

    然后创建tr_startup触发器和tr_shutdown触发器:

    CREATE OR REPLACE TRIGGER tr_startup
    AFTER startup ON DATABASE
    BEGIN 
           INSERT INTO table_event VALUES (ora_sysevent,SYSDATE);
    END tr_startup;     
    

    CREATE OR REPLACE TRIGGER tr_shutdown
    BEFORE shutdown ON DATABASE
    BEGIN 
           INSERT INTO table_event  VALUES (ora_sysevent,SYSDATE);
    END tr_shutdown;     

    然后关闭和启动数据库,查看table_event表:

    SHUTDOWN 16/02/2015 01:01:02
    STARTUP 16/02/2015 01:01:56

    说明系统触发器已起作用了。

    • DDL触发器
      DDL触发器由DDL语句触发,如CREATE、ALTER和DROP语句。DDL触发器同样分为BEFORE触发器与AFTER触发器。

    触发器的创建

    创建触发器需要使用CREATE TRIGGER语句,其语法如下:

    CREATE [OR REPLACE] TRIGGER trigger_name
    [BEFORE|AFTER|INSTEAD OF] trigger_event
    {ON table_name|view_name|DATABASE}
    [FOR EACH ROW]
    [ENABLE|DISABLE]
    [WHEN trigger_condition]
    [DECLARE declaration_statements;]
    BEGIN
        trigger_body;
    END [trigger_name]; 
    展开全文
  • plsql 触发器的使用

    千次阅读 2018-04-09 12:52:41
    本篇主要内容如下:8.1 触发器类型8.1.1 DML触发器8.1.2 替代触发器8.1.3 系统触发器8.2 创建触发器8.2.1 触发器触发次序8.2.2 创建DML触发器8.2.3 创建替代(INSTEAD OF)触发器8.2.3 创建系统事件触发器...

    本篇主要内容如下:

    8.1 触发器类型

    8.1.1 DML触发器

    8.1.2 替代触发器

    8.1.3 系统触发器

    8.2 创建触发器

    8.2.1 触发器触发次序

    8.2.2 创建DML触发器

    8.2.3 创建替代(INSTEAD OF)触发器

    8.2.3 创建系统事件触发器

    8.2.4 系统触发器事件属性

    8.2.5 使用触发器谓词

    8.2.6 重新编译触发器

    8.3 删除和使能触发器

    8.4 触发器和数据字典

    8.5   数据库触发器的应用举例

    触发器是许多关系数据库系统都提供的一项技术。在ORACLE系统里,触发器类似过程和函数,都有声明,执行和异常处理过程的PL/SQL块。


    8.1 触发器类型

      触发器在数据库里以独立的对象存储,它与存储过程和函数不同的是,存储过程与函数需要用户显示调用才执行,而触发器是由一个事件来启动运行。即触发器是当某个事件发生时自动地隐式运行。并且,触发器不能接收参数。所以运行触发器就叫触发或点火(firing)。ORACLE事件指的是对数据库的表进行的INSERTUPDATEDELETE操作或对视图进行类似的操作。ORACLE将触发器的功能扩展到了触发ORACLE,如数据库的启动与关闭等。所以触发器常用来完成由数据库的完整性约束难以完成的复杂业务规则的约束,或用来监视对数据库的各种操作,实现审计的功能。 

    8.1.1 DML触发器

      ORACLE可以在DML语句进行触发,可以在DML操作前或操作后进行触发,并且可以对每个行或语句操作上进行触发。 

    8.1.2替代触发器

      由于在ORACLE里,不能直接对由两个以上的表建立的视图进行操作。所以给出了替代触发器。它就是ORACLE 8专门为进行视图操作的一种处理方法。 

    8.1.3系统触发器

      ORACLE 8i 提供了第三种类型的触发器叫系统触发器。它可以在ORACLE数据库系统的事件中进行触发,如ORACLE系统的启动与关闭等。 

    触发器组成

      l   触发事件:引起触发器被触发的事件。 例如:DML语句(INSERT, UPDATE, DELETE语句对表或视图执行数据处理操作)DDL语句(如CREATEALTERDROP语句在数据库中创建、修改、删除模式对象)、数据库系统事件(如系统启动或退出、异常错误)、用户事件(如登录或退出数据库)。

      l   触发时间:即该TRIGGER 是在触发事件发生之前(BEFORE)还是之后(AFTER)触发,也就是触发事件和该TRIGGER 的操作顺序。

      l   触发操作:即该TRIGGER 被触发之后的目的和意图,正是触发器本身要做的事情。 例如:PL/SQL 块。

      l   触发对象:包括表、视图、模式、数据库。只有在这些对象上发生了符合触发条件的触发事件,才会执行触发操作。

      l   触发条件:WHEN子句指定一个逻辑表达式。只有当该表达式的值为TRUE时,遇到触发事件才会自动执行触发器,使其执行触发操作。

      l   触发频率:说明触发器内定义的动作被执行的次数。即语句级(STATEMENT)触发器和行级(ROW)触发器。

    语句级(STATEMENT)触发器:是指当某触发事件发生时,该触发器只执行一次;

    行级(ROW)触发器:是指当某触发事件发生时,对受到该操作影响的每一行数据,触发器都单独执行一次。

    编写触发器时,需要注意以下几点:

     触发器不接受参数。

    l   一个表上最多可有12个触发器,但同一时间、同一事件、同一类型的触发器只能有一个。并各触发器之间不能有矛盾。

    l  在一个表上的触发器越多,对在该表上的DML操作的性能影响就越大

    l  触发器最大为32KB。若确实需要,可以先建立过程,然后在触发器中用CALL语句进行调用

    l  在触发器的执行部分只能用DML语句(SELECT、INSERT、UPDATE、DELETE),不能使用DDL语句(CREATE、ALTER、DROP)

    触发器中不能包含事务控制语句(COMMIT,ROLLBACK,SAVEPOINT)。因为触发器是触发语句的一部分,触发语句被提交、回退时,触发器也被提交、回退了。

    l  在触发器主体中调用的任何过程、函数,都不能使用事务控制语句。

    l  在触发器主体中不能申明任何Long和blob变量。新值new和旧值old也不能向表中的任何long和blob列

    l  不同类型的触发器(如DML触发器、INSTEAD OF触发器、系统触发器)的语法格式和作用有较大区别。 

    8.2 创建触发器

    创建触发器的一般语法是: 

    CREATE [OR REPLACE] TRIGGER trigger_name
    {BEFORE | AFTER }
    {INSERT | DELETE | UPDATE [OF column [, column …]]}
    [OR {INSERT | DELETE | UPDATE [OF column [, column …]]}...]
    ON [schema.]table_name | [schema.]view_name 
    [REFERENCING {OLD [AS] old | NEW [AS] new| PARENT as parent}]
    [FOR EACH ROW ]
    [WHEN condition]
    PL/SQL_BLOCK | CALL procedure_name;

    其中:

    BEFORE AFTER指出触发器的触发时序分别为前触发和后触发方式,前触发是在执行触发事件之前触发当前所创建的触发器,后触发是在执行触发事件之后触发当前所创建的触发器。

           FOR EACH ROW选项说明触发器为行触发器。行触发器和语句触发器的区别表现在:行触发器要求当一个DML语句操走影响数据库中的多行数据时,对于其中的每个数据行,只要它们符合触发约束条件,均激活一次触发器;而语句触发器将整个语句操作作为触发事件,当它符合约束条件时,激活一次触发器。当省略FOR EACH ROW 选项时,BEFORE AFTER 触发器为语句触发器,而INSTEAD OF 触发器则只能为行触发器

                REFERENCING 子句说明相关名称,在行触发器的PL/SQL块和WHEN 子句中可以使用相关名称参照当前的新、旧列值,默认的相关名称分别为OLDNEW。触发器的PL/SQL块中应用相关名称时,必须在它们之前加冒号(:),但在WHEN子句中则不能加冒号。

    WHEN 子句说明触发约束条件。Condition 为一个逻辑表达时,其中必须包含相关名称,而不能包含查询语句,也不能调用PL/SQL 函数。WHEN 子句指定的触发约束条件只能用在BEFORE AFTER 行触发器中,不能用在INSTEAD OF 行触发器和其它类型的触发器中。

        当一个基表被修改( INSERT, UPDATE, DELETE)时要执行的存储过程,执行时根据其所依附的基表改动而自动触发,因此与应用程序无关,用数据库触发器可以保证数据的一致性和完整性。 

    每张表最多可建立12 种类型的触发器,它们是:

    BEFORE INSERT
    BEFORE INSERT FOR EACH ROW
    AFTER INSERT
    AFTER INSERT FOR EACH ROW
     
    
    BEFORE UPDATE
    BEFORE UPDATE FOR EACH ROW
    AFTER UPDATE
    AFTER UPDATE FOR EACH ROW
     
    
    BEFORE DELETE
    BEFORE DELETE FOR EACH ROW
    AFTER DELETE
    AFTER DELETE FOR EACH ROW 

    8.2.1触发器触发次序

    1.        执行 BEFORE语句级触发器;

    2.        对与受语句影响的每一行:

    l         执行 BEFORE行级触发器

    l         执行 DML语句

    l         执行 AFTER行级触发器 

    3.        执行 AFTER语句级触发器 

    8.2.2创建DML触发器

        触发器名与过程名和包的名字不一样,它是单独的名字空间,因而触发器名可以和表或过程有相同的名字,但在一个模式中触发器名不能相同。 

    DML触发器的限制

    l         CREATE TRIGGER语句文本的字符长度不能超过32KB

    l         触发器体内的SELECT 语句只能为SELECT … INTO …结构,或者为定义游标所使用的SELECT 语句。

    l         触发器中不能使用数据库事务控制语句 COMMIT; ROLLBACK, SVAEPOINT 语句;

    l         由触发器所调用的过程或函数也不能使用数据库事务控制语句;

    l         触发器中不能使用LONG, LONG RAW 类型;

    l         触发器内可以参照LOB 类型列的列值,但不能通过 :NEW 修改LOB列中的数据; 

    DML触发器基本要点

    l         触发时机:指定触发器的触发时间。如果指定为BEFORE,则表示在执行DML操作之前触发,以便防止某些错误操作发生或实现某些业务规则;如果指定为AFTER,则表示在执行DML操作之后触发,以便记录该操作或做某些事后处理。

    l         触发事件:引起触发器被触发的事件,即DML操作(INSERTUPDATEDELETE)。既可以是单个触发事件,也可以是多个触发事件的组合(只能使用OR逻辑组合,不能使用AND逻辑组合)。

    l         条件谓词:当在触发器中包含多个触发事件(INSERTUPDATEDELETE)的组合时,为了分别针对不同的事件进行不同的处理,需要使用ORACLE提供的如下条件谓词。

    1)。INSERTING当触发事件是INSERT时,取值为TRUE,否则为FALSE

    2)。UPDATING [column_1,column_2,…,column_x]当触发事件是UPDATE      时,如果修改了column_x列,则取值为TRUE,否则为FALSE。其中column_x是可选的。

    3)。DELETING当触发事件是DELETE时,则取值为TRUE,否则为FALSE

    解发对象:指定触发器是创建在哪个表、视图上。

    l         触发类型:是语句级还是行级触发器。

    l         触发条件:WHEN子句指定一个逻辑表达式,只允许在行级触发器上指定触发条件,指定UPDATING后面的列的列表 

      问题:当触发器被触发时,要使用被插入、更新或删除的记录中的列值,有时要使用操作前、        后列的值.

      实现:  :NEW 修饰符访问操作完成后列的值

                :OLD 修饰符访问操作完成前列的值 

    例1: 建立一个触发器, 当职工表 emp 表被删除一条记录时,把被删除记录写到职工表删除日志表中去。 
    CREATE TABLE emp_his AS SELECT * FROM EMP WHERE 1=2;  #where 1=2是创建和emp一样的表结构,没有记录的。
    CREATE OR REPLACE TRIGGER tr_del_emp 
       BEFORE DELETE --指定触发时机为删除操作前触发
       ON scott.emp 
       FOR EACH ROW   --说明创建的是行级触发器 
    BEGIN
       --将修改前数据插入到日志记录表 del_emp ,以供监督使用。
       INSERT INTO emp_his(deptno , empno, ename , job ,mgr , sal , comm , hiredate )
           VALUES( :old.deptno, :old.empno, :old.ename , :old.job,:old.mgr, :old.sal, :old.comm, :old.hiredate );
    END;
    DELETE emp WHERE empno=7788;
    DROP TABLE emp_his;
    DROP TRIGGER del_emp;
    例2:限制对Departments表修改(包括INSERT,DELETE,UPDATE)的时间范围,
    即不允许在非工作时间修改departments表。 
    
    create or replace trigger tr_dept_time
    before insert or delete or update
    on department
    begin
    	if (to_char(sysdate,'DAY') in ('星期六',‘星期日’)) or
    		(to_char(sysdate,'HH24:MI') Not between '8:30' and '18:00') 
    		then
    		raise_applicateion_error(-20001,'不是上班时间,不能修改departments表');
    	end if;
    end
    例3:限定只对部门号为80的记录进行行触发器操作。 
    CREATE OR REPLACE TRIGGER tr_emp_sal_comm
    BEFORE UPDATE OF salary, commission_pct
           OR DELETE
    ON HR.employees
    FOR EACH ROW
    WHEN (old.department_id = 80)
    BEGIN
     CASE
         WHEN UPDATING ('salary') THEN
            IF :NEW.salary < :old.salary THEN
    
               RAISE_APPLICATION_ERROR(-20001, '部门80的人员的工资不能降');
            END IF;
         WHEN UPDATING ('commission_pct') THEN
    
            IF :NEW.commission_pct < :old.commission_pct THEN
               RAISE_APPLICATION_ERROR(-20002, '部门80的人员的奖金不能降');
            END IF;
         WHEN DELETING THEN
              RAISE_APPLICATION_ERROR(-20003, '不能删除部门80的人员记录');
         END CASE;
    END; 
    
    /*
    实例:
    UPDATE employees SET salary = 8000 WHERE employee_id = 177;
    DELETE FROM employees WHERE employee_id in (177,170);
    */ 
    例4:利用行触发器实现级联更新。在修改了主表regions中的region_id之后(AFTER),
    级联的、自动的更新子表countries表中原来在该地区的国家的region_id。 
    
    CREATE OR REPLACE TRIGGER tr_reg_cou
    AFTER update OF region_id
    ON regions
    FOR EACH ROW
    BEGIN
     DBMS_OUTPUT.PUT_LINE('旧的region_id值是'||:old.region_id
                      ||'、新的region_id值是'||:new.region_id);
     UPDATE countries SET region_id = :new.region_id
     WHERE region_id = :old.region_id;
    END; 
    例5:在触发器中调用过程。 
    
    CREATE OR REPLACE PROCEDURE add_job_history
     ( p_emp_id          job_history.employee_id%type
       , p_start_date      job_history.start_date%type
      , p_end_date        job_history.end_date%type
       , p_job_id          job_history.job_id%type
       , p_department_id   job_history.department_id%type
       )
    IS
    BEGIN
     INSERT INTO job_history (employee_id, start_date, end_date,
                               job_id, department_id)
      VALUES(p_emp_id, p_start_date, p_end_date, p_job_id, p_department_id);
    END add_job_history;
    
    --创建触发器调用存储过程...
    CREATE OR REPLACE TRIGGER update_job_history
     AFTER UPDATE OF job_id, department_id ON employees
     FOR EACH ROW
    BEGIN
     add_job_history(:old.employee_id, :old.hire_date, sysdate,
                      :old.job_id, :old.department_id);
    END; 

    8.2.3创建替代(INSTEAD OF)触发器 

      创建触发器的一般语法是: 

    CREATE [OR REPLACE] TRIGGER trigger_name
    INSTEAD OF
    {INSERT | DELETE | UPDATE [OF column [, column …]]}
    [OR {INSERT | DELETE | UPDATE [OF column [, column …]]}...]
    ON [schema.] view_name --只能定义在视图上
    [REFERENCING {OLD [AS] old | NEW [AS] new| PARENT as parent}]
    [FOR EACH ROW ] --因为INSTEAD OF触发器只能在行级上触发,所以没有必要指定
    [WHEN condition]
    PL/SQL_block | CALL procedure_name;
    

    其中:

                INSTEAD OF 选项使ORACLE激活触发器,而不执行触发事件。只能对视图和对象视图建立INSTEAD OF触发器,而不能对表、模式和数据库建立INSTEAD OF 触发器。

                FOR EACH ROW选项说明触发器为行触发器。行触发器和语句触发器的区别表现在:行触发器要求当一个DML语句操走影响数据库中的多行数据时,对于其中的每个数据行,只要它们符合触发约束条件,均激活一次触发器;而语句触发器将整个语句操作作为触发事件,当它符合约束条件时,激活一次触发器。当省略FOR EACH ROW 选项时,BEFORE AFTER 触发器为语句触发器,而INSTEAD OF 触发器则为行触发器。

                REFERENCING 子句说明相关名称,在行触发器的PL/SQL块和WHEN 子句中可以使用相关名称参照当前的新、旧列值,默认的相关名称分别为OLDNEW。触发器的PL/SQL块中应用相关名称时,必须在它们之前加冒号(:),但在WHEN子句中则不能加冒号。

    WHEN 子句说明触发约束条件。Condition 为一个逻辑表达时,其中必须包含相关名称,而不能包含查询语句,也不能调用PL/SQL 函数。WHEN 子句指定的触发约束条件只能用在BEFORE AFTER 行触发器中,不能用在INSTEAD OF 行触发器和其它类型的触发器中。 

        INSTEAD_OF 用于对视图的DML触发,由于视图有可能是由多个表进行联结(join)而成,因而并非是所有的联结都是可更新的。但可以按照所需的方式执行更新,例如下面情况:

    例1:
    CREATE OR REPLACE VIEW emp_view AS 
    SELECT deptno, count(*) total_employeer, sum(sal) total_salary 
    FROM emp GROUP BY deptno; 
    在此视图中直接删除是非法: 
    SQL>DELETE FROM emp_view WHERE deptno=10;
    DELETE FROM emp_view WHERE deptno=10

    ERROR 位于第 1 :

      ORA-01732: 此视图的数据操纵操作非法 

      但是我们可以创建INSTEAD_OF触发器来为 DELETE 操作执行所需的处理,即删除EMP表中所有基准行:

    CREATE OR REPLACE TRIGGER emp_view_delete
       INSTEAD OF DELETE ON emp_view FOR EACH ROW
    BEGIN
       DELETE FROM emp WHERE deptno= :old.deptno;
    END emp_view_delete; 
    
    DELETE FROM emp_view WHERE deptno=10; 
    
    DROP TRIGGER emp_view_delete;
    
    DROP VIEW emp_view; 
     例2:创建复杂视图,针对INSERT操作创建INSTEAD OF触发器,向复杂视图插入数据。
          创建视图:
    create or replace force view "HR"."V_REG_COU"
    	("R_ID","R_NAME","C_ID","C_NAME")
    as
    	select r.region_id,r.region_name,c.country_id,c.country_name
    	from regions r,countries c
    	where r.region_id=c.region_id;
    
           创建触发器: 
    CREATE OR REPLACE TRIGGER "HR"."TR_I_O_REG_COU" INSTEAD OF
     	INSERT ON v_reg_cou FOR EACH ROW
     	DECLARE 
     		v_count NUMBER;
    BEGIN
     SELECT COUNT(*) INTO v_count FROM regions WHERE region_id = :new.r_id;
     IF v_count = 0 THEN
        INSERT INTO regions
          (region_id, region_name
          ) VALUES
          (:new.r_id, :new.r_name
          );
     END IF;
    
     SELECT COUNT(*) INTO v_count FROM countries WHERE country_id = :new.c_id;
     IF v_count = 0 THEN
        INSERT
        INTO countries
          (
            country_id,
            country_name,
            region_id
          )
          VALUES
          (
            :new.c_id,
            :new.c_name,
            :new.r_id
          );
     END IF;
    END;
    

    创建INSTEAD OF触发器需要注意以下几点:

    l         只能被创建在视图上,并且该视图没有指定WITH CHECK OPTION选项。

    l         不能指定BEFORE  AFTER选项。

    l         FOR EACH ROW子可是可选的,即INSTEAD OF触发器只能在行级上触发、或只能是行级触发器,没有必要指定。

    l         没有必要在针对一个表的视图上创建INSTEAD OF触发器,只要创建DML触发器就可以了。 

    8.2.3创建系统事件触发器

        ORACLE10G提供的系统事件触发器可以在DDL或数据库系统上被触发。DDL指的是数据定义语言,如CREATE ALTERDROP 等。而数据库系统事件包括数据库服务器的启动或关闭,用户的登录与退出、数据库服务错误等。创建系统触发器的语法如下: 

      创建触发器的一般语法是: 

    CREATE OR REPLACE TRIGGER [sachema.]trigger_name
    {BEFORE|AFTER} 
    {ddl_event_list | database_event_list}
    ON { DATABASE | [schema.]SCHEMA }
    [WHEN condition]
    PL/SQL_block | CALL procedure_name; 

    其中: ddl_event_list:一个或多个DDL 事件,事件间用 OR 分开;

               database_event_list:一个或多个数据库事件,事件间用 OR 分开; 

                系统事件触发器既可以建立在一个模式上,又可以建立在整个数据库上。当建立在模式(SCHEMA)之上时,只有模式所指定用户的DDL操作和它们所导致的错误才激活触发器默认时为当前用户模式。当建立在数据库(DATABASE)之上时,该数据库所有用户的DDL操作和他们所导致的错误,以及数据库的启动和关闭均可激活触发器。要在数据库之上建立触发器时,要求用户具有ADMINISTER DATABASE TRIGGER权限。 

      下面给出系统触发器的种类和事件出现的时机(前或后):

    事件                            允许时机                        说明

    AUDIT NOAUDITBEFOREAFTER执行AUDITNOAUDIT进行审计或停止审计之前、之后触发
    STARTUPAFTER启动数据库实例之后触发
    SHUTDOWNBEFORE关闭数据库实例之前触发(非正常关闭不触发)
    SERVERERRORAFTER数据库服务器发生错误之后触发
    LOGONAFTER成功登录连接到数据库后触发
    LOGOFFBEFORE开始断开数据库连接之前触发
    CREATEBEFOREAFTER在执行CREATE语句创建数据库对象之前、之后触发
    DROPBEFOREAFTER在执行DROP语句删除数据库对象之前、之后触发
    ALTERBEFOREAFTER在执行ALTER语句更新数据库对象之前、之后触发
    DDLBEFOREAFTER在执行大多数DDL语句之前、之后触发
    GRANTBEFOREAFTER执行GRANT语句授予权限之前、之后触发
    REVOKEBEFOREAFTER执行REVOKE语句收权限之前、之后触犯发
    RENAMEBEFOREAFTER执行RENAME语句更改数据库对象名称之前、之后触犯发

    8.2.4系统触发器事件属性 

       DML语句的列属性外,其余事件属性值可通过调用ORACLE定义的事件属性函数来读取。


    1创建触发器,存放有关事件信息。 
    DESC ora_sysevent
    DESC ora_login_user
    
    --创建用于记录事件用的表
    
    CREATE TABLE ddl_event
    (crt_date timestamp PRIMARY KEY,
     event_name VARCHAR2(20), 
     user_name VARCHAR2(10),
     obj_type VARCHAR2(20),
     obj_name VARCHAR2(20));
    
    --创建触犯发器
    CREATE OR REPLACE TRIGGER tr_ddl
    AFTER DDL ON SCHEMA
    BEGIN
       INSERT INTO ddl_event VALUES
       (systimestamp,ora_sysevent, ora_login_user, 
        ora_dict_obj_type, ora_dict_obj_name);
    END tr_ddl; 

      例2创建登录、退出触发器。 

    CREATE TABLE log_event
    (user_name VARCHAR2(10),
     address VARCHAR2(20), 
     logon_date timestamp,
     logoff_date timestamp); 
    
    --创建登录触发器
    CREATE OR REPLACE TRIGGER tr_logon
    AFTER LOGON ON DATABASE
    BEGIN
       INSERT INTO log_event (user_name, address, logon_date)
       VALUES (ora_login_user, ora_client_ip_address, systimestamp);
    END tr_logon;
    --创建退出触发器
    CREATE OR REPLACE TRIGGER tr_logoff
    BEFORE LOGOFF ON DATABASE
    BEGIN
       INSERT INTO log_event (user_name, address, logoff_date)
       VALUES (ora_login_user, ora_client_ip_address, systimestamp);
    END tr_logoff; 

    8.2.5使用触发器谓词

        ORACLE 提供三个参数INSERTING, UPDATING, DELETING 用于判断触发了哪些操作。

    谓词行为
    INSERTING如果触发语句是 INSERT 语句,则为TRUE,否则为FALSE
    UPDATING如果触发语句是 UPDATE语句,则为TRUE,否则为FALSE
    DELETING如果触发语句是 DELETE 语句,则为TRUE,否则为FALSE

    8.2.6重新编译触发器

    如果在触发器内调用其它函数或过程,当这些函数或过程被删除或修改后,触发器的状态将被标识为无效。当DML语句激活一个无效触发器时,ORACLE将重新编译触发器代码,如果编译时发现错误,这将导致DML语句执行失败。

    PL/SQL程序中可以调用ALTER TRIGGER语句重新编译已经创建的触发器,格式为:      

    ALTER TRIGGER [schema.] trigger_name COMPILE [ DEBUG] 

    其中:DEBUG 选项要器编译器生成PL/SQL 程序条使其所使用的调试代码。

    8.3 删除和使能触发器

        l         删除触发器: 
         DROP TRIGGER trigger_name;
    

            当删除其他用户模式中的触发器名称,需要具有DROP ANY TRIGGER系统权限,当删除建立在数据库上的触发器时,用户需要具有ADMINISTER DATABASE TRIGGER系统权限。

    此外,当删除表或视图时,建立在这些对象上的触发器也随之删除。

    l         禁用或启用触发器

    数据库TRIGGER 的状态:

    有效状态(ENABLE):当触发事件发生时,处于有效状态的数据库触发器TRIGGER 将被触发。

    无效状态(DISABLE):当触发事件发生时,处于无效状态的数据库触发器TRIGGER 将不会被触发,此时就跟没有这个数据库触发器(TRIGGER) 一样。

    数据库TRIGGER的这两种状态可以互相转换。格式为: 

    A    ALTER TIGGER trigger_name [DISABLE | ENABLE ];
    
    --例:ALTER TRIGGER emp_view_delete DISABLE; 
    ALTER TRIGGER语句一次只能改变一个触发器的状态,而ALTER TABLE语句则一次能够改变与指定表相关的所有触发器的使用状态。格式为: 
      ALTER TABLE [schema.]table_name {ENABLE|DISABLE} ALL TRIGGERS;
    --例:使表EMP 上的所有TRIGGER 失效:
    ALTER TABLE emp DISABLE ALL TRIGGERS;  

    8.4 触发器和数据字典

    相关数据字典:USER_TRIGGERSALL_TRIGGERSDBA_TRIGGERS 
    SELECT TRIGGER_NAME, TRIGGER_TYPE, TRIGGERING_EVENT,
     TABLE_OWNER, BASE_OBJECT_TYPE, REFERENCING_NAMES,
     STATUS, ACTION_TYPE
     FROM user_triggers;

    8.5   数据库触发器的应用举例

    1创建一个DML语句级触发器,当对emp表执行INSERT, UPDATE, DELETE 操作时,它自动更新dept_summary 表中的数据。由于在PL/SQL块中不能直接调用DDL语句,所以,利用ORACLE内置包DBMS_UTILITY中的EXEC_DDL_STATEMENT过程,由它执行DDL语句创建触发器。
    CREATE TABLE dept_summary(
     Deptno NUMBER(2),
     Sal_sum NUMBER(9, 2),
     Emp_count NUMBER); 
    
    INSERT INTO dept_summary(deptno, sal_sum, emp_count)
     SELECT deptno, SUM(sal), COUNT(*) 
    FROM emp 
    GROUP BY deptno;
    
    --创建一个PL/SQL过程disp_dept_summary
    --在触发器中调用该过程显示dept_summary标中的数据。
    CREATE OR REPLACE PROCEDURE disp_dept_summary
    IS
     Rec dept_summary%ROWTYPE;
     CURSOR c1 IS SELECT * FROM dept_summary;
    BEGIN
     OPEN c1;
     FETCH c1 INTO REC;
     DBMS_OUTPUT.PUT_LINE('deptno    sal_sum    emp_count');
     DBMS_OUTPUT.PUT_LINE('-------------------------------------');
     WHILE c1%FOUND LOOP
        DBMS_OUTPUT.PUT_LINE(RPAD(rec.deptno, 6)||
          To_char(rec.sal_sum, '$999,999.99')||
          LPAD(rec.emp_count, 13));
        FETCH c1 INTO rec;
     END LOOP;
     CLOSE c1;
    END;
    BEGIN
     DBMS_OUTPUT.PUT_LINE('插入前');
     Disp_dept_summary();
     DBMS_UTILITY.EXEC_DDL_STATEMENT('
        CREATE OR REPLACE TRIGGER trig1
          AFTER INSERT OR DELETE OR UPDATE OF sal ON emp
        BEGIN
          DBMS_OUTPUT.PUT_LINE(''正在执行trig1 触发器…'');
          DELETE FROM dept_summary;
          INSERT INTO dept_summary(deptno, sal_sum, emp_count)
          SELECT deptno, SUM(sal), COUNT(*) 
          FROM emp GROUP BY deptno;
        END;
     ');
    
    
     INSERT INTO dept(deptno, dname, loc) 
     VALUES(90, ‘demo_dept’, ‘none_loc’);
     INSERT INTO emp(ename, deptno, empno, sal)
     VALUES(USER, 90, 9999, 3000);
    
     DBMS_OUTPUT.PUT_LINE('插入后');
     Disp_dept_summary();
    
     UPDATE emp SET sal=1000 WHERE empno=9999;
     DBMS_OUTPUT.PUT_LINE('修改后');
     Disp_dept_summary();
    
     DELETE FROM emp WHERE empno=9999;
     DELETE FROM dept WHERE deptno=90;
    
     DBMS_OUTPUT.PUT_LINE('删除后');
     Disp_dept_summary(); 
     DBMS_UTILITY.EXEC_DDL_STATEMENT(‘DROP TRIGGER trig1’);
    EXCEPTION
       WHEN OTHERS THEN
          DBMS_OUTPUT.PUT_LINE(SQLCODE||'---'||SQLERRM);
    
    END; 
    2创建DML语句行级触发器。当对emp表执行INSERT, UPDATE, DELETE 操作时,它自动更新dept_summary 表中的数据。由于在PL/SQL块中不能直接调用DDL语句,所以,利用ORACLE内置包DBMS_UTILITY中的EXEC_DDL_STATEMENT过程,由它执行DDL语句创建触发器。
    BEGIN
      DBMS_OUTPUT.PUT_LINE('插入前');
      Disp_dept_summary();
      DBMS_UTILITY.EXEC_DDL_STATEMENT(
        'CREATE OR REPLACE TRIGGER trig2_update
          AFTER UPDATE OF sal ON emp
          REFERENCING OLD AS old_emp NEW AS new_emp
          FOR EACH ROW
          WHEN (old_emp.sal != new_emp.sal)
        BEGIN
          DBMS_OUTPUT.PUT_LINE(''正在执行trig2_update 触发器…'');
          DBMS_OUTPUT.PUT_LINE(''sal 旧值:''|| :old_emp.sal);
          DBMS_OUTPUT.PUT_LINE(''sal 新值:''|| :new_emp.sal);
          UPDATE dept_summary
            SET sal_sum=sal_sum + :new_emp.sal - :old_emp.sal
            WHERE deptno = :new_emp.deptno;
        END;'
      );
      
      DBMS_UTILITY.EXEC_DDL_STATEMENT(
        'CREATE OR REPLACE TRIGGER trig2_insert
          AFTER INSERT ON emp
          REFERENCING NEW AS new_emp
          FOR EACH ROW
        DECLARE
          I NUMBER;
        BEGIN
          DBMS_OUTPUT.PUT_LINE(''正在执行trig2_insert 触发器…'');
          SELECT COUNT(*) INTO I 
          FROM dept_summary WHERE deptno = :new_emp.deptno;
          IF I > 0 THEN
            UPDATE dept_summary 
            SET sal_sum=sal_sum+:new_emp.sal,
            Emp_count=emp_count+1
            WHERE deptno = :new_emp.deptno;
          ELSE
            INSERT INTO dept_summary
            VALUES (:new_emp.deptno, :new_emp.sal, 1);
          END IF;
        END;'
      );
    
      DBMS_UTILITY.EXEC_DDL_STATEMENT(
        'CREATE OR REPLACE TRIGGER trig2_delete
          AFTER DELETE ON emp
          REFERENCING OLD AS old_emp
          FOR EACH ROW
        DECLARE
          I NUMBER;
        BEGIN
          DBMS_OUTPUT.PUT_LINE(''正在执行trig2_delete 触发器…'');
          SELECT emp_count INTO I 
          FROM dept_summary WHERE deptno = :old_emp.deptno;
          IF I >1 THEN
            UPDATE dept_summary 
            SET sal_sum=sal_sum - :old_emp.sal,
            Emp_count=emp_count - 1
            WHERE deptno = :old_emp.deptno;
          ELSE
            DELETE FROM dept_summary WHERE deptno = :old_emp.deptno;
          END IF;
        END;'
      );
    
      INSERT INTO dept(deptno, dname, loc) 
        VALUES(90, 'demo_dept', 'none_loc');
      INSERT INTO emp(ename, deptno, empno, sal)
        VALUES(USER, 90, 9999, 3000);
      INSERT INTO emp(ename, deptno, empno, sal)
        VALUES(USER, 90, 9998, 2000);
      DBMS_OUTPUT.PUT_LINE('插入后');
      Disp_dept_summary();
    
      UPDATE emp SET sal = sal*1.1 WHERE deptno=90;
      DBMS_OUTPUT.PUT_LINE('修改后');
      Disp_dept_summary();
    
      DELETE FROM emp WHERE deptno=90;
      DELETE FROM dept WHERE deptno=90;
      DBMS_OUTPUT.PUT_LINE('删除后');
      Disp_dept_summary();
    
      DBMS_UTILITY.EXEC_DDL_STATEMENT('DROP TRIGGER trig2_update');
      DBMS_UTILITY.EXEC_DDL_STATEMENT('DROP TRIGGER trig2_insert');
      DBMS_UTILITY.EXEC_DDL_STATEMENT('DROP TRIGGER trig2_delete');
    EXCEPTION
       WHEN OTHERS THEN
          DBMS_OUTPUT.PUT_LINE(SQLCODE||'---'||SQLERRM);
    END; 
    3利用ORACLE提供的条件谓词INSERTINGUPDATINGDELETING创建与例2具有相同功能的触发器。
    BEGIN
        DBMS_OUTPUT.PUT_LINE('插入前');
        Disp_dept_summary();
        DBMS_UTILITY.EXEC_DDL_STATEMENT(
            'CREATE OR REPLACE TRIGGER trig2
                AFTER INSERT OR DELETE OR UPDATE OF sal
    ON emp
                REFERENCING OLD AS old_emp NEW AS new_emp
                FOR EACH ROW
            DECLARE
                I NUMBER;
            BEGIN
                IF UPDATING AND :old_emp.sal != :new_emp.sal THEN
                DBMS_OUTPUT.PUT_LINE(''正在执行trig2 触发器…'');
                    DBMS_OUTPUT.PUT_LINE(''sal 旧值:''|| :old_emp.sal);
                    DBMS_OUTPUT.PUT_LINE(''sal 新值:''|| :new_emp.sal);
                    UPDATE dept_summary
                        SET sal_sum=sal_sum + :new_emp.sal - :old_emp.sal
                    WHERE deptno = :new_emp.deptno;
                ELSIF INSERTING THEN
                    DBMS_OUTPUT.PUT_LINE(''正在执行trig2触发器…'');
                    SELECT COUNT(*) INTO I 
            FROM dept_summary 
            WHERE deptno = :new_emp.deptno;
                    IF I > 0 THEN
                        UPDATE dept_summary 
              SET sal_sum=sal_sum+:new_emp.sal,
                  Emp_count=emp_count+1
              WHERE deptno = :new_emp.deptno;
                ELSE
              INSERT INTO dept_summary
                VALUES (:new_emp.deptno, :new_emp.sal, 1);
            END IF;
          ELSE
            DBMS_OUTPUT.PUT_LINE(''正在执行trig2触发器…'');
            SELECT emp_count INTO I 
            FROM dept_summary WHERE deptno = :old_emp.deptno;
          IF I > 1 THEN
            UPDATE dept_summary 
            SET sal_sum=sal_sum - :old_emp.sal,
            Emp_count=emp_count - 1
            WHERE deptno = :old_emp.deptno;
          ELSE
              DELETE FROM dept_summary 
              WHERE deptno = :old_emp.deptno;
          END IF;
        END IF;
        END;'
      );
    
      INSERT INTO dept(deptno, dname, loc) 
        VALUES(90, 'demo_dept', 'none_loc');
      INSERT INTO emp(ename, deptno, empno, sal)
        VALUES(USER, 90, 9999, 3000);
      INSERT INTO emp(ename, deptno, empno, sal)
        VALUES(USER, 90, 9998, 2000);
      DBMS_OUTPUT.PUT_LINE('插入后');
      Disp_dept_summary();
    
      UPDATE emp SET sal = sal*1.1 WHERE deptno=90;
      DBMS_OUTPUT.PUT_LINE('修改后');
      Disp_dept_summary();
    
      DELETE FROM emp WHERE deptno=90;
      DELETE FROM dept WHERE deptno=90;
      DBMS_OUTPUT.PUT_LINE('删除后');
      Disp_dept_summary();
    
      DBMS_UTILITY.EXEC_DDL_STATEMENT('DROP TRIGGER trig2');
    EXCEPTION
       WHEN OTHERS THEN
          DBMS_OUTPUT.PUT_LINE(SQLCODE||'---'||SQLERRM);
    END; 
    4创建INSTEAD OF 触发器。首先创建一个视图myview, 由于该视图是复合查询所产生的视图,所以不能执行DML语句。根据用户对视图所插入的数据判断需要将数据插入到哪个视图基表中,然后对该基表执行插入操作。 
    DECLARE
        No NUMBER;
        Name VARCHAR2(20);
    BEGIN
        DBMS_UTILITY.EXEC_DDL_STATEMENT('
            CREATE OR REPLACE VIEW myview AS
                SELECT empno, ename, ''E'' type FROM emp
                UNION
                SELECT dept.deptno, dname, ''D'' FROM dept
        ');
        -- 创建INSTEAD OF 触发器trigger3;
        DBMS_UTILITY.EXEC_DDL_STATEMENT('
            CREATE OR REPLACE TRIGGER trig3
                INSTEAD OF INSERT ON myview
                REFERENCING NEW n
                FOR EACH ROW
            DECLARE
                Rows INTEGER;
            BEGIN
                DBMS_OUTPUT.PUT_LINE(''正在执行trig3触发器…'');
                IF :n.type = ''D'' THEN
                    SELECT COUNT(*) INTO rows
                        FROM dept WHERE deptno = :n.empno;
                    IF rows = 0 THEN
                        DBMS_OUTPUT.PUT_LINE(''向dept表中插入数据…'');
                        INSERT INTO dept(deptno, dname, loc)
                            VALUES (:n.empno, :n.ename, ''none’’);
                    ELSE
                        DBMS_OUTPUT.PUT_LINE(''编号为''|| :n.empno||
                         ''的部门已存在,插入操作失败!'');
                     END IF;
                ELSE
                    SELECT COUNT(*) INTO rows
                        FROM emp WHERE empno = :n.empno;
                    IF rows = 0 THEN
                        DBMS_OUTPUT.PUT_LINE('’向emp表中插入数据…’’);
                        INSERT INTO emp(empno, ename)
                            VALUES(:n.empno, :n.ename);
                    ELSE
                        DBMS_OUTPUT.PUT_LINE(''编号为''|| :n.empno||
                          ''的人员已存在,插入操作失败!'');
                    END IF;
                END IF;
            END;
        ');
    
        INSERT INTO myview VALUES (70, 'demo', 'D');
        INSERT INTO myview VALUES (9999, USER, 'E');
        SELECT deptno, dname INTO no, name FROM dept WHERE deptno=70;
        DBMS_OUTPUT.PUT_LINE('员工编号:'||TO_CHAR(no)||'姓名:'||name);
        SELECT empno, ename INTO no, name FROM emp WHERE empno=9999;
        DBMS_OUTPUT.PUT_LINE('部门编号:'||TO_CHAR(no)||'姓名:'||name);
      DELETE FROM emp WHERE empno=9999;
      DELETE FROM dept WHERE deptno=70;
        DBMS_UTILITY.EXEC_DDL_STATEMENT('DROP TRIGGER trig3');
    END; 

    8.6   数据库触发器的应用实例

      用户可以使用数据库触发器实现各种功能:

      l         复杂的审计功能;

      例:将EMP 表的变化情况记录到AUDIT_TABLEAUDIT_TABLE_VALUES中。 

    CREATE TABLE audit_table(
        Audit_id     NUMBER,
        User_name VARCHAR2(20),
        Now_time DATE,
        Terminal_name VARCHAR2(10),
        Table_name VARCHAR2(10),
        Action_name VARCHAR2(10),
        Emp_id NUMBER(4));
    
    CREATE TABLE audit_table_val(
        Audit_id NUMBER,
        Column_name VARCHAR2(10),
        Old_val NUMBER(7,2),
        New_val NUMBER(7,2));
    
    CREATE SEQUENCE audit_seq
        START WITH 1000
        INCREMENT BY 1
        NOMAXVALUE
        NOCYCLE NOCACHE;
    
    CREATE OR REPLACE TRIGGER audit_emp
        AFTER INSERT OR UPDATE OR DELETE ON emp
        FOR EACH ROW
    DECLARE
        Time_now DATE;
        Terminal CHAR(10);
    BEGIN 
        Time_now:=sysdate;
        Terminal:=USERENV('TERMINAL');  #从os终端The OS identifier of the current session
        IF INSERTING THEN
            INSERT INTO audit_table
        VALUES(audit_seq.NEXTVAL, user, time_now, 
               terminal, 'EMP', 'INSERT', :new.empno);
        ELSIF DELETING THEN
            INSERT INTO audit_table
        VALUES(audit_seq.NEXTVAL, user, time_now, 
               terminal, 'EMP', 'DELETE', :old.empno);
        ELSE
            INSERT INTO audit_table
        VALUES(audit_seq.NEXTVAL, user, time_now, 
               terminal, 'EMP', 'UPDATE', :old.empno);
            IF UPDATING('SAL') THEN
                INSERT INTO audit_table_val
                    VALUES(audit_seq.CURRVAL, 'SAL', :old.sal, :new.sal);
            ELSE UPDATING('DEPTNO') 
                INSERT INTO audit_table_val
                    VALUES(audit_seq.CURRVAL, 'DEPTNO', :old.deptno, :new.deptno);
            END IF;
        END IF;
    END; 

    l         增强数据的完整性管理;

      例:修改DEPT表的DEPTNO列时,同时把EMP表中相应的DEPTNO也作相应的修改; 

    CREATE SEQUENCE update_sequence 
        INCREMENT BY 1
        START WITH 1000
        MAXVALUE 5000 CYCLE;
    
    ALTER TABLE emp
        ADD update_id NUMBER;
    
    CREATE OR REPLACE PACKAGE integritypackage AS
        Updateseq NUMBER;
    END integritypackage;
    
    CREATE OR REPLACE PACKAGE BODY integritypackage AS
    END integritypackage;
    
    CREATE OR REPLACE TRIGGER dept_cascade1
        BEFORE UPDATE OF deptno ON dept
    DECLARE 
        Dummy NUMBER;
    BEGIN 
        SELECT update_sequence.NEXTVAL INTO dummy FROM dual;
        Integritypackage.updateseq:=dummy;
    END;
    
    CREATE OR REPLACE TRIGGER dept_cascade2
        AFTER DELETE OR UPDATE OF deptno ON dept
        FOR EACH ROW
    BEGIN
        IF UPDATING THEN
            UPDATE emp SET deptno=:new.deptno, 
         update_id=integritypackage.updateseq
            WHERE emp.deptno=:old.deptno AND update_id IS NULL;
        END IF;
        IF DELETING THEN
            DELETE FROM emp
                WHERE emp.deptno=:old.deptno;
        END IF;
    END;
    
    CREATE OR REPLACE TRIGGER dept_cascade3
        AFTER UPDATE OF deptno ON dept 
    BEGIN
        UPDATE emp SET update_id=NULL
            WHERE update_id=integritypackage.updateseq;
    END;
    
    SELECT * FROM EMP ORDER BY DEPTNO;
    UPDATE dept SET deptno=25 WHERE deptno=20; 

    l         帮助实现安全控制;

      例:保证对EMP表的修改仅在工作日的工作时间; 

    CREATE TABLE company_holidays(day DATE);
    
    INSERT INTO company_holidays 
        VALUES(sysdate);
    INSERT INTO company_holidays 
    VALUES(TO_DATE('21-10月-01', 'DD-MON-YY'));
    
    CREATE OR REPLACE TRIGGER emp_permit_change
        BEFORE INSERT OR DELETE OR UPDATE ON emp
    DECLARE
        Dummy NUMBER;
        Not_on_weekends EXCEPTION;
        Not_on_holidays EXCEPTION;
        Not_working_hours EXCEPTION;
    BEGIN
        /* check for weekends */
    IF TO_CHAR(SYSDATE, 'DAY') IN ('星期六', '星期日') THEN
        RAISE not_on_weekends;
    END IF;
        /* check for company holidays */
    SELECT COUNT(*) INTO dummy FROM company_holidays
        WHERE TRUNC(day)=TRUNC(SYSDATE);
    IF dummy >0 THEN
        RAISE not_on_holidays;
    END IF;
        /* check for work hours(8:00 AM to 18:00 PM */
    IF (TO_CHAR(SYSDATE,'HH24')<8 OR TO_CHAR(SYSDATE, 'HH24')>18) THEN
      RAISE not_working_hours;
    END IF;
    EXCEPTION
      WHEN not_on_weekends THEN
        RAISE_APPLICATION_ERROR(-20324, 
    'May not change employee table during the weekends'); 
      WHEN not_on_holidays THEN
        RAISE_APPLICATION_ERROR(-20325, 
    'May not change employee table during a holiday'); 
      WHEN not_working_hours THEN
        RAISE_APPLICATION_ERROR(-20326, 
    'May not change employee table during no_working hours'); 
    END; 

    l         管理复杂的表复制;

    l         防止非法的事务发生;

    l         自动生成派生的列值;

    帮助式显复杂的商业管理

    转载:RDIFramework.NET 



















    展开全文
  • Oracle触发器(trigger):一般用法

    万次阅读 2013-06-27 11:10:37
    trigger和procedure,function类似,只不过它不能被显示调用,只能被某个事件触发然后oracle自动去调用.常用的一般是针对一个表或视图创建一个trigger,然后对表或视图做某些操作时触发trigger.当然除此之外还有,schema,...

    trigger和procedure,function类似,只不过它不能被显示调用,只能被某个事件触发然后oracle自动去调用.常用的一般是针对一个表或视图创建一个trigger,然后对表或视图做某些操作时触发trigger.当然除此之外还有,schema,database级别的trigger.

     

    什么样的操作触发trigger

    常见的是DML(insert,update,delete) , DDL(create,alter,drop)语句.

    不常见的是schema级别trigger在session连接或断开时触发.database级别trigger在系统启动或退出时触发.

    你可能很容易发现如果是select查询操作就没法用到trigger,而有时可能我们想监测谁查看了一些敏感信息,此时只能用到一个叫FGA的东东,可以创建一个审计策略(可以看成加强版的trigger,FGA介绍详见:http://blog.csdn.net/weiwenhp/article/details/7165660)

     

     

    使用触发器注意事项

    1.触发器不接受参数,一个表最多可有12个触发器(触发器类型刚好是12种),并且同一时间,同一事件,同一类型的触发器只能有一个(保证触发器操作不冲突嘛).

    2.触发器最大为32KB,由于大小受到限制自然也不能使用long,blob这样的大变量.如果实在是有复杂的逻辑,要弄个很复杂的触发器,可以通过procedure或function实现一部分功能,然后调用

    3.因为触发器实际上可以看作触发语句的一部分.所以得遵循一些约束条件,比如不能有事务控制语句(commit,rollback,savepoint),DDL语句.为啥子呢,这些特殊语句与一般sql语句的最主要区别是涉及到commit的问题.所以如果触发语句只是一般语句的话自然不能因为trigger的操作带有commit这样的特性了.

     

    创建触发器

    针对表或视图的触发器格式如下:

     

    CREATE [OR REPLACE] TRIGGER trigger_name

    {BEFORE | AFTER }

    {INSERT | DELETE | UPDATE [OF column [, column …]]}

    [OR {INSERT | DELETE | UPDATE [OF column [, column …]]}...]

    ON [schema.]table_name | [schema.]view_name

    [REFERENCING {OLD [AS] old | NEW [AS] new| PARENT as parent}]

    [FOR EACH ROW ]

    [WHEN condition]

    PL/SQL_BLOCK | CALL procedure_name;

     

    先来看一个简单的,statement级别的trigger怎么创建.假如有表tb1,每insert一点就通过trigger在tblog中记录一些信息.

    create or replace trigger tb1_trigger

    after insert on tb1

    referencing new as new old as old

     

    declare

    v_info varchar2(100);

    begin

    v_info := "do a insert";

    insert into tblog(info) values(v_info);

    end;

     

    trigger的创建中有个不太容易理解的内容:一针对row级别的trigger旧值新值问题

    row级别trigger旧值新值

    针对一个表或视图创建trigger时分为statement级别与row级别的trigger.所谓statement级别是说一个sql语句触发一次trigger,而如果是row级别则一个sql语句涉及到多行数据则trigger会被触发多次.

    而旧值就是指要更改的那一行数据在被改之前的值,新值就是用户更新后值.假如表tt只有一列一行数据:88.然后用户执行语句update tt set id = 99 where id = 88;

    则旧值指88,新值指99.那你们可能会问用什么方式去得到旧值或新值啊.来举例看下

    假如有表tb(eno int); 和表tblog( info varchar2(100)); 假如在tb上创建trigger,tb每update一次则在tblog中记录旧值就更改后的新值.

     

    CREATE OR REPLACE TRIGGER tb_trigger

    BEFORE UPDATE

    ON tb

    REFERENCING NEW AS new_val OLD AS old_val  --在这里设置名字,然后可引用新值,旧值.如果不指定默认值为new ,old.可以通过:new或:old去引用

    FOR EACH ROW

    DECLARE

    v_info varchar2(100);

    BEGIN

    v_info := 'old value:' ||to_char( :old_val.eno) || 'new value:' || to_char(:new_val.eno);

    insert into tblog values(v_info);

    END;

     

     

    条件判断

    假如只有在涉及到某一行的操作时触发trigger,假如该触发器是针对updat,delete,insert都触发的情形.咋整呢,自然是多用些when去判断啊.

    例如

    CREATE OR REPLACE TRIGGER tb_trigger

    BEFORE UPDATE or insert or delete

    ON tb

    REFERENCING NEW AS new_val OLD AS old_val --在这里设置名字,然后可引用新值,旧值

    FOR EACH ROW

    when (old_val.eno = 99)

    DECLARE

    v_info varchar2(100);

    BEGIN

     

    case

    when updating then

    v_info := 'old value:' ||to_char( :old_val.eno) || 'new value:' || to_char(:new_val.eno);

    insert into tblog values(v_info);

     

    when inserting then

    null;

     

    when deleting then

    null;

     

    end case;

    END;

     

     

    展开全文
  • 如何加速Oracle大批量数据处理

    万次阅读 2010-01-12 14:57:00
    如何加速Oracle大批量数据处理一、 提高DML操作的办法:简单说来:1、暂停索引,更新后恢复.避免在更新的过程中涉及到索引的重建.2、批量更新,每更新一些记录后及时进行提交动作.避免大量占用回滚段和或临时表...
  • 给指定的一批表自动加DML触发器

    千次阅读 2013-04-08 17:16:09
    为了跟踪一批表的操作记录,需要对该批表做触发器进行跟踪(没有用审计,因为审计需要有SYS权限),通过一个一个表写触发器,显然不太现实, Oracle又不支持同时对多个表建立一个触发器.这里我就用存储过程的方式实现自动...
  • ORACLE临时表总结[好处,何时用]

    千次阅读 2013-12-26 14:05:32
    ORACLE临时表总结 2013-08-27 20:23 by 潇湘隐者 临时表概念  临时表就是用来暂时保存临时数据(亦或叫中间数据)的一个数据库对象,它和普通表有些类似,然而又有很大区别。它只能存储在临时表空间,而非...
  • -----第一个触发器 CREATE OR REPLACE TRIGGER tri_id_seq_do_386_action--车险政策主表状态修改时关联修改子表状态 AFTER UPDATE ON do_table_386 FOR EACH ROW DECLARE BEGIN  UPDATE do_table_388 SET...
  • Oracle期末保命宝典

    千次阅读 2020-07-02 18:10:13
    Oracle 12c对系统硬件配置要求中,物理内存建议( )以上。 2gb Oracle 12c数据库服务的启动需要启动( )、( )两种 OracleServiceORCL:数据库主服务、OracleOraDB12Home1TNSListener:数据库监听服务 ...
  • Oracle 不能删除存储过程的处理

    千次阅读 2016-12-14 18:44:12
    今天开发找我说一个存储过程删除不了,以前写过一篇blog:Oracle DML和DDL锁的解决方法, 问题来了,kill session不行,只有kill 进程,kill一个又会产生一个,感觉无穷尽。  问了下开发,这个存储过程调用非常频繁...
  • Oracle DB审计

    千次阅读 2013-10-04 22:21:13
    • 说明DBA 负责的安全和审计工作 • 启用标准数据库审计 • 指定审计选项 • 复查审计信息 • 维护审计线索 责任分离 • 具有DBA 权限的用户必须是可信任的。 – 滥用信任 – 用审计线索保护受...以下是
  • 触发器中获取SQL语句的方法

    千次阅读 2018-09-03 00:38:38
    转自:http://www.examda.com/oracle/jishu/20071011/101133971.html从Oracle9i开始,Oracle增加了在触发器中获取触发语句的功能。 9i开始,在系统定义事件属性中,增加了ORA_SQL_TXT属性,可以返回触发触发器的SQL...
  • v$lockv和$locked_object的区别

    千次阅读 2017-03-15 12:12:54
    v$lockv和$locked_object的区别 ... 一、引言 ... 工作中有次修改表sj_affair中的数据,需要禁用该表上的触发器。结果无法禁用,报如下错误: ORA-00054: resource busy and acquire with NOWAIT sp
  • oracle before触发器

    千次阅读 2012-05-05 15:42:44
    //我们是用before触发器还是用after触发器呢? //交换数据,应该是发生在insert之后,所以用after触发器: //但是,当我建立好after触发器之后执行,却出现下面的错误提示: //ORA-04084: cannot cha
  • ORACLE数据库除了可以保存永久表外,还可以建立临时表temporary tables。这些临时表用来保存一个会话SESSION的数据,或者保存在一个事务中需要的数据。当会话退出或者用户提交commit和回滚rollback事务的时候,临时...
  • ORACLE 常见面试题

    万次阅读 2010-11-30 08:50:00
    --ORACLE 常见面试题 . 解释冷备份和热备份的不同点以及各自的优点   解答:热备份针对归档模式的数据库,在数据库仍旧处于工作状态时进行备份。而冷备份指在数据库关闭后,进行备份,适用于所有...
  • Oracle 临时表

    千次阅读 2017-12-06 09:29:38
    临时表说明 Oracle Database temporary tables hold data that exists only for the duration of a transaction or session. Data in a temporary table is private to the session, which means that
  • Oracle DML语句概述

    千次阅读 2011-07-27 10:15:41
    DML语句包括: SELECT INSERT UPDATE DELETE MERGE DML语句错误的原因:1、语法错误2、引用不存在的对象和列3、访问权限问题4、违反约束条件5、空间问题 控制事务一个事务包含一个或多个DML语句,以ROLLBACK或...
  • GoldenGate安装说明

    万次阅读 2011-11-28 10:56:11
    前两天给自己放了一个假,顺便把两颗智齿给拔了,精简一下机构,免得那几个家伙干活不出力反倒乱折腾。话说,好大的两颗牙……  学习要懂得从浩瀚的海洋中提取有用的东西,否则就会游得精疲力尽。...
  • pl/sql是oracle在标准sql语言上的扩展。pl/sql不仅允许嵌入sql语言,还可以定义变量和常量,允许使用条件语句和循环语句,允许使用另外处理各种错误,功能强大。 为什么学pl/sql 优点: 1.提高应用程序的...
1 2 3 4 5 ... 20
收藏数 5,980
精华内容 2,392
关键字:

dml触发器 oracle 记录session