The following lines contain the word 'select', 'insert', 'update' or 'delete':
select null
from pqh_table_route a
where a.table_route_id = p_table_route_id;
select null
from pqh_copy_entity_txns a
where a.copy_entity_txn_id = p_copy_entity_txn_id;
Procedure chk_select_flag(p_copy_entity_pref_id in number,
p_select_flag in varchar2,
p_effective_date in date,
p_object_version_number in number) is
--
l_proc varchar2(72) := g_package||'chk_select_flag';
and p_select_flag
<> nvl(pqh_cep_shd.g_old_rec.select_flag,hr_api.g_varchar2)
or not l_api_updating)
and p_select_flag is not null then
--
-- check if value of lookup falls within lookup type.
--
if hr_api.not_exists_in_hr_lookups
(p_lookup_type => 'ENTER-LKP-TYPE',
p_lookup_code => p_select_flag,
p_effective_date => p_effective_date) then
--
-- raise error as does not exist as lookup
--
hr_utility.set_message(801,'HR_LOOKUP_DOES_NOT_EXIST');
end chk_select_flag;
Procedure insert_validate(p_rec in pqh_cep_shd.g_rec_type
,p_effective_date in date) is
--
l_proc varchar2(72) := g_package||'insert_validate';
chk_select_flag
(p_copy_entity_pref_id => p_rec.copy_entity_pref_id,
p_select_flag => p_rec.select_flag,
p_effective_date => p_effective_date,
p_object_version_number => p_rec.object_version_number);
End insert_validate;
Procedure update_validate(p_rec in pqh_cep_shd.g_rec_type
,p_effective_date in date) is
--
l_proc varchar2(72) := g_package||'update_validate';
chk_select_flag
(p_copy_entity_pref_id => p_rec.copy_entity_pref_id,
p_select_flag => p_rec.select_flag,
p_effective_date => p_effective_date,
p_object_version_number => p_rec.object_version_number);
End update_validate;
Procedure delete_validate(p_rec in pqh_cep_shd.g_rec_type
,p_effective_date in date) is
--
l_proc varchar2(72) := g_package||'delete_validate';
End delete_validate;