Doktor Hakediş Oluşturma SQL

				
					declare
TYPE TR IS TABLE OF islemtipi %ROWTYPE;

T TR;

i NUMBER;

BEGIN

i:=1;

SELECT i.* BULK COLLECT INTO T from islemtipi i where   ((GRUP_KODU between 0 AND 150) OR  (GRUP_KODU between 250 AND 599) or (GRUP_KODU=800) )  ;

FOR i IN T.first..T.last

LOOP

INSERT INTO HASTANE.ISLEMDRY
(DR_KODU,kurum_no,KODU,DRYUZDESI,DRYUZDESI_DIGER,
HAVUZ,DRPAYI,FARKYUZDE,FARKPAYI,ozel_kodu)
VALUES
(25,0,t(i).kodu,0,NULL,'F',0,0,NULL,t(i).ozel_kod);

commit;

END LOOP;

END;