create or replace package PACK_INTERFACE is type SN_CURSOR is REF CURSOR; PROCEDURE P_SELECT_SN (RE_SN OUT SN_CURSOR); end PACK_INTERFACE; create or replace package body PACK_INTERFACE is PROCEDURE P_SELECT_SN (RE_SN OUT SN_CURSOR) IS p_SN_CURSOR SN_CURSOR; BEGIN OPEN P_SN_CURSOR FOR select * from rmes.r_wip_tracking_t t WHERE GROUP_ID =0 AND IN_LINE_TIME > TRUNC(SYSDATE); RE_SN:=P_SN_CURSOR; END; end PACK_INTERFACE;