[Home] [Help]
32: --
33: Begin
34: hr_utility.set_location('Entering:'||l_proc, 5);
35: --
36: If (p_constraint_name = 'BEN_BNFT_POOL_RLOVR_RQMT_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;
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;
46: ElsIf (p_constraint_name = 'BEN_BNFT_POOL_RLOVR_RQMT_F_FK2') Then
47: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
48: fnd_message.set_token('PROCEDURE', l_proc);
49: fnd_message.set_token('STEP','15');
50: fnd_message.raise_error;
128: bpr_attribute28,
129: bpr_attribute29,
130: bpr_attribute30,
131: object_version_number
132: from ben_bnft_pool_rlovr_rqmt_f
133: where bnft_pool_rlovr_rqmt_id = p_bnft_pool_rlovr_rqmt_id
134: and p_effective_date
135: between effective_start_date and effective_end_date;
136: --
203: --
204: Cursor C_Sel1 Is
205: select t.acty_base_rt_id,
206: t.bnft_prvdr_pool_id
207: from ben_bnft_pool_rlovr_rqmt_f t
208: where t.bnft_pool_rlovr_rqmt_id = p_base_key_value
209: and p_effective_date
210: between t.effective_start_date and t.effective_end_date;
211: --
226: -- Call the corresponding datetrack api
227: --
228: dt_api.find_dt_del_modes
229: (p_effective_date => p_effective_date,
230: p_base_table_name => 'ben_bnft_pool_rlovr_rqmt_f',
231: p_base_key_column => 'bnft_pool_rlovr_rqmt_id',
232: p_base_key_value => p_base_key_value,
233: p_parent_table_name1 => 'ben_acty_base_rt_f',
234: p_parent_key_column1 => 'acty_base_rt_id',
263: -- Call the corresponding datetrack api
264: --
265: dt_api.find_dt_upd_modes
266: (p_effective_date => p_effective_date,
267: p_base_table_name => 'ben_bnft_pool_rlovr_rqmt_f',
268: p_base_key_column => 'bnft_pool_rlovr_rqmt_id',
269: p_base_key_value => p_base_key_value,
270: p_correction => p_correction,
271: p_update => p_update,
296: -- version number.
297: --
298: l_object_version_number :=
299: dt_api.get_object_version_number
300: (p_base_table_name => 'ben_bnft_pool_rlovr_rqmt_f',
301: p_base_key_column => 'bnft_pool_rlovr_rqmt_id',
302: p_base_key_value => p_base_key_value);
303: --
304: hr_utility.set_location(l_proc, 10);
306: --
307: -- Update the specified datetrack row setting the effective
308: -- end date to the specified new effective end date.
309: --
310: update ben_bnft_pool_rlovr_rqmt_f t
311: set t.effective_end_date = p_new_effective_end_date,
312: t.object_version_number = l_object_version_number
313: where t.bnft_pool_rlovr_rqmt_id = p_base_key_value
314: and p_effective_date
402: bpr_attribute28,
403: bpr_attribute29,
404: bpr_attribute30,
405: object_version_number
406: from ben_bnft_pool_rlovr_rqmt_f
407: where bnft_pool_rlovr_rqmt_id = p_bnft_pool_rlovr_rqmt_id
408: and p_effective_date
409: between effective_start_date and effective_end_date
410: for update nowait;
461: --
462: dt_api.validate_dt_mode
463: (p_effective_date => p_effective_date,
464: p_datetrack_mode => p_datetrack_mode,
465: p_base_table_name => 'ben_bnft_pool_rlovr_rqmt_f',
466: p_base_key_column => 'bnft_pool_rlovr_rqmt_id',
467: p_base_key_value => p_bnft_pool_rlovr_rqmt_id,
468: p_parent_table_name1 => 'ben_acty_base_rt_f',
469: p_parent_key_column1 => 'acty_base_rt_id',
501: -- The object is locked therefore we need to supply a meaningful
502: -- error message.
503: --
504: fnd_message.set_name('PAY', 'HR_7165_OBJECT_LOCKED');
505: fnd_message.set_token('TABLE_NAME', 'ben_bnft_pool_rlovr_rqmt_f');
506: fnd_message.raise_error;
507: When l_object_invalid then
508: --
509: -- The object doesn't exist or is invalid
508: --
509: -- The object doesn't exist or is invalid
510: --
511: fnd_message.set_name('PAY', 'HR_7155_OBJECT_INVALID');
512: fnd_message.set_token('TABLE_NAME', 'ben_bnft_pool_rlovr_rqmt_f');
513: fnd_message.raise_error;
514: End lck;
515: --
516: -- ----------------------------------------------------------------------------