SET SERVEROUTPUT ON
DECLARE
TYPE TCUR IS REF CURSOR;
CUR TCUR;
AC_WHERE VARCHAR2(100);
AC VARCHAR2(100);
BEGIN
AC_WHERE := '(31044,31048)';
OPEN CUR FOR 'SELECT OBJECT_ID FROM USER_OBJECTS WHERE OBJECT_ID IN '|| AC_WHERE;
LOOP
FETCH CUR INTO AC;
EXIT WHEN CUR%NOTFOUND;
DBMS_OUTPUT.PUT_LINE(AC);
END LOOP;
CLOSE CUR;
END;
/
简单测试动态游标(REF CURSOR)的使用
最新推荐文章于 2025-02-08 23:49:24 发布