380: INTO l_delete_permitted
381: FROM sys.dual
382: WHERE 1 >= (
383: SELECT count(*)
384: FROM per_assignments_f a
385: WHERE a.person_id = P_PERSON_ID
386: AND a.effective_start_date >= p_effective_date);
387:
388: EXCEPTION
399: INTO l_delete_permitted
400: FROM sys.dual
401: WHERE not exists (
402: SELECT null
403: FROM PER_ASSIGNMENTS_F a
404: WHERE a.recruiter_id = p_person_id
405: OR a.supervisor_id = p_person_id);
406:
407: EXCEPTION
421: select null
422: from per_secondary_ass_statuses s
423: where exists (
424: select null
425: from per_assignments_f a
426: where a.person_id = P_PERSON_ID
427: and a.assignment_id = s.assignment_id));
428: --
429: exception