45: Begin
46: --
47: hr_utility.set_location('Entering:'||l_proc, 5);
48: --
49: l_api_updating := ben_esp_shd.api_updating
50: (p_effective_date => p_effective_date,
51: p_elig_sp_clng_prg_prte_id => p_elig_sp_clng_prg_prte_id,
52: p_object_version_number => p_object_version_number);
53: --
52: p_object_version_number => p_object_version_number);
53: --
54: if (l_api_updating
55: and nvl(p_elig_sp_clng_prg_prte_id,hr_api.g_number)
56: <> ben_esp_shd.g_old_rec.elig_sp_clng_prg_prte_id) then
57: --
58: -- raise error as PK has changed
59: --
60: ben_esp_shd.constraint_error('BEN_ELIG_SP_CLNG_PRG_PRTE_PK');
56: <> ben_esp_shd.g_old_rec.elig_sp_clng_prg_prte_id) then
57: --
58: -- raise error as PK has changed
59: --
60: ben_esp_shd.constraint_error('BEN_ELIG_SP_CLNG_PRG_PRTE_PK');
61: --
62: elsif not l_api_updating then
63: --
64: -- check if PK is null
66: if p_elig_sp_clng_prg_prte_id is not null then
67: --
68: -- raise error as PK is not null
69: --
70: ben_esp_shd.constraint_error('BEN_ELIG_SP_CLNG_PRG_PRTE_PK');
71: --
72: end if;
73: --
74: end if;
114: Begin
115: --
116: hr_utility.set_location('Entering:'||l_proc, 5);
117: --
118: l_api_updating := ben_esp_shd.api_updating
119: (p_elig_sp_clng_prg_prte_id => p_elig_sp_clng_prg_prte_id,
120: p_effective_date => p_effective_date,
121: p_object_version_number => p_object_version_number);
122: --
121: p_object_version_number => p_object_version_number);
122: --
123: if (l_api_updating
124: and p_excld_flag
125: <> nvl(ben_esp_shd.g_old_rec.excld_flag,hr_api.g_varchar2)
126: or not l_api_updating) then
127: --
128: -- check if value of lookup falls within lookup type.
129: --
164: Begin
165: --
166: hr_utility.set_location('Entering:'||l_proc, 5);
167: --
168: l_api_updating := ben_esp_shd.api_updating
169: (p_elig_sp_clng_prg_prte_id => p_elig_sp_clng_prg_prte_id,
170: p_effective_date => p_effective_date,
171: p_object_version_number => p_object_version_number);
172:
171: p_object_version_number => p_object_version_number);
172:
173: if (l_api_updating
174: and p_special_ceiling_step_id
175: <> nvl(ben_esp_shd.g_old_rec.special_ceiling_step_id,hr_api.g_number)
176: or not l_api_updating) then
177: --
178: -- check if value of lookup falls within lookup type.
179: --
413: -- ----------------------------------------------------------------------------
414: -- |---------------------------< insert_validate >----------------------------|
415: -- ----------------------------------------------------------------------------
416: Procedure insert_validate
417: (p_rec in ben_esp_shd.g_rec_type,
418: p_effective_date in date,
419: p_datetrack_mode in varchar2,
420: p_validation_start_date in date,
421: p_validation_end_date in date) is
452: -- ----------------------------------------------------------------------------
453: -- |---------------------------< update_validate >----------------------------|
454: -- ----------------------------------------------------------------------------
455: Procedure update_validate
456: (p_rec in ben_esp_shd.g_rec_type,
457: p_effective_date in date,
458: p_datetrack_mode in varchar2,
459: p_validation_start_date in date,
460: p_validation_end_date in date) is
501: -- ----------------------------------------------------------------------------
502: -- |---------------------------< delete_validate >----------------------------|
503: -- ----------------------------------------------------------------------------
504: Procedure delete_validate
505: (p_rec in ben_esp_shd.g_rec_type,
506: p_effective_date in date,
507: p_datetrack_mode in varchar2,
508: p_validation_start_date in date,
509: p_validation_end_date in date) is