CREATE SEQUENCE DICHT_SEQ 
 INCREMENT BY 1 
 START WITH 1 
 NOMAXVALUE
;
CREATE SEQUENCE DRA_SEQ 
 INCREMENT BY 1 
 START WITH 1 
 NOMAXVALUE
;
CREATE SEQUENCE ENGA_SEQ 
 INCREMENT BY 1 
 START WITH 1 
 NOMAXVALUE
;
CREATE SEQUENCE INS_SEQ 
 INCREMENT BY 1 
 START WITH 1 
 NOMAXVALUE
;
CREATE SEQUENCE ROL_SEQ 
 INCREMENT BY 1 
 START WITH 1 
 NOMAXVALUE
;
CREATE SEQUENCE SCHAU_SEQ 
 INCREMENT BY 1 
 START WITH 1 
 NOMAXVALUE
;
CREATE SEQUENCE TAG_SEQ 
 INCREMENT BY 1 
 START WITH 1 
 NOMAXVALUE
;
CREATE SEQUENCE THEA_SEQ 
 INCREMENT BY 1 
 START WITH 1 
 NOMAXVALUE
;
CREATE SEQUENCE ZEIT_SEQ 
 INCREMENT BY 1 
 START WITH 1 
 NOMAXVALUE
;

CREATE TABLE Dichter (
       Dichter_ID           INTEGER NOT NULL,
       Nachname             VARCHAR2(20) NULL,
       Geburtsort           VARCHAR2(20) NULL,
       Geburtsjahr          INTEGER NULL,
       Vorname              VARCHAR2(20) NULL
);


ALTER TABLE Dichter
       ADD PRIMARY KEY (Dichter_ID);


CREATE TABLE Dramen (
       Dramen_ID            INTEGER NOT NULL,
       Titel                VARCHAR2(40) NULL,
       Ort                  VARCHAR2(20) NULL,
       Urauffuehrung        DATE NULL,
       Dichter_ID           INTEGER NOT NULL
);


ALTER TABLE Dramen
       ADD PRIMARY KEY (Dramen_ID);


CREATE TABLE Engagements (
       Engagements_ID       INTEGER NOT NULL,
       Dauer                INTEGER NULL,
       Schauspieler_ID      INTEGER NOT NULL,
       Theater_ID           INTEGER NOT NULL,
       Spielzeiten_ID       INTEGER NOT NULL
);


ALTER TABLE Engagements
       ADD PRIMARY KEY (Engagements_ID);


CREATE TABLE Inszenierung (
       Inszenierung_ID      INTEGER NOT NULL,
       Spielzeiten_ID       INTEGER NOT NULL,
       Dramen_ID            INTEGER NOT NULL,
       Theater_ID           INTEGER NOT NULL
);


ALTER TABLE Inszenierung
       ADD PRIMARY KEY (Inszenierung_ID);


CREATE TABLE Rollen (
       Rollen_ID            INTEGER NOT NULL,
       Typ                  VARCHAR2(20) NULL
                                   CHECK (Typ IN ('Narr', 'Held')),
       Inszenierung_ID      INTEGER NOT NULL,
       Figur                VARCHAR2(20) NULL
);


ALTER TABLE Rollen
       ADD PRIMARY KEY (Rollen_ID);


CREATE TABLE Schauspieler (
       Schauspieler_ID      INTEGER NOT NULL,
       Nachname             VARCHAR2(20) NULL,
       Wohnort              VARCHAR2(20) NULL,
       Vorname              VARCHAR2(20) NULL
);

CREATE INDEX SK ON Schauspieler
(
       Nachname                       ASC
);


ALTER TABLE Schauspieler
       ADD PRIMARY KEY (Schauspieler_ID);


CREATE TABLE Schauspieler_Rollen (
       Schauspieler_ID      INTEGER NOT NULL,
       Rollen_ID            INTEGER NOT NULL,
       Erst_Zweit_Besetzung VARCHAR2(20) NULL
);


ALTER TABLE Schauspieler_Rollen
       ADD PRIMARY KEY (Schauspieler_ID, Rollen_ID);


CREATE TABLE Spieltag (
       Spieltag_ID          INTEGER NOT NULL,
       Datum                DATE NULL,
       Uhrzeit              VARCHAR2(40) NULL,
       Inszenierung_ID      INTEGER NOT NULL
);


ALTER TABLE Spieltag
       ADD PRIMARY KEY (Spieltag_ID);


CREATE TABLE Spielzeiten (
       Spielzeiten_ID       INTEGER NOT NULL,
       Saison               VARCHAR2(20) NULL,
       Jahr                 INTEGER NULL,
       Dauer                INTEGER NULL
);


ALTER TABLE Spielzeiten
       ADD PRIMARY KEY (Spielzeiten_ID);


CREATE TABLE Theater (
       Theater_ID           INTEGER NOT NULL,
       Name                 VARCHAR2(20) NULL,
       Ort                  VARCHAR2(20) NULL,
       Sparte               VARCHAR2(20) NULL
                                   CHECK (Sparte IN ('Schauspiel', 'Komödie'))
);


ALTER TABLE Theater
       ADD PRIMARY KEY (Theater_ID);


ALTER TABLE Dramen
       ADD FOREIGN KEY (Dichter_ID)
                             REFERENCES Dichter  (Dichter_ID);


ALTER TABLE Engagements
       ADD FOREIGN KEY (Spielzeiten_ID)
                             REFERENCES Spielzeiten  (Spielzeiten_ID);


ALTER TABLE Engagements
       ADD FOREIGN KEY (Theater_ID)
                             REFERENCES Theater  (Theater_ID);


ALTER TABLE Engagements
       ADD FOREIGN KEY (Schauspieler_ID)
                             REFERENCES Schauspieler  (
              Schauspieler_ID);


ALTER TABLE Inszenierung
       ADD FOREIGN KEY (Theater_ID)
                             REFERENCES Theater  (Theater_ID);


ALTER TABLE Inszenierung
       ADD FOREIGN KEY (Dramen_ID)
                             REFERENCES Dramen  (Dramen_ID);


ALTER TABLE Inszenierung
       ADD FOREIGN KEY (Spielzeiten_ID)
                             REFERENCES Spielzeiten  (Spielzeiten_ID);


ALTER TABLE Rollen
       ADD FOREIGN KEY (Inszenierung_ID)
                             REFERENCES Inszenierung  (
              Inszenierung_ID);


ALTER TABLE Schauspieler_Rollen
       ADD FOREIGN KEY (Rollen_ID)
                             REFERENCES Rollen  (Rollen_ID);


ALTER TABLE Schauspieler_Rollen
       ADD FOREIGN KEY (Schauspieler_ID)
                             REFERENCES Schauspieler  (
              Schauspieler_ID);


ALTER TABLE Spieltag
       ADD FOREIGN KEY (Inszenierung_ID)
                             REFERENCES Inszenierung  (
              Inszenierung_ID);




