The following lines contain the word 'select', 'insert', 'update' or 'delete':
select 1
into x_dummy
from sys.dual
where not exists
(select 1
from pa_cost_bases c
where c.cost_base = x_cost_base
and c.cost_base_type = x_cost_base_type
and ((x_rowid is NULL) or (rowid <> x_rowid)));
select 1
into x_dummy
from sys.dual
where not exists
(select 1
from pa_cost_base_cost_codes cbicc
where cbicc.cost_base = x_cost_base);
select 1
into x_dummy
from sys.dual
where not exists
(select 1
from pa_cost_base_exp_types p
where p.cost_base = x_cost_base);
select 1
into x_dummy
from sys.dual
where not exists
(select 1
from pa_cost_base_cost_codes cbicc
where cbicc.cost_base = x_cost_base
and cbicc.cost_base_type = x_cost_base_type);
select 1
into x_dummy
from pa_cost_base_cost_codes cbicc,
pa_ind_cost_multipliers mul,
pa_ind_compiled_sets ics,
pa_expenditure_items ei
where cbicc.cost_base = x_cost_base
and cbicc.cost_base_type = x_cost_base_type
and cbicc.ind_cost_code = mul.ind_cost_code
and mul.ind_rate_sch_revision_id = ics.ind_rate_sch_revision_id
and ((ics.ind_compiled_set_id =
ei.cost_ind_compiled_set_id)
or (ics.ind_compiled_set_id =
ei.rev_ind_compiled_set_id)
or (ics.ind_compiled_set_id =
ei.inv_ind_compiled_set_id));
select 1
into x_dummy
from sys.dual
where not exists
(select 1
from pa_cost_base_exp_types p
where p.cost_base = x_cost_base
and p.cost_base_type = x_cost_base_type);