1039: into v_delete_permitted
1040: from sys.dual
1041: where not exists (
1042: select null
1043: from per_secondary_ass_statuses s
1044: where exists (
1045: select null
1046: from per_assignments_f a
1047: where a.person_id = P_PERSON_ID
1992: --
1993: hr_utility.set_location('HR_PERSON_DELETE.DELETE_A_PERSON', 22);
1994: --
1995: begin
1996: delete from per_secondary_ass_statuses a
1997: where a.assignment_id in (
1998: select ass.assignment_id
1999: from per_assignments_f ass
2000: where ass.person_id = P_PERSON_ID);