create or replace trigger tD_Dichter after DELETE on Dichter for each row
-- ERwin Builtin Thu Dec 10 14:36:35 2009
-- DELETE trigger on Dichter 
declare numrows INTEGER;
begin
    /* ERwin Builtin Thu Dec 10 14:36:35 2009 */
    /* Dichter schreibt Dramen ON PARENT DELETE RESTRICT */
    /* ERWIN_RELATION:PARENT_OWNER="", PARENT_TABLE="Dichter"
    CHILD_OWNER="", CHILD_TABLE="Dramen"
    P2C_VERB_PHRASE="schreibt", C2P_VERB_PHRASE="wird geschrieben", 
    FK_CONSTRAINT="schreibt", FK_COLUMNS="Dichter_ID" */
    select count(*) into numrows
      from Dramen
      where
        /*  %JoinFKPK(Dramen,:%Old," = "," and") */
        Dramen.Dichter_ID = :old.Dichter_ID;
    if (numrows > 0)
    then
      raise_application_error(
        -20001,
        'Cannot DELETE Dichter because Dramen exists.'
      );
    end if;


-- ERwin Builtin Thu Dec 10 14:36:35 2009
end;
/

create or replace trigger tU_Dichter after UPDATE on Dichter for each row
-- ERwin Builtin Thu Dec 10 14:36:35 2009
-- UPDATE trigger on Dichter 
declare numrows INTEGER;
begin
  /* ERwin Builtin Thu Dec 10 14:36:35 2009 */
  /* Dichter schreibt Dramen ON PARENT UPDATE RESTRICT */
  /* ERWIN_RELATION:PARENT_OWNER="", PARENT_TABLE="Dichter"
    CHILD_OWNER="", CHILD_TABLE="Dramen"
    P2C_VERB_PHRASE="schreibt", C2P_VERB_PHRASE="wird geschrieben", 
    FK_CONSTRAINT="schreibt", FK_COLUMNS="Dichter_ID" */
  if
    /* %JoinPKPK(:%Old,:%New," <> "," or ") */
    :old.Dichter_ID <> :new.Dichter_ID
  then
    select count(*) into numrows
      from Dramen
      where
        /*  %JoinFKPK(Dramen,:%Old," = "," and") */
        Dramen.Dichter_ID = :old.Dichter_ID;
    if (numrows > 0)
    then 
      raise_application_error(
        -20005,
        'Cannot UPDATE Dichter because Dramen exists.'
      );
    end if;
  end if;


-- ERwin Builtin Thu Dec 10 14:36:35 2009
end;
/

create or replace trigger tD_Dramen after DELETE on Dramen for each row
-- ERwin Builtin Thu Dec 10 14:36:35 2009
-- DELETE trigger on Dramen 
declare numrows INTEGER;
begin
    /* ERwin Builtin Thu Dec 10 14:36:35 2009 */
    /* Dramen hat Inszenierung ON PARENT DELETE RESTRICT */
    /* ERWIN_RELATION:PARENT_OWNER="", PARENT_TABLE="Dramen"
    CHILD_OWNER="", CHILD_TABLE="Inszenierung"
    P2C_VERB_PHRASE="hat", C2P_VERB_PHRASE="", 
    FK_CONSTRAINT="hat", FK_COLUMNS="Dramen_ID" */
    select count(*) into numrows
      from Inszenierung
      where
        /*  %JoinFKPK(Inszenierung,:%Old," = "," and") */
        Inszenierung.Dramen_ID = :old.Dramen_ID;
    if (numrows > 0)
    then
      raise_application_error(
        -20001,
        'Cannot DELETE Dramen because Inszenierung exists.'
      );
    end if;


-- ERwin Builtin Thu Dec 10 14:36:35 2009
end;
/

create or replace trigger tI_Dramen before INSERT on Dramen for each row
-- ERwin Builtin Thu Dec 10 14:36:35 2009
-- INSERT trigger on Dramen 
declare numrows INTEGER;
begin
    /* ERwin Builtin Thu Dec 10 14:36:35 2009 */
    /* Dichter schreibt Dramen ON CHILD INSERT RESTRICT */
    /* ERWIN_RELATION:PARENT_OWNER="", PARENT_TABLE="Dichter"
    CHILD_OWNER="", CHILD_TABLE="Dramen"
    P2C_VERB_PHRASE="schreibt", C2P_VERB_PHRASE="wird geschrieben", 
    FK_CONSTRAINT="schreibt", FK_COLUMNS="Dichter_ID" */
    select count(*) into numrows
      from Dichter
      where
        /* %JoinFKPK(:%New,Dichter," = "," and") */
        :new.Dichter_ID = Dichter.Dichter_ID;
    if (
      /* %NotnullFK(:%New," is not null and") */
      
      numrows = 0
    )
    then
      raise_application_error(
        -20002,
        'Cannot INSERT Dramen because Dichter does not exist.'
      );
    end if;


-- ERwin Builtin Thu Dec 10 14:36:35 2009
end;
/

create or replace trigger tU_Dramen after UPDATE on Dramen for each row
-- ERwin Builtin Thu Dec 10 14:36:35 2009
-- UPDATE trigger on Dramen 
declare numrows INTEGER;
begin
  /* ERwin Builtin Thu Dec 10 14:36:35 2009 */
  /* Dramen hat Inszenierung ON PARENT UPDATE RESTRICT */
  /* ERWIN_RELATION:PARENT_OWNER="", PARENT_TABLE="Dramen"
    CHILD_OWNER="", CHILD_TABLE="Inszenierung"
    P2C_VERB_PHRASE="hat", C2P_VERB_PHRASE="", 
    FK_CONSTRAINT="hat", FK_COLUMNS="Dramen_ID" */
  if
    /* %JoinPKPK(:%Old,:%New," <> "," or ") */
    :old.Dramen_ID <> :new.Dramen_ID
  then
    select count(*) into numrows
      from Inszenierung
      where
        /*  %JoinFKPK(Inszenierung,:%Old," = "," and") */
        Inszenierung.Dramen_ID = :old.Dramen_ID;
    if (numrows > 0)
    then 
      raise_application_error(
        -20005,
        'Cannot UPDATE Dramen because Inszenierung exists.'
      );
    end if;
  end if;

  /* ERwin Builtin Thu Dec 10 14:36:35 2009 */
  /* Dichter schreibt Dramen ON CHILD UPDATE RESTRICT */
  /* ERWIN_RELATION:PARENT_OWNER="", PARENT_TABLE="Dichter"
    CHILD_OWNER="", CHILD_TABLE="Dramen"
    P2C_VERB_PHRASE="schreibt", C2P_VERB_PHRASE="wird geschrieben", 
    FK_CONSTRAINT="schreibt", FK_COLUMNS="Dichter_ID" */
  select count(*) into numrows
    from Dichter
    where
      /* %JoinFKPK(:%New,Dichter," = "," and") */
      :new.Dichter_ID = Dichter.Dichter_ID;
  if (
    /* %NotnullFK(:%New," is not null and") */
    
    numrows = 0
  )
  then
    raise_application_error(
      -20007,
      'Cannot UPDATE Dramen because Dichter does not exist.'
    );
  end if;


-- ERwin Builtin Thu Dec 10 14:36:35 2009
end;
/

