1 PACKAGE body hr_in_utility as
2 /* $Header: hrinutil.pkb 120.3 2008/01/03 10:13:35 vdabgar ship $ */
3 FUNCTION per_in_full_name(
4 p_first_name IN VARCHAR2
5 ,p_middle_names IN VARCHAR2
6 ,p_last_name IN VARCHAR2
7 ,p_known_as IN VARCHAR2
8 ,p_title IN VARCHAR2
9 ,p_suffix IN VARCHAR2
10 ,p_pre_name_adjunct IN VARCHAR2
11 ,p_per_information1 IN VARCHAR2
12 ,p_per_information2 IN VARCHAR2
13 ,p_per_information3 IN VARCHAR2
14 ,p_per_information4 IN VARCHAR2
15 ,p_per_information5 IN VARCHAR2
16 ,p_per_information6 IN VARCHAR2
17 ,p_per_information7 IN VARCHAR2
18 ,p_per_information8 IN VARCHAR2
19 ,p_per_information9 IN VARCHAR2
20 ,p_per_information10 IN VARCHAR2
21 ,p_per_information11 IN VARCHAR2
22 ,p_per_information12 IN VARCHAR2
23 ,p_per_information13 IN VARCHAR2
24 ,p_per_information14 IN VARCHAR2
25 ,p_per_information15 IN VARCHAR2
26 ,p_per_information16 IN VARCHAR2
27 ,p_per_information17 IN VARCHAR2
28 ,p_per_information18 IN VARCHAR2
29 ,p_per_information19 IN VARCHAR2
30 ,p_per_information20 IN VARCHAR2
31 ,p_per_information21 IN VARCHAR2
32 ,p_per_information22 IN VARCHAR2
33 ,p_per_information23 IN VARCHAR2
34 ,p_per_information24 IN VARCHAR2
35 ,p_per_information25 IN VARCHAR2
36 ,p_per_information26 IN VARCHAR2
37 ,p_per_information27 IN VARCHAR2
38 ,p_per_information28 IN VARCHAR2
39 ,p_per_information29 IN VARCHAR2
40 ,p_per_information30 IN VARCHAR2
41 ) RETURN VARCHAR2 AS
42 l_full_name VARCHAR2(360);
43 BEGIN
44 l_full_name := p_last_name;
45 --
46 IF p_middle_names IS NOT NULL THEN
47 l_full_name:= p_middle_names||' '|| l_full_name ;
48 END IF;
49 IF p_first_name IS NOT NULL THEN
50 l_full_name:= p_first_name||' '|| l_full_name ;
51 END IF;
52 IF p_title IS NOT NULL THEN
53 l_full_name:= hr_general.decode_lookup('TITLE',p_title) ||' '|| l_full_name ;
54 END IF;
55 --
56 RETURN substr(l_full_name,1,240);
57 END per_in_full_name;
58
59 FUNCTION per_in_full_name
60 (
61 p_first_name IN VARCHAR2
62 ,p_middle_names IN VARCHAR2
63 ,p_last_name IN VARCHAR2
64 ,p_title IN VARCHAR2
65 )
66 RETURN VARCHAR2
67 is
68 l_full_name VARCHAR2(360);
69 BEGIN
70 RETURN per_in_full_name
71 (
72 p_first_name
73 ,p_middle_names
74 ,p_last_name
75 ,NULL
76 ,p_title
77 ,NULL
78 ,NULL
79 ,NULL
80 ,NULL
81 ,NULL
82 ,NULL
83 ,NULL
84 ,NULL
85 ,NULL
86 ,NULL
87 ,NULL
88 ,NULL
89 ,NULL
90 ,NULL
91 ,NULL
92 ,NULL
93 ,NULL
94 ,NULL
95 ,NULL
96 ,NULL
97 ,NULL
98 ,NULL
99 ,NULL
100 ,NULL
101 ,NULL
102 ,NULL
103 ,NULL
104 ,NULL
105 ,NULL
106 ,NULL
107 ,NULL
108 ,NULL
109 );
110 END per_in_full_name;
111
112 PROCEDURE derive_hr_loc_address(
113 p_tax_name IN VARCHAR2,
114 p_style IN VARCHAR2,
115 p_address_line_1 IN VARCHAR2,
116 p_address_line_2 IN VARCHAR2,
117 p_address_line_3 IN VARCHAR2,
118 p_town_or_city IN VARCHAR2,
119 p_country IN VARCHAR2,
120 p_postal_code IN VARCHAR2,
121 p_region_1 IN VARCHAR2,
122 p_region_2 IN VARCHAR2,
123 p_region_3 IN VARCHAR2,
124 p_telephone_number_1 IN VARCHAR2,
125 p_telephone_number_2 IN VARCHAR2,
126 p_telephone_number_3 IN VARCHAR2,
127 p_loc_information13 IN VARCHAR2,
128 p_loc_information14 IN VARCHAR2,
129 p_loc_information15 IN VARCHAR2,
130 p_loc_information16 IN VARCHAR2,
131 p_loc_information17 IN VARCHAR2,
132 p_attribute_category IN VARCHAR2,
133 p_attribute1 IN VARCHAR2,
134 p_attribute2 IN VARCHAR2,
135 p_attribute3 IN VARCHAR2,
136 p_attribute4 IN VARCHAR2,
137 p_attribute5 IN VARCHAR2,
138 p_attribute6 IN VARCHAR2,
139 p_attribute7 IN VARCHAR2,
140 p_attribute8 IN VARCHAR2,
141 p_attribute9 IN VARCHAR2,
142 p_attribute10 IN VARCHAR2,
143 p_attribute11 IN VARCHAR2,
144 p_attribute12 IN VARCHAR2,
145 p_attribute13 IN VARCHAR2,
146 p_attribute14 IN VARCHAR2,
147 p_attribute15 IN VARCHAR2,
148 p_attribute16 IN VARCHAR2,
149 p_attribute17 IN VARCHAR2,
150 p_attribute18 IN VARCHAR2,
151 p_attribute19 IN VARCHAR2,
152 p_attribute20 IN VARCHAR2,
153 p_global_attribute_category IN VARCHAR2,
154 p_global_attribute1 IN VARCHAR2,
155 p_global_attribute2 IN VARCHAR2,
156 p_global_attribute3 IN VARCHAR2,
157 p_global_attribute4 IN VARCHAR2,
158 p_global_attribute5 IN VARCHAR2,
159 p_global_attribute6 IN VARCHAR2,
160 p_global_attribute7 IN VARCHAR2,
161 p_global_attribute8 IN VARCHAR2,
162 p_global_attribute9 IN VARCHAR2,
163 p_global_attribute10 IN VARCHAR2,
164 p_global_attribute11 IN VARCHAR2,
165 p_global_attribute12 IN VARCHAR2,
166 p_global_attribute13 IN VARCHAR2,
167 p_global_attribute14 IN VARCHAR2,
168 p_global_attribute15 IN VARCHAR2,
169 p_global_attribute16 IN VARCHAR2,
170 p_global_attribute17 IN VARCHAR2,
171 p_global_attribute18 IN VARCHAR2,
172 p_global_attribute19 IN VARCHAR2,
173 p_global_attribute20 IN VARCHAR2,
174 p_loc_information18 IN VARCHAR2,
175 p_loc_information19 IN VARCHAR2,
176 p_loc_information20 IN VARCHAR2,
177 p_derived_locale OUT NOCOPY VARCHAR2
178 ) is
179 BEGIN
180 IF (ltrim(p_loc_information15) is not null) THEN
181 p_derived_locale := p_loc_information15 || ',';
182 END IF;
183 IF (ltrim(p_loc_information16) is not null) THEN
184 p_derived_locale := p_derived_locale ||
185 hr_general.decode_lookup('IN_STATES',p_loc_information16)|| ',';
186 END IF;
187 IF (ltrim(p_country) is null) THEN
188 p_derived_locale := rtrim(p_derived_locale, ',');
189 ELSE
190 p_derived_locale := p_derived_locale ||
191 hr_general.decode_lookup('PER_US_COUNTRY_CODE',p_country);
192 END IF;
193 END;
194 end hr_in_utility;