[Home] [Help]
28: --
29: cursor csr_trnx_dtl_sec_grp is
30: select pbg.security_group_id
31: from per_business_groups pbg
32: , pqh_budget_pools bpl
33: where bpl.pool_id = p_pool_id
34: and pbg.business_group_id = bpl.business_group_id;
35:
36: cursor csr_trnx_amt_sec_grp is
36: cursor csr_trnx_amt_sec_grp is
37: select pbg.security_group_id
38: from per_business_groups pbg
39: , pqh_bdgt_pool_realloctions bre
40: , pqh_budget_pools bpl
41: where bre.reallocation_id = p_txn_detail_id
42: and bre.pool_id = bpl.pool_id
43: and pbg.business_group_id = bpl.business_group_id;
44: --
140: cursor csr_leg_code is
141: select pbg.legislation_code
142: from per_business_groups pbg
143: , pqh_bdgt_pool_realloctions bre
144: , pqh_budget_pools bpl
145: where bre.reallocation_id = p_reallocation_id
146: and ( (bre.transaction_type in ('D','R')
147: and bre.pool_id = bpl.pool_id)
148: OR (bre.transaction_type in ('DD','RD')
363: l_dummy varchar2(1);
364: --
365: cursor c1 is
366: select null
367: from pqh_budget_pools a
368: where a.pool_id = p_pool_id;
369: --
370: cursor c2 is
371: select null
385: and nvl(p_pool_id,hr_api.g_number)
386: <> nvl(pqh_bre_shd.g_old_rec.pool_id,hr_api.g_number)
387: or not l_api_updating) then
388: --
389: -- check if pool_id value exists in pqh_budget_pools table
390: --
391: open c1;
392: --
393: fetch c1 into l_dummy;
394: if c1%notfound then
395: --
396: close c1;
397: --
398: -- raise error as FK does not relate to PK in pqh_budget_pools
399: -- table.
400: --
401: pqh_bre_shd.constraint_error('PQH_BDGT_POOL_REALLOCTIONS_FK1');
402: --