department.trg

OReilly Oracle PL SQL Programming第4版源代码

CREATE OR REPLACE TRIGGER DEPARTMENT_bir
  BEFORE INSERT ON DEPARTMENT
  FOR EACH ROW
DECLARE
BEGIN
   IF :NEW.DEPARTMENT_ID IS NULL
   THEN
      :NEW.DEPARTMENT_ID := DEPARTMENT_CP.next_key;
   END IF;
  :new.CREATED_ON := SYSDATE;
  :new.CREATED_BY := USER;
  :new.CHANGED_ON := SYSDATE;
  :new.CHANGED_BY := USER;
END DEPARTMENT_bir;
/

CREATE OR REPLACE TRIGGER DEPARTMENT_bur
  BEFORE UPDATE ON DEPARTMENT
  FOR EACH ROW
DECLARE
BEGIN
  :new.CHANGED_ON := SYSDATE;
  :new.CHANGED_BY := USER;
END DEPARTMENT_bur;
/