APPS.BEN_BEP_SHD dependencies on BEN_BEP_SHD

Line 1: Package Body ben_bep_shd as

1: Package Body ben_bep_shd as
2: /* $Header: bebeprhi.pkb 120.0.12010000.2 2008/08/05 14:07:52 ubhat ship $ */
3: --
4: -- ----------------------------------------------------------------------------
5: -- | Private Global Definitions |

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

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

Line 96: ben_bep_shd.g_old_rec.elig_obj_elig_prfl_id and

92: --
93: l_fct_ret := false;
94: Else
95: If (p_elig_obj_elig_prfl_id =
96: ben_bep_shd.g_old_rec.elig_obj_elig_prfl_id and
97: p_object_version_number =
98: ben_bep_shd.g_old_rec.object_version_number
99: ) Then
100: --

Line 98: ben_bep_shd.g_old_rec.object_version_number

94: Else
95: If (p_elig_obj_elig_prfl_id =
96: ben_bep_shd.g_old_rec.elig_obj_elig_prfl_id and
97: p_object_version_number =
98: ben_bep_shd.g_old_rec.object_version_number
99: ) Then
100: --
101: -- The g_old_rec is current therefore we must
102: -- set the returning function to true

Line 110: Fetch C_Sel1 Into ben_bep_shd.g_old_rec;

106: --
107: -- Select the current row
108: --
109: Open C_Sel1;
110: Fetch C_Sel1 Into ben_bep_shd.g_old_rec;
111: If C_Sel1%notfound Then
112: Close C_Sel1;
113: --
114: -- The primary key is invalid therefore we must error

Line 121: <> ben_bep_shd.g_old_rec.object_version_number) Then

117: fnd_message.raise_error;
118: End If;
119: Close C_Sel1;
120: If (p_object_version_number
121: <> ben_bep_shd.g_old_rec.object_version_number) Then
122: fnd_message.set_name('PAY', 'HR_7155_OBJECT_INVALID');
123: fnd_message.raise_error;
124: End If;
125: l_fct_ret := true;

Line 366: Fetch C_Sel1 Into ben_bep_shd.g_old_rec;

362: --
363: -- We must select and lock the current row.
364: --
365: Open C_Sel1;
366: Fetch C_Sel1 Into ben_bep_shd.g_old_rec;
367: If C_Sel1%notfound then
368: Close C_Sel1;
369: --
370: -- The primary key is invalid therefore we must error

Line 377: <> ben_bep_shd.g_old_rec.object_version_number) Then

373: fnd_message.raise_error;
374: End If;
375: Close C_Sel1;
376: If (p_object_version_number
377: <> ben_bep_shd.g_old_rec.object_version_number) Then
378: fnd_message.set_name('PAY', 'HR_7155_OBJECT_INVALID');
379: fnd_message.raise_error;
380: End If;
381: --

Line 394: ,p_parent_key_value1 => ben_bep_shd.g_old_rec.elig_prfl_id

390: ,p_base_key_column => 'elig_obj_elig_prfl_id'
391: ,p_base_key_value => p_elig_obj_elig_prfl_id
392: ,p_parent_table_name1 => 'ben_eligy_prfl_f'
393: ,p_parent_key_column1 => 'elig_prfl_id'
394: ,p_parent_key_value1 => ben_bep_shd.g_old_rec.elig_prfl_id
395: ,p_parent_table_name2 => 'ben_elig_obj_f'
396: ,p_parent_key_column2 => 'elig_obj_id'
397: ,p_parent_key_value2 => ben_bep_shd.g_old_rec.elig_obj_id
398: ,p_enforce_foreign_locking => false --true

Line 397: ,p_parent_key_value2 => ben_bep_shd.g_old_rec.elig_obj_id

393: ,p_parent_key_column1 => 'elig_prfl_id'
394: ,p_parent_key_value1 => ben_bep_shd.g_old_rec.elig_prfl_id
395: ,p_parent_table_name2 => 'ben_elig_obj_f'
396: ,p_parent_key_column2 => 'elig_obj_id'
397: ,p_parent_key_value2 => ben_bep_shd.g_old_rec.elig_obj_id
398: ,p_enforce_foreign_locking => false --true
399: ,p_validation_start_date => l_validation_start_date
400: ,p_validation_end_date => l_validation_end_date
401: );

Line 512: end ben_bep_shd;

508: Return(l_rec);
509: --
510: End convert_args;
511: --
512: end ben_bep_shd;