Oracle - Populate List Item from SQL

PROCEDURE epc_pop_list_item (p_item_name varchar2, p_sql varchar2) IS

rg_name VARCHAR2(40) := 'pop_list';
rg_id RecordGroup;
errcode NUMBER;

list_id Item;

BEGIN

rg_id := Find_Group( rg_name );

IF Id_Null(rg_id) THEN
rg_id := Create_Group_From_Query( rg_name, p_sql );
END IF;

errcode := Populate_Group( rg_id );
------------------------------------------------------

list_id := Find_item(p_item_name);
Clear_List(list_id);
Populate_List(list_id, 'pop_list');

END;