procedure setIsHomePoiCategoryFlag(p_old_poi_category_id in number, p_new_poi_category_id in number) as
 v_count number(10,0);
begin
  update oc_poi_category set is_home_poi_category = 'Y' where oc_poi_category_id = p_new_poi_category_id;

  select count(*) into v_count from vo_person_category
  where home_poi_category_id = p_old_poi_category_id;

  if (v_count = 1) then update oc_poi_category set is_home_poi_category = 'N' where oc_poi_category_id = p_old_poi_category_id;
  end if;


end;