create or replace trigger tI_Engagements before INSERT on Engagements for each row
-- ERwin Builtin Thu Dec 10 14:36:35 2009
-- INSERT trigger on Engagements 
declare numrows INTEGER;
begin
    /* ERwin Builtin Thu Dec 10 14:36:35 2009 */
    /* Spielzeiten gehoeren Engagements ON CHILD INSERT RESTRICT */
    /* ERWIN_RELATION:PARENT_OWNER="", PARENT_TABLE="Spielzeiten"
    CHILD_OWNER="", CHILD_TABLE="Engagements"
    P2C_VERB_PHRASE="gehoeren", C2P_VERB_PHRASE="", 
    FK_CONSTRAINT="gehoeren", FK_COLUMNS="Spielzeiten_ID" */
    select count(*) into numrows
      from Spielzeiten
      where
        /* %JoinFKPK(:%New,Spielzeiten," = "," and") */
        :new.Spielzeiten_ID = Spielzeiten.Spielzeiten_ID;
    if (
      /* %NotnullFK(:%New," is not null and") */
      
      numrows = 0
    )
    then
      raise_application_error(
        -20002,
        'Cannot INSERT Engagements because Spielzeiten does not exist.'
      );
    end if;

    /* ERwin Builtin Thu Dec 10 14:36:35 2009 */
    /* Theater vergibt Engagements ON CHILD INSERT RESTRICT */
    /* ERWIN_RELATION:PARENT_OWNER="", PARENT_TABLE="Theater"
    CHILD_OWNER="", CHILD_TABLE="Engagements"
    P2C_VERB_PHRASE="vergibt", C2P_VERB_PHRASE="", 
    FK_CONSTRAINT="vergibt", FK_COLUMNS="Theater_ID" */
    select count(*) into numrows
      from Theater
      where
        /* %JoinFKPK(:%New,Theater," = "," and") */
        :new.Theater_ID = Theater.Theater_ID;
    if (
      /* %NotnullFK(:%New," is not null and") */
      
      numrows = 0
    )
    then
      raise_application_error(
        -20002,
        'Cannot INSERT Engagements because Theater does not exist.'
      );
    end if;

    /* ERwin Builtin Thu Dec 10 14:36:35 2009 */
    /* Schauspieler hat Engagements ON CHILD INSERT RESTRICT */
    /* ERWIN_RELATION:PARENT_OWNER="", PARENT_TABLE="Schauspieler"
    CHILD_OWNER="", CHILD_TABLE="Engagements"
    P2C_VERB_PHRASE="hat", C2P_VERB_PHRASE="", 
    FK_CONSTRAINT="hat", FK_COLUMNS="Schauspieler_ID" */
    select count(*) into numrows
      from Schauspieler
      where
        /* %JoinFKPK(:%New,Schauspieler," = "," and") */
        :new.Schauspieler_ID = Schauspieler.Schauspieler_ID;
    if (
      /* %NotnullFK(:%New," is not null and") */
      
      numrows = 0
    )
    then
      raise_application_error(
        -20002,
        'Cannot INSERT Engagements because Schauspieler does not exist.'
      );
    end if;


-- ERwin Builtin Thu Dec 10 14:36:35 2009
end;
/

create or replace trigger tU_Engagements after UPDATE on Engagements for each row
-- ERwin Builtin Thu Dec 10 14:36:35 2009
-- UPDATE trigger on Engagements 
declare numrows INTEGER;
begin
  /* ERwin Builtin Thu Dec 10 14:36:35 2009 */
  /* Spielzeiten gehoeren Engagements ON CHILD UPDATE RESTRICT */
  /* ERWIN_RELATION:PARENT_OWNER="", PARENT_TABLE="Spielzeiten"
    CHILD_OWNER="", CHILD_TABLE="Engagements"
    P2C_VERB_PHRASE="gehoeren", C2P_VERB_PHRASE="", 
    FK_CONSTRAINT="gehoeren", FK_COLUMNS="Spielzeiten_ID" */
  select count(*) into numrows
    from Spielzeiten
    where
      /* %JoinFKPK(:%New,Spielzeiten," = "," and") */
      :new.Spielzeiten_ID = Spielzeiten.Spielzeiten_ID;
  if (
    /* %NotnullFK(:%New," is not null and") */
    
    numrows = 0
  )
  then
    raise_application_error(
      -20007,
      'Cannot UPDATE Engagements because Spielzeiten does not exist.'
    );
  end if;

  /* ERwin Builtin Thu Dec 10 14:36:35 2009 */
  /* Theater vergibt Engagements ON CHILD UPDATE RESTRICT */
  /* ERWIN_RELATION:PARENT_OWNER="", PARENT_TABLE="Theater"
    CHILD_OWNER="", CHILD_TABLE="Engagements"
    P2C_VERB_PHRASE="vergibt", C2P_VERB_PHRASE="", 
    FK_CONSTRAINT="vergibt", FK_COLUMNS="Theater_ID" */
  select count(*) into numrows
    from Theater
    where
      /* %JoinFKPK(:%New,Theater," = "," and") */
      :new.Theater_ID = Theater.Theater_ID;
  if (
    /* %NotnullFK(:%New," is not null and") */
    
    numrows = 0
  )
  then
    raise_application_error(
      -20007,
      'Cannot UPDATE Engagements because Theater does not exist.'
    );
  end if;

  /* ERwin Builtin Thu Dec 10 14:36:35 2009 */
  /* Schauspieler hat Engagements ON CHILD UPDATE RESTRICT */
  /* ERWIN_RELATION:PARENT_OWNER="", PARENT_TABLE="Schauspieler"
    CHILD_OWNER="", CHILD_TABLE="Engagements"
    P2C_VERB_PHRASE="hat", C2P_VERB_PHRASE="", 
    FK_CONSTRAINT="hat", FK_COLUMNS="Schauspieler_ID" */
  select count(*) into numrows
    from Schauspieler
    where
      /* %JoinFKPK(:%New,Schauspieler," = "," and") */
      :new.Schauspieler_ID = Schauspieler.Schauspieler_ID;
  if (
    /* %NotnullFK(:%New," is not null and") */
    
    numrows = 0
  )
  then
    raise_application_error(
      -20007,
      'Cannot UPDATE Engagements because Schauspieler does not exist.'
    );
  end if;


-- ERwin Builtin Thu Dec 10 14:36:35 2009
end;
/

