APPS.PQH_RER_SHD dependencies on PQH_RER_SHD

Line 1: Package Body pqh_rer_shd as

1: Package Body pqh_rer_shd as
2: /* $Header: pqrerrhi.pkb 120.0 2005/10/06 14:53 srajakum noship $ */
3: --
4: -- ----------------------------------------------------------------------------
5: -- | Private Global Definitions |

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

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

Line 95: = pqh_rer_shd.g_old_rec.rate_element_relation_id and

91: --
92: l_fct_ret := false;
93: Else
94: If (p_rate_element_relation_id
95: = pqh_rer_shd.g_old_rec.rate_element_relation_id and
96: p_object_version_number
97: = pqh_rer_shd.g_old_rec.object_version_number
98: ) Then
99: --

Line 97: = pqh_rer_shd.g_old_rec.object_version_number

93: Else
94: If (p_rate_element_relation_id
95: = pqh_rer_shd.g_old_rec.rate_element_relation_id and
96: p_object_version_number
97: = pqh_rer_shd.g_old_rec.object_version_number
98: ) Then
99: --
100: -- The g_old_rec is current therefore we must
101: -- set the returning function to true

Line 109: Fetch C_Sel1 Into pqh_rer_shd.g_old_rec;

105: --
106: -- Select the current row into g_old_rec
107: --
108: Open C_Sel1;
109: Fetch C_Sel1 Into pqh_rer_shd.g_old_rec;
110: If C_Sel1%notfound Then
111: Close C_Sel1;
112: --
113: -- The primary key is invalid therefore we must error

Line 120: <> pqh_rer_shd.g_old_rec.object_version_number) Then

116: fnd_message.raise_error;
117: End If;
118: Close C_Sel1;
119: If (p_object_version_number
120: <> pqh_rer_shd.g_old_rec.object_version_number) Then
121: fnd_message.set_name('PAY', 'HR_7155_OBJECT_INVALID');
122: fnd_message.raise_error;
123: End If;
124: l_fct_ret := true;

Line 173: Fetch C_Sel1 Into pqh_rer_shd.g_old_rec;

169: ,p_argument_value => p_object_version_number
170: );
171: --
172: Open C_Sel1;
173: Fetch C_Sel1 Into pqh_rer_shd.g_old_rec;
174: If C_Sel1%notfound then
175: Close C_Sel1;
176: --
177: -- The primary key is invalid therefore we must error

Line 184: <> pqh_rer_shd.g_old_rec.object_version_number) Then

180: fnd_message.raise_error;
181: End If;
182: Close C_Sel1;
183: If (p_object_version_number
184: <> pqh_rer_shd.g_old_rec.object_version_number) Then
185: fnd_message.set_name('PAY', 'HR_7155_OBJECT_INVALID');
186: fnd_message.raise_error;
187: End If;
188: --

Line 240: end pqh_rer_shd;

236: Return(l_rec);
237: --
238: End convert_args;
239: --
240: end pqh_rer_shd;