DBA Data[Home] [Help]

APPS.BEN_CPI_SHD dependencies on BEN_CPI_SHD

Line 1: Package Body ben_cpi_shd as

1: Package Body ben_cpi_shd as
2: /* $Header: becpirhi.pkb 120.0 2005/05/28 01:13:52 appldev noship $ */
3: --
4: -- ----------------------------------------------------------------------------
5: -- | Private Global Definitions |

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

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

Line 230: = ben_cpi_shd.g_old_rec.group_per_in_ler_id and

226: --
227: l_fct_ret := false;
228: Else
229: If (p_group_per_in_ler_id
230: = ben_cpi_shd.g_old_rec.group_per_in_ler_id and
231: p_object_version_number
232: = ben_cpi_shd.g_old_rec.object_version_number
233: ) Then
234: --

Line 232: = ben_cpi_shd.g_old_rec.object_version_number

228: Else
229: If (p_group_per_in_ler_id
230: = ben_cpi_shd.g_old_rec.group_per_in_ler_id and
231: p_object_version_number
232: = ben_cpi_shd.g_old_rec.object_version_number
233: ) Then
234: --
235: -- The g_old_rec is current therefore we must
236: -- set the returning function to true

Line 244: Fetch C_Sel1 Into ben_cpi_shd.g_old_rec;

240: --
241: -- Select the current row into g_old_rec
242: --
243: Open C_Sel1;
244: Fetch C_Sel1 Into ben_cpi_shd.g_old_rec;
245: If C_Sel1%notfound Then
246: Close C_Sel1;
247: --
248: -- The primary key is invalid therefore we must error

Line 255: <> ben_cpi_shd.g_old_rec.object_version_number) Then

251: fnd_message.raise_error;
252: End If;
253: Close C_Sel1;
254: If (p_object_version_number
255: <> ben_cpi_shd.g_old_rec.object_version_number) Then
256: fnd_message.set_name('PAY', 'HR_7155_OBJECT_INVALID');
257: fnd_message.raise_error;
258: End If;
259: l_fct_ret := true;

Line 456: Fetch C_Sel1 Into ben_cpi_shd.g_old_rec;

452: ,p_argument_value => p_object_version_number
453: );
454: --
455: Open C_Sel1;
456: Fetch C_Sel1 Into ben_cpi_shd.g_old_rec;
457: If C_Sel1%notfound then
458: Close C_Sel1;
459: --
460: -- The primary key is invalid therefore we must error

Line 467: <> ben_cpi_shd.g_old_rec.object_version_number) Then

463: fnd_message.raise_error;
464: End If;
465: Close C_Sel1;
466: If (p_object_version_number
467: <> ben_cpi_shd.g_old_rec.object_version_number) Then
468: fnd_message.set_name('PAY', 'HR_7155_OBJECT_INVALID');
469: fnd_message.raise_error;
470: End If;
471: --

Line 813: end ben_cpi_shd;

809: Return(l_rec);
810: --
811: End convert_args;
812: --
813: end ben_cpi_shd;