summaryrefslogtreecommitdiffstats
path: root/Bachelor/Datenbanken 2/Praktikum4/assistenz_function.sql
diff options
context:
space:
mode:
authorSven Eisenhauer <sven@sven-eisenhauer.net>2023-11-10 15:11:48 +0100
committerSven Eisenhauer <sven@sven-eisenhauer.net>2023-11-10 15:11:48 +0100
commit33613a85afc4b1481367fbe92a17ee59c240250b (patch)
tree670b842326116b376b505ec2263878912fca97e2 /Bachelor/Datenbanken 2/Praktikum4/assistenz_function.sql
downloadStudium-master.tar.gz
Studium-master.tar.bz2
add new repoHEADmaster
Diffstat (limited to 'Bachelor/Datenbanken 2/Praktikum4/assistenz_function.sql')
-rw-r--r--Bachelor/Datenbanken 2/Praktikum4/assistenz_function.sql50
1 files changed, 50 insertions, 0 deletions
diff --git a/Bachelor/Datenbanken 2/Praktikum4/assistenz_function.sql b/Bachelor/Datenbanken 2/Praktikum4/assistenz_function.sql
new file mode 100644
index 0000000..150d0d4
--- /dev/null
+++ b/Bachelor/Datenbanken 2/Praktikum4/assistenz_function.sql
@@ -0,0 +1,50 @@
+-- Stored Function
+
+create or replace function pruef_operation(p_persnr integer, p_opnr integer)
+ return integer
+as
+ v_persnr integer;
+
+begin
+
+ select persnr into v_persnr
+ from operation
+ where opnr = p_opnr;
+
+if v_persnr = p_persnr
+then return 0;
+else return 1;
+end if;
+
+end;
+/
+
+
+-- Trigger
+
+create or replace trigger ASSISTENZ_INSERT
+before insert on assistenz
+for each row
+
+declare
+ Eingabe_nicht_zulaessig exception;
+ pragma exception_init (Eingabe_nicht_zulaessig, -20001);
+
+ antwort integer;
+
+begin
+
+ antwort := pruef_operation(:new.persnr,:new.opnummer);
+
+ if antwort = 0
+ then raise Eingabe_nicht_zulaessig;
+ end if;
+
+ exception
+ when Eingabe_nicht_zulaessig then
+ raise_application_error
+ (-20001, 'Chirurg ' || :new.persnr || ' leitet diese Operation!');
+
+end;
+/
+