我有一个通过ODAC从 VB.NET 调用的plsql过程。过程执行简单的选择:
cursor C_emp is select name, surname from employees;
过程必须具有 OUT 参数作为引用光标。
我知道我可以做一个简单的:
declare
L_cursor sys_refcursor;
begin
open L_cursor for select name, surname from employees;
...
end;
但是我需要根据 select 语句中的一些逻辑向 OUT REF CURSOR 添加几列。
我想做一个循环,一次处理一条记录到数组类型的表中,然后将其转换为 REF CURSOR。
我该怎么做?任何建议都非常感谢,提前非常感谢。
我很确定这些计算可以在一个选择语句中完成,而无需创建额外的游标。但是,如果您仍然想要它,我将向您展示一个可能的示例如何实现这一目标。
首先,您必须声明一个对象TYPE
。(它将表示结果查询中的一行(:
create or replace type MY_TYPE as object (
name varchar2(64),
surname varchar2(64),
calculatedValue varchar2(64) --your calculated column. You may add as many columns as needed, but for simplicity, I'll stick to only one column
);
现在,创建一个包含MY_TYPE
对象的嵌套表(它将表示整个结果集(:
create or replace type MY_TYPE_LIST as table of MY_TYPE;
现在,你已准备好编写管道函数来返回所需的结果集。
create or replace function MY_FUNC return MY_TYPE_LIST pipelined as
cursor cur is
select name, surname from employees;
name varchar2(64);
surname varchar2(64);
calculatedColumn varchar2(64);
begin
open cur;
loop
fetch cur into name, surname;
exit when cur%notfound;
--do something here, calculate new columns
calculatedColumn := ...; --assign a value you want
pipe row (MY_TYPE(name, surname, calculatedColumn)); --the moment of truth. Pipe a row containing the new column
end loop;
end;
此函数将返回一个新游标,其中包含MY_TYPE
对象的值。
在 select 语句中使用任何逻辑的方式相同。
declare
L_cursor sys_refcursor;
begin
OPEN l_cursor FOR SELECT name,
CASE
WHEN name LIKE 'Jack%' THEN 'Jack the Ripper'
END AS nick_name,
surname FROM employees;
...
end;