create or replace package mypack 
as 
type mytype is ref cursor return emp%rowtype; 
--type tmp number;
function myemp(dno number) return mytype; 
--procedure returnnumber(num number) return tmp number ;
end;  
create or replace package body mypack 
as 
  function myemp(dno number) return mytype 
  as 
    eee mytype; 
  begin 
    open eee for select * from emp where deptno=dno; 
    return eee; 
  end myemp; 
--  procedure returnnumber(num number) return tmp number
-- tmp number;
--  as 
--  tmp:=2*num;
-- end procedure; 
end mypack;