[Home] [Help]
32: --
33: Begin
34: hr_utility.set_location('Entering:'||l_proc, 5);
35: --
36: If (p_constraint_name = 'BEN_ACTL_PREM_VRBL_RT_RL_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;
106: ava_attribute28,
107: ava_attribute29,
108: ava_attribute30,
109: object_version_number
110: from ben_actl_prem_vrbl_rt_rl_f
111: where actl_prem_vrbl_rt_rl_id = p_actl_prem_vrbl_rt_rl_id
112: and p_effective_date
113: between effective_start_date and effective_end_date;
114: --
179: l_parent_key_value1 number;
180: --
181: Cursor C_Sel1 Is
182: select t.actl_prem_id
183: from ben_actl_prem_vrbl_rt_rl_f t
184: where t.actl_prem_vrbl_rt_rl_id = p_base_key_value
185: and p_effective_date
186: between t.effective_start_date and t.effective_end_date;
187: --
201: -- Call the corresponding datetrack api
202: --
203: dt_api.find_dt_del_modes
204: (p_effective_date => p_effective_date,
205: p_base_table_name => 'ben_actl_prem_vrbl_rt_rl_f',
206: p_base_key_column => 'actl_prem_vrbl_rt_rl_id',
207: p_base_key_value => p_base_key_value,
208: p_parent_table_name1 => 'ben_actl_prem_f',
209: p_parent_key_column1 => 'actl_prem_id',
235: -- Call the corresponding datetrack api
236: --
237: dt_api.find_dt_upd_modes
238: (p_effective_date => p_effective_date,
239: p_base_table_name => 'ben_actl_prem_vrbl_rt_rl_f',
240: p_base_key_column => 'actl_prem_vrbl_rt_rl_id',
241: p_base_key_value => p_base_key_value,
242: p_correction => p_correction,
243: p_update => p_update,
268: -- version number.
269: --
270: l_object_version_number :=
271: dt_api.get_object_version_number
272: (p_base_table_name => 'ben_actl_prem_vrbl_rt_rl_f',
273: p_base_key_column => 'actl_prem_vrbl_rt_rl_id',
274: p_base_key_value => p_base_key_value);
275: --
276: hr_utility.set_location(l_proc, 10);
278: --
279: -- Update the specified datetrack row setting the effective
280: -- end date to the specified new effective end date.
281: --
282: update ben_actl_prem_vrbl_rt_rl_f t
283: set t.effective_end_date = p_new_effective_end_date,
284: t.object_version_number = l_object_version_number
285: where t.actl_prem_vrbl_rt_rl_id = p_base_key_value
286: and p_effective_date
357: ava_attribute28,
358: ava_attribute29,
359: ava_attribute30,
360: object_version_number
361: from ben_actl_prem_vrbl_rt_rl_f
362: where actl_prem_vrbl_rt_rl_id = p_actl_prem_vrbl_rt_rl_id
363: and p_effective_date
364: between effective_start_date and effective_end_date
365: for update nowait;
416: --
417: dt_api.validate_dt_mode
418: (p_effective_date => p_effective_date,
419: p_datetrack_mode => p_datetrack_mode,
420: p_base_table_name => 'ben_actl_prem_vrbl_rt_rl_f',
421: p_base_key_column => 'actl_prem_vrbl_rt_rl_id',
422: p_base_key_value => p_actl_prem_vrbl_rt_rl_id,
423: p_parent_table_name1 => 'ben_actl_prem_f',
424: p_parent_key_column1 => 'actl_prem_id',
453: -- The object is locked therefore we need to supply a meaningful
454: -- error message.
455: --
456: fnd_message.set_name('PAY', 'HR_7165_OBJECT_LOCKED');
457: fnd_message.set_token('TABLE_NAME', 'ben_actl_prem_vrbl_rt_rl_f');
458: fnd_message.raise_error;
459: When l_object_invalid then
460: --
461: -- The object doesn't exist or is invalid
460: --
461: -- The object doesn't exist or is invalid
462: --
463: fnd_message.set_name('PAY', 'HR_7155_OBJECT_INVALID');
464: fnd_message.set_token('TABLE_NAME', 'ben_actl_prem_vrbl_rt_rl_f');
465: fnd_message.raise_error;
466: End lck;
467: --
468: -- ----------------------------------------------------------------------------