在ORACLE中返回游标结果集你需要写到一个包中:
create or replace package pag_cs_power as type c_Type is ref cursor;
FUNCTION FUN_CS_GETDICTLIST(
v_DictIndex in varchar2) return c_Type;end pag_cs_power;函数代码:FUNCTION FUN_CS_GETDICTLIST(
v_DictIndex in varchar2) return c_Type
as
c_cursor c_Type;
begin
open c_cursor for
select DICTID,DICTNAME FROM SYS_DICT WHERE DICTINDEX = v_DictIndex;
return c_cursor;
end FUN_CS_GETDICTLIST;
create or replace package pag_cs_power as type c_Type is ref cursor;
FUNCTION FUN_CS_GETDICTLIST(
v_DictIndex in varchar2) return c_Type;end pag_cs_power;函数代码:FUNCTION FUN_CS_GETDICTLIST(
v_DictIndex in varchar2) return c_Type
as
c_cursor c_Type;
begin
open c_cursor for
select DICTID,DICTNAME FROM SYS_DICT WHERE DICTINDEX = v_DictIndex;
return c_cursor;
end FUN_CS_GETDICTLIST;
解决方案 »
- Set DISPLAY environment variable 如何设置啊?
- 省市区街道社区小区楼栋表如何设计,如何在查询时展示一个完整的树结构
- 有没有办法在一个insert语句中既使用表名变量又使用rowtype变量?
- oracle 10g 中的实例连接问题
- 在块中查询的问题
- WIN7 64位 安装ORCLE11G 求帮助啊!!!
- linux Oracle 11g 部分中文乱码问题
- 求一sql
- 求救触发器?急??????//
- 请问高手:从8.1.7.0.0 导出的dmp可不可以imp到8.1.6.0.0中?
- 关于oci出错的问题,请高手指教。
- 请问oracle支持双向的游标吗?如果不支持,那些连接到oracle的记录集是如何实现movenext, moveprev双向的?
但我还是不懂,
我在delphi中要显示这个记录集,
应该怎样调用这个包呢?
存储过程可以用组件Tadostoreproc来调用,
但是包怎样调用呢?
create procedure query
as
mmm 表名%rowtype;
begin
select * into mmm from 表名;
end;
AS
TYPE myrctype IS REF CURSOR;
END pkg_test;
/create procedure query(p_rc out pkg_test.myrctype)
as
begin
open p_rc for select * from tab1;
end;
/至于delphi怎样调用,具体还是查看相关资料