반응형
PROCEDURE SEARCH_10 (
ORESULT_CUR OUT SYS_REFCURSOR
, IN_DEPT_CD IN VARCHAR2
, IN_DEPT1 IN VARCHAR2
, IN_KORNM IN VARCHAR2
)
IS
rec TABLENAME%rowtype;
BEGIN
FOR dept_list IN (SELECT CODE,DISPLAY_TEXT
FROM dual A
)
)
LOOP
PKG_COMMON.SEARCH_20(ORESULT_CUR, dept_list.CODE, '', '');
LOOP
FETCH ORESULT_CUR INTO rec;
exit when ORESULT_CUR%notfound;
INSERT INTO table(aa, bb)
VALUES(rec.a1, rec.a2);
END LOOP;
END LOOP;
END SEARCH_10;
반응형