DBA Data[Home] [Help]

APPS.PQH_CRD_SHD dependencies on PQH_CRD_SHD

Line 1: Package Body pqh_crd_shd as

1: Package Body pqh_crd_shd as
2: /* $Header: pqcrdrhi.pkb 120.0 2005/05/29 01:45 appldev noship $ */
3: --
4: -- ----------------------------------------------------------------------------
5: -- | Private Global Definitions |

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

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

Line 130: = pqh_crd_shd.g_old_rec.criteria_rate_defn_id and

126: --
127: l_fct_ret := false;
128: Else
129: If (p_criteria_rate_defn_id
130: = pqh_crd_shd.g_old_rec.criteria_rate_defn_id and
131: p_object_version_number
132: = pqh_crd_shd.g_old_rec.object_version_number
133: ) Then
134: --

Line 132: = pqh_crd_shd.g_old_rec.object_version_number

128: Else
129: If (p_criteria_rate_defn_id
130: = pqh_crd_shd.g_old_rec.criteria_rate_defn_id and
131: p_object_version_number
132: = pqh_crd_shd.g_old_rec.object_version_number
133: ) Then
134: --
135: -- The g_old_rec is current therefore we must
136: -- set the returning function to true

Line 144: Fetch C_Sel1 Into pqh_crd_shd.g_old_rec;

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

Line 155: <> pqh_crd_shd.g_old_rec.object_version_number) Then

151: fnd_message.raise_error;
152: End If;
153: Close C_Sel1;
154: If (p_object_version_number
155: <> pqh_crd_shd.g_old_rec.object_version_number) Then
156: fnd_message.set_name('PAY', 'HR_7155_OBJECT_INVALID');
157: fnd_message.raise_error;
158: End If;
159: l_fct_ret := true;

Line 249: Fetch C_Sel1 Into pqh_crd_shd.g_old_rec;

245: ,p_argument_value => p_object_version_number
246: );
247: --
248: Open C_Sel1;
249: Fetch C_Sel1 Into pqh_crd_shd.g_old_rec;
250: If C_Sel1%notfound then
251: Close C_Sel1;
252: --
253: -- The primary key is invalid therefore we must error

Line 260: <> pqh_crd_shd.g_old_rec.object_version_number) Then

256: fnd_message.raise_error;
257: End If;
258: Close C_Sel1;
259: If (p_object_version_number
260: <> pqh_crd_shd.g_old_rec.object_version_number) Then
261: fnd_message.set_name('PAY', 'HR_7155_OBJECT_INVALID');
262: fnd_message.raise_error;
263: End If;
264: --

Line 398: end pqh_crd_shd;

394: Return(l_rec);
395: --
396: End convert_args;
397: --
398: end pqh_crd_shd;