Oracle中函数/过程返回结果集的几种方式:
以函数return为例,存储过程只需改为out参数即可,在oracle 10g测试通过.
(1) 返回游标:
return的类型为:SYS_REFCURSOR
之后在IS里面定义变量:curr SYS_REFCURSOR;
最后在函数体中写:
open cur for
select ......;
return cur;
例:
CREATE OR REPLACE FUNCTION A_Test( orType varchar2 )RETURN SYS_REFCURSOR is type_cur SYS_REFCURSOR; BEGIN OPEN type_cur FOR select col1,col2,col3 from testTable ; RETURN type_cur; END;
(2)返回table类型的结果集:
首先定义一个行类型:
CREATE OR REPLACE TYPE "SPLIT_ARR" AS OBJECT(nowStr varchar2(18))
其次以此行类型定义一个表类型:
CREATE OR REPLACE TYPE "SPLIT_TAB" AS TABLE of split_arr;
定义函数(此函数完成字符串拆分功能):
CREATE OR REPLACE FUNCTION GetSubStr( str in varchar2, --待分割的字符串 splitchar in varchar2 --分割标志 ) return split_tab IS restStr varchar2(2000) default GetSubStr.str;--剩余的字符串 thisStr varchar2(18);--取得的当前字符串 indexStr int;--临时存放分隔符在字符串中的位置 v split_tab := split_tab(); --返回结果 begin dbms_output.put_line(restStr); while length(restStr) != 0 LOOP <<top>> indexStr := instr(restStr,splitchar); --从子串中取分隔符的第一个位置 if indexStr = 0 and length(restStr) != 0 then--在剩余的串中找不到分隔符 begin v.extend; v(v.count) := split_arr(Reststr); return v; end; end if; if indexStr = 1 then---第一个字符便为分隔符,此时去掉分隔符 begin restStr := substr(restStr,2); goto top; end; end if; if length(restStr) = 0 or restStr is null then return v; end if; v.extend; thisStr := substr(restStr,1,indexStr - 1); --取得当前的字符串 restStr := substr(restStr,indexStr + 1);---取剩余的字符串 v(v.count) := split_arr(thisStr); END LOOP; return v; end;
在PL/SQL developer中可以直接调用
cursor strcur is
select nowStr from Table(GetSubStr('111,222,333,,,',','));
(3)以管道形式输出:
create type row_type as object(a varchar2(10), v varchar2(10));--定义行对象 create type table_type as table of row_type; --定义表对象 create or replace function test_fun( a in varchar2,b in varchar2 ) return table_type pipelined is v row_type;--定义v为行对象类型 begin for thisrow in (select a, b from mytable where col1=a and col2 = b) loop v := row_type(thisrow.a, thisrow.b); pipe row (v); end loop; return; end; select * from table(test_fun('123','456'));
没有整理与归纳的知识，一文不值！高度概括与梳理的知识，才是自己真正的知识与技能。 永远不要让自己的自由、好奇、充满创造力的想法被现实的框架所束缚，让创造力自由成长吧！ 多花时间，关心他（她）人，正如别人所关心你的。理想的腾飞与实现，没有别人的支持与帮助，是万万不能的。
本文转自wenglabs博客园博客，原文链接：http://www.cnblogs.com/arxive/p/5959471.html
，如需转载请自行联系原作者
