DBA Data[Home] [Help]

APPS.PER_ABC_SHD dependencies on PER_ABC_SHD

Line 1: Package Body per_abc_shd as

1: Package Body per_abc_shd as
2: /* $Header: peabcrhi.pkb 120.1 2005/09/28 05:04:54 snukala noship $ */
3: --
4: -- ----------------------------------------------------------------------------
5: -- | Private Global Definitions |

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

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

Line 147: = per_abc_shd.g_old_rec.absence_case_id and

143: --
144: l_fct_ret := false;
145: Else
146: If (p_absence_case_id
147: = per_abc_shd.g_old_rec.absence_case_id and
148: p_object_version_number
149: = per_abc_shd.g_old_rec.object_version_number
150: ) Then
151: --

Line 149: = per_abc_shd.g_old_rec.object_version_number

145: Else
146: If (p_absence_case_id
147: = per_abc_shd.g_old_rec.absence_case_id and
148: p_object_version_number
149: = per_abc_shd.g_old_rec.object_version_number
150: ) Then
151: --
152: -- The g_old_rec is current therefore we must
153: -- set the returning function to true

Line 161: Fetch C_Sel1 Into per_abc_shd.g_old_rec;

157: --
158: -- Select the current row into g_old_rec
159: --
160: Open C_Sel1;
161: Fetch C_Sel1 Into per_abc_shd.g_old_rec;
162: If C_Sel1%notfound Then
163: Close C_Sel1;
164: --
165: -- The primary key is invalid therefore we must error

Line 172: <> per_abc_shd.g_old_rec.object_version_number) Then

168: fnd_message.raise_error;
169: End If;
170: Close C_Sel1;
171: If (p_object_version_number
172: <> per_abc_shd.g_old_rec.object_version_number) Then
173: fnd_message.set_name('PAY', 'HR_7155_OBJECT_INVALID');
174: fnd_message.raise_error;
175: End If;
176: l_fct_ret := true;

Line 287: Fetch C_Sel1 Into per_abc_shd.g_old_rec;

283: ,p_argument_value => p_object_version_number
284: );
285: --
286: Open C_Sel1;
287: Fetch C_Sel1 Into per_abc_shd.g_old_rec;
288: If C_Sel1%notfound then
289: Close C_Sel1;
290: --
291: -- The primary key is invalid therefore we must error

Line 298: <> per_abc_shd.g_old_rec.object_version_number) Then

294: fnd_message.raise_error;
295: End If;
296: Close C_Sel1;
297: If (p_object_version_number
298: <> per_abc_shd.g_old_rec.object_version_number) Then
299: fnd_message.set_name('PAY', 'HR_7155_OBJECT_INVALID');
300: fnd_message.raise_error;
301: End If;
302: --

Line 478: end per_abc_shd;

474: Return(l_rec);
475: --
476: End convert_args;
477: --
478: end per_abc_shd;