[Home] [Help]
PACKAGE BODY: APPS.XLA_LOOKUPS_PKG
Source
1 PACKAGE BODY xla_lookups_pkg AS
2 /* $Header: xlacmlkp.pkb 120.3 2003/03/18 00:40:30 dcshah ship $ */
3 /*======================================================================+
4 | Copyright (c) 1995-2002 Oracle Corporation |
5 | Redwood Shores, CA, USA |
6 | All rights reserved. |
7 +=======================================================================+
8 | PACKAGE NAME |
9 | xla_lookup_pkg |
10 | |
11 | DESCRIPTION |
12 | XLA Lookups Package |
13 | |
14 | HISTORY |
15 | 07-Dec-95 P. Labrevois Created |
16 | 08-Feb-01 Converted to XLA |
17 | |
18 +======================================================================*/
19
20 /*======================================================================+
21 | |
22 | Public Function |
23 | |
24 | get_meaning |
25 | |
26 | Get the meaning for an lookup type and lookup code. |
27 | |
28 +======================================================================*/
29 FUNCTION get_meaning
30 (p_lookup_type IN VARCHAR2
31 ,p_lookup_code IN VARCHAR2)
32 RETURN VARCHAR2
33
34 IS
35
36 l_meaning VARCHAR2(80);
37
38 BEGIN
39 xla_utility_pkg.trace('> xla_lookups_pkg.get_meaning' , 10);
40
41 xla_utility_pkg.trace('Lookup type = '||p_lookup_type , 20);
42 xla_utility_pkg.trace('Lookup_code = '||p_lookup_code , 20);
43
44 SELECT meaning
45 INTO l_meaning
46 FROM xla_lookups
47 WHERE lookup_type = p_lookup_type
48 AND lookup_code = p_lookup_code
49 ;
50
51 xla_utility_pkg.trace('Meaning = '||l_meaning , 20);
52
53 xla_utility_pkg.trace('< xla_lookups_pkg.get_meaning' , 10);
54
55 RETURN l_meaning;
56
57 EXCEPTION
58 WHEN xla_exceptions_pkg.application_exception THEN
59 RAISE;
60 WHEN OTHERS THEN
61 xla_exceptions_pkg.raise_message
62 (p_location => 'xla_lookups_pkg.get_meaning');
63 END get_meaning;
64
65
66 /*======================================================================+
67 | |
68 | Public Function |
69 | |
70 | get_lookuptype_meaning |
71 | |
72 | Get the meaning for an lookup type |
73 | |
74 +======================================================================*/
75 FUNCTION get_lookuptype_meaning
76 (p_view_application_id IN NUMBER
77 ,p_lookup_type IN VARCHAR2)
78 RETURN VARCHAR2
79
80 IS
81
82 l_meaning VARCHAR2(80);
83
84 BEGIN
85 xla_utility_pkg.trace('> xla_lookups_pkg.get_lookuptype_meaning' , 10);
86
87 xla_utility_pkg.trace('Lookup type = '||p_lookup_type , 20);
88 xla_utility_pkg.trace('Lookup_code = '||p_view_application_id , 20);
89
90 SELECT meaning
91 INTO l_meaning
92 FROM fnd_lookup_types_vl
93 WHERE lookup_type = p_lookup_type
94 AND view_application_id = p_view_application_id
95 ;
96
97 xla_utility_pkg.trace('Meaning = '||l_meaning , 20);
98
99 xla_utility_pkg.trace('< xla_lookups_pkg.get_lookuptype_meaning' , 10);
100
101 RETURN l_meaning;
102
103 EXCEPTION
104 WHEN xla_exceptions_pkg.application_exception THEN
105 RAISE;
106 WHEN OTHERS THEN
107 xla_exceptions_pkg.raise_message
108 (p_location => 'xla_lookups_pkg.get_lookuptype_meaning');
109 END get_lookuptype_meaning;
110
111 END xla_lookups_pkg;