create or replace trigger tD_Inszenierung after DELETE on Inszenierung for each row
-- ERwin Builtin Thu Dec 10 14:36:35 2009
-- DELETE trigger on Inszenierung 
declare numrows INTEGER;
begin
    /* ERwin Builtin Thu Dec 10 14:36:35 2009 */
    /* Inszenierung findet statt Spieltag ON PARENT DELETE RESTRICT */
    /* ERWIN_RELATION:PARENT_OWNER="", PARENT_TABLE="Inszenierung"
    CHILD_OWNER="", CHILD_TABLE="Spieltag"
    P2C_VERB_PHRASE="findet statt", C2P_VERB_PHRASE="", 
    FK_CONSTRAINT="findet_statt", FK_COLUMNS="Inszenierung_ID" */
    select count(*) into numrows
      from Spieltag
      where
        /*  %JoinFKPK(Spieltag,:%Old," = "," and") */
        Spieltag.Inszenierung_ID = :old.Inszenierung_ID;
    if (numrows > 0)
    then
      raise_application_error(
        -20001,
        'Cannot DELETE Inszenierung because Spieltag exists.'
      );
    end if;

    /* ERwin Builtin Thu Dec 10 14:36:35 2009 */
    /* Inszenierung hat Rollen ON PARENT DELETE RESTRICT */
    /* ERWIN_RELATION:PARENT_OWNER="", PARENT_TABLE="Inszenierung"
    CHILD_OWNER="", CHILD_TABLE="Rollen"
    P2C_VERB_PHRASE="hat", C2P_VERB_PHRASE="", 
    FK_CONSTRAINT="hat", FK_COLUMNS="Inszenierung_ID" */
    select count(*) into numrows
      from Rollen
      where
        /*  %JoinFKPK(Rollen,:%Old," = "," and") */
        Rollen.Inszenierung_ID = :old.Inszenierung_ID;
    if (numrows > 0)
    then
      raise_application_error(
        -20001,
        'Cannot DELETE Inszenierung because Rollen exists.'
      );
    end if;


-- ERwin Builtin Thu Dec 10 14:36:35 2009
end;
/

create or replace trigger tI_Inszenierung before INSERT on Inszenierung for each row
-- ERwin Builtin Thu Dec 10 14:36:35 2009
-- INSERT trigger on Inszenierung 
declare numrows INTEGER;
begin
    /* ERwin Builtin Thu Dec 10 14:36:35 2009 */
    /* Theater vergibt Inszenierung ON CHILD INSERT RESTRICT */
    /* ERWIN_RELATION:PARENT_OWNER="", PARENT_TABLE="Theater"
    CHILD_OWNER="", CHILD_TABLE="Inszenierung"
    P2C_VERB_PHRASE="vergibt", C2P_VERB_PHRASE="", 
    FK_CONSTRAINT="vergibt", FK_COLUMNS="Theater_ID" */
    select count(*) into numrows
      from Theater
      where
        /* %JoinFKPK(:%New,Theater," = "," and") */
        :new.Theater_ID = Theater.Theater_ID;
    if (
      /* %NotnullFK(:%New," is not null and") */
      
      numrows = 0
    )
    then
      raise_application_error(
        -20002,
        'Cannot INSERT Inszenierung because Theater does not exist.'
      );
    end if;

    /* ERwin Builtin Thu Dec 10 14:36:35 2009 */
    /* Dramen hat Inszenierung ON CHILD INSERT RESTRICT */
    /* ERWIN_RELATION:PARENT_OWNER="", PARENT_TABLE="Dramen"
    CHILD_OWNER="", CHILD_TABLE="Inszenierung"
    P2C_VERB_PHRASE="hat", C2P_VERB_PHRASE="", 
    FK_CONSTRAINT="hat", FK_COLUMNS="Dramen_ID" */
    select count(*) into numrows
      from Dramen
      where
        /* %JoinFKPK(:%New,Dramen," = "," and") */
        :new.Dramen_ID = Dramen.Dramen_ID;
    if (
      /* %NotnullFK(:%New," is not null and") */
      
      numrows = 0
    )
    then
      raise_application_error(
        -20002,
        'Cannot INSERT Inszenierung because Dramen does not exist.'
      );
    end if;

    /* ERwin Builtin Thu Dec 10 14:36:35 2009 */
    /* Spielzeiten besteht aus Inszenierung ON CHILD INSERT RESTRICT */
    /* ERWIN_RELATION:PARENT_OWNER="", PARENT_TABLE="Spielzeiten"
    CHILD_OWNER="", CHILD_TABLE="Inszenierung"
    P2C_VERB_PHRASE="besteht aus", C2P_VERB_PHRASE="", 
    FK_CONSTRAINT="besteht_aus", FK_COLUMNS="Spielzeiten_ID" */
    select count(*) into numrows
      from Spielzeiten
      where
        /* %JoinFKPK(:%New,Spielzeiten," = "," and") */
        :new.Spielzeiten_ID = Spielzeiten.Spielzeiten_ID;
    if (
      /* %NotnullFK(:%New," is not null and") */
      
      numrows = 0
    )
    then
      raise_application_error(
        -20002,
        'Cannot INSERT Inszenierung because Spielzeiten does not exist.'
      );
    end if;


-- ERwin Builtin Thu Dec 10 14:36:35 2009
end;
/

create or replace trigger tU_Inszenierung after UPDATE on Inszenierung for each row
-- ERwin Builtin Thu Dec 10 14:36:35 2009
-- UPDATE trigger on Inszenierung 
declare numrows INTEGER;
begin
  /* ERwin Builtin Thu Dec 10 14:36:35 2009 */
  /* Inszenierung findet statt Spieltag ON PARENT UPDATE RESTRICT */
  /* ERWIN_RELATION:PARENT_OWNER="", PARENT_TABLE="Inszenierung"
    CHILD_OWNER="", CHILD_TABLE="Spieltag"
    P2C_VERB_PHRASE="findet statt", C2P_VERB_PHRASE="", 
    FK_CONSTRAINT="findet_statt", FK_COLUMNS="Inszenierung_ID" */
  if
    /* %JoinPKPK(:%Old,:%New," <> "," or ") */
    :old.Inszenierung_ID <> :new.Inszenierung_ID
  then
    select count(*) into numrows
      from Spieltag
      where
        /*  %JoinFKPK(Spieltag,:%Old," = "," and") */
        Spieltag.Inszenierung_ID = :old.Inszenierung_ID;
    if (numrows > 0)
    then 
      raise_application_error(
        -20005,
        'Cannot UPDATE Inszenierung because Spieltag exists.'
      );
    end if;
  end if;

  /* ERwin Builtin Thu Dec 10 14:36:35 2009 */
  /* Inszenierung hat Rollen ON PARENT UPDATE RESTRICT */
  /* ERWIN_RELATION:PARENT_OWNER="", PARENT_TABLE="Inszenierung"
    CHILD_OWNER="", CHILD_TABLE="Rollen"
    P2C_VERB_PHRASE="hat", C2P_VERB_PHRASE="", 
    FK_CONSTRAINT="hat", FK_COLUMNS="Inszenierung_ID" */
  if
    /* %JoinPKPK(:%Old,:%New," <> "," or ") */
    :old.Inszenierung_ID <> :new.Inszenierung_ID
  then
    select count(*) into numrows
      from Rollen
      where
        /*  %JoinFKPK(Rollen,:%Old," = "," and") */
        Rollen.Inszenierung_ID = :old.Inszenierung_ID;
    if (numrows > 0)
    then 
      raise_application_error(
        -20005,
        'Cannot UPDATE Inszenierung because Rollen exists.'
      );
    end if;
  end if;

  /* ERwin Builtin Thu Dec 10 14:36:35 2009 */
  /* Theater vergibt Inszenierung ON CHILD UPDATE RESTRICT */
  /* ERWIN_RELATION:PARENT_OWNER="", PARENT_TABLE="Theater"
    CHILD_OWNER="", CHILD_TABLE="Inszenierung"
    P2C_VERB_PHRASE="vergibt", C2P_VERB_PHRASE="", 
    FK_CONSTRAINT="vergibt", FK_COLUMNS="Theater_ID" */
  select count(*) into numrows
    from Theater
    where
      /* %JoinFKPK(:%New,Theater," = "," and") */
      :new.Theater_ID = Theater.Theater_ID;
  if (
    /* %NotnullFK(:%New," is not null and") */
    
    numrows = 0
  )
  then
    raise_application_error(
      -20007,
      'Cannot UPDATE Inszenierung because Theater does not exist.'
    );
  end if;

  /* ERwin Builtin Thu Dec 10 14:36:35 2009 */
  /* Dramen hat Inszenierung ON CHILD UPDATE RESTRICT */
  /* ERWIN_RELATION:PARENT_OWNER="", PARENT_TABLE="Dramen"
    CHILD_OWNER="", CHILD_TABLE="Inszenierung"
    P2C_VERB_PHRASE="hat", C2P_VERB_PHRASE="", 
    FK_CONSTRAINT="hat", FK_COLUMNS="Dramen_ID" */
  select count(*) into numrows
    from Dramen
    where
      /* %JoinFKPK(:%New,Dramen," = "," and") */
      :new.Dramen_ID = Dramen.Dramen_ID;
  if (
    /* %NotnullFK(:%New," is not null and") */
    
    numrows = 0
  )
  then
    raise_application_error(
      -20007,
      'Cannot UPDATE Inszenierung because Dramen does not exist.'
    );
  end if;

  /* ERwin Builtin Thu Dec 10 14:36:35 2009 */
  /* Spielzeiten besteht aus Inszenierung ON CHILD UPDATE RESTRICT */
  /* ERWIN_RELATION:PARENT_OWNER="", PARENT_TABLE="Spielzeiten"
    CHILD_OWNER="", CHILD_TABLE="Inszenierung"
    P2C_VERB_PHRASE="besteht aus", C2P_VERB_PHRASE="", 
    FK_CONSTRAINT="besteht_aus", FK_COLUMNS="Spielzeiten_ID" */
  select count(*) into numrows
    from Spielzeiten
    where
      /* %JoinFKPK(:%New,Spielzeiten," = "," and") */
      :new.Spielzeiten_ID = Spielzeiten.Spielzeiten_ID;
  if (
    /* %NotnullFK(:%New," is not null and") */
    
    numrows = 0
  )
  then
    raise_application_error(
      -20007,
      'Cannot UPDATE Inszenierung because Spielzeiten does not exist.'
    );
  end if;


