The following lines contain the word 'select', 'insert', 'update' or 'delete':
select null
from pqh_table_route a
where a.table_route_id = p_transaction_table_route_id;
select null
from fnd_flex_value_sets a
where a.flex_value_Set_id = p_value_set_id;
select null
from pqh_transaction_categories a
where a.transaction_category_id = p_transaction_category_id;
select null
from pqh_attributes a
where a.attribute_id = p_attribute_id;
Procedure chk_select_flag(p_txn_category_attribute_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_tca_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 => 'YES_NO',
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;
p_delete_attr_ranges_flag in varchar2,
p_member_identifying_flag in varchar2,
p_effective_date in date,
p_object_version_number in number) is
--
l_proc varchar2(72) := g_package||'chk_member_identifying_flag';
pqh_ATTRIBUTE_RANGES_pkg.Delete_attribute_ranges
(p_attribute_id => p_attribute_id,
p_delete_attr_ranges_flag => p_delete_attr_ranges_flag ,
p_primary_flag => 'N');
p_delete_attr_ranges_flag in varchar2,
p_list_identifying_flag in varchar2,
p_effective_date in date,
p_object_version_number in number) is
--
l_proc varchar2(72) := g_package||'chk_list_identifying_flag';
pqh_ATTRIBUTE_RANGES_pkg.Delete_attribute_ranges
(p_attribute_id => p_attribute_id,
p_delete_attr_ranges_flag => p_delete_attr_ranges_flag ,
p_primary_flag => 'Y');
select nvl(b.freeze_status_cd,hr_api.g_varchar2)
from pqh_txn_category_attributes a, pqh_transaction_categories b
where a.attribute_id = p_attribute_id
AND a.transaction_category_id = b.transaction_category_id;
Procedure insert_validate(p_rec in pqh_tca_shd.g_rec_type
,p_effective_date in date) is
p_delete_attr_ranges_flag varchar2(10) := 'N';
l_proc varchar2(72) := g_package||'insert_validate';
chk_select_flag
(p_txn_category_attribute_id => p_rec.txn_category_attribute_id,
p_select_flag => p_rec.select_flag,
p_effective_date => p_effective_date,
p_object_version_number => p_rec.object_version_number);
p_delete_attr_ranges_flag => p_delete_attr_ranges_flag,
p_member_identifying_flag => p_rec.member_identifying_flag,
p_effective_date => p_effective_date,
p_object_version_number => p_rec.object_version_number);
p_delete_attr_ranges_flag => p_delete_attr_ranges_flag,
p_list_identifying_flag => p_rec.list_identifying_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_tca_shd.g_rec_type
,p_effective_date in date
,p_delete_attr_ranges_flag in varchar2) is
--
l_proc varchar2(72) := g_package||'update_validate';
chk_select_flag
(p_txn_category_attribute_id => p_rec.txn_category_attribute_id,
p_select_flag => p_rec.select_flag,
p_effective_date => p_effective_date,
p_object_version_number => p_rec.object_version_number);
p_delete_attr_ranges_flag => p_delete_attr_ranges_flag,
p_member_identifying_flag => p_rec.member_identifying_flag,
p_effective_date => p_effective_date,
p_object_version_number => p_rec.object_version_number);
p_delete_attr_ranges_flag => p_delete_attr_ranges_flag,
p_list_identifying_flag => p_rec.list_identifying_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_tca_shd.g_rec_type
,p_effective_date in date) is
--
l_proc varchar2(72) := g_package||'delete_validate';
End delete_validate;