APPS.PQH_ACC_SHD dependencies on PQH_ACC_SHD

Line 1: Package Body pqh_acc_shd as

1: Package Body pqh_acc_shd as
2: /* $Header: pqaccrhi.pkb 115.4 2004/03/15 23:54:54 svorugan noship $ */
3: --
4: -- ----------------------------------------------------------------------------
5: -- | Private Global Definitions |

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

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

Line 161: pqh_acc_shd.g_old_rec.accommodation_id and

157: --
158: l_fct_ret := false;
159: Else
160: If (p_accommodation_id =
161: pqh_acc_shd.g_old_rec.accommodation_id and
162: p_object_version_number =
163: pqh_acc_shd.g_old_rec.object_version_number
164: ) Then
165: --

Line 163: pqh_acc_shd.g_old_rec.object_version_number

159: Else
160: If (p_accommodation_id =
161: pqh_acc_shd.g_old_rec.accommodation_id and
162: p_object_version_number =
163: pqh_acc_shd.g_old_rec.object_version_number
164: ) Then
165: --
166: -- The g_old_rec is current therefore we must
167: -- set the returning function to true

Line 175: Fetch C_Sel1 Into pqh_acc_shd.g_old_rec;

171: --
172: -- Select the current row
173: --
174: Open C_Sel1;
175: Fetch C_Sel1 Into pqh_acc_shd.g_old_rec;
176: If C_Sel1%notfound Then
177: Close C_Sel1;
178: --
179: -- The primary key is invalid therefore we must error

Line 186: <> pqh_acc_shd.g_old_rec.object_version_number) Then

182: fnd_message.raise_error;
183: End If;
184: Close C_Sel1;
185: If (p_object_version_number
186: <> pqh_acc_shd.g_old_rec.object_version_number) Then
187: fnd_message.set_name('PAY', 'HR_7155_OBJECT_INVALID');
188: fnd_message.raise_error;
189: End If;
190: l_fct_ret := true;

Line 467: Fetch C_Sel1 Into pqh_acc_shd.g_old_rec;

463: --
464: -- We must select and lock the current row.
465: --
466: Open C_Sel1;
467: Fetch C_Sel1 Into pqh_acc_shd.g_old_rec;
468: If C_Sel1%notfound then
469: Close C_Sel1;
470: --
471: -- The primary key is invalid therefore we must error

Line 478: <> pqh_acc_shd.g_old_rec.object_version_number) Then

474: fnd_message.raise_error;
475: End If;
476: Close C_Sel1;
477: If (p_object_version_number
478: <> pqh_acc_shd.g_old_rec.object_version_number) Then
479: fnd_message.set_name('PAY', 'HR_7155_OBJECT_INVALID');
480: fnd_message.raise_error;
481: End If;
482: --

Line 740: end pqh_acc_shd;

736: Return(l_rec);
737: --
738: End convert_args;
739: --
740: end pqh_acc_shd;