[Home] [Help]
32: --
33: Begin
34: hr_utility.set_location('Entering:'||l_proc, 5);
35: --
36: If (p_constraint_name = 'BEN_PL_REGY_BOD_FK1') Then
37: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
38: fnd_message.set_token('PROCEDURE', l_proc);
39: fnd_message.set_token('STEP','5');
40: fnd_message.raise_error;
37: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
38: fnd_message.set_token('PROCEDURE', l_proc);
39: fnd_message.set_token('STEP','5');
40: fnd_message.raise_error;
41: ElsIf (p_constraint_name = 'BEN_PL_REGY_BOD_FK2') Then
42: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
43: fnd_message.set_token('PROCEDURE', l_proc);
44: fnd_message.set_token('STEP','10');
45: fnd_message.raise_error;
114: prb_attribute28,
115: prb_attribute29,
116: prb_attribute30,
117: object_version_number
118: from ben_pl_regy_bod_f
119: where pl_regy_bod_id = p_pl_regy_bod_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_pl_regy_bod_f t
192: where t.pl_regy_bod_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_pl_regy_bod_f',
214: p_base_key_column => 'pl_regy_bod_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_pl_regy_bod_f',
248: p_base_key_column => 'pl_regy_bod_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_pl_regy_bod_f',
281: p_base_key_column => 'pl_regy_bod_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_pl_regy_bod_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.pl_regy_bod_id = p_base_key_value
294: and p_effective_date
368: prb_attribute28,
369: prb_attribute29,
370: prb_attribute30,
371: object_version_number
372: from ben_pl_regy_bod_f
373: where pl_regy_bod_id = p_pl_regy_bod_id
374: and p_effective_date
375: between effective_start_date and effective_end_date
376: for update nowait;
427: --
428: dt_api.validate_dt_mode
429: (p_effective_date => p_effective_date,
430: p_datetrack_mode => p_datetrack_mode,
431: p_base_table_name => 'ben_pl_regy_bod_f',
432: p_base_key_column => 'pl_regy_bod_id',
433: p_base_key_value => p_pl_regy_bod_id,
434: p_parent_table_name1 => 'ben_pl_f',
435: p_parent_key_column1 => 'pl_id',
464: -- The object is locked therefore we need to supply a meaningful
465: -- error message.
466: --
467: fnd_message.set_name('PAY', 'HR_7165_OBJECT_LOCKED');
468: fnd_message.set_token('TABLE_NAME', 'ben_pl_regy_bod_f');
469: fnd_message.raise_error;
470: When l_object_invalid then
471: --
472: -- The object doesn't exist or is invalid
471: --
472: -- The object doesn't exist or is invalid
473: --
474: fnd_message.set_name('PAY', 'HR_7155_OBJECT_INVALID');
475: fnd_message.set_token('TABLE_NAME', 'ben_pl_regy_bod_f');
476: fnd_message.raise_error;
477: End lck;
478: --
479: -- ----------------------------------------------------------------------------