[Home] [Help]
PACKAGE BODY: APPS.BEN_EXT_DECODES
Source
1 Package Body ben_ext_decodes as
2 /* $Header: benxdecd.pkb 115.3 2003/02/10 11:23:24 rpgupta ship $ */
3 --
4 --
5 -- ----------------------------------------------------------------------------
6 -- | Private Global Definitions |
7 -- ----------------------------------------------------------------------------
8 --
9 g_package varchar2(33) := ' ben_ext_decodes.'; -- Global package name
10 g_person_id number;
11 --
12 --
13 -- ----------------------------------------------------------------------------
14 -- |---------< main >---------------------------------------------|
15 -- ----------------------------------------------------------------------------
16 Function main(p_short_name varchar2,
17 p_ext_data_elmt_id number,
18 p_business_group_id number,
19 p_person_id number,
20 p_dflt_val varchar2) return varchar2 is
21
22 l_proc varchar2(72) := g_package||'main';
23 l_rslt_elmt varchar2(100) := null;
24
25 begin
26 --
27 hr_utility.set_location('Entering'||l_proc, 5);
28 --
29 null;
30 -- this program is no longer used and should be removed from arcs. logic
31 -- has been moved to benxfrmt.pkb.
32 --
33 hr_utility.set_location('Exiting'||l_proc, 15);
34 --
35 end main; -- main
36 -- ------------------------------------------------------------------
37 -- |------------------------< apply_decode >------------------------|
38 -- ------------------------------------------------------------------
39 --
40 Function apply_decode(p_value varchar2,
41 p_ext_data_elmt_id number,
42 p_default varchar2
43 ) Return Varchar2 Is
44 --
45 l_proc varchar2(72) := g_package||'apply_decode';
46 l_dcd_val varchar2(30) := null;
47 --
48
49 --
50 Begin
51 --
52 hr_utility.set_location('Entering:'||l_proc, 5);
53 --
54 null;
55 -- this program is no longer used and should be removed from arcs. logic
56 -- has been moved to benxfrmt.pkb.
57 --
58 hr_utility.set_location(' Exiting:'||l_proc, 15);
59 --
60 End apply_decode;
61 --
62 --
63 --
64 end ben_ext_decodes;