CREATE OR REPLACE PACKAGE p_test
AS
   TYPE myrctype IS REF CURSOR;
   PROCEDURE a ( p_c OUT myrctype);
END p_test;
/CREATE OR REPLACE PACKAGE BODY p_test
AS
   PROCEDURE a ( p_c OUT myrctype)
   IS
   BEGIN
         OPEN p_c FOR select COL1,COL2 from TABLE_NAME;
   END A;
END p_test;
/