43: Begin
44: --
45: hr_utility.set_location('Entering:'||l_proc, 5);
46: --
47: l_api_updating := ben_drr_shd.api_updating
48: (p_dsgn_rqmt_rlshp_typ_id => p_dsgn_rqmt_rlshp_typ_id,
49: p_object_version_number => p_object_version_number);
50: --
51: if (l_api_updating
49: p_object_version_number => p_object_version_number);
50: --
51: if (l_api_updating
52: and nvl(p_dsgn_rqmt_rlshp_typ_id,hr_api.g_number)
53: <> ben_drr_shd.g_old_rec.dsgn_rqmt_rlshp_typ_id) then
54: --
55: -- raise error as PK has changed
56: --
57: ben_drr_shd.constraint_error('BEN_DSGN_RQMT_RLSHP_TYP_PK');
53: <> ben_drr_shd.g_old_rec.dsgn_rqmt_rlshp_typ_id) then
54: --
55: -- raise error as PK has changed
56: --
57: ben_drr_shd.constraint_error('BEN_DSGN_RQMT_RLSHP_TYP_PK');
58: --
59: elsif not l_api_updating then
60: --
61: -- check if PK is null
63: if p_dsgn_rqmt_rlshp_typ_id is not null then
64: --
65: -- raise error as PK is not null
66: --
67: ben_drr_shd.constraint_error('BEN_DSGN_RQMT_RLSHP_TYP_PK');
68: --
69: end if;
70: --
71: end if;
120: Begin
121: --
122: hr_utility.set_location('Entering:'||l_proc,5);
123: --
124: l_api_updating := ben_drr_shd.api_updating
125: (p_dsgn_rqmt_rlshp_typ_id => p_dsgn_rqmt_rlshp_typ_id,
126: p_object_version_number => p_object_version_number);
127: --
128: if (l_api_updating
126: p_object_version_number => p_object_version_number);
127: --
128: if (l_api_updating
129: and nvl(p_dsgn_rqmt_id,hr_api.g_number)
130: <> nvl(ben_drr_shd.g_old_rec.dsgn_rqmt_id,hr_api.g_number)
131: or not l_api_updating) then
132: --
133: -- check if dsgn_rqmt_id value exists in ben_dsgn_rqmt_f table
134: --
141: --
142: -- raise error as FK does not relate to PK in ben_dsgn_rqmt_f
143: -- table.
144: --
145: ben_drr_shd.constraint_error('BEN_DSGN_RQMT_RLSHP_TYP_DT1');
146: --
147: end if;
148: --
149: close c1;
224: Begin
225: --
226: hr_utility.set_location('Entering:'||l_proc, 5);
227: --
228: l_api_updating := ben_drr_shd.api_updating
229: (p_dsgn_rqmt_rlshp_typ_id => p_dsgn_rqmt_rlshp_typ_id,
230: p_object_version_number => p_object_version_number);
231: --
232: if (l_api_updating
230: p_object_version_number => p_object_version_number);
231: --
232: if (l_api_updating
233: and p_rlshp_typ_cd
234: <> nvl(ben_drr_shd.g_old_rec.rlshp_typ_cd,hr_api.g_varchar2)
235: or not l_api_updating)
236: and p_rlshp_typ_cd is not null then
237: --
238: -- check if value of lookup falls within lookup type.
355:
356: -- ----------------------------------------------------------------------------
357: -- |---------------------------< insert_validate >----------------------------|
358: -- ----------------------------------------------------------------------------
359: Procedure insert_validate(p_rec in ben_drr_shd.g_rec_type
360: ,p_effective_date in date) is
361: --
362: l_proc varchar2(72) := g_package||'insert_validate';
363: --
393: --
394: -- ----------------------------------------------------------------------------
395: -- |---------------------------< update_validate >----------------------------|
396: -- ----------------------------------------------------------------------------
397: Procedure update_validate(p_rec in ben_drr_shd.g_rec_type
398: ,p_effective_date in date) is
399: --
400: l_proc varchar2(72) := g_package||'update_validate';
401: --
431: --
432: -- ----------------------------------------------------------------------------
433: -- |---------------------------< delete_validate >----------------------------|
434: -- ----------------------------------------------------------------------------
435: Procedure delete_validate(p_rec in ben_drr_shd.g_rec_type
436: ,p_effective_date in date) is
437: --
438: l_proc varchar2(72) := g_package||'delete_validate';
439: --