随锐旗下互动传媒：

Oracle下的动态游标实现

http://www.weaseek.com 2008-08-08 14:07:10 来源：搜讯论坛

本文介绍了Oracle下的动态游标实现的方法。

不少朋友在开发过程中，要使用到游标进行统计(不用临时表)并返回统计结果，但游标后面的SQL却是动态的，如select * from tablename where ? order ?."?"代表条件，这样该如何处理呢。在同事的帮助下我实践了一下。总结出来。

假设tablename表中有field如下：

field1 varchar2(50)

field2 Varchar2(50)

field3 Varchar(50)

field4 varchar2(50)

field5 varchar2(20)

field6 float,

field7 float

1.定义游标

create or replace package RefCursor is


-- Author : Ricky 
-- Created : 2003-9-1 14:08:45 
-- Purpose : 
-- Public type declarations 
type t_RefCursor is ref cursor;

end RefCursor;

2.创建类型

创建的类型与tablename中表的fields一致，当然也要看你实际是否要统计所有的fields.

create or replace type TableType as object


( 
-- Author : Ricky 
-- Created : 2003-8-25 9:12:08 
-- Purpose : 
-- Attributes 
field1 varchar2(50), 
field2 Varchar2(50), 
field3 Varchar(50), 
field4 varchar2(50), 
field5 varchar2(20), 
field6 float, 
field7 float

);

3.创建表类型

create or replace type TableTypeList as table of TableType;

4.在存储过程或者函数中使用，下面在函数中使用(存储过程中不能用return一个表结构，要用到临时表)

CREATE OR REPLACE FUNCTION "TEST" (


return TableTypeList pipelined as 
begin 
v_Cur RefCursor.t_Refcursor; 
v_SQLStatement string(10000); 
v_Table tablename%rowtype; 
tmp1 tablename.field1%Type; 
tmp2 tablename.field2%Type; 
tmp3 tablename.field3%Type; 
tmp4 tablename.field4%Type; 
tmp5 tablename.field5%Type; 
tmp6 tablename.field6%Type; 
tmp7 tablename.field6%Type; 
v_SQLStatement := 'Select * From tablename where field1='1' order by field1'; 
open v_Cur for v_SQLStatement; 
loop 
--这里是循环过程 
fetch v_Cur into v_Comm; 
exit when v_CommCur%notfound; 
--这里是你要处理的统计过程,中间的过程我没有做统计，各位在实践中按需要自己添加。 
field1 = v_Cur.field1; 
field2 = v_Cur.field2; 
field3 = v_Cur.field3; 
field4 = v_Cur.field4; 
field5 = v_Cur.field5; 
field6 = v_Cur.field6; 
field7 = v_Cur.field7; 
v_Table = TableType(field1, 
field2, 
field3, 
field4, 
field5, 
field6, 
field7) 
pipe row(v_Table); 
end loop