1.

Procedurka taka fajna sobie podnosząca płacę (dla porównania utworzyłem kopię tabeli prac do prac2,


/*CREATE OR REPLACE PROCEDURE podnies_place (suma REAL) IS
BEGIN
UPDATE prac
SET placa_pod = placa_pod + suma;
END;
/*/


wywołanie procedurki :), potem trzeba odświeżyć tabelę prac


BEGIN
podnies_place(100);
END;


2.
/*CREATE OR REPLACE FUNCTION podatek(pracid IN NUMBER) RETURN NUMBER IS
ret_val NUMBER;
BEGIN
SELECT placa_pod+nvl(placa_dod,0) INTO ret_val FROM PRAC WHERE ID_PRAC=pracid;
ret_val:=ret_val*12;
IF ret_val>50000 THEN
ret_val:=ret_val*0.4;
ELSIF ret_val>30000 THEN
ret_val:=ret_val*0.3;
ELSE
ret_val:=ret_val*0.19;
END IF;
RETURN ret_val;
END podatek;
/*/

ACCEPT idprac PROMPT 'Wprowadz ID_PRAC np. 180'
SELECT nazwisko, ROUND(podatek('&idprac'),2) FROM prac
where id_prac = '&idprac';