-- ERwin Builtin Thu Dec 10 14:36:35 2009
end;
/

create or replace trigger tD_Rollen after DELETE on Rollen for each row
-- ERwin Builtin Thu Dec 10 14:36:35 2009
-- DELETE trigger on Rollen 
declare numrows INTEGER;
begin
    /* ERwin Builtin Thu Dec 10 14:36:35 2009 */
    /* Rollen wird gespielt Schauspieler_Rollen ON PARENT DELETE RESTRICT */
    /* ERWIN_RELATION:PARENT_OWNER="", PARENT_TABLE="Rollen"
    CHILD_OWNER="", CHILD_TABLE="Schauspieler_Rollen"
    P2C_VERB_PHRASE="wird gespielt", C2P_VERB_PHRASE="", 
    FK_CONSTRAINT="wird_gespielt", FK_COLUMNS="Rollen_ID" */
    select count(*) into numrows
      from Schauspieler_Rollen
      where
        /*  %JoinFKPK(Schauspieler_Rollen,:%Old," = "," and") */
        Schauspieler_Rollen.Rollen_ID = :old.Rollen_ID;
    if (numrows > 0)
    then
      raise_application_error(
        -20001,
        'Cannot DELETE Rollen because Schauspieler_Rollen exists.'
      );
    end if;


-- ERwin Builtin Thu Dec 10 14:36:35 2009
end;
/

create or replace trigger tI_Rollen before INSERT on Rollen for each row
-- ERwin Builtin Thu Dec 10 14:36:35 2009
-- INSERT trigger on Rollen 
declare numrows INTEGER;
begin
    /* ERwin Builtin Thu Dec 10 14:36:35 2009 */
    /* Inszenierung hat Rollen ON CHILD INSERT RESTRICT */
    /* ERWIN_RELATION:PARENT_OWNER="", PARENT_TABLE="Inszenierung"
    CHILD_OWNER="", CHILD_TABLE="Rollen"
    P2C_VERB_PHRASE="hat", C2P_VERB_PHRASE="", 
    FK_CONSTRAINT="hat", FK_COLUMNS="Inszenierung_ID" */
    select count(*) into numrows
      from Inszenierung
      where
        /* %JoinFKPK(:%New,Inszenierung," = "," and") */
        :new.Inszenierung_ID = Inszenierung.Inszenierung_ID;
    if (
      /* %NotnullFK(:%New," is not null and") */
      
      numrows = 0
    )
    then
      raise_application_error(
        -20002,
        'Cannot INSERT Rollen because Inszenierung does not exist.'
      );
    end if;


-- ERwin Builtin Thu Dec 10 14:36:35 2009
end;
/

create or replace trigger tU_Rollen after UPDATE on Rollen for each row
-- ERwin Builtin Thu Dec 10 14:36:35 2009
-- UPDATE trigger on Rollen 
declare numrows INTEGER;
begin
  /* ERwin Builtin Thu Dec 10 14:36:35 2009 */
  /* Rollen wird gespielt Schauspieler_Rollen ON PARENT UPDATE RESTRICT */
  /* ERWIN_RELATION:PARENT_OWNER="", PARENT_TABLE="Rollen"
    CHILD_OWNER="", CHILD_TABLE="Schauspieler_Rollen"
    P2C_VERB_PHRASE="wird gespielt", C2P_VERB_PHRASE="", 
    FK_CONSTRAINT="wird_gespielt", FK_COLUMNS="Rollen_ID" */
  if
    /* %JoinPKPK(:%Old,:%New," <> "," or ") */
    :old.Rollen_ID <> :new.Rollen_ID
  then
    select count(*) into numrows
      from Schauspieler_Rollen
      where
        /*  %JoinFKPK(Schauspieler_Rollen,:%Old," = "," and") */
        Schauspieler_Rollen.Rollen_ID = :old.Rollen_ID;
    if (numrows > 0)
    then 
      raise_application_error(
        -20005,
        'Cannot UPDATE Rollen because Schauspieler_Rollen exists.'
      );
    end if;
  end if;

  /* ERwin Builtin Thu Dec 10 14:36:35 2009 */
  /* Inszenierung hat Rollen ON CHILD UPDATE RESTRICT */
  /* ERWIN_RELATION:PARENT_OWNER="", PARENT_TABLE="Inszenierung"
    CHILD_OWNER="", CHILD_TABLE="Rollen"
    P2C_VERB_PHRASE="hat", C2P_VERB_PHRASE="", 
    FK_CONSTRAINT="hat", FK_COLUMNS="Inszenierung_ID" */
  select count(*) into numrows
    from Inszenierung
    where
      /* %JoinFKPK(:%New,Inszenierung," = "," and") */
      :new.Inszenierung_ID = Inszenierung.Inszenierung_ID;
  if (
    /* %NotnullFK(:%New," is not null and") */
    
    numrows = 0
  )
  then
    raise_application_error(
      -20007,
      'Cannot UPDATE Rollen because Inszenierung does not exist.'
    );
  end if;


