存储过程返回游标记录集

--定义游标CREATE OR REPLACE PACKAGE PKG_UHIS
IS
 TYPE uhisResultSet IS REF CURSOR;
END PKG_UHIS;

--存储过程返回游标记录集
create or replace procedure LEETEST_QUERY(
PackUnit in NUMBER,Aresult IN OUT PKG_UHIS.uhisResultSet) 
as 
  
begin 
  open Aresult for 
SELECT GROUPBY,
  DECODE(PackUnit,1,'a',2,'b',3,'c','d')AS NAME
  ,v
  /*CASE WHEN packunit=1 THEN test_case.ID+1 
  WHEN packunit=2 THEN test_case.ID+2
  WHEN packunit=3 THEN test_case.ID+3
  ELSE test_case.ID+4 END name*/
FROM test_case
GROUP BY GROUPBY,v;
end;