oracle - 在过程中使用游标作为函数输出 (Oracle)

Question

我正在努力寻找解决方案，但总是有问题。那么我的问题是什么：

我有一个功能：

function fun1 (
p_param1 number) return sys_refcursor
is 
  c_result sys_refcursor;
begin
  open c_result for select e.username, c.contract_id from employees e 
    join contracts c on c.employee_id = e.employee_id;
  return c_result;
end fun1;

我想在我的存储过程中使用这个函数：

procedure proc1 (...) 
is ...
cur_contract sys_refcursor;
begin
...
  open cur_contract for fun1(p_param1);
  loop
    fetch cur_contract into v_username, v_contract_id;
    exit when cur_contract%notfound;
    ...
  end loop;
  close cur_contract;
...
end proc1;

我得到错误：“open cur_contract for fun1(p_param1);”行中的表达式类型错误

我应该改变什么以使我的程序有效？

Answer 1

您已经在 fun1 中打开了光标。尝试以下操作：

procedure proc1 (...)
  is
  ...
  cur_contract sys_refcursor;
begin
  ...
 cur_contract := fun1(p_param1);

 loop
   fetch cur_contract into v_username, v_contract_id;
   exit when cur_contract%notfound;
   ...
 end loop;

 close cur_contract;
 ...
end proc1; 

我希望这有帮助。