The following lines contain the word 'select', 'insert', 'update' or 'delete':
Procedure chk_non_updateable_args
(p_rec in pay_ter_shd.g_rec_type
) is
l_proc varchar2(72) := g_package||'chk_non_updateable_args';
End chk_non_updateable_args;
select null
from pay_element_templates pet
where pet.template_id = p_template_id
and pet.template_type = 'T';
select null
from pay_shadow_element_types pset
, pay_shadow_input_values psiv
where pset.template_id = p_template_id
and psiv.element_type_id = pset.element_type_id
and nvl(upper(psiv.default_value_column), hr_api.g_varchar2) =
upper(p_flexfield_column);
Procedure chk_delete
(p_exclusion_rule_id in number
) is
--
-- Cursors to check for rows referencing the exclusion rule.
--
cursor csr_element_types is
select null
from pay_shadow_element_types pset
where pset.exclusion_rule_id = p_exclusion_rule_id;
select null
from pay_shadow_balance_types sbt
where sbt.exclusion_rule_id = p_exclusion_rule_id;
select null
from pay_shadow_input_values siv
where siv.exclusion_rule_id = p_exclusion_rule_id;
select null
from pay_shadow_balance_feeds sbf
where sbf.exclusion_rule_id = p_exclusion_rule_id;
select null
from pay_shadow_formula_rules sfr
where sfr.exclusion_rule_id = p_exclusion_rule_id;
select null
from pay_shadow_iterative_rules sir
where sir.exclusion_rule_id = p_exclusion_rule_id;
select null
from pay_shadow_ele_type_usages etu
where etu.exclusion_rule_id = p_exclusion_rule_id;
select null
from pay_shadow_gu_bal_exclusions sgb
where sgb.exclusion_rule_id = p_exclusion_rule_id;
select null
from pay_shadow_balance_classi sbc
where sbc.exclusion_rule_id = p_exclusion_rule_id;
select null
from pay_shadow_defined_balances sdb
where sdb.exclusion_rule_id = p_exclusion_rule_id;
select null
from pay_shadow_sub_classi_rules ssr
where ssr.exclusion_rule_id = p_exclusion_rule_id;
select null
from pay_shadow_bal_attributes sba
where sba.exclusion_rule_id = p_exclusion_rule_id;
select null
from pay_template_ff_usages tfu
where tfu.exclusion_rule_id = p_exclusion_rule_id;
l_proc varchar2(72) := g_package||'chk_delete';
fnd_message.set_name('PAY', 'PAY_50129_TER_INVALID_DELETE');
End chk_delete;
Procedure insert_validate(p_rec in pay_ter_shd.g_rec_type) is
--
l_proc varchar2(72) := g_package||'insert_validate';
End insert_validate;
Procedure update_validate(p_rec in pay_ter_shd.g_rec_type) is
--
l_proc varchar2(72) := g_package||'update_validate';
chk_non_updateable_args(p_rec);
End update_validate;
Procedure delete_validate(p_rec in pay_ter_shd.g_rec_type) is
--
l_proc varchar2(72) := g_package||'delete_validate';
chk_delete(p_rec.exclusion_rule_id);
End delete_validate;