The following lines contain the word 'select', 'insert', 'update' or 'delete':
Procedure chk_non_updateable_args
(p_rec in pay_etm_shd.g_rec_type
) is
--
l_proc varchar2(72) := g_package||'chk_non_updateable_args';
End chk_non_updateable_args;
select null
from fnd_territories ft
where ft.territory_code = p_legislation_code;
select null
from pay_element_templates pet
where pet.template_type = 'T'
and upper(pet.template_name) = upper(p_template_name)
and
(
(pet.legislation_code is null and pet.business_group_id is null) or
(p_legislation_code is null and p_business_group_id is null) or
(pet.legislation_code = p_legislation_code) or
(pet.business_group_id = p_business_group_id) or
(p_legislation_code = (select legislation_code from per_business_groups_perf
where business_group_id = pet.business_group_id))
);
select null
from pay_shadow_element_types pset
where pset.template_id = p_template_id
and pset.relative_processing_priority + p_base_processing_priority >
pay_etm_shd.g_max_processing_priority;
fnd_message.set_name('PAY', 'PAY_50072_ETM_PRIORITY_UPDATE');
select null
from pay_element_templates pet
where pet.template_type = 'U'
and upper(pet.base_name) = upper(p_base_name)
and pet.business_group_id = p_business_group_id;
select null
from pay_element_templates pet
where pet.template_type = 'U'
and upper(pet.base_name) = upper(p_base_name)
and pet.template_name = p_template_name
and pet.business_group_id = p_business_group_id;
Procedure chk_delete
(p_template_id in number
) is
--
-- Cursors to check for rows referencing the template.
--
cursor csr_element_types is
select null
from pay_shadow_element_types pset
where pset.template_id = p_template_id;
select null
from pay_template_exclusion_rules ter
where ter.template_id = p_template_id;
select null
from pay_shadow_balance_types sbt
where sbt.template_id = p_template_id;
select null
from pay_template_core_objects tco
where tco.template_id = p_template_id;
l_proc varchar2(72) := g_package||'chk_delete';
fnd_message.set_name('PAY', 'PAY_50075_ETM_INVALID_DELETE');
End chk_delete;
Procedure insert_validate
(p_effective_date in date
,p_rec in pay_etm_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_etm_shd.g_rec_type
) is
--
l_proc varchar2(72) := g_package||'update_validate';
chk_non_updateable_args(p_rec => p_rec);
End update_validate;
Procedure delete_validate(p_rec in pay_etm_shd.g_rec_type) is
--
l_proc varchar2(72) := g_package||'delete_validate';
chk_delete(p_rec.template_id);
End delete_validate;