-- ERwin Builtin Thu Dec 10 14:36:35 2009
end;
/

create or replace trigger tD_Schauspieler after DELETE on Schauspieler for each row
-- ERwin Builtin Thu Dec 10 14:36:35 2009
-- DELETE trigger on Schauspieler 
declare numrows INTEGER;
begin
    /* ERwin Builtin Thu Dec 10 14:36:35 2009 */
    /* Schauspieler spielt Schauspieler_Rollen ON PARENT DELETE RESTRICT */
    /* ERWIN_RELATION:PARENT_OWNER="", PARENT_TABLE="Schauspieler"
    CHILD_OWNER="", CHILD_TABLE="Schauspieler_Rollen"
    P2C_VERB_PHRASE="spielt", C2P_VERB_PHRASE="", 
    FK_CONSTRAINT="spielt", FK_COLUMNS="Schauspieler_ID" */
    select count(*) into numrows
      from Schauspieler_Rollen
      where
        /*  %JoinFKPK(Schauspieler_Rollen,:%Old," = "," and") */
        Schauspieler_Rollen.Schauspieler_ID = :old.Schauspieler_ID;
    if (numrows > 0)
    then
      raise_application_error(
        -20001,
        'Cannot DELETE Schauspieler because Schauspieler_Rollen exists.'
      );
    end if;

    /* ERwin Builtin Thu Dec 10 14:36:35 2009 */
    /* Schauspieler hat Engagements ON PARENT DELETE RESTRICT */
    /* ERWIN_RELATION:PARENT_OWNER="", PARENT_TABLE="Schauspieler"
    CHILD_OWNER="", CHILD_TABLE="Engagements"
    P2C_VERB_PHRASE="hat", C2P_VERB_PHRASE="", 
    FK_CONSTRAINT="hat", FK_COLUMNS="Schauspieler_ID" */
    select count(*) into numrows
      from Engagements
      where
        /*  %JoinFKPK(Engagements,:%Old," = "," and") */
        Engagements.Schauspieler_ID = :old.Schauspieler_ID;
    if (numrows > 0)
    then
      raise_application_error(
        -20001,
        'Cannot DELETE Schauspieler because Engagements exists.'
      );
    end if;


-- ERwin Builtin Thu Dec 10 14:36:35 2009
end;
/

create or replace trigger tU_Schauspieler after UPDATE on Schauspieler for each row
-- ERwin Builtin Thu Dec 10 14:36:35 2009
-- UPDATE trigger on Schauspieler 
declare numrows INTEGER;
begin
  /* ERwin Builtin Thu Dec 10 14:36:35 2009 */
  /* Schauspieler spielt Schauspieler_Rollen ON PARENT UPDATE RESTRICT */
  /* ERWIN_RELATION:PARENT_OWNER="", PARENT_TABLE="Schauspieler"
    CHILD_OWNER="", CHILD_TABLE="Schauspieler_Rollen"
    P2C_VERB_PHRASE="spielt", C2P_VERB_PHRASE="", 
    FK_CONSTRAINT="spielt", FK_COLUMNS="Schauspieler_ID" */
  if
    /* %JoinPKPK(:%Old,:%New," <> "," or ") */
    :old.Schauspieler_ID <> :new.Schauspieler_ID
  then
    select count(*) into numrows
      from Schauspieler_Rollen
      where
        /*  %JoinFKPK(Schauspieler_Rollen,:%Old," = "," and") */
        Schauspieler_Rollen.Schauspieler_ID = :old.Schauspieler_ID;
    if (numrows > 0)
    then 
      raise_application_error(
        -20005,
        'Cannot UPDATE Schauspieler because Schauspieler_Rollen exists.'
      );
    end if;
  end if;

  /* ERwin Builtin Thu Dec 10 14:36:35 2009 */
  /* Schauspieler hat Engagements ON PARENT UPDATE RESTRICT */
  /* ERWIN_RELATION:PARENT_OWNER="", PARENT_TABLE="Schauspieler"
    CHILD_OWNER="", CHILD_TABLE="Engagements"
    P2C_VERB_PHRASE="hat", C2P_VERB_PHRASE="", 
    FK_CONSTRAINT="hat", FK_COLUMNS="Schauspieler_ID" */
  if
    /* %JoinPKPK(:%Old,:%New," <> "," or ") */
    :old.Schauspieler_ID <> :new.Schauspieler_ID
  then
    select count(*) into numrows
      from Engagements
      where
        /*  %JoinFKPK(Engagements,:%Old," = "," and") */
        Engagements.Schauspieler_ID = :old.Schauspieler_ID;
    if (numrows > 0)
    then 
      raise_application_error(
        -20005,
        'Cannot UPDATE Schauspieler because Engagements exists.'
      );
    end if;
  end if;


-- ERwin Builtin Thu Dec 10 14:36:35 2009
end;
/

create or replace trigger tI_Schauspieler_Rollen before INSERT on Schauspieler_Rollen for each row
-- ERwin Builtin Thu Dec 10 14:36:35 2009
-- INSERT trigger on Schauspieler_Rollen 
declare numrows INTEGER;
begin
    /* ERwin Builtin Thu Dec 10 14:36:35 2009 */
    /* Rollen wird gespielt Schauspieler_Rollen ON CHILD INSERT RESTRICT */
    /* ERWIN_RELATION:PARENT_OWNER="", PARENT_TABLE="Rollen"
    CHILD_OWNER="", CHILD_TABLE="Schauspieler_Rollen"
    P2C_VERB_PHRASE="wird gespielt", C2P_VERB_PHRASE="", 
    FK_CONSTRAINT="wird_gespielt", FK_COLUMNS="Rollen_ID" */
    select count(*) into numrows
      from Rollen
      where
        /* %JoinFKPK(:%New,Rollen," = "," and") */
        :new.Rollen_ID = Rollen.Rollen_ID;
    if (
      /* %NotnullFK(:%New," is not null and") */
      
      numrows = 0
    )
    then
      raise_application_error(
        -20002,
        'Cannot INSERT Schauspieler_Rollen because Rollen does not exist.'
      );
    end if;

    /* ERwin Builtin Thu Dec 10 14:36:35 2009 */
    /* Schauspieler spielt Schauspieler_Rollen ON CHILD INSERT RESTRICT */
    /* ERWIN_RELATION:PARENT_OWNER="", PARENT_TABLE="Schauspieler"
    CHILD_OWNER="", CHILD_TABLE="Schauspieler_Rollen"
    P2C_VERB_PHRASE="spielt", C2P_VERB_PHRASE="", 
    FK_CONSTRAINT="spielt", FK_COLUMNS="Schauspieler_ID" */
    select count(*) into numrows
      from Schauspieler
      where
        /* %JoinFKPK(:%New,Schauspieler," = "," and") */
        :new.Schauspieler_ID = Schauspieler.Schauspieler_ID;
    if (
      /* %NotnullFK(:%New," is not null and") */
      
      numrows = 0
    )
    then
      raise_application_error(
        -20002,
        'Cannot INSERT Schauspieler_Rollen because Schauspieler does not exist.'
      );
    end if;


