Zad. Wypisanie studentów w odwrotnej kolejnoœci begin for k in (select * from Studenci order by id_studenci desc) loop dbms_output.put_line('Pozycja: ' || k.imie || ' ' || k.nazwisko); end loop; end; ----------------------------------- raise_application_error(-20001, 'Wyst¹pi³ b³¹d. Lista jest za du¿a.'); - funkcja wywo³ania b³êdu ------------------------------------ Wy³apanie wszystkich wyj¹tków: exception when OTHERS then raise_application_error(-20000,'Wyst¹pi³ b³¹d: ' || SQLERRM || ', kod PL/SQL: ' || SQLCODE); --------------------------------------- Zad. Obsluzenie bledu braku rekordow w tabeli create or replace procedure wyswietl_liczbe_studentow as liczba number(5):=0; begin select count(*) into liczba from Studenci; dbms_output.put_line(liczba); exception when NO_DATA_FOUND then raise_application_error(-20000,'Wyst¹pi³ b³¹d: ' || SQLERRM || ', kod PL/SQL: ' || SQLCODE); end; --------------------------------------- Zad. Wartosci ujemne w silni, wyjatek create or replace procedure silnia(liczba IN number default 1) as wynik number:=1; wyjatek1 exception; begin if liczba<0 then raise wyjatek1; end if; for k in 1..liczba loop wynik := wynik * k; end loop; dbms_output.put_line(wynik); exception when wyjatek1 then dbms_output.put_line('Blad parametru. Argument musi byc wiekszy od 0'); end; ------------------------------------------ Zad. Dwa argumenty, IN i OUT - silnia declare wynik number; liczba number; begin liczba := 4; silnia(liczba, wynik); dbms_output.put_line(wynik); end; --------------------------------------------- Zad. Napisac funkcje silnia, funkcja wyprowadza wynik, wartosc ujemna = blad (wywolanie bledu) Zad. To samo co wyzej tylko rekurencyjnie ---------------------------------------------- Zad domowe. Jak sprawdziæ listê funkcji, procedur, jak usuwaæ, jak wyœwietliæ cia³o funkcji, procedur