The following lines contain the word 'select', 'insert', 'update' or 'delete':
Procedure chk_non_updateable_args
(p_effective_date in date
,p_rec in pay_tfu_shd.g_rec_type
) IS
--
l_proc varchar2(72) := g_package || 'chk_non_updateable_args';
End chk_non_updateable_args;
select null
from pay_template_ff_usages tfu
where tfu.template_id = p_template_id
and tfu.template_ff_usage_id <> p_template_ff_usage_id
and tfu.object_id = p_object_id
and tfu.formula_id = p_formula_id;
select pet.template_id
, pet.template_type
, pet.business_group_id
, nvl(pbg.legislation_code, pet.legislation_code)
from pay_element_templates pet
, per_business_groups_perf pbg
where pet.template_id = p_template_id
and pet.template_type = 'T'
and pbg.business_group_id (+)= pet.business_group_id;
select null
from pay_shadow_element_types pset
where pset.template_id = p_template_id
and pset.element_type_id = p_object_id;
select null
from pay_template_exclusion_rules ter
where ter.exclusion_rule_id = p_exclusion_rule_id
and ter.template_id = p_template_id;
select null
from pay_shadow_formulas sf
where sf.formula_id = p_formula_id
and sf.template_type = 'T'
and nvl(sf.formula_type_name, pay_sf_shd.g_payroll_formula_type) =
pay_sf_shd.g_payroll_formula_type
and ((sf.legislation_code is null and sf.business_group_id is null) or
sf.legislation_code = p_legislation_code or
sf.business_group_id = p_business_group_id);
Procedure insert_validate
(p_effective_date in date
,p_rec in pay_tfu_shd.g_rec_type
) is
--
l_proc varchar2(72) := g_package||'insert_validate';
End insert_validate;
Procedure update_validate
(p_effective_date in date
,p_rec in pay_tfu_shd.g_rec_type
) is
--
l_proc varchar2(72) := g_package||'update_validate';
chk_non_updateable_args
(p_effective_date => p_effective_date
,p_rec => p_rec
);
End update_validate;
Procedure delete_validate
(p_rec in pay_tfu_shd.g_rec_type
) is
--
l_proc varchar2(72) := g_package||'delete_validate';
End delete_validate;