42: Begin
43: --
44: hr_utility.set_location('Entering:'||l_proc, 5);
45: --
46: l_api_updating := ben_enb_shd.api_updating
47: (p_enrt_bnft_id => p_enrt_bnft_id,
48: p_object_version_number => p_object_version_number);
49: --
50: if (l_api_updating
48: p_object_version_number => p_object_version_number);
49: --
50: if (l_api_updating
51: and nvl(p_enrt_bnft_id,hr_api.g_number)
52: <> ben_enb_shd.g_old_rec.enrt_bnft_id) then
53: --
54: -- raise error as PK has changed
55: --
56: ben_enb_shd.constraint_error('BEN_ENRT_BNFT_PK');
52: <> ben_enb_shd.g_old_rec.enrt_bnft_id) then
53: --
54: -- raise error as PK has changed
55: --
56: ben_enb_shd.constraint_error('BEN_ENRT_BNFT_PK');
57: --
58: elsif not l_api_updating then
59: --
60: -- check if PK is null
62: if p_enrt_bnft_id is not null then
63: --
64: -- raise error as PK is not null
65: --
66: ben_enb_shd.constraint_error('BEN_ENRT_BNFT_PK');
67: --
68: end if;
69: --
70: end if;
110: Begin
111: --
112: hr_utility.set_location('Entering:'||l_proc, 5);
113: --
114: l_api_updating := ben_enb_shd.api_updating
115: (p_enrt_bnft_id => p_enrt_bnft_id,
116: p_object_version_number => p_object_version_number);
117: --
118: if (l_api_updating
116: p_object_version_number => p_object_version_number);
117: --
118: if (l_api_updating
119: and p_bndry_perd_cd
120: <> nvl(ben_enb_shd.g_old_rec.bndry_perd_cd,hr_api.g_varchar2)
121: or not l_api_updating)
122: and p_bndry_perd_cd is not null then
123: --
124: -- check if value of lookup falls within lookup type.
180: Begin
181: --
182: hr_utility.set_location('Entering:'||l_proc, 5);
183: --
184: l_api_updating := ben_enb_shd.api_updating
185: (p_enrt_bnft_id => p_enrt_bnft_id,
186: p_object_version_number => p_object_version_number);
187: --
188: if (l_api_updating
186: p_object_version_number => p_object_version_number);
187: --
188: if (l_api_updating
189: and p_cvg_mlt_cd
190: <> nvl(ben_enb_shd.g_old_rec.cvg_mlt_cd,hr_api.g_varchar2)
191: or not l_api_updating)
192: and p_cvg_mlt_cd is not null then
193: --
194: -- check if value of lookup falls within lookup type.
250: Begin
251: --
252: hr_utility.set_location('Entering:'||l_proc, 5);
253: --
254: l_api_updating := ben_enb_shd.api_updating
255: (p_enrt_bnft_id => p_enrt_bnft_id,
256: p_object_version_number => p_object_version_number);
257: --
258: if (l_api_updating
256: p_object_version_number => p_object_version_number);
257: --
258: if (l_api_updating
259: and p_crntly_enrld_flag
260: <> nvl(ben_enb_shd.g_old_rec.crntly_enrld_flag,hr_api.g_varchar2)
261: or not l_api_updating) then
262: --
263: -- check if value of lookup falls within lookup type.
264: --
319: Begin
320: --
321: hr_utility.set_location('Entering:'||l_proc, 5);
322: --
323: l_api_updating := ben_enb_shd.api_updating
324: (p_enrt_bnft_id => p_enrt_bnft_id,
325: p_object_version_number => p_object_version_number);
326: --
327: if (l_api_updating
325: p_object_version_number => p_object_version_number);
326: --
327: if (l_api_updating
328: and p_val_has_bn_prortd_flag
329: <> nvl(ben_enb_shd.g_old_rec.val_has_bn_prortd_flag,hr_api.g_varchar2)
330: or not l_api_updating) then
331: --
332: -- check if value of lookup falls within lookup type.
333: --
389: Begin
390: --
391: hr_utility.set_location('Entering:'||l_proc, 5);
392: --
393: l_api_updating := ben_enb_shd.api_updating
394: (p_enrt_bnft_id => p_enrt_bnft_id,
395: p_object_version_number => p_object_version_number);
396: --
397: if (l_api_updating
395: p_object_version_number => p_object_version_number);
396: --
397: if (l_api_updating
398: and p_dflt_flag
399: <> nvl(ben_enb_shd.g_old_rec.dflt_flag,hr_api.g_varchar2)
400: or not l_api_updating) then
401: --
402: -- check if value of lookup falls within lookup type.
403: --
459: Begin
460: --
461: hr_utility.set_location('Entering:'||l_proc, 5);
462: --
463: l_api_updating := ben_enb_shd.api_updating
464: (p_enrt_bnft_id => p_enrt_bnft_id,
465: p_object_version_number => p_object_version_number);
466: --
467: if (l_api_updating
465: p_object_version_number => p_object_version_number);
466: --
467: if (l_api_updating
468: and p_bnft_typ_cd
469: <> nvl(ben_enb_shd.g_old_rec.bnft_typ_cd,hr_api.g_varchar2)
470: or not l_api_updating)
471: and p_bnft_typ_cd is not null then
472: --
473: -- check if value of lookup falls within lookup type.
529: Begin
530: --
531: hr_utility.set_location('Entering:'||l_proc, 5);
532: --
533: l_api_updating := ben_enb_shd.api_updating
534: (p_enrt_bnft_id => p_enrt_bnft_id,
535: p_object_version_number => p_object_version_number);
536: --
537: if (l_api_updating
535: p_object_version_number => p_object_version_number);
536: --
537: if (l_api_updating
538: and p_nnmntry_uom
539: <> nvl(ben_enb_shd.g_old_rec.nnmntry_uom,hr_api.g_varchar2)
540: or not l_api_updating)
541: and p_nnmntry_uom is not null then
542: --
543: -- check if value of lookup falls within lookup type.
564: --
565: -- ----------------------------------------------------------------------------
566: -- |---------------------------< insert_validate >----------------------------|
567: -- ----------------------------------------------------------------------------
568: Procedure insert_validate(p_rec in ben_enb_shd.g_rec_type
569: ,p_effective_date in date) is
570: --
571: l_proc varchar2(72) := g_package||'insert_validate';
572: --
629: --
630: -- ----------------------------------------------------------------------------
631: -- |---------------------------< update_validate >----------------------------|
632: -- ----------------------------------------------------------------------------
633: Procedure update_validate(p_rec in ben_enb_shd.g_rec_type
634: ,p_effective_date in date) is
635: --
636: l_proc varchar2(72) := g_package||'update_validate';
637: --
694: --
695: -- ----------------------------------------------------------------------------
696: -- |---------------------------< delete_validate >----------------------------|
697: -- ----------------------------------------------------------------------------
698: Procedure delete_validate(p_rec in ben_enb_shd.g_rec_type
699: ,p_effective_date in date) is
700: --
701: l_proc varchar2(72) := g_package||'delete_validate';
702: --