-- ERwin Builtin Thu Dec 10 14:36:35 2009
end;
/

create or replace trigger tU_Schauspieler_Rollen after UPDATE on Schauspieler_Rollen for each row
-- ERwin Builtin Thu Dec 10 14:36:35 2009
-- UPDATE trigger on Schauspieler_Rollen 
declare numrows INTEGER;
begin
  /* ERwin Builtin Thu Dec 10 14:36:35 2009 */
  /* Rollen wird gespielt Schauspieler_Rollen ON CHILD UPDATE RESTRICT */
  /* ERWIN_RELATION:PARENT_OWNER="", PARENT_TABLE="Rollen"
    CHILD_OWNER="", CHILD_TABLE="Schauspieler_Rollen"
    P2C_VERB_PHRASE="wird gespielt", C2P_VERB_PHRASE="", 
    FK_CONSTRAINT="wird_gespielt", FK_COLUMNS="Rollen_ID" */
  select count(*) into numrows
    from Rollen
    where
      /* %JoinFKPK(:%New,Rollen," = "," and") */
      :new.Rollen_ID = Rollen.Rollen_ID;
  if (
    /* %NotnullFK(:%New," is not null and") */
    
    numrows = 0
  )
  then
    raise_application_error(
      -20007,
      'Cannot UPDATE Schauspieler_Rollen because Rollen does not exist.'
    );
  end if;

  /* ERwin Builtin Thu Dec 10 14:36:35 2009 */
  /* Schauspieler spielt Schauspieler_Rollen ON CHILD UPDATE RESTRICT */
  /* ERWIN_RELATION:PARENT_OWNER="", PARENT_TABLE="Schauspieler"
    CHILD_OWNER="", CHILD_TABLE="Schauspieler_Rollen"
    P2C_VERB_PHRASE="spielt", C2P_VERB_PHRASE="", 
    FK_CONSTRAINT="spielt", FK_COLUMNS="Schauspieler_ID" */
  select count(*) into numrows
    from Schauspieler
    where
      /* %JoinFKPK(:%New,Schauspieler," = "," and") */
      :new.Schauspieler_ID = Schauspieler.Schauspieler_ID;
  if (
    /* %NotnullFK(:%New," is not null and") */
    
    numrows = 0
  )
  then
    raise_application_error(
      -20007,
      'Cannot UPDATE Schauspieler_Rollen because Schauspieler does not exist.'
    );
  end if;


-- ERwin Builtin Thu Dec 10 14:36:35 2009
end;
/

create or replace trigger tI_Spieltag before INSERT on Spieltag for each row
-- ERwin Builtin Thu Dec 10 14:36:35 2009
-- INSERT trigger on Spieltag 
declare numrows INTEGER;
begin
    /* ERwin Builtin Thu Dec 10 14:36:35 2009 */
    /* Inszenierung findet statt Spieltag ON CHILD INSERT RESTRICT */
    /* ERWIN_RELATION:PARENT_OWNER="", PARENT_TABLE="Inszenierung"
    CHILD_OWNER="", CHILD_TABLE="Spieltag"
    P2C_VERB_PHRASE="findet statt", C2P_VERB_PHRASE="", 
    FK_CONSTRAINT="findet_statt", FK_COLUMNS="Inszenierung_ID" */
    select count(*) into numrows
      from Inszenierung
      where
        /* %JoinFKPK(:%New,Inszenierung," = "," and") */
        :new.Inszenierung_ID = Inszenierung.Inszenierung_ID;
    if (
      /* %NotnullFK(:%New," is not null and") */
      
      numrows = 0
    )
    then
      raise_application_error(
        -20002,
        'Cannot INSERT Spieltag because Inszenierung does not exist.'
      );
    end if;


-- ERwin Builtin Thu Dec 10 14:36:35 2009
end;
/

create or replace trigger tU_Spieltag after UPDATE on Spieltag for each row
-- ERwin Builtin Thu Dec 10 14:36:35 2009
-- UPDATE trigger on Spieltag 
declare numrows INTEGER;
begin
  /* ERwin Builtin Thu Dec 10 14:36:35 2009 */
  /* Inszenierung findet statt Spieltag ON CHILD UPDATE RESTRICT */
  /* ERWIN_RELATION:PARENT_OWNER="", PARENT_TABLE="Inszenierung"
    CHILD_OWNER="", CHILD_TABLE="Spieltag"
    P2C_VERB_PHRASE="findet statt", C2P_VERB_PHRASE="", 
    FK_CONSTRAINT="findet_statt", FK_COLUMNS="Inszenierung_ID" */
  select count(*) into numrows
    from Inszenierung
    where
      /* %JoinFKPK(:%New,Inszenierung," = "," and") */
      :new.Inszenierung_ID = Inszenierung.Inszenierung_ID;
  if (
    /* %NotnullFK(:%New," is not null and") */
    
    numrows = 0
  )
  then
    raise_application_error(
      -20007,
      'Cannot UPDATE Spieltag because Inszenierung does not exist.'
    );
  end if;


-- ERwin Builtin Thu Dec 10 14:36:35 2009
end;
/

create or replace trigger tD_Spielzeiten after DELETE on Spielzeiten for each row
-- ERwin Builtin Thu Dec 10 14:36:35 2009
-- DELETE trigger on Spielzeiten 
declare numrows INTEGER;
begin
    /* ERwin Builtin Thu Dec 10 14:36:35 2009 */
    /* Spielzeiten gehoeren Engagements ON PARENT DELETE RESTRICT */
    /* ERWIN_RELATION:PARENT_OWNER="", PARENT_TABLE="Spielzeiten"
    CHILD_OWNER="", CHILD_TABLE="Engagements"
    P2C_VERB_PHRASE="gehoeren", C2P_VERB_PHRASE="", 
    FK_CONSTRAINT="gehoeren", FK_COLUMNS="Spielzeiten_ID" */
    select count(*) into numrows
      from Engagements
      where
        /*  %JoinFKPK(Engagements,:%Old," = "," and") */
        Engagements.Spielzeiten_ID = :old.Spielzeiten_ID;
    if (numrows > 0)
    then
      raise_application_error(
        -20001,
        'Cannot DELETE Spielzeiten because Engagements exists.'
      );
    end if;

    /* ERwin Builtin Thu Dec 10 14:36:35 2009 */
    /* Spielzeiten besteht aus Inszenierung ON PARENT DELETE RESTRICT */
    /* ERWIN_RELATION:PARENT_OWNER="", PARENT_TABLE="Spielzeiten"
    CHILD_OWNER="", CHILD_TABLE="Inszenierung"
    P2C_VERB_PHRASE="besteht aus", C2P_VERB_PHRASE="", 
    FK_CONSTRAINT="besteht_aus", FK_COLUMNS="Spielzeiten_ID" */
    select count(*) into numrows
      from Inszenierung
      where
        /*  %JoinFKPK(Inszenierung,:%Old," = "," and") */
        Inszenierung.Spielzeiten_ID = :old.Spielzeiten_ID;
    if (numrows > 0)
    then
      raise_application_error(
        -20001,
        'Cannot DELETE Spielzeiten because Inszenierung exists.'
      );
    end if;


