DBA Data[Home] [Help]

APPS.PER_PEA_INS dependencies on PER_PEA_INS

Line 1: Package Body per_pea_ins as

1: Package Body per_pea_ins as
2: /* $Header: pepearhi.pkb 120.0.12010000.1 2008/07/28 05:10:27 appldev ship $ */
3: --
4: -- ----------------------------------------------------------------------------
5: -- | Private Global Definitions |

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

4: -- ----------------------------------------------------------------------------
5: -- | Private Global Definitions |
6: -- ----------------------------------------------------------------------------
7: --
8: g_package varchar2(33) := ' per_pea_ins.'; -- Global package name
9: --
10: -- The following global variables are only to be used by
11: -- the set_base_key_value and pre_insert procedures.
12: --

Line 26: per_pea_ins.g_person_analysis_id_i := p_person_analysis_id;

22: --
23: Begin
24: hr_utility.set_location('Entering:'||l_proc, 10);
25: --
26: per_pea_ins.g_person_analysis_id_i := p_person_analysis_id;
27: --
28: hr_utility.set_location(' Leaving:'||l_proc, 20);
29: End set_base_key_value;
30: --

Line 234: where person_analysis_id = per_pea_ins.g_person_analysis_id_i;

230: --
231: Cursor C_Sel1 is select per_person_analyses_s.nextval from sys.dual;
232: --
233: Cursor C_Sel2 is Select null from per_person_analyses
234: where person_analysis_id = per_pea_ins.g_person_analysis_id_i;
235: --
236: Begin
237: hr_utility.set_location('Entering:'||l_proc, 5);
238: --

Line 239: If (per_pea_ins.g_person_analysis_id_i is not null) Then

235: --
236: Begin
237: hr_utility.set_location('Entering:'||l_proc, 5);
238: --
239: If (per_pea_ins.g_person_analysis_id_i is not null) Then
240: --
241: -- Verify registered primary key values not already in use
242: --
243: Open C_Sel2;

Line 258: p_rec.person_analysis_id := per_pea_ins.g_person_analysis_id_i;

254: Close C_Sel2;
255: --
256: -- Use registered key values and clear globals
257: --
258: p_rec.person_analysis_id := per_pea_ins.g_person_analysis_id_i;
259: per_pea_ins.g_person_analysis_id_i := null;
260: Else
261: --
262: -- No registerd key values, so select the next sequence number

Line 259: per_pea_ins.g_person_analysis_id_i := null;

255: --
256: -- Use registered key values and clear globals
257: --
258: p_rec.person_analysis_id := per_pea_ins.g_person_analysis_id_i;
259: per_pea_ins.g_person_analysis_id_i := null;
260: Else
261: --
262: -- No registerd key values, so select the next sequence number
263: --

Line 584: end per_pea_ins;

580: --
581: hr_utility.set_location(' Leaving:'||l_proc, 10);
582: End ins;
583: --
584: end per_pea_ins;