How to include an out param of a stored proc called inside a ref cursor...????

Question

I have a stored proc that is defined as
CREATE or REPLACE
PROCEDURE ABC
(linkid IN CHAR,
Year_in IN DATE,
Method_in IN CHAR,
Date_out OUT DATE,
average_out OUT NUMBER)
is
begin
end;
another partially completed stored proc that returns a ref
cursor defined as follows:
create or replace package zzz
as
type cursorType is ref cursor;
end;
create or replace function test return zzz.cursortype
as
date_OUT date;
Average_OUT number;
l_cursor zzz.cursorType;
CURSOR temp_cur is
SELECT l.linkid, L.routenumber, ABC(l.linkid,
to_date('01/01/2000', 'mm/dd/yyyy'),
'2',
date_OUT,
average_OUT)
FROM LINK l
WHERE l.LINKID <= '010999';
begin
open temp_cur;
end;
inside test (which I need help completing), how can I refer to
the date_out and the average_out params returned by ABC() so
that these values are in turn passed to the cursortype defined
in package zzz?
Thanks in advance.

Answer 1

Try rewriting your abc proceudre as two functions, abc1 and
abc2, and rewriting your test function as a test procedure. See
if you can fill in the blanks prefaced by hyphens -- in the
following code:
CREATE OR REPLACE FUNCTION abc1
  (linkid      IN  CHAR,
   year_in     IN  DATE,
   method_in   IN  CHAR)
  RETURN DATE
IS
  date_out DATE;
BEGIN
  SELECT   --
  INTO     date_out
  FROM     --
  WHERE    --;
  --or
  date_out := --;
  RETURN date_out;
END abc1;
CREATE OR REPLACE FUNCTION abc2
  (linkid      IN  CHAR,
   year_in     IN  DATE,
   method_in   IN  CHAR)
  RETURN NUMBER
IS
  average_out NUMBER;
BEGIN
  SELECT   AVG (--)
  INTO     average_out
  FROM     --
  WHERE    --
  GROUP BY --;
  --or
  average_out := --;
  RETURN average_out;
END abc2;
CREATE OR REPLACE PACKAGE zzz
AS
  TYPE cursortype IS REF CURSOR;
  PROCEDURE test
    (temp_cur OUT cursortype);
END zzz;
CREATE OR REPLACE PACKAGE BODY zzz
AS
  PROCEDURE test
    (temp_cur OUT cursortype)
  IS
  BEGIN
    OPEN temp_cur
    FOR
    SELECT l.linkid,
           l.routenumber,
           abc1 (l.linkid,
                TO_DATE ('01/01/2000', 'mm/dd/yyyy'),
                '2'),
           abc2 (l.linkid,
                TO_DATE ('01/01/2000', 'mm/dd/yyyy'),
                '2')
    FROM   link l
    WHERE  l.linkid <= '010999';
  END test;
END zzz;
SQL> VARIABLE g_ref REFCURSOR;
SQL> EXEC zzz.test (:g_ref);
SQL> PRINT g_ref