-- ERwin Builtin Thu Dec 10 14:36:35 2009
end;
/

create or replace trigger tU_Spielzeiten after UPDATE on Spielzeiten for each row
-- ERwin Builtin Thu Dec 10 14:36:35 2009
-- UPDATE trigger on Spielzeiten 
declare numrows INTEGER;
begin
  /* ERwin Builtin Thu Dec 10 14:36:35 2009 */
  /* Spielzeiten gehoeren Engagements ON PARENT UPDATE RESTRICT */
  /* ERWIN_RELATION:PARENT_OWNER="", PARENT_TABLE="Spielzeiten"
    CHILD_OWNER="", CHILD_TABLE="Engagements"
    P2C_VERB_PHRASE="gehoeren", C2P_VERB_PHRASE="", 
    FK_CONSTRAINT="gehoeren", FK_COLUMNS="Spielzeiten_ID" */
  if
    /* %JoinPKPK(:%Old,:%New," <> "," or ") */
    :old.Spielzeiten_ID <> :new.Spielzeiten_ID
  then
    select count(*) into numrows
      from Engagements
      where
        /*  %JoinFKPK(Engagements,:%Old," = "," and") */
        Engagements.Spielzeiten_ID = :old.Spielzeiten_ID;
    if (numrows > 0)
    then 
      raise_application_error(
        -20005,
        'Cannot UPDATE Spielzeiten because Engagements exists.'
      );
    end if;
  end if;

  /* ERwin Builtin Thu Dec 10 14:36:35 2009 */
  /* Spielzeiten besteht aus Inszenierung ON PARENT UPDATE RESTRICT */
  /* ERWIN_RELATION:PARENT_OWNER="", PARENT_TABLE="Spielzeiten"
    CHILD_OWNER="", CHILD_TABLE="Inszenierung"
    P2C_VERB_PHRASE="besteht aus", C2P_VERB_PHRASE="", 
    FK_CONSTRAINT="besteht_aus", FK_COLUMNS="Spielzeiten_ID" */
  if
    /* %JoinPKPK(:%Old,:%New," <> "," or ") */
    :old.Spielzeiten_ID <> :new.Spielzeiten_ID
  then
    select count(*) into numrows
      from Inszenierung
      where
        /*  %JoinFKPK(Inszenierung,:%Old," = "," and") */
        Inszenierung.Spielzeiten_ID = :old.Spielzeiten_ID;
    if (numrows > 0)
    then 
      raise_application_error(
        -20005,
        'Cannot UPDATE Spielzeiten because Inszenierung exists.'
      );
    end if;
  end if;


-- ERwin Builtin Thu Dec 10 14:36:35 2009
end;
/

create or replace trigger tD_Theater after DELETE on Theater for each row
-- ERwin Builtin Thu Dec 10 14:36:35 2009
-- DELETE trigger on Theater 
declare numrows INTEGER;
begin
    /* ERwin Builtin Thu Dec 10 14:36:35 2009 */
    /* Theater vergibt Inszenierung ON PARENT DELETE RESTRICT */
    /* ERWIN_RELATION:PARENT_OWNER="", PARENT_TABLE="Theater"
    CHILD_OWNER="", CHILD_TABLE="Inszenierung"
    P2C_VERB_PHRASE="vergibt", C2P_VERB_PHRASE="", 
    FK_CONSTRAINT="vergibt", FK_COLUMNS="Theater_ID" */
    select count(*) into numrows
      from Inszenierung
      where
        /*  %JoinFKPK(Inszenierung,:%Old," = "," and") */
        Inszenierung.Theater_ID = :old.Theater_ID;
    if (numrows > 0)
    then
      raise_application_error(
        -20001,
        'Cannot DELETE Theater because Inszenierung exists.'
      );
    end if;

    /* ERwin Builtin Thu Dec 10 14:36:35 2009 */
    /* Theater vergibt Engagements ON PARENT DELETE RESTRICT */
    /* ERWIN_RELATION:PARENT_OWNER="", PARENT_TABLE="Theater"
    CHILD_OWNER="", CHILD_TABLE="Engagements"
    P2C_VERB_PHRASE="vergibt", C2P_VERB_PHRASE="", 
    FK_CONSTRAINT="vergibt", FK_COLUMNS="Theater_ID" */
    select count(*) into numrows
      from Engagements
      where
        /*  %JoinFKPK(Engagements,:%Old," = "," and") */
        Engagements.Theater_ID = :old.Theater_ID;
    if (numrows > 0)
    then
      raise_application_error(
        -20001,
        'Cannot DELETE Theater because Engagements exists.'
      );
    end if;


-- ERwin Builtin Thu Dec 10 14:36:35 2009
end;
/

create or replace trigger tU_Theater after UPDATE on Theater for each row
-- ERwin Builtin Thu Dec 10 14:36:35 2009
-- UPDATE trigger on Theater 
declare numrows INTEGER;
begin
  /* ERwin Builtin Thu Dec 10 14:36:35 2009 */
  /* Theater vergibt Inszenierung ON PARENT UPDATE RESTRICT */
  /* ERWIN_RELATION:PARENT_OWNER="", PARENT_TABLE="Theater"
    CHILD_OWNER="", CHILD_TABLE="Inszenierung"
    P2C_VERB_PHRASE="vergibt", C2P_VERB_PHRASE="", 
    FK_CONSTRAINT="vergibt", FK_COLUMNS="Theater_ID" */
  if
    /* %JoinPKPK(:%Old,:%New," <> "," or ") */
    :old.Theater_ID <> :new.Theater_ID
  then
    select count(*) into numrows
      from Inszenierung
      where
        /*  %JoinFKPK(Inszenierung,:%Old," = "," and") */
        Inszenierung.Theater_ID = :old.Theater_ID;
    if (numrows > 0)
    then 
      raise_application_error(
        -20005,
        'Cannot UPDATE Theater because Inszenierung exists.'
      );
    end if;
  end if;

  /* ERwin Builtin Thu Dec 10 14:36:35 2009 */
  /* Theater vergibt Engagements ON PARENT UPDATE RESTRICT */
  /* ERWIN_RELATION:PARENT_OWNER="", PARENT_TABLE="Theater"
    CHILD_OWNER="", CHILD_TABLE="Engagements"
    P2C_VERB_PHRASE="vergibt", C2P_VERB_PHRASE="", 
    FK_CONSTRAINT="vergibt", FK_COLUMNS="Theater_ID" */
  if
    /* %JoinPKPK(:%Old,:%New," <> "," or ") */
    :old.Theater_ID <> :new.Theater_ID
  then
    select count(*) into numrows
      from Engagements
      where
        /*  %JoinFKPK(Engagements,:%Old," = "," and") */
        Engagements.Theater_ID = :old.Theater_ID;
    if (numrows > 0)
    then 
      raise_application_error(
        -20005,
        'Cannot UPDATE Theater because Engagements exists.'
      );
    end if;
  end if;


-- ERwin Builtin Thu Dec 10 14:36:35 2009
end;
/