DBA Data[Home] [Help]

APPS.BEN_VEP_SHD dependencies on BEN_VEP_SHD

Line 1: Package Body ben_vep_shd as

1: Package Body ben_vep_shd as
2: /* $Header: beveprhi.pkb 120.1.12020000.2 2012/07/26 10:36:02 usaraswa ship $ */
3: --
4: -- ----------------------------------------------------------------------------
5: -- | Private Global Definitions |

Line 8: g_package varchar2(33) := ' ben_vep_shd.'; -- Global package name

4: -- ----------------------------------------------------------------------------
5: -- | Private Global Definitions |
6: -- ----------------------------------------------------------------------------
7: --
8: g_package varchar2(33) := ' ben_vep_shd.'; -- Global package name
9: --
10: -- ----------------------------------------------------------------------------
11: -- |------------------------< return_api_dml_status >-------------------------|
12: -- ----------------------------------------------------------------------------

Line 117: ben_vep_shd.g_old_rec.vrbl_rt_elig_prfl_id and

113: --
114: l_fct_ret := false;
115: Else
116: If (p_vrbl_rt_elig_prfl_id =
117: ben_vep_shd.g_old_rec.vrbl_rt_elig_prfl_id and
118: p_object_version_number =
119: ben_vep_shd.g_old_rec.object_version_number) Then
120: --
121: -- The g_old_rec is current therefore we must

Line 119: ben_vep_shd.g_old_rec.object_version_number) Then

115: Else
116: If (p_vrbl_rt_elig_prfl_id =
117: ben_vep_shd.g_old_rec.vrbl_rt_elig_prfl_id and
118: p_object_version_number =
119: ben_vep_shd.g_old_rec.object_version_number) Then
120: --
121: -- The g_old_rec is current therefore we must
122: -- set the returning function to true
123: --

Line 130: Fetch C_Sel1 Into ben_vep_shd.g_old_rec;

126: --
127: -- Select the current row
128: --
129: Open C_Sel1;
130: Fetch C_Sel1 Into ben_vep_shd.g_old_rec;
131: If C_Sel1%notfound Then
132: Close C_Sel1;
133: --
134: -- The primary key is invalid therefore we must error

Line 141: <> ben_vep_shd.g_old_rec.object_version_number) Then

137: fnd_message.raise_error;
138: End If;
139: Close C_Sel1;
140: If (p_object_version_number
141: <> ben_vep_shd.g_old_rec.object_version_number) Then
142: fnd_message.set_name('PAY', 'HR_7155_OBJECT_INVALID');
143: fnd_message.raise_error;
144: End If;
145: l_fct_ret := true;

Line 278: ben_vep_shd.g_api_dml := true; -- Set the api dml status

274: ,p_base_key_value => p_base_key_value
275: );
276: --
277: hr_utility.set_location(l_proc, 10);
278: ben_vep_shd.g_api_dml := true; -- Set the api dml status
279: --
280: -- Update the specified datetrack row setting the effective
281: -- end date to the specified new effective end date.
282: --

Line 290: ben_vep_shd.g_api_dml := false; -- Unset the api dml status

286: where t.vrbl_rt_elig_prfl_id = p_base_key_value
287: and p_effective_date
288: between t.effective_start_date and t.effective_end_date;
289: --
290: ben_vep_shd.g_api_dml := false; -- Unset the api dml status
291: p_object_version_number := l_object_version_number;
292: hr_utility.set_location(' Leaving:'||l_proc, 15);
293: --
294: Exception

Line 296: ben_vep_shd.g_api_dml := false; -- Unset the api dml status

292: hr_utility.set_location(' Leaving:'||l_proc, 15);
293: --
294: Exception
295: When Others Then
296: ben_vep_shd.g_api_dml := false; -- Unset the api dml status
297: Raise;
298: --
299: End upd_effective_end_date;
300: --

Line 402: Fetch C_Sel1 Into ben_vep_shd.g_old_rec;

398: --
399: -- We must select and lock the current row.
400: --
401: Open C_Sel1;
402: Fetch C_Sel1 Into ben_vep_shd.g_old_rec;
403: If C_Sel1%notfound then
404: Close C_Sel1;
405: --
406: -- The primary key is invalid therefore we must error

Line 413: <> ben_vep_shd.g_old_rec.object_version_number) Then

409: fnd_message.raise_error;
410: End If;
411: Close C_Sel1;
412: If (p_object_version_number
413: <> ben_vep_shd.g_old_rec.object_version_number) Then
414: fnd_message.set_name('PAY', 'HR_7155_OBJECT_INVALID');
415: fnd_message.raise_error;
416: End If;
417: --

Line 430: ,p_parent_key_value1 => ben_vep_shd.g_old_rec.vrbl_rt_prfl_id

426: ,p_base_key_column => 'VRBL_RT_ELIG_PRFL_ID'
427: ,p_base_key_value => p_vrbl_rt_elig_prfl_id
428: ,p_parent_table_name1 => 'BEN_VRBL_RT_PRFL_F'
429: ,p_parent_key_column1 => 'VRBL_RT_PRFL_ID'
430: ,p_parent_key_value1 => ben_vep_shd.g_old_rec.vrbl_rt_prfl_id
431: ,p_parent_table_name2 => 'BEN_ELIGY_PRFL_F'
432: ,p_parent_key_column2 => 'ELIGY_PRFL_ID'
433: ,p_parent_key_value2 => ben_vep_shd.g_old_rec.eligy_prfl_id
434: ,p_enforce_foreign_locking => false --true

Line 433: ,p_parent_key_value2 => ben_vep_shd.g_old_rec.eligy_prfl_id

429: ,p_parent_key_column1 => 'VRBL_RT_PRFL_ID'
430: ,p_parent_key_value1 => ben_vep_shd.g_old_rec.vrbl_rt_prfl_id
431: ,p_parent_table_name2 => 'BEN_ELIGY_PRFL_F'
432: ,p_parent_key_column2 => 'ELIGY_PRFL_ID'
433: ,p_parent_key_value2 => ben_vep_shd.g_old_rec.eligy_prfl_id
434: ,p_enforce_foreign_locking => false --true
435: ,p_validation_start_date => l_validation_start_date
436: ,p_validation_end_date => l_validation_end_date
437: );

Line 568: end ben_vep_shd;

564: Return(l_rec);
565: --
566: End convert_args;
567: --
568: end ben_vep_shd;