24: into v_delete_permitted
25: from sys.dual
26: where not exists (
27: select null 28: from po_vendors pov 29: where pov.employee_id = P_PERSON_ID);
30: exception
31: when NO_DATA_FOUND then
32: hr_utility.set_message (801, 'HR_6246_ALL_PO_PER_NO_DEL');