(c) Instytut Informatyki Politechniki
Poznańskiej
19
Wywoływanie własnych
wyjątków
Użytkownik może wywoływać ręcznie
zarówno błędy systemowe, jak i zdefiniowane przez siebie. Każdy
wywołany błąd powinien zostać obsłużony przez odpowiednią
procedurę obsługi wyjątku.
DECLARE
v_liczba
NUMBER := 0;
v_zespol
NUMBER := &zespol;
ex_za_malo_pracownikow
EXCEPTION;
BEGIN
SELECT
COUNT(*) INTO v_liczba
FROM
pracownicy WHERE id_zesp = v_zespol;
IF
(v_liczba < 3) THEN RAISE ex_za_malo_pracownikow; END IF;
EXCEPTION
WHEN
ex_za_malo_pracownikow THEN
DBMS_OUTPUT.PUT_LINE('Brak ludzi w zespole ' || v_zespol');
END;