APPS.PAY_PUR_SHD dependencies on PAY_PUR_SHD

Line 1: Package Body pay_pur_shd as

1: Package Body pay_pur_shd as
2: /* $Header: pypurrhi.pkb 120.1 2005/10/26 23:17 shisriva noship $ */
3: --
4: -- ----------------------------------------------------------------------------
5: -- | Private Global Definitions |

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

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

Line 96: pay_pur_shd.g_old_rec.user_row_id and

92: --
93: l_fct_ret := false;
94: Else
95: If (p_user_row_id =
96: pay_pur_shd.g_old_rec.user_row_id and
97: p_object_version_number =
98: pay_pur_shd.g_old_rec.object_version_number ) Then
99: --
100: -- The g_old_rec is current therefore we must

Line 98: pay_pur_shd.g_old_rec.object_version_number ) Then

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

Line 116: Fetch C_Sel1 Into pay_pur_shd.g_old_rec;

112: --
113: -- Select the current row
114: --
115: Open C_Sel1;
116: Fetch C_Sel1 Into pay_pur_shd.g_old_rec;
117: If C_Sel1%notfound Then
118: Close C_Sel1;
119: --
120: -- The primary key is invalid therefore we must error

Line 127: <> pay_pur_shd.g_old_rec.object_version_number) Then

123: fnd_message.raise_error;
124: End If;
125: Close C_Sel1;
126: If (p_object_version_number
127: <> pay_pur_shd.g_old_rec.object_version_number) Then
128: fnd_message.set_name('PAY', 'HR_7155_OBJECT_INVALID');
129: fnd_message.raise_error;
130: End If;
131: l_fct_ret := true;

Line 234: pay_pur_shd.g_api_dml := true; -- Set the api dml status

230: ,p_base_key_value => p_base_key_value
231: );
232: --
233: hr_utility.set_location(l_proc, 10);
234: pay_pur_shd.g_api_dml := true; -- Set the api dml status
235: --
236: -- Update the specified datetrack row setting the effective
237: -- end date to the specified new effective end date.
238: --

Line 246: pay_pur_shd.g_api_dml := false; -- Unset the api dml status

242: where t.user_row_id = p_base_key_value
243: and p_effective_date
244: between t.effective_start_date and t.effective_end_date;
245: --
246: pay_pur_shd.g_api_dml := false; -- Unset the api dml status
247: p_object_version_number := l_object_version_number;
248: hr_utility.set_location(' Leaving:'||l_proc, 15);
249: --
250: Exception

Line 252: pay_pur_shd.g_api_dml := false; -- Unset the api dml status

248: hr_utility.set_location(' Leaving:'||l_proc, 15);
249: --
250: Exception
251: When Others Then
252: pay_pur_shd.g_api_dml := false; -- Unset the api dml status
253: Raise;
254: --
255: End upd_effective_end_date;
256: --

Line 329: Fetch C_Sel1 Into pay_pur_shd.g_old_rec;

325: --
326: -- We must select and lock the current row.
327: --
328: Open C_Sel1;
329: Fetch C_Sel1 Into pay_pur_shd.g_old_rec;
330: If C_Sel1%notfound then
331: Close C_Sel1;
332: --
333: -- The primary key is invalid therefore we must error

Line 340: <> pay_pur_shd.g_old_rec.object_version_number) Then

336: fnd_message.raise_error;
337: End If;
338: Close C_Sel1;
339: If (p_object_version_number
340: <> pay_pur_shd.g_old_rec.object_version_number) Then
341: fnd_message.set_name('PAY', 'HR_7155_OBJECT_INVALID');
342: fnd_message.raise_error;
343: End If;
344: --

Line 431: end pay_pur_shd;

427: Return(l_rec);
428: --
429: End convert_args;
430: --
431: end pay_pur_shd;