5.39.txt

来自「delphi renyuanguanlixinxioxitong」· 文本 代码 · 共 28 行

CREATE TABLE audit_emp_change(
  name VARCHAR2(10), --员工姓名
  oldsal NUMBER(6,2),--旧工资
  newsal NUMBER(6,2),--新工资
  time DATE)         --更新工资时间
/
CREATE OR REPLACE TRIGGER tr_sal_change
AFTER UPDATE OF sal ON employee FOR EACH ROW
DECLARE
  v_temp INT;
BEGIN
  SELECT count(*) INTO v_temp FROM audit_emp_change 
  WHERE name=:old.employeename;
  IF v_temp=0 then
    INSERT INTO audit_emp_change 
    VALUES(:old.employeename,:old.sal,:new.sal,sysdate);
  ELSE
    UPDATE audit_emp_change 
    SET oldsal=:old.sal,newsal=:new.sal,time=sysdate 
    WHERE name=:old.employeename;
  END IF;
END tr_sal_change;  
/
update employee set sal=sal*1.1 where departmentno='008';
select * from audit_emp_change;