在Oracle數據庫中，用於數據備份的觸發器及表結構

對當前的數據表的插入、刪除、更新等進行記錄，並把操作日期、操作者、原來數據、現在數據都作爲備份，以便於在當前備出現問題的時候能夠給以恢愎。
當然，最好就是把備份表放在不同的磁盤上不同的數據庫中：
1、建立用於數據備份及操作記錄的表：

CREATE TABLE AUD_PRGAMD1(
W_ROWID VARCHAR2(50), --行ID
W_ACTION VARCHAR2(1), --操作
DTTM     DATE, --操作日期
OPUSER VARCHAR2(30), --操作者
B$CODE VARCHAR2(10), --原表中的CODE
A$CODE VARCHAR2(10), --現表中的CODE
B$FTY VARCHAR2(1), --原表中的FTY
A$FTY VARCHAR2(1) –現表中的FTY
);

CREATE TABLE AUD_PRGAMD1(
W_ROWID VARCHAR2(50), --行ID
W_ACTION VARCHAR2(1), --操作
DTTM     DATE, --操作日期
OPUSER VARCHAR2(30), --操作者
B$CODE VARCHAR2(10), --原表中的CODE
A$CODE VARCHAR2(10), --現表中的CODE
B$FTY VARCHAR2(1), --原表中的FTY
A$FTY VARCHAR2(1) –現表中的FTY
);

2、建立實際數據表：

create table prgamd
(
code varchar2(20),
fty varchar2(20)
)

create table prgamd
(
code varchar2(20),
fty varchar2(20)
)

2、創建自動備份觸發器：

CREATE or replace TRIGGER AUD_PRGAMD_TRIGGER
AFTER INSERT OR UPDATE OR DELETE
ON PRGAMD
FOR EACH ROW
DECLARE
V_ROWID VARCHAR2(50);
V_ACTION VARCHAR2(1);
V_OPUSER VARCHAR(30):='UNKNOW';
BEGIN
IF INSERTING THEN
   V_ROWID:=:NEW.ROWID;
   V_ACTION:='I';

 ELSIF UPDATING THEN
   V_ROWID:=:NEW.ROWID;
   V_ACTION:='U';

 ELSIF DELETING THEN
   V_ROWID:=:OLD.ROWID;
   V_ACTION:='D';
END IF;
V_OPUSER:=USER;
INSERT INTO AUD_PRGAMD1(
W_ROWID,
W_ACTION,
DTTM,
OPUSER,
B$CODE,
B$FTY,
A$CODE,
A$FTY
)
VALUES(
V_ROWID,
V_ACTION,
SYSDATE,
V_OPUSER,
:OLD.CODE,
:OLD.FTY,
:NEW.CODE,
:NEW.FTY
);

END;

CREATE or replace TRIGGER AUD_PRGAMD_TRIGGER
AFTER INSERT OR UPDATE OR DELETE
ON PRGAMD
FOR EACH ROW
DECLARE
V_ROWID VARCHAR2(50);
V_ACTION VARCHAR2(1);
V_OPUSER VARCHAR(30):='UNKNOW';
BEGIN
IF INSERTING THEN
   V_ROWID:=:NEW.ROWID;
   V_ACTION:='I';
   
 ELSIF UPDATING THEN
   V_ROWID:=:NEW.ROWID; 
   V_ACTION:='U';
   
 ELSIF DELETING THEN
   V_ROWID:=:OLD.ROWID; 
   V_ACTION:='D';   
END IF;
V_OPUSER:=USER;
INSERT INTO AUD_PRGAMD1(
W_ROWID,
W_ACTION,
DTTM,
OPUSER,
B$CODE,
B$FTY,
A$CODE,
A$FTY
)
VALUES(
V_ROWID,
V_ACTION,
SYSDATE,
V_OPUSER,
:OLD.CODE,
:OLD.FTY,
:NEW.CODE,
:NEW.FTY
);
 
END;

注：上面的OLD表示被操作表中原來的數據指向，NEW表示被操作表中現在的數據指向
3、操作測試:

insert into prgamd
values('x','x');
select * from AUD_PRGAMD1
select * from prgamd;

update prgamd set code='m1' where fty='x';
commit;