13: v_delete_permitted varchar2(1);
14:
15: BEGIN
16:
17: hr_utility.set_location('AP_PERSON.AP_PREDEL_VALIDATION', 1);
18:
19: begin
20: select 'Y'
21: into v_delete_permitted
30: where ap.employee_id=P_PERSON_ID);
31: -- End Bug 9741494 ;
32: exception
33: when NO_DATA_FOUND then
34: hr_utility.set_message (801, 'HR_6244_ALL_AP_PER_NO_DEL');
35: hr_utility.raise_error;
36: end;
37:
38: END ap_predel_validation;
31: -- End Bug 9741494 ;
32: exception
33: when NO_DATA_FOUND then
34: hr_utility.set_message (801, 'HR_6244_ALL_AP_PER_NO_DEL');
35: hr_utility.raise_error;
36: end;
37:
38: END ap_predel_validation;
39: