DBA Data[Home] [Help]

APPS.PQH_CPD_SHD dependencies on PQH_CPD_SHD

Line 1: Package Body pqh_cpd_shd as

1: Package Body pqh_cpd_shd as
2: /* $Header: pqcpdrhi.pkb 120.0 2005/05/29 01:44:39 appldev noship $ */
3: --
4: -- ----------------------------------------------------------------------------
5: -- | Private Global Definitions |

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

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

Line 133: = pqh_cpd_shd.g_old_rec.corps_definition_id and

129: --
130: l_fct_ret := false;
131: Else
132: If (p_corps_definition_id
133: = pqh_cpd_shd.g_old_rec.corps_definition_id and
134: p_object_version_number
135: = pqh_cpd_shd.g_old_rec.object_version_number
136: ) Then
137: --

Line 135: = pqh_cpd_shd.g_old_rec.object_version_number

131: Else
132: If (p_corps_definition_id
133: = pqh_cpd_shd.g_old_rec.corps_definition_id and
134: p_object_version_number
135: = pqh_cpd_shd.g_old_rec.object_version_number
136: ) Then
137: --
138: -- The g_old_rec is current therefore we must
139: -- set the returning function to true

Line 147: Fetch C_Sel1 Into pqh_cpd_shd.g_old_rec;

143: --
144: -- Select the current row into g_old_rec
145: --
146: Open C_Sel1;
147: Fetch C_Sel1 Into pqh_cpd_shd.g_old_rec;
148: If C_Sel1%notfound Then
149: Close C_Sel1;
150: --
151: -- The primary key is invalid therefore we must error

Line 158: <> pqh_cpd_shd.g_old_rec.object_version_number) Then

154: fnd_message.raise_error;
155: End If;
156: Close C_Sel1;
157: If (p_object_version_number
158: <> pqh_cpd_shd.g_old_rec.object_version_number) Then
159: fnd_message.set_name('PAY', 'HR_7155_OBJECT_INVALID');
160: fnd_message.raise_error;
161: End If;
162: l_fct_ret := true;

Line 264: Fetch C_Sel1 Into pqh_cpd_shd.g_old_rec;

260: ,p_argument_value => p_object_version_number
261: );
262: --
263: Open C_Sel1;
264: Fetch C_Sel1 Into pqh_cpd_shd.g_old_rec;
265: If C_Sel1%notfound then
266: Close C_Sel1;
267: --
268: -- The primary key is invalid therefore we must error

Line 275: <> pqh_cpd_shd.g_old_rec.object_version_number) Then

271: fnd_message.raise_error;
272: End If;
273: Close C_Sel1;
274: If (p_object_version_number
275: <> pqh_cpd_shd.g_old_rec.object_version_number) Then
276: fnd_message.set_name('PAY', 'HR_7155_OBJECT_INVALID');
277: fnd_message.raise_error;
278: End If;
279: --

Line 427: end pqh_cpd_shd;

423: Return(l_rec);
424: --
425: End convert_args;
426: --
427: end pqh_cpd_shd;