sysrefcorsor error handling

CREATE OR REPLACE package fp_error as

TYPE t_cursor IS REF CURSOR;
procedure pr_fig(
p_mkt_sec                 in    varchar2    default null,
p_mkt_sub_sec             in    varchar2    default null,
p_comm_group              in    varchar2    default null,
p_comm                    in    varchar2    default null,
p_sub_comm                in    varchar2    default null,
p_time                    in    varchar2    default null,
io_cursor                 out   t_cursor,
p_out                     out   number
);

end fp_error;
/

CREATE OR REPLACE package body fp_error as
procedure pr_fig(
p_mkt_sec                 in    varchar2    default null,
p_mkt_sub_sec             in    varchar2    default null,
p_comm_group              in    varchar2    default null,