ORACLE语句级触发器的实现

create table test_dml(
rec_id int,
rec_test varchar2(20),
rec_test1 varchar2(20)  
);
create table test_trigger (
options  varchar2(30),
times  date
);

CREATE OR REPLACE TRIGGER TRI_TEST
  BEFORE INSERT OR UPDATE OR DELETE ON TEST_DML
DECLARE
  VAR_TAG VARCHAR2(20);
BEGIN
  IF INSERTING THEN
    VAR_TAG := '插入';
  ELSIF UPDATING THEN
    VAR_TAG := '修改';
  ELSIF DELETING THEN
    VAR_TAG := '删除';
  END IF;
  INSERT INTO TEST_TRIGGER (OPTIONS, TIMES) VALUES (VAR_TAG, SYSDATE);
END TRI_TEST;

INSERT INTO TEST_DML (REC_ID, REC_TEST) VALUES (1, '插入一条语句');
UPDATE TEST_DML T SET T.REC_ID = 2 WHERE T.REC_ID = 1;
DELETE TEST_DML T WHERE T.REC_ID = 2;
COMMIT;

select * from  TEST_TRIGGER t;

CREATE OR REPLACE TRIGGER TRI_TEST
  BEFORE UPDATE ON TEST_DML
DECLARE
  VAR_TAG VARCHAR2(20);
BEGIN
  IF UPDATING('REC_ID') THEN
    VAR_TAG := '修改REC_ID字段';
  ELSIF UPDATING('REC_TEST') THEN
    VAR_TAG := '修改REC_TEST字段';
   ELSE
    VAR_TAG := '修改其他字段';
  END IF;
  INSERT INTO TEST_TRIGGER (OPTIONS, TIMES) VALUES (VAR_TAG, SYSDATE);
END TRI_TEST;

UPDATE TEST_DML T SET T.REC_ID = 2 WHERE T.REC_ID = 1;
UPDATE TEST_DML T SET T.REC_TEST = 'REC_TEST字段' ;
UPDATE TEST_DML T SET T.REC_TEST1 = '其他字段' ;
COMMIT;

select * from  TEST_TRIGGER t order by times desc;