5.40.txt

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

CREATE OR REPLACE TRIGGER tr_sal_change
AFTER UPDATE OF sal ON employee FOR EACH ROW
WHEN (old.postno='004')
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;