Procedury + kursory, Prośba o sprawdzenie czy wszystko ok :P Opcje

[Impek77]

Wiem, jestem nowy ale robie projekt z Oracla(nie mam w tej chwili dostepu) więc proszę o sprawdzenie czy te elementy nie są bez sensu i ewentulanie prośba o jakieś sugestie


DECLARE OR REPLACE PROCEDURE prowizja (cena IN Number(10), prowizja IN number(10))

IS BEGIN
SELECT sum(cena), prowizja FROM pomiar;

IF sum(cena)>20000 THEN prowizja= cena*0,04;

ELSE prowizja=cena*0,03;

END IF;

END;




DECLARE pierwszy CURSOR

FOR SELECT ID_Projektu,miasto FROM pomiar ORDER BY Miasto;

OPEN pierwszy;

FETCH NEXT FROM pierwszy;




DECLARE Drugi varchar(30);

CURSOR Usun IS SELECT Miasto FROM pomiar;

BEGIN OPEN Usun;

LOOP

FETCH Usun INTO Drugi ; EXIT WHEN Usun%notfound;

EXECUTE IMMEDIATE ' DROP TABLE ' || Drugi;

dbms_output.put_line('Usunieto tabele '|| Drugi);

END LOOP;

CLOSE Usun;

END;

Ten post edytował Impek77 12.12.2007, 17:32:41