The following lines contain the word 'select', 'insert', 'update' or 'delete':
select pbg.security_group_id
from per_business_groups pbg
, pqh_budget_pools bpl
where bpl.pool_id = p_pool_id
and pbg.business_group_id = bpl.business_group_id;
select pbg.security_group_id
from per_business_groups pbg
, pqh_bdgt_pool_realloctions bre
, pqh_budget_pools bpl
where bre.reallocation_id = p_txn_detail_id
and bre.pool_id = bpl.pool_id
and pbg.business_group_id = bpl.business_group_id;
select pbg.legislation_code
from per_business_groups pbg
, pqh_bdgt_pool_realloctions bre
, pqh_budget_pools bpl
where bre.reallocation_id = p_reallocation_id
and ( (bre.transaction_type in ('D','R')
and bre.pool_id = bpl.pool_id)
OR (bre.transaction_type in ('DD','RD')
and bpl.pool_id = (select txn_detail_id
from pqh_bdgt_pool_realloctions
where reallocation_id = p_reallocation_id)) )
and pbg.business_group_id = bpl.business_group_id;
Procedure chk_non_updateable_args
(p_effective_date in date
,p_rec in pqh_bre_shd.g_rec_type
) IS
--
l_proc varchar2(72) := g_package || 'chk_non_updateable_args';
End chk_non_updateable_args;
select null
from pqh_budget_pools a
where a.pool_id = p_pool_id;
select null
from pqh_bdgt_pool_realloctions a
where a.reallocation_id = p_txn_detail_id;
Procedure insert_validate
(p_effective_date in date
,p_rec in pqh_bre_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 pqh_bre_shd.g_rec_type
) is
--
l_proc varchar2(72) := g_package||'update_validate';
chk_non_updateable_args
(p_effective_date => p_effective_date
,p_rec => p_rec
);
End update_validate;
Procedure delete_validate
(p_rec in pqh_bre_shd.g_rec_type
) is
--
l_proc varchar2(72) := g_package||'delete_validate';
End delete_validate;