DBA Data[Home] [Help]

APPS.PER_PER_INS dependencies on PER_PER_INS

Line 1: Package Body per_per_ins as

1: Package Body per_per_ins as
2: /* $Header: peperrhi.pkb 120.20.12020000.5 2013/05/16 10:39:02 srannama ship $ */
3: -- -- ------------------------------------------------------------------------
4: -- | Private Global Definitions |
5: -- ----------------------------------------------------------------------------

Line 7: g_package varchar2(33) := ' per_per_ins.'; -- Global package name

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

Line 26: per_per_ins.g_person_id_i := p_person_id;

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

Line 613: per_per_ins.g_person_id_i;

609: Cursor C_Sel2 is
610: Select null
611: from per_all_people_f
612: where person_id =
613: per_per_ins.g_person_id_i;
614: --
615: Begin
616: hr_utility.set_location('Entering:'||l_proc, 5);
617: --

Line 621: If (per_per_ins.g_person_id_i is not null)

617: --
618: --
619: -- Select the next sequence number
620: --
621: If (per_per_ins.g_person_id_i is not null)
622: then
623: --
624: -- Verify registered primary key values not already in use
625: --

Line 642: per_per_ins.g_person_id_i;

638: --
639: -- Use registered key values and clear globals
640: --
641: p_rec.person_id :=
642: per_per_ins.g_person_id_i;
643: per_per_ins.g_person_id_i := null;
644: Else
645: Open C_Sel1;
646: Fetch C_Sel1 Into p_rec.person_id;

Line 643: per_per_ins.g_person_id_i := null;

639: -- Use registered key values and clear globals
640: --
641: p_rec.person_id :=
642: per_per_ins.g_person_id_i;
643: per_per_ins.g_person_id_i := null;
644: Else
645: Open C_Sel1;
646: Fetch C_Sel1 Into p_rec.person_id;
647: Close C_Sel1;

Line 1602: end per_per_ins;

1598: --
1599: hr_utility.set_location(' Leaving:'||l_proc, 10);
1600: End ins;
1601: --
1602: end per_per_ins;