APPS.PQP_EXR_SHD dependencies on PQP_EXR_SHD

Line 1: Package Body pqp_exr_shd as

1: Package Body pqp_exr_shd as
2: /* $Header: pqexrrhi.pkb 120.4 2006/10/20 18:38:32 sshetty noship $ */
3: --
4: -- ----------------------------------------------------------------------------
5: -- | Private Global Definitions |

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

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

Line 91: = pqp_exr_shd.g_old_rec.exception_report_id and

87: --
88: l_fct_ret := false;
89: Else
90: If (p_exception_report_id
91: = pqp_exr_shd.g_old_rec.exception_report_id and
92: p_object_version_number
93: = pqp_exr_shd.g_old_rec.object_version_number
94: ) Then
95: --

Line 93: = pqp_exr_shd.g_old_rec.object_version_number

89: Else
90: If (p_exception_report_id
91: = pqp_exr_shd.g_old_rec.exception_report_id and
92: p_object_version_number
93: = pqp_exr_shd.g_old_rec.object_version_number
94: ) Then
95: --
96: -- The g_old_rec is current therefore we must
97: -- set the returning function to true

Line 105: Fetch C_Sel1 Into pqp_exr_shd.g_old_rec;

101: --
102: -- Select the current row into g_old_rec
103: --
104: Open C_Sel1;
105: Fetch C_Sel1 Into pqp_exr_shd.g_old_rec;
106: If C_Sel1%notfound Then
107: Close C_Sel1;
108: --
109: -- The primary key is invalid therefore we must error

Line 118: <> pqp_exr_shd.g_old_rec.object_version_number) Then

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

Line 178: Fetch C_Sel1 Into pqp_exr_shd.g_old_rec;

174: ,p_argument_value => p_object_version_number
175: );
176: --
177: Open C_Sel1;
178: Fetch C_Sel1 Into pqp_exr_shd.g_old_rec;
179: If C_Sel1%notfound then
180: Close C_Sel1;
181: --
182: -- The primary key is invalid therefore we must error

Line 191: <> pqp_exr_shd.g_old_rec.object_version_number) Then

187: END IF;
188: End If;
189: Close C_Sel1;
190: If (p_object_version_number
191: <> pqp_exr_shd.g_old_rec.object_version_number) Then
192: fnd_message.set_name('PAY', 'HR_7155_OBJECT_INVALID');
193: fnd_message.raise_error;
194: End If;
195: --

Line 270: end pqp_exr_shd;

266: End convert_args;
267:
268: --
269:
270: end pqp_exr_shd;
271: