Databases Reference
In-Depth Information
tabellen notwendig sind, werden diese vorgenommen. Der
Trigger sieht wie folgt aus.
CREATE OR REPLACE TRIGGER tierInGesamt
INSTEAD OF INSERT
ON Gesamt
FOR EACH ROW
DECLARE
zaehler INTEGER;
BEGIN
SELECT COUNT(*)
INTO zaehler
FROM Gehege
WHERE Gehege.GNr=:NEW.GNr;
IF zaehler=0 /* dann neues Gehege */
THEN
INSERT INTO Gehege VALUES(:NEW.GNr,
:NEW.GName,50);
END IF;
SELECT COUNT(*)
INTO zaehler
FROM Art
WHERE Art.Gattung=:NEW.Gattung;
IF zaehler=0 /* dann neue Art */
THEN
INSERT INTO Art VALUES(:NEW.Gattung,
:NEW.MinFlaeche);
END IF;
INSERT INTO Tier VALUES (:NEW.Gnr,:NEW.TName,
:NEW.Gattung);
END;
Die Ausführung der folgenden Befehle
INSERT INTO Gesamt
VALUES('Egon','Uhu',5,5,'Halle');
SELECT *
FROM Gesamt
WHERE Gesamt.GNr=5;
SELECT * FROM Gehege;
führt zu folgender Ausgabe.
TNAME GATTUNG MINFLAECHE GNR GNAME
------- ------- ------------ ---------- ------
Egon Uhu 5 5 Halle
276
