Nazwa zmiennej w powyższym kodzie wprowadziła Cię w błąd. Twoja zmienna outtable
jest w table
rodzaj. Nie można pobrać danych rekordu do tabeli rekordów, ale można je pobrać do samego rekordu.
DECLARE
REFCUR SYS_REFCURSOR;
TYPE RECORDTYPE IS RECORD (COL1 NUMBER, COL2 VARCHAR(100));
outtable RECORDTYPE;
BEGIN
SP_OUT_RefCur_PARAM(REFCUR);
LOOP
FETCH REFCUR INTO outtable;
EXIT WHEN REFCUR%NOTFOUND;
dbms_output.put_line(outtable.col1);
END LOOP;
CLOSE REFCUR;
END;
Aktualizacja: Jeśli chcesz pobrać wszystkie dane, aby uzyskać lepszą wydajność swojej aplikacji, musisz użyć instrukcji BULK COLLECT:
DECLARE
REFCUR SYS_REFCURSOR;
TYPE RECORDTYPE IS
RECORD (COL1 NUMBER, COL2 VARCHAR(100));
TYPE TABLETYPE IS
TABLE OF REFTABLETYPE
INDEX BY PLS_INTEGER;
outtable TABLETYPE;
BEGIN
SP_OUT_RefCur_PARAM(REFCUR);
LOOP
FETCH REFCUR INTO BULK COLLECT outtable;
EXIT WHEN outtable.COUNT = 0;
FOR indx IN 1 .. outtable.COUNT
LOOP
dbms_output.put_line(outtable(indx).col1);;
END LOOP;
END LOOP;
CLOSE REFCUR;
END;
Uwaga:zużycie pamięci z instrukcją BULK jest znacznie większe niż bez.
Ale jeśli tylko pobierasz i przetwarzasz wiersze - wiersz po wierszu nie ma potrzeby w BULK
oświadczenie, wystarczy użyć kursora FOR LOOP
. (Zapytaj Toma
)