The following lines contain the word 'select', 'insert', 'update' or 'delete':
select pet.template_id
, pset.input_currency_code
from pay_shadow_element_types pset
, pay_element_templates pet
where pset.element_type_id = p_element_type_id
and pet.template_id = pset.template_id;
select pet.business_group_id
, pet.legislation_code
, pet.template_type
from pay_element_templates pet
where pet.template_id = p_template_id;
Procedure chk_non_updateable_args
(p_rec in pay_siv_shd.g_rec_type
) is
--
-- Cursor to disallow update if a balance has been generated from
-- this shadow balance.
--
cursor csr_disallow_update is
select null
from pay_template_core_objects tco
where tco.core_object_type = pay_tco_shd.g_siv_lookup_type
and tco.shadow_object_id = p_rec.input_value_id;
select null
from pay_shadow_balance_feeds sbf
where sbf.input_value_id = p_rec.input_value_id;
l_proc varchar2(72) := g_package||'chk_non_updateable_args';
open csr_disallow_update;
fetch csr_disallow_update into l_disallow;
if csr_disallow_update%found then
hr_utility.set_location(l_proc, 20);
close csr_disallow_update;
close csr_disallow_update;
End chk_non_updateable_args;
select null
from pay_shadow_element_types pset
where pset.element_type_id = p_element_type_id;
select count(siv.input_value_id)
from pay_shadow_input_values siv
where siv.element_type_id = p_element_type_id
and siv.exclusion_rule_id is null
;
select null
from pay_shadow_input_values siv
where siv.element_type_id = p_element_type_id
and upper(siv.name) = upper(p_name);
select null
from hr_lookups hr
where hr.lookup_type = p_lookup_type
and hr.enabled_flag = 'Y'
and p_effective_date between
nvl(start_date_active, p_effective_date)
and nvl(end_date_active, p_effective_date);
select null
from hr_lookups hr
where hr.lookup_type = p_lookup_type
and hr.enabled_flag = 'Y'
and p_effective_date between
nvl(start_date_active, p_effective_date)
and nvl(end_date_active, p_effective_date);
l_uom_updated boolean := false;
l_uom_updated := true;
l_do_checks := l_uom_updated or l_chk_def or l_chk_min or l_chk_max;
select null
from pay_template_exclusion_rules ter
where ter.template_id = p_template_id
and upper(ter.flexfield_column) = upper(p_default_value_column);
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_default_value_column)
and (psiv.uom <> p_uom or nvl(psiv.lookup_type, hr_api.g_varchar2) <>
nvl(p_lookup_type, hr_api.g_varchar2));
select null
from pay_template_exclusion_rules ter
where ter.exclusion_rule_id = p_exclusion_rule_id
and ter.template_id = p_template_id;
Procedure chk_delete
(p_input_value_id in number
) is
--
-- Cursors to check for rows referencing the balance classification.
--
cursor csr_core_objects is
select null
from pay_template_core_objects tco
where tco.core_object_type = pay_tco_shd.g_siv_lookup_type
and tco.shadow_object_id = p_input_value_id;
select null
from pay_shadow_balance_feeds sbf
where sbf.input_value_id = p_input_value_id;
select null
from pay_shadow_formula_rules sfr
where nvl(sfr.input_value_id, hr_api.g_number) = p_input_value_id;
select null
from pay_shadow_iterative_rules sir
where sir.input_value_id = p_input_value_id;
l_proc varchar2(72) := g_package||'chk_delete';
fnd_message.set_name('PAY', 'PAY_50123_SIV_INVALID_DELETE');
End chk_delete;
select null
from pay_shadow_formulas sf
where sf.formula_id = p_formula_id
and sf.template_type = 'T'
and sf.formula_type_name = pay_sf_shd.g_input_val_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);
select null
from pay_shadow_formulas sf
where sf.formula_id = p_formula_id
and sf.template_type = 'U'
and sf.formula_type_name = pay_sf_shd.g_input_val_formula_type
and sf.business_group_id = p_business_group_id
and not exists
(select null
from pay_shadow_input_values psiv , pay_shadow_element_types pset
where psiv.formula_id = p_formula_id
and pset.element_type_id = psiv.element_type_id
and pset.template_id <> p_template_id);
Procedure insert_validate
(p_effective_date in date
,p_rec in out nocopy pay_siv_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 out nocopy pay_siv_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_siv_shd.g_rec_type) is
--
l_proc varchar2(72) := g_package||'delete_validate';
chk_delete(p_rec.input_value_id);
End delete_validate;