[Home] [Help]
32: --
33: Begin
34: hr_utility.set_location('Entering:'||l_proc, 5);
35: --
36: If (p_constraint_name = 'BEN_ELIG_TBCO_USE_PRTE_F_PK') 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;
103: etu_attribute30,
104: object_version_number,
105: criteria_score,
106: criteria_weight
107: from ben_elig_tbco_use_prte_f
108: where elig_tbco_use_prte_id = p_elig_tbco_use_prte_id
109: and p_effective_date
110: between effective_start_date and effective_end_date;
111: --
176: l_parent_key_value1 number;
177: --
178: Cursor C_Sel1 Is
179: select t.eligy_prfl_id
180: from ben_elig_tbco_use_prte_f t
181: where t.elig_tbco_use_prte_id = p_base_key_value
182: and p_effective_date
183: between t.effective_start_date and t.effective_end_date;
184: --
199: -- Call the corresponding datetrack api
200: --
201: dt_api.find_dt_del_modes
202: (p_effective_date => p_effective_date,
203: p_base_table_name => 'ben_elig_tbco_use_prte_f',
204: p_base_key_column => 'elig_tbco_use_prte_id',
205: p_base_key_value => p_base_key_value,
206: p_parent_table_name1 => 'ben_eligy_prfl_f',
207: p_parent_key_column1 => 'eligy_prfl_id',
233: -- Call the corresponding datetrack api
234: --
235: dt_api.find_dt_upd_modes
236: (p_effective_date => p_effective_date,
237: p_base_table_name => 'ben_elig_tbco_use_prte_f',
238: p_base_key_column => 'elig_tbco_use_prte_id',
239: p_base_key_value => p_base_key_value,
240: p_correction => p_correction,
241: p_update => p_update,
266: -- version number.
267: --
268: l_object_version_number :=
269: dt_api.get_object_version_number
270: (p_base_table_name => 'ben_elig_tbco_use_prte_f',
271: p_base_key_column => 'elig_tbco_use_prte_id',
272: p_base_key_value => p_base_key_value);
273: --
274: hr_utility.set_location(l_proc, 10);
276: --
277: -- Update the specified datetrack row setting the effective
278: -- end date to the specified new effective end date.
279: --
280: update ben_elig_tbco_use_prte_f t
281: set t.effective_end_date = p_new_effective_end_date,
282: t.object_version_number = l_object_version_number
283: where t.elig_tbco_use_prte_id = p_base_key_value
284: and p_effective_date
357: etu_attribute30,
358: object_version_number,
359: criteria_score,
360: criteria_weight
361: from ben_elig_tbco_use_prte_f
362: where elig_tbco_use_prte_id = p_elig_tbco_use_prte_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_elig_tbco_use_prte_f',
421: p_base_key_column => 'elig_tbco_use_prte_id',
422: p_base_key_value => p_elig_tbco_use_prte_id,
423: p_parent_table_name1 => 'ben_eligy_prfl_f',
424: p_parent_key_column1 => 'eligy_prfl_id',
453: -- The object is locked therefore we need to supply a meaningful
454: -- error message.
455: --
456: hr_utility.set_message(801, 'HR_7165_OBJECT_LOCKED');
457: hr_utility.set_message_token('TABLE_NAME', 'ben_elig_tbco_use_prte_f');
458: hr_utility.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: hr_utility.set_message(801, 'HR_7155_OBJECT_INVALID');
464: hr_utility.set_message_token('TABLE_NAME', 'ben_elig_tbco_use_prte_f');
465: hr_utility.raise_error;
466: End lck;
467: --
468: -- ----------------------------------------------------------------------------