The following lines contain the word 'select', 'insert', 'update' or 'delete':
v_delete_permitted varchar2(1);
select 'Y'
into v_delete_permitted
from sys.dual
where not exists (
select null
from wip_employee_labor_rates welr
where welr.employee_id = P_PERSON_ID);
hr_utility.set_message(706, 'WIP_EMPLOYEE_DELETE');
select 'Y'
into v_delete_permitted
from sys.dual
where not exists (
select null
from wip_transactions wt
where wt.employee_id = P_PERSON_ID);
hr_utility.set_message(706, 'WIP_EMPLOYEE_DELETE');
select 'Y'
into v_delete_permitted
from sys.dual
where not exists (
select null
from bom_resource_employees be,
wip_op_resource_instances wi
where be.organization_id = wi.organization_id
and be.instance_id = wi.instance_id
and be.person_id = P_PERSON_ID);
hr_utility.set_message(706, 'WIP_EMPLOYEE_DELETE');