[Home] [Help]
32: --
33: Begin
34: hr_utility.set_location('Entering:'||l_proc, 5);
35: --
36: If (p_constraint_name = 'BEN_LER_CHG_PL_NIP_ENRT_FK2') Then
37: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
38: hr_utility.set_message_token('PROCEDURE', l_proc);
39: hr_utility.set_message_token('STEP','5');
40: hr_utility.raise_error;
114: lpe_attribute28,
115: lpe_attribute29,
116: lpe_attribute30,
117: object_version_number
118: from ben_ler_chg_pl_nip_enrt_f
119: where ler_chg_pl_nip_enrt_id = p_ler_chg_pl_nip_enrt_id
120: and p_effective_date
121: between effective_start_date and effective_end_date;
122: --
187: l_parent_key_value1 number;
188: --
189: Cursor C_Sel1 Is
190: select t.pl_id
191: from ben_ler_chg_pl_nip_enrt_f t
192: where t.ler_chg_pl_nip_enrt_id = p_base_key_value
193: and p_effective_date
194: between t.effective_start_date and t.effective_end_date;
195: --
209: -- Call the corresponding datetrack api
210: --
211: dt_api.find_dt_del_modes
212: (p_effective_date => p_effective_date,
213: p_base_table_name => 'ben_ler_chg_pl_nip_enrt_f',
214: p_base_key_column => 'ler_chg_pl_nip_enrt_id',
215: p_base_key_value => p_base_key_value,
216: p_parent_table_name1 => 'ben_pl_f',
217: p_parent_key_column1 => 'pl_id',
243: -- Call the corresponding datetrack api
244: --
245: dt_api.find_dt_upd_modes
246: (p_effective_date => p_effective_date,
247: p_base_table_name => 'ben_ler_chg_pl_nip_enrt_f',
248: p_base_key_column => 'ler_chg_pl_nip_enrt_id',
249: p_base_key_value => p_base_key_value,
250: p_correction => p_correction,
251: p_update => p_update,
276: -- version number.
277: --
278: l_object_version_number :=
279: dt_api.get_object_version_number
280: (p_base_table_name => 'ben_ler_chg_pl_nip_enrt_f',
281: p_base_key_column => 'ler_chg_pl_nip_enrt_id',
282: p_base_key_value => p_base_key_value);
283: --
284: hr_utility.set_location(l_proc, 10);
286: --
287: -- Update the specified datetrack row setting the effective
288: -- end date to the specified new effective end date.
289: --
290: update ben_ler_chg_pl_nip_enrt_f t
291: set t.effective_end_date = p_new_effective_end_date,
292: t.object_version_number = l_object_version_number
293: where t.ler_chg_pl_nip_enrt_id = p_base_key_value
294: and p_effective_date
373: lpe_attribute28,
374: lpe_attribute29,
375: lpe_attribute30,
376: object_version_number
377: from ben_ler_chg_pl_nip_enrt_f
378: where ler_chg_pl_nip_enrt_id = p_ler_chg_pl_nip_enrt_id
379: and p_effective_date
380: between effective_start_date and effective_end_date
381: for update nowait;
432: --
433: dt_api.validate_dt_mode
434: (p_effective_date => p_effective_date,
435: p_datetrack_mode => p_datetrack_mode,
436: p_base_table_name => 'ben_ler_chg_pl_nip_enrt_f',
437: p_base_key_column => 'ler_chg_pl_nip_enrt_id',
438: p_base_key_value => p_ler_chg_pl_nip_enrt_id,
439: p_parent_table_name1 => 'ben_pl_f',
440: p_parent_key_column1 => 'pl_id',
471: -- The object is locked therefore we need to supply a meaningful
472: -- error message.
473: --
474: hr_utility.set_message(801, 'HR_7165_OBJECT_LOCKED');
475: hr_utility.set_message_token('TABLE_NAME', 'ben_ler_chg_pl_nip_enrt_f');
476: hr_utility.raise_error;
477: When l_object_invalid then
478: --
479: -- The object doesn't exist or is invalid
478: --
479: -- The object doesn't exist or is invalid
480: --
481: hr_utility.set_message(801, 'HR_7155_OBJECT_INVALID');
482: hr_utility.set_message_token('TABLE_NAME', 'ben_ler_chg_pl_nip_enrt_f');
483: hr_utility.raise_error;
484: End lck;
485: --
486: -- ----------------------------------------------------------------------------