-- ------------------------------------------------------------- 
-- Automatisch von ER2SQL 3.38 erzeugter File. 
-- Funktion: SQL-Code fuer Oracle 7/8 
-- Erzeugungsdatum : Sat Jan 31 23:34:54 2004 
-- 
-- ------------------------------------------------------------- 
-- Copyright (C) 1995-2004 by Joerg Hoppe, Goettingen, Germany.
-- email: j_hoppe@t-online.de 
-- ------------------------------------------------------------- 



CREATE OR REPLACE TRIGGER ti_DEPTS
    INSTEAD OF INSERT ON vt_DEPTS FOR EACH ROW
BEGIN
  DECLARE
    p_REGIONAL_GROUP	VARCHAR2(20) ;
    p_DEPARTMENT_NAME	VARCHAR2(14) ;
    p_street	VARCHAR2(40) ;
    p_CITY	VARCHAR2(30) ;
    p_STATE	VARCHAR2(2) ;
    p_ZIP_CODE	VARCHAR2(9) ;
  BEGIN
    /* Jeden Inputparameter ':new.*' in die Variable 'p_*' umkopieren, */
    /* da die procedure ihre Parameter aendern kann */
    p_REGIONAL_GROUP	:= :new.REGIONAL_GROUP ;
    p_DEPARTMENT_NAME	:= :new.DEPARTMENT_NAME ;
    p_street	:= :new.street ;
    p_CITY	:= :new.CITY ;
    p_STATE	:= :new.STATE ;
    p_ZIP_CODE	:= :new.ZIP_CODE ;

    pi_DEPTS (
        p_REGIONAL_GROUP,
        p_DEPARTMENT_NAME,
        p_street,
        p_CITY,
        p_STATE,
        p_ZIP_CODE ) ;
  END ;
END ;
/

show errors ;

CREATE OR REPLACE TRIGGER tu_DEPTS
    INSTEAD OF UPDATE ON vt_DEPTS FOR EACH ROW
BEGIN
  DECLARE
    p_REGIONAL_GROUP	VARCHAR2(20) ;
    p_DEPARTMENT_NAME	VARCHAR2(14) ;
    p_street	VARCHAR2(40) ;
    p_CITY	VARCHAR2(30) ;
    p_STATE	VARCHAR2(2) ;
    p_ZIP_CODE	VARCHAR2(9) ;
  BEGIN
    /* Jeden Inputparameter ':new.*' in die Variable 'p_*' umkopieren, */
    /* da die procedure ihre Parameter aendern kann */
    p_REGIONAL_GROUP	:= :new.REGIONAL_GROUP ;
    p_DEPARTMENT_NAME	:= :new.DEPARTMENT_NAME ;
    p_street	:= :new.street ;
    p_CITY	:= :new.CITY ;
    p_STATE	:= :new.STATE ;
    p_ZIP_CODE	:= :new.ZIP_CODE ;

    pu_DEPTS (
        p_REGIONAL_GROUP,
        p_DEPARTMENT_NAME,
        p_street,
        p_CITY,
        p_STATE,
        p_ZIP_CODE ) ;
  END ;
END ;
/

show errors ;

CREATE OR REPLACE TRIGGER td_DEPTS
    INSTEAD OF DELETE ON vt_DEPTS FOR EACH ROW
BEGIN
  DECLARE
    p_REGIONAL_GROUP	VARCHAR2(20) ;
    p_DEPARTMENT_NAME	VARCHAR2(14) ;
    p_street	VARCHAR2(40) ;
    p_CITY	VARCHAR2(30) ;
    p_STATE	VARCHAR2(2) ;
    p_ZIP_CODE	VARCHAR2(9) ;
  BEGIN
    /* Jeden Inputparameter ':old.*' in die Variable 'p_*' umkopieren, */
    /* da die procedure ihre Parameter aendern kann */
    p_REGIONAL_GROUP	:= :old.REGIONAL_GROUP ;
    p_DEPARTMENT_NAME	:= :old.DEPARTMENT_NAME ;
    p_street	:= :old.street ;
    p_CITY	:= :old.CITY ;
    p_STATE	:= :old.STATE ;
    p_ZIP_CODE	:= :old.ZIP_CODE ;

    pd_DEPTS (
        p_REGIONAL_GROUP,
        p_DEPARTMENT_NAME,
        p_street,
        p_CITY,
        p_STATE,
        p_ZIP_CODE ) ;
  END ;
END ;
/

show errors ;