[Home] [Help]
55: <> ben_cqr_shd.g_old_rec.cbr_quald_bnf_rt_id) then
56: --
57: -- raise error as PK has changed
58: --
59: ben_cqr_shd.constraint_error('BEN_CBR_QUALD_BNF_RT_F_PK');
60: --
61: elsif not l_api_updating then
62: --
63: -- check if PK is null
65: if p_cbr_quald_bnf_rt_id is not null then
66: --
67: -- raise error as PK is not null
68: --
69: ben_cqr_shd.constraint_error('BEN_CBR_QUALD_BNF_RT_F_PK');
70: --
71: end if;
72: --
73: end if;
125: l_exists varchar2(1);
126: --
127: cursor c_dup is
128: select null
129: from ben_cbr_quald_bnf_rt_f
130: where quald_bnf_flag = p_quald_bnf_flag
131: and (pgm_id = nvl(p_pgm_id,hr_api.g_number)
132: or
133: ptip_id = nvl(p_ptip_id,hr_api.g_number)
243: --
244: -- raise error as FK does not relate to PK in ben_pgm_f
245: -- table.
246: --
247: ben_cqr_shd.constraint_error('BEN_CBR_QUALD_BNF_RT_F_DT3');
248: --
249: end if;
250: --
251: close c1;
320: --
321: -- raise error as FK does not relate to PK in ben_ptip_f
322: -- table.
323: --
324: ben_cqr_shd.constraint_error('BEN_CBR_QUALD_BNF_RT_F_DT2');
325: --
326: end if;
327: --
328: close c1;
442: is
443: l_proc varchar2(72) := g_package||' chk_duplicate_ordr_num ';
444: l_dummy char(1);
445: cursor c1 is select null
446: from ben_cbr_quald_bnf_rt_f
447: where vrbl_rt_prfl_id = p_vrbl_rt_prfl_id
448: and cbr_quald_bnf_rt_id <> nvl(p_cbr_quald_bnf_rt_id ,-1)
449: --and p_effective_date between effective_start_date
450: -- and effective_end_date
878: --
879: cursor csr_leg_code is
880: select a.legislation_code
881: from per_business_groups a,
882: ben_cbr_quald_bnf_rt_f b
883: where b.cbr_quald_bnf_rt_id = p_cbr_quald_bnf_rt_id
884: and a.business_group_id = b.business_group_id;
885: --
886: -- Declare local variables