Thought of Genius

Oracle資料庫的DML觸發程式是由DML敘述所激發，而敘述的類型決定了DML觸發程式的類型。它可以針對INSERT、UPDATE、DELETE操作定義，也可以在所有的資料列或特定的資料列起作用。敘述層次的觸發程式使用WHEN子句，來評定是否有發生特定類型的改變。在觸發程式內，你可以使用 :old 或 :new的繫結變數，來存取目前被處理的資料。PL/SQL編譯器會把它當成由類型組成的紀錄： triggering_table%ROWTYPE ，定義此觸發程式的表格。使用方式為 :old.field 或 :new.field。它也提供三個布林函數可以判定操作類型，分別為INSERTING、UPDATING、DELETING，當敘述符合時，它就是TRUE；否則就是FALSE。

<br />-- Create actual tble and trace table<br />CREATE TABLE REPORT (<br /> REPORTNO NUMBER(10) NOT NULL,<br /> REGDATE DATE NOT NULL,<br /> NOTE VARCHAR2(1024)<br />);<br />CREATE TABLE REPORT_TRACE (<br /> ACTION VARCHAR2(6) NOT NULL,<br /> ACTIONTIME DATE NOT NULL,<br /> REPORTNO NUMBER(10) NOT NULL,<br /> REGDATE DATE NOT NULL,<br /> NOTE VARCHAR2(1024)<br />);<br /><br />-- Create trigger to audit<br />CREATE OR REPLACE TRIGGER TR_REPORT<br />AFTER INSERT OR UPDATE OR DELETE ON REPORT<br />FOR EACH ROW <br />WHEN (new.REPORTNO > 1000 OR old.REPORTNO > 1000)<br />BEGIN<br /> IF INSERTING THEN<br /> INSERT INTO REPORT_TRACE VALUES('INSERT', SYSDATE, :new.REPORTNO, :new.REGDATE, :new.NOTE);<br /> ELSIF UPDATING THEN<br /> INSERT INTO REPORT_TRACE VALUES('UPDATE', SYSDATE, :new.REPORTNO, :new.REGDATE, :new.NOTE);<br /> ELSIF DELETING THEN<br /> INSERT INTO REPORT_TRACE VALUES('DELETE', SYSDATE, :old.REPORTNO, :old.REGDATE, :old.NOTE);<br /> END IF;<br />END;<br />/<br /><br />-- Input data<br />INSERT INTO REPORT VALUES(100, sysdate, 'frist record');<br />INSERT INTO REPORT VALUES(1501, sysdate, 'second record');<br />UPDATE REPORT SET NOTE = 'frist record update' WHERE REPORTNO = 100;<br />UPDATE REPORT SET NOTE = 'second record update' WHERE REPORTNO = 1501;<br />DELETE REPORT WHERE REPORTNO IN (100, 1501);<br />COMMIT;<br /><br />-- Query data<br />SELECT * FROM REPORT;<br />SELECT * FROM REPORT_TRACE;<br /><br />-- Drop table<br />DROP TABLE REPORT CASCADE CONSTRAINTS;<br />DROP TABLE REPORT_TRACE CASCADE CONSTRAINTS;<br />