Oracle存储过程返回结果集都是以SYS_REFCURSOR的方式返回的,我们一般看不到这个返回的具体内容,今天我们换了一种变通的方式来处理存储过程返回的结果集,让我们在PL/SQL中可以查看Oracle自定义函数返回的结果集。具体做法是创建自定义函数,由函数返回的结果中去看SYS_REFCURSOR的内容。
首先我们先建立一个测试环境
创建测试表:
Create Table App_TEST
(
fKEY NUMBER,
fName VARCHAR2(10) DEFAULT 'PAUL',
fCSRQ DATE DEFAULT TO_DATE('2018-01-01','YYYY-MM-DD'),
fPID VARCHAR2(10)
);
Alter Table App_TEST Add Constraint App_TESTKey Primary Key (fKEY) Using index;
-- 加表和字段的注释
CALL p_SetComment( 'App_TEST','测试表|关键字|姓名|出生日期|点位号' );
-- 插入实验数据
INSERT INTO App_TEST (fKEY,fCSRQ,fPID) VALUES (APP_TEST_KEY.NEXTVAL,TO_DATE('1962-12-18','YYYY-MM=DD'),'P001');
INSERT INTO App_TEST (fKEY,fName,fCSRQ,fPID) VALUES (APP_TEST_KEY.NEXTVAL,'SEPT',TO_DATE('1968-09-17','YYYY-MM=DD'),'P002');
INSERT INTO App_TEST (fKEY,fName,fPID) VALUES (APP_TEST_KEY.NEXTVAL,'WENGLEI','P003');
SELECT * FROM App_TEST;
-------------------------------
FKEY FNAME fCSRQ FPID
-------------------------------
1 PAUL 1962-12-18 P001
2 SEPT 1968-09-17 P002
3 WENGLEI 2018-01-01 P003
-------------------------------
创建用于查询的函数
CREATE OR REPLACE FUNCTION f_DESC
(
uTablename IN VARCHAR2 -- 指定的表名
)
RETURN SYS_REFCURSOR
AS
uSQL VARCHAR2(2000);
uCur SYS_REFCURSOR;
BEGIN
uSQL := 'BEGIN OPEN :uCur for ';
uSQL := uSQL || 'SELECT * FROM ';
uSQL := uSQL || UPPER(uTablename);
uSQL := uSQL || '; ';
uSQL := uSQL || 'END;';
DBMS_OUTPUT.PUT_LINE(uSQL);
EXECUTE IMMEDIATE uSQL USING uCur;
RETURN uCur;
END f_DESC;
运行函数进行查询
SELECT F_DESC('APP_TEST') FROM DUAL;
然后我们点击用红色标记的位置。接下来弹出的窗口就是cursor对象中的内容了。
需要注意的内容
这里是对cursor类型的对象内容进行查看,查看完以后,结果就被用掉了,不能再次查看,再次查看还需要重新查询一次。