APPS.PER_PML_SHD dependencies on PER_PML_SHD

Line 1: Package Body per_pml_shd as

1: Package Body per_pml_shd as
2: /* $Header: pepmlrhi.pkb 120.9.12020000.1 2012/06/29 01:50:07 appldev ship $ */
3: --
4: -- ----------------------------------------------------------------------------
5: -- | Private Global Definitions |

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

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

Line 118: = per_pml_shd.g_old_rec.objective_id and

114: --
115: l_fct_ret := false;
116: Else
117: If (p_objective_id
118: = per_pml_shd.g_old_rec.objective_id and
119: p_object_version_number
120: = per_pml_shd.g_old_rec.object_version_number
121: ) Then
122: --

Line 120: = per_pml_shd.g_old_rec.object_version_number

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

Line 132: Fetch C_Sel1 Into per_pml_shd.g_old_rec;

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

Line 143: <> per_pml_shd.g_old_rec.object_version_number) Then

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

Line 240: Fetch C_Sel1 Into per_pml_shd.g_old_rec;

236: ,p_argument_value => p_object_version_number
237: );
238: --
239: Open C_Sel1;
240: Fetch C_Sel1 Into per_pml_shd.g_old_rec;
241: If C_Sel1%notfound then
242: Close C_Sel1;
243: --
244: -- The primary key is invalid therefore we must error

Line 251: <> per_pml_shd.g_old_rec.object_version_number) Then

247: fnd_message.raise_error;
248: End If;
249: Close C_Sel1;
250: If (p_object_version_number
251: <> per_pml_shd.g_old_rec.object_version_number) Then
252: fnd_message.set_name('PAY', 'HR_7155_OBJECT_INVALID');
253: fnd_message.raise_error;
254: End If;
255: --

Line 395: end per_pml_shd;

391: Return(l_rec);
392: --
393: End convert_args;
394: --
395: end per_pml_shd;