declare
-- Non-scalar parameters require additional processing
ty_type arr_string;
begin
-- Call the procedure
ty_type :=arr_string('01','05','59');
pro_rpt_rptincome_clear(organno => :organno,
start_time => :start_time,
end_time => :end_time,
ty_type => ty_type,
cash_status => :cash_status,
o_c_out => :o_c_out,
o_s_out => :o_s_out);
end;