[Home] [Help]
70: end case;
71: return r;
72: end list_staging_tables;
73:
74: function list_plan_runs(p_plan_name varchar2, p_plan_run_id number) return msc_apcc_number_list
75: is
76: r msc_apcc_number_list;
77: begin
78: select plan_run_id bulk collect into r
72: end list_staging_tables;
73:
74: function list_plan_runs(p_plan_name varchar2, p_plan_run_id number) return msc_apcc_number_list
75: is
76: r msc_apcc_number_list;
77: begin
78: select plan_run_id bulk collect into r
79: from msc_plan_runs
80: where (plan_name=p_plan_name and plan_run_id=nvl(p_plan_run_id,plan_run_id))
809:
810: end populate_details_fn;
811:
812: procedure purge_details(p_plan_name varchar2, p_plan_run_id number) is
813: l_purge_list msc_apcc_number_list := list_plan_runs(p_plan_name, p_plan_run_id);
814: cursor c is select column_value plan_run_id from table(l_purge_list);
815: l_last_plan_run_id number := null;
816: l_plan_name varchar2(50);
817: l_plan_id number;