DBA Data[Home] [Help]

APPS.PQP_VRE_SHD dependencies on PQP_VRE_SHD

Line 1: PACKAGE BODY pqp_vre_shd AS

1: PACKAGE BODY pqp_vre_shd AS
2: /* $Header: pqvrerhi.pkb 120.0.12010000.2 2008/08/08 07:23:09 ubhat ship $ */
3:
4: --
5: -- ----------------------------------------------------------------------------

Line 9: g_package VARCHAR2(33) := ' pqp_vre_shd.'; -- Global package name

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

Line 149: pqp_vre_shd.g_old_rec.vehicle_repository_id and

145: --
146: l_fct_ret := false;
147: ELSE
148: IF (p_vehicle_repository_id =
149: pqp_vre_shd.g_old_rec.vehicle_repository_id and
150: p_object_version_number =
151: pqp_vre_shd.g_old_rec.object_version_number ) THEN
152: --
153: -- The g_old_rec is current therefore we must

Line 151: pqp_vre_shd.g_old_rec.object_version_number ) THEN

147: ELSE
148: IF (p_vehicle_repository_id =
149: pqp_vre_shd.g_old_rec.vehicle_repository_id and
150: p_object_version_number =
151: pqp_vre_shd.g_old_rec.object_version_number ) THEN
152: --
153: -- The g_old_rec is current therefore we must
154: -- set the returning function to true
155: --

Line 162: FETCH C_Sel1 Into pqp_vre_shd.g_old_rec;

158: --
159: -- Select the current row
160: --
161: OPEN C_Sel1;
162: FETCH C_Sel1 Into pqp_vre_shd.g_old_rec;
163: IF C_Sel1%notfound THEN
164: CLOSE C_Sel1;
165: --
166: -- The primary key is invalid therefore we must error

Line 173: <> pqp_vre_shd.g_old_rec.object_version_number) THEN

169: fnd_message.raise_error;
170: END IF;
171: CLOSE C_Sel1;
172: IF (p_object_version_number
173: <> pqp_vre_shd.g_old_rec.object_version_number) THEN
174: fnd_message.set_name('PAY', 'HR_7155_OBJECT_INVALID');
175: fnd_message.raise_error;
176: END IF;
177: l_fct_ret := true;

Line 442: FETCH C_Sel1 Into pqp_vre_shd.g_old_rec;

438: --
439: -- We must select and lock the current row.
440: --
441: OPEN C_Sel1;
442: FETCH C_Sel1 Into pqp_vre_shd.g_old_rec;
443: IF C_Sel1%notfound THEN
444: CLOSE C_Sel1;
445: --
446: -- The primary key is invalid therefore we must error

Line 453: <> pqp_vre_shd.g_old_rec.object_version_number) THEN

449: fnd_message.raise_error;
450: END IF;
451: CLOSE C_Sel1;
452: IF (p_object_version_number
453: <> pqp_vre_shd.g_old_rec.object_version_number) THEN
454: fnd_message.set_name('PAY', 'HR_7155_OBJECT_INVALID');
455: fnd_message.raise_error;
456: END IF;
457: --

Line 688: END pqp_vre_shd;

684: RETURN(l_rec);
685: --
686: End convert_args;
687: --
688: END pqp_vre_shd;