DBA Data[Home] [Help]

PACKAGE BODY: APPS.HR_IN_UTILITY

Source


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;