208: Begin
209: --
210: hr_utility.set_location('Entering:'||l_proc, 5);
211: --
212: l_api_updating := ben_xic_shd.api_updating
213: (p_ext_incl_chg_id => p_ext_incl_chg_id,
214: p_object_version_number => p_object_version_number);
215: --
216: if (l_api_updating
214: p_object_version_number => p_object_version_number);
215: --
216: if (l_api_updating
217: and nvl(p_ext_incl_chg_id,hr_api.g_number)
218: <> ben_xic_shd.g_old_rec.ext_incl_chg_id) then
219: --
220: -- raise error as PK has changed
221: --
222: ben_xic_shd.constraint_error('BEN_EXT_INCL_CHG_PK');
218: <> ben_xic_shd.g_old_rec.ext_incl_chg_id) then
219: --
220: -- raise error as PK has changed
221: --
222: ben_xic_shd.constraint_error('BEN_EXT_INCL_CHG_PK');
223: --
224: elsif not l_api_updating then
225: --
226: -- check if PK is null
228: if p_ext_incl_chg_id is not null then
229: --
230: -- raise error as PK is not null
231: --
232: ben_xic_shd.constraint_error('BEN_EXT_INCL_CHG_PK');
233: --
234: end if;
235: --
236: end if;
280: Begin
281: --
282: hr_utility.set_location('Entering:'||l_proc,5);
283: --
284: l_api_updating := ben_xic_shd.api_updating
285: (p_ext_incl_chg_id => p_ext_incl_chg_id,
286: p_object_version_number => p_object_version_number);
287: --
288: if (l_api_updating
286: p_object_version_number => p_object_version_number);
287: --
288: if (l_api_updating
289: and nvl(p_ext_rcd_in_file_id,hr_api.g_number)
290: <> nvl(ben_xic_shd.g_old_rec.ext_rcd_in_file_id,hr_api.g_number)
291: or not l_api_updating) and
292: p_ext_rcd_in_file_id is not null then
293: --
294: -- check if ext_rcd_in_file_id value exists in ben_ext_rcd_in_file table
302: --
303: -- raise error as FK does not relate to PK in ben_ext_rcd_in_file
304: -- table.
305: --
306: ben_xic_shd.constraint_error('BEN_EXT_INCL_CHG_FK2');
307: --
308: end if;
309: --
310: close c1;
356: Begin
357: --
358: hr_utility.set_location('Entering:'||l_proc,5);
359: --
360: l_api_updating := ben_xic_shd.api_updating
361: (p_ext_incl_chg_id => p_ext_incl_chg_id,
362: p_object_version_number => p_object_version_number);
363: --
364: if (l_api_updating
362: p_object_version_number => p_object_version_number);
363: --
364: if (l_api_updating
365: and nvl(p_ext_data_elmt_in_rcd_id,hr_api.g_number)
366: <> nvl(ben_xic_shd.g_old_rec.ext_data_elmt_in_rcd_id,hr_api.g_number)
367: or not l_api_updating) and
368: p_ext_data_elmt_in_rcd_id is not null then
369: --
370: -- check if ext_data_elmt_in_rcd_id value exists in ben_ext_data_elmt_in_rcd table
378: --
379: -- raise error as FK does not relate to PK in ben_ext_data_elmt_in_rcd
380: -- table.
381: --
382: ben_xic_shd.constraint_error('BEN_EXT_INCL_CHG_FK1');
383: --
384: end if;
385: --
386: close c1;
446: --
447: hr_utility.set_location('Entering:'||l_proc, 5);
448: hr_utility.set_location('Inside .hrstanlookups..'||l_proc||' '||p_chg_evt_cd, 8);
449: --
450: l_api_updating := ben_xic_shd.api_updating
451: (p_ext_incl_chg_id => p_ext_incl_chg_id,
452: p_object_version_number => p_object_version_number);
453: --
454: if (l_api_updating
452: p_object_version_number => p_object_version_number);
453: --
454: if (l_api_updating
455: and p_chg_evt_cd
456: <> nvl(ben_xic_shd.g_old_rec.chg_evt_cd,hr_api.g_varchar2)
457: or not l_api_updating)
458: and p_chg_evt_cd is not null then
459: --
460: -- check if value of lookup falls within lookup type.
661: --
662: -- ----------------------------------------------------------------------------
663: -- |---------------------------< insert_validate >----------------------------|
664: -- ----------------------------------------------------------------------------
665: Procedure insert_validate(p_rec in ben_xic_shd.g_rec_type
666: ,p_effective_date in date) is
667: --
668: l_proc varchar2(72) := g_package||'insert_validate';
669: --
718: --
719: -- ----------------------------------------------------------------------------
720: -- |---------------------------< update_validate >----------------------------|
721: -- ----------------------------------------------------------------------------
722: Procedure update_validate(p_rec in ben_xic_shd.g_rec_type
723: ,p_effective_date in date) is
724: --
725: l_proc varchar2(72) := g_package||'update_validate';
726: --
775: --
776: -- ----------------------------------------------------------------------------
777: -- |---------------------------< delete_validate >----------------------------|
778: -- ----------------------------------------------------------------------------
779: Procedure delete_validate(p_rec in ben_xic_shd.g_rec_type
780: ,p_effective_date in date) is
781: --
782: l_proc varchar2(72) := g_package||'delete_validate';
783: --
787: -- Call all supporting business operations
788: --
789: --
790: chk_startup_action(False
791: ,ben_xic_shd.g_old_rec.business_group_id
792: ,ben_xic_shd.g_old_rec.legislation_code);
793: --
794: hr_utility.set_location(' Leaving:'||l_proc, 10);
795: End delete_validate;
788: --
789: --
790: chk_startup_action(False
791: ,ben_xic_shd.g_old_rec.business_group_id
792: ,ben_xic_shd.g_old_rec.legislation_code);
793: --
794: hr_utility.set_location(' Leaving:'||l_proc, 10);
795: End delete_validate;
796: --