[Home] [Help]
32: --
33: Begin
34: hr_utility.set_location('Entering:'||l_proc, 5);
35: --
36: If (p_constraint_name = 'BEN_ELIG_TTL_CVG_VOL_PRTE_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;
111: etc_attribute28,
112: etc_attribute29,
113: etc_attribute30,
114: object_version_number
115: from ben_elig_ttl_cvg_vol_prte_f
116: where elig_ttl_cvg_vol_prte_id = p_elig_ttl_cvg_vol_prte_id
117: and p_effective_date
118: between effective_start_date and effective_end_date;
119: --
184: l_parent_key_value1 number;
185: --
186: Cursor C_Sel1 Is
187: select t.eligy_prfl_id
188: from ben_elig_ttl_cvg_vol_prte_f t
189: where t.elig_ttl_cvg_vol_prte_id = p_base_key_value
190: and p_effective_date
191: between t.effective_start_date and t.effective_end_date;
192: --
206: -- Call the corresponding datetrack api
207: --
208: dt_api.find_dt_del_modes
209: (p_effective_date => p_effective_date,
210: p_base_table_name => 'ben_elig_ttl_cvg_vol_prte_f',
211: p_base_key_column => 'elig_ttl_cvg_vol_prte_id',
212: p_base_key_value => p_base_key_value,
213: p_parent_table_name1 => 'ben_eligy_prfl_f',
214: p_parent_key_column1 => 'eligy_prfl_id',
240: -- Call the corresponding datetrack api
241: --
242: dt_api.find_dt_upd_modes
243: (p_effective_date => p_effective_date,
244: p_base_table_name => 'ben_elig_ttl_cvg_vol_prte_f',
245: p_base_key_column => 'elig_ttl_cvg_vol_prte_id',
246: p_base_key_value => p_base_key_value,
247: p_correction => p_correction,
248: p_update => p_update,
273: -- version number.
274: --
275: l_object_version_number :=
276: dt_api.get_object_version_number
277: (p_base_table_name => 'ben_elig_ttl_cvg_vol_prte_f',
278: p_base_key_column => 'elig_ttl_cvg_vol_prte_id',
279: p_base_key_value => p_base_key_value);
280: --
281: hr_utility.set_location(l_proc, 10);
283: --
284: -- Update the specified datetrack row setting the effective
285: -- end date to the specified new effective end date.
286: --
287: update ben_elig_ttl_cvg_vol_prte_f t
288: set t.effective_end_date = p_new_effective_end_date,
289: t.object_version_number = l_object_version_number
290: where t.elig_ttl_cvg_vol_prte_id = p_base_key_value
291: and p_effective_date
367: etc_attribute28,
368: etc_attribute29,
369: etc_attribute30,
370: object_version_number
371: from ben_elig_ttl_cvg_vol_prte_f
372: where elig_ttl_cvg_vol_prte_id = p_elig_ttl_cvg_vol_prte_id
373: and p_effective_date
374: between effective_start_date and effective_end_date
375: for update nowait;
426: --
427: dt_api.validate_dt_mode
428: (p_effective_date => p_effective_date,
429: p_datetrack_mode => p_datetrack_mode,
430: p_base_table_name => 'ben_elig_ttl_cvg_vol_prte_f',
431: p_base_key_column => 'elig_ttl_cvg_vol_prte_id',
432: p_base_key_value => p_elig_ttl_cvg_vol_prte_id,
433: p_parent_table_name1 => 'ben_eligy_prfl_f',
434: p_parent_key_column1 => 'eligy_prfl_id',
463: -- The object is locked therefore we need to supply a meaningful
464: -- error message.
465: --
466: fnd_message.set_name('PAY', 'HR_7165_OBJECT_LOCKED');
467: fnd_message.set_token('TABLE_NAME', 'ben_elig_ttl_cvg_vol_prte_f');
468: fnd_message.raise_error;
469: When l_object_invalid then
470: --
471: -- The object doesn't exist or is invalid
470: --
471: -- The object doesn't exist or is invalid
472: --
473: fnd_message.set_name('PAY', 'HR_7155_OBJECT_INVALID');
474: fnd_message.set_token('TABLE_NAME', 'ben_elig_ttl_cvg_vol_prte_f');
475: fnd_message.raise_error;
476: End lck;
477: --
478: -- ----------------------------------------------------------------------------