APPS.PAY_CAL_SHD dependencies on PAY_CAL_SHD

Line 1: Package Body pay_cal_shd as

1: Package Body pay_cal_shd as
2: /* $Header: pycalrhi.pkb 120.1 2005/11/11 07:06:15 adkumar noship $ */
3: --
4: -- ----------------------------------------------------------------------------
5: -- | Private Global Definitions |

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

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

Line 100: pay_cal_shd.g_old_rec.cost_allocation_id and

96: --
97: l_fct_ret := false;
98: Else
99: If (p_cost_allocation_id =
100: pay_cal_shd.g_old_rec.cost_allocation_id and
101: p_object_version_number =
102: pay_cal_shd.g_old_rec.object_version_number
103: ) Then
104: --

Line 102: pay_cal_shd.g_old_rec.object_version_number

98: Else
99: If (p_cost_allocation_id =
100: pay_cal_shd.g_old_rec.cost_allocation_id and
101: p_object_version_number =
102: pay_cal_shd.g_old_rec.object_version_number
103: ) Then
104: --
105: -- The g_old_rec is current therefore we must
106: -- set the returning function to true

Line 114: Fetch C_Sel1 Into pay_cal_shd.g_old_rec;

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

Line 125: <> pay_cal_shd.g_old_rec.object_version_number) Then

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

Line 241: pay_cal_shd.g_api_dml := true; -- Set the api dml status

237: hr_utility.set_location('p_validation_end_date:'|| p_validation_end_date, 10);
238: hr_utility.set_location('p_object_version_number:'|| p_object_version_number, 10);
239: hr_utility.set_location('l_object_version_number:'|| l_object_version_number, 10);
240:
241: pay_cal_shd.g_api_dml := true; -- Set the api dml status
242: --
243: -- Update the specified datetrack row setting the effective
244: -- end date to the specified new effective end date.
245: --

Line 256: pay_cal_shd.g_api_dml := false; -- Unset the api dml status

252: between t.effective_start_date and t.effective_end_date;
253: --
254: hr_utility.set_location('after Update:', 20);
255:
256: pay_cal_shd.g_api_dml := false; -- Unset the api dml status
257: p_object_version_number := l_object_version_number;
258: hr_utility.set_location(' Leaving:'||l_proc, 15);
259: --
260: Exception

Line 262: pay_cal_shd.g_api_dml := false; -- Unset the api dml status

258: hr_utility.set_location(' Leaving:'||l_proc, 15);
259: --
260: Exception
261: When Others Then
262: pay_cal_shd.g_api_dml := false; -- Unset the api dml status
263: Raise;
264: --
265: End upd_effective_end_date;
266: --

Line 341: Fetch C_Sel1 Into pay_cal_shd.g_old_rec;

337: --
338: -- We must select and lock the current row.
339: --
340: Open C_Sel1;
341: Fetch C_Sel1 Into pay_cal_shd.g_old_rec;
342: If C_Sel1%notfound then
343: Close C_Sel1;
344: --
345: -- The primary key is invalid therefore we must error

Line 352: <> pay_cal_shd.g_old_rec.object_version_number) Then

348: fnd_message.raise_error;
349: End If;
350: Close C_Sel1;
351: If (p_object_version_number
352: <> pay_cal_shd.g_old_rec.object_version_number) Then
353: fnd_message.set_name('PAY', 'HR_7155_OBJECT_INVALID');
354: fnd_message.raise_error;
355: End If;
356: --

Line 447: end pay_cal_shd;

443: Return(l_rec);
444: --
445: End convert_args;
446: --
447: end pay_cal_shd;