902: cursor c_bg ( c_person_id number,
903: c_as_on_date date) is
904: select
905: business_group_id
906: from per_people_f
907: where person_id = c_person_id and
908: c_as_on_date between effective_start_date and effective_end_date;
909:
910: -- this cursor gets the ghr_pa_history rows (with the rowid included) for the person_id specified and locks
4360: -- ---------------------------------------------------------------------------
4361: -- {Start Of Comments}
4362: --
4363: -- Description:
4364: -- This procedure deletes a row from per_people_f table.
4365: --
4366: -- Pre-Requisities:
4367: -- None.
4368: --
4371: -- p_dt_mode -> datetrack delete mode.
4372: -- p_date_effective -> effective date of delete.
4373: --
4374: -- Post Success:
4375: -- per_people_f row will have been deleted.
4376: --
4377: -- Post Failure:
4378: -- message will have been displayed to user explaining why the delete could not be completed.
4379: --
4388:
4389: PROCEDURE delete_peop_row( p_person_id in varchar2,
4390: p_dt_mode in varchar2,
4391: p_date_effective in date) IS
4392: l_proc varchar2(72) := 'delete_per_people_f_row';
4393: l_ovn number;
4394: l_effective_start_date date;
4395: l_effective_end_date date;
4396: cursor c_get_ovn (cp_person_id in number,
4395: l_effective_end_date date;
4396: cursor c_get_ovn (cp_person_id in number,
4397: cp_date_effective in date) is
4398: SELECT object_version_number
4399: FROM PER_PEOPLE_F
4400: WHERE person_id = cp_person_id
4401: AND cp_date_effective between effective_start_date and effective_end_date;
4402: BEGIN
4403: hr_utility.set_location( 'Entering : ' || l_proc, 10);
4579: -- ---------------------------------------------------------------------------
4580: -- {Start Of Comments}
4581: --
4582: -- Description:
4583: -- This procedure deletes a row from per_people_f table.
4584: --
4585: -- Pre-Requisities:
4586: -- None.
4587: --