在Oracle中用于数据备份的触发器及表结构

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 prgamd
(
code varchar2(20),
fty varchar2(20)
)

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;

insert into prgamd 
values('x','x');
select * from AUD_PRGAMD1 
select * from prgamd;
 
update prgamd set code='m1' where fty='x';
commit;