create package pk_Test as
t_cur is ref cursor ;
function fn_getResult(tablename varchar2) return t_cur;
end pk_test;
/
create package body pk_Test as
function fn_getResult(tablename varchar2) return cursor
is rs t_Cur;
begin
open rs for ' select * from ' || tablename ;
return rs;
exception
when others then
rasie;
end fn_getResult;
end pk_test;
/
t_cur is ref cursor ;
function fn_getResult(tablename varchar2) return t_cur;
end pk_test;
/
create package body pk_Test as
function fn_getResult(tablename varchar2) return cursor
is rs t_Cur;
begin
open rs for ' select * from ' || tablename ;
return rs;
exception
when others then
rasie;
end fn_getResult;
end pk_test;
/
解决方案 »
- oracle触发器 修改某一字段的值后,删除本表记录
- PL SQL 查询显示
- ORACLE怎么把记录中间的空间去掉呢?
- 很简单,但包编译就是通不过,着急呀!!!
- ORACLE 日期参数格式怎么计算啊?各位高手,散分了
- 如何在 vc.NET 下编译PC文件??
- 输入日期型数据时总提示月份不正确,我用的是ORACLE9I,就是从它自带的数据表中拷贝日期型数据也提示出错?希望高手指点。
- 请教各位ORACLE的数据库记录如何可以转到ACCESS数据库
- 为什么会出现这个问题?怎么解决啊?
- ASP+oracle817存图片的问题!还是没解决?
- 菜鸟的问题:oracle怎么样备份数据表啊,怎样才能连上OMS? 需要怎样配置呢?
- 有关Oracle的中方网站
but I have a problem for that how to close the cursor how to close the rs ?
你写的那个是用函数返回游标,我用过程返回是一个效果吧?
我想请你指点在Delphi里怎么调用你写的函数来返回一个数据集?
你写的那个是用函数返回游标,与我用过程返回是一个效果吧?
我想请你指点在Delphi里怎么调用你写的函数来返回一个数据集?
like othe database component , set property , i think ...
用TADOQuery或Query能够连接,但不能返回像Sql-Server中的结果集>
我想再问一下Oralce中的过程或函数能不能返回数据集?
,你可以将放回的数据定义称多维数组,返回
调用如下:
adspRunYtj.Parameters.ParamByName('ny').Value:=NY;
adspRunYtj.Parameters.ParamByName('SRETURN').Value:=sRFlag;
adspRunYtj.ExecProc;
adspRunYtj是TADOStoreProcedure
设置它的procedurename 和需要传入、传出的参数类型
p_dd in out t_cursor)
is
begin
IF P_DD%ISOPEN THEN
CLOSE p_dd;
END IF;
end;
end;
:)BUG