The following lines contain the word 'select', 'insert', 'update' or 'delete':
select pet.business_group_id
, pet.template_type
from pay_element_templates pet
where pet.template_id = p_template_id;
Procedure chk_non_updateable_args
(p_rec in pay_sbt_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_sbt_lookup_type
and tco.shadow_object_id = p_rec.balance_type_id;
select null
from pay_shadow_balance_feeds sbf
where sbf.balance_type_id = p_rec.balance_type_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, 25);
close csr_disallow_update;
close csr_disallow_update;
End chk_non_updateable_args;
select null
from pay_element_templates pet
where pet.template_id = p_template_id;
select null
from pay_shadow_balance_types sbt
where sbt.template_id = p_template_id
and upper(nvl(sbt.balance_name, hr_api.g_varchar2)) =
upper(nvl(p_balance_name, hr_api.g_varchar2));
select null
from pay_shadow_balance_types sbt
, pay_element_templates pet
where upper(sbt.balance_name) = upper(p_balance_name)
and pet.template_id = sbt.template_id
and pet.template_type = 'U'
and pet.business_group_id = p_business_group_id;
select null
from pay_shadow_input_values siv
where siv.input_value_id = p_input_value_id
and upper(siv.uom) = upper(p_balance_uom);
select null
from fnd_currencies fc
where upper(fc.currency_code) = upper(p_currency_code)
and fc.enabled_flag = 'Y'
and fc.currency_flag = 'Y';
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_balance_types sbt
where sbt.balance_type_id = p_base_balance_type_id
and sbt.template_id = p_template_id;
select base_balance_type_id
from pay_shadow_balance_types
start with balance_type_id = p_base_balance_type_id
connect by prior base_balance_type_id = balance_type_id
;
select null
from pay_shadow_input_values siv
,pay_shadow_element_types sel
where siv.input_value_id = p_input_value_id
and siv.element_type_id = sel.element_type_id
and sel.template_id = p_template_id;
select null
from pay_shadow_input_values siv
where siv.input_value_id = p_input_value_id
and upper(siv.uom) = upper(p_balance_uom);
Procedure chk_delete
(p_balance_type_id in number
) is
--
-- Cursors to check for rows referencing the balance.
--
cursor csr_defined_balances is
select null
from pay_shadow_defined_balances sdb
where sdb.balance_type_id = p_balance_type_id;
select null
from pay_template_core_objects tco
where tco.core_object_type = pay_tco_shd.g_sbt_lookup_type
and tco.shadow_object_id = p_balance_type_id;
select null
from pay_shadow_balance_types sbt
where sbt.base_balance_type_id = p_balance_type_id;
select null
from pay_shadow_balance_feeds sdb
where sdb.balance_type_id = p_balance_type_id;
select null
from pay_shadow_balance_classi sbc
where sbc.balance_type_id = p_balance_type_id;
select null
from pay_shadow_gu_bal_exclusions
where balance_type_id = p_balance_type_id;
l_proc varchar2(72) := g_package||'chk_delete';
fnd_message.set_name('PAY', 'PAY_50117_SBT_INVALID_DELETE');
End chk_delete;
Procedure insert_validate
(p_effective_date in date
,p_rec in pay_sbt_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_sbt_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_sbt_shd.g_rec_type) is
--
l_proc varchar2(72) := g_package||'delete_validate';
chk_delete(p_rec.balance_type_id);
End delete_validate;