[Home] [Help]
PACKAGE BODY: APPS.HR_PERSON_EXTRA_INFO_BE2
Source
1 package body hr_person_extra_info_be2 as
2 --Code generated on 30/03/2009 04:46:37
3 /* $Header: hrapiwfe.pkb 120.4.12010000.2 2008/09/29 12:54:07 srgnanas ship $*/
4 procedure update_person_extra_info_a (
5 p_person_extra_info_id number,
6 p_pei_attribute_category varchar2,
7 p_pei_attribute1 varchar2,
8 p_pei_attribute2 varchar2,
9 p_pei_attribute3 varchar2,
10 p_pei_attribute4 varchar2,
11 p_pei_attribute5 varchar2,
12 p_pei_attribute6 varchar2,
13 p_pei_attribute7 varchar2,
14 p_pei_attribute8 varchar2,
15 p_pei_attribute9 varchar2,
16 p_pei_attribute10 varchar2,
17 p_pei_attribute11 varchar2,
18 p_pei_attribute12 varchar2,
19 p_pei_attribute13 varchar2,
20 p_pei_attribute14 varchar2,
21 p_pei_attribute15 varchar2,
22 p_pei_attribute16 varchar2,
23 p_pei_attribute17 varchar2,
24 p_pei_attribute18 varchar2,
25 p_pei_attribute19 varchar2,
26 p_pei_attribute20 varchar2,
27 p_pei_information_category varchar2,
28 p_pei_information1 varchar2,
29 p_pei_information2 varchar2,
30 p_pei_information3 varchar2,
31 p_pei_information4 varchar2,
32 p_pei_information5 varchar2,
33 p_pei_information6 varchar2,
34 p_pei_information7 varchar2,
35 p_pei_information8 varchar2,
36 p_pei_information9 varchar2,
37 p_pei_information10 varchar2,
38 p_pei_information11 varchar2,
39 p_pei_information12 varchar2,
40 p_pei_information13 varchar2,
41 p_pei_information14 varchar2,
42 p_pei_information15 varchar2,
43 p_pei_information16 varchar2,
44 p_pei_information17 varchar2,
45 p_pei_information18 varchar2,
46 p_pei_information19 varchar2,
47 p_pei_information20 varchar2,
48 p_pei_information21 varchar2,
49 p_pei_information22 varchar2,
50 p_pei_information23 varchar2,
51 p_pei_information24 varchar2,
52 p_pei_information25 varchar2,
53 p_pei_information26 varchar2,
54 p_pei_information27 varchar2,
55 p_pei_information28 varchar2,
56 p_pei_information29 varchar2,
57 p_pei_information30 varchar2,
58 p_object_version_number number) is
59 l_event_key number;
60 l_event_data clob;
61 l_event_name varchar2(250);
62 l_text varchar2(2000);
63 l_message varchar2(10);
64 --
65 cursor get_seq is
66 select per_wf_events_s.nextval from dual;
67 --
68 l_proc varchar2(72):=' hr_person_extra_info_be2.update_person_extra_info_a';
69 begin
70 hr_utility.set_location('Entering: '||l_proc,10);
71 -- check the status of the business event
72 l_event_name:='oracle.apps.per.api.person_extra_info.update_person_extra_info';
73 l_message:=wf_event.test(l_event_name);
74 --
75 if (l_message='MESSAGE') then
76 hr_utility.set_location(l_proc,20);
77 --
78 -- get a key for the event
79 --
80 open get_seq;
81 fetch get_seq into l_event_key;
82 close get_seq;
83 --
84 -- build the xml data for the event
85 --
86 dbms_lob.createTemporary(l_event_data,false,dbms_lob.call);
87 l_text:='<?xml version =''1.0'' encoding =''ASCII''?>';
88 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
89 l_text:='<person_extra_info>';
90 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
91 --
92 l_text:='<person_extra_info_id>';
93 l_text:=l_text||fnd_number.number_to_canonical(p_person_extra_info_id);
94 l_text:=l_text||'</person_extra_info_id>';
95 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
96 l_text:='<pei_attribute_category>';
97 l_text:=l_text||irc_utilities_pkg.removeTags(p_pei_attribute_category);
98 l_text:=l_text||'</pei_attribute_category>';
99 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
100 l_text:='<pei_attribute1>';
101 l_text:=l_text||irc_utilities_pkg.removeTags(p_pei_attribute1);
102 l_text:=l_text||'</pei_attribute1>';
103 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
104 l_text:='<pei_attribute2>';
105 l_text:=l_text||irc_utilities_pkg.removeTags(p_pei_attribute2);
106 l_text:=l_text||'</pei_attribute2>';
107 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
108 l_text:='<pei_attribute3>';
109 l_text:=l_text||irc_utilities_pkg.removeTags(p_pei_attribute3);
110 l_text:=l_text||'</pei_attribute3>';
111 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
112 l_text:='<pei_attribute4>';
113 l_text:=l_text||irc_utilities_pkg.removeTags(p_pei_attribute4);
114 l_text:=l_text||'</pei_attribute4>';
115 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
116 l_text:='<pei_attribute5>';
117 l_text:=l_text||irc_utilities_pkg.removeTags(p_pei_attribute5);
118 l_text:=l_text||'</pei_attribute5>';
119 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
120 l_text:='<pei_attribute6>';
121 l_text:=l_text||irc_utilities_pkg.removeTags(p_pei_attribute6);
122 l_text:=l_text||'</pei_attribute6>';
123 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
124 l_text:='<pei_attribute7>';
125 l_text:=l_text||irc_utilities_pkg.removeTags(p_pei_attribute7);
126 l_text:=l_text||'</pei_attribute7>';
127 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
128 l_text:='<pei_attribute8>';
129 l_text:=l_text||irc_utilities_pkg.removeTags(p_pei_attribute8);
130 l_text:=l_text||'</pei_attribute8>';
131 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
132 l_text:='<pei_attribute9>';
133 l_text:=l_text||irc_utilities_pkg.removeTags(p_pei_attribute9);
134 l_text:=l_text||'</pei_attribute9>';
135 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
136 l_text:='<pei_attribute10>';
137 l_text:=l_text||irc_utilities_pkg.removeTags(p_pei_attribute10);
138 l_text:=l_text||'</pei_attribute10>';
139 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
140 l_text:='<pei_attribute11>';
141 l_text:=l_text||irc_utilities_pkg.removeTags(p_pei_attribute11);
142 l_text:=l_text||'</pei_attribute11>';
143 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
144 l_text:='<pei_attribute12>';
145 l_text:=l_text||irc_utilities_pkg.removeTags(p_pei_attribute12);
146 l_text:=l_text||'</pei_attribute12>';
147 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
148 l_text:='<pei_attribute13>';
149 l_text:=l_text||irc_utilities_pkg.removeTags(p_pei_attribute13);
150 l_text:=l_text||'</pei_attribute13>';
151 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
152 l_text:='<pei_attribute14>';
153 l_text:=l_text||irc_utilities_pkg.removeTags(p_pei_attribute14);
154 l_text:=l_text||'</pei_attribute14>';
155 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
156 l_text:='<pei_attribute15>';
157 l_text:=l_text||irc_utilities_pkg.removeTags(p_pei_attribute15);
158 l_text:=l_text||'</pei_attribute15>';
159 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
160 l_text:='<pei_attribute16>';
161 l_text:=l_text||irc_utilities_pkg.removeTags(p_pei_attribute16);
162 l_text:=l_text||'</pei_attribute16>';
163 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
164 l_text:='<pei_attribute17>';
165 l_text:=l_text||irc_utilities_pkg.removeTags(p_pei_attribute17);
166 l_text:=l_text||'</pei_attribute17>';
167 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
168 l_text:='<pei_attribute18>';
169 l_text:=l_text||irc_utilities_pkg.removeTags(p_pei_attribute18);
170 l_text:=l_text||'</pei_attribute18>';
171 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
172 l_text:='<pei_attribute19>';
173 l_text:=l_text||irc_utilities_pkg.removeTags(p_pei_attribute19);
174 l_text:=l_text||'</pei_attribute19>';
175 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
176 l_text:='<pei_attribute20>';
177 l_text:=l_text||irc_utilities_pkg.removeTags(p_pei_attribute20);
178 l_text:=l_text||'</pei_attribute20>';
179 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
180 l_text:='<pei_information_category>';
181 l_text:=l_text||irc_utilities_pkg.removeTags(p_pei_information_category);
182 l_text:=l_text||'</pei_information_category>';
183 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
184 l_text:='<pei_information1>';
185 l_text:=l_text||irc_utilities_pkg.removeTags(p_pei_information1);
186 l_text:=l_text||'</pei_information1>';
187 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
188 l_text:='<pei_information2>';
189 l_text:=l_text||irc_utilities_pkg.removeTags(p_pei_information2);
190 l_text:=l_text||'</pei_information2>';
191 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
192 l_text:='<pei_information3>';
193 l_text:=l_text||irc_utilities_pkg.removeTags(p_pei_information3);
194 l_text:=l_text||'</pei_information3>';
195 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
196 l_text:='<pei_information4>';
197 l_text:=l_text||irc_utilities_pkg.removeTags(p_pei_information4);
198 l_text:=l_text||'</pei_information4>';
199 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
200 l_text:='<pei_information5>';
201 l_text:=l_text||irc_utilities_pkg.removeTags(p_pei_information5);
202 l_text:=l_text||'</pei_information5>';
203 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
204 l_text:='<pei_information6>';
205 l_text:=l_text||irc_utilities_pkg.removeTags(p_pei_information6);
206 l_text:=l_text||'</pei_information6>';
207 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
208 l_text:='<pei_information7>';
209 l_text:=l_text||irc_utilities_pkg.removeTags(p_pei_information7);
210 l_text:=l_text||'</pei_information7>';
211 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
212 l_text:='<pei_information8>';
213 l_text:=l_text||irc_utilities_pkg.removeTags(p_pei_information8);
214 l_text:=l_text||'</pei_information8>';
215 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
216 l_text:='<pei_information9>';
217 l_text:=l_text||irc_utilities_pkg.removeTags(p_pei_information9);
218 l_text:=l_text||'</pei_information9>';
219 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
220 l_text:='<pei_information10>';
221 l_text:=l_text||irc_utilities_pkg.removeTags(p_pei_information10);
222 l_text:=l_text||'</pei_information10>';
223 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
224 l_text:='<pei_information11>';
225 l_text:=l_text||irc_utilities_pkg.removeTags(p_pei_information11);
226 l_text:=l_text||'</pei_information11>';
227 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
228 l_text:='<pei_information12>';
229 l_text:=l_text||irc_utilities_pkg.removeTags(p_pei_information12);
230 l_text:=l_text||'</pei_information12>';
231 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
232 l_text:='<pei_information13>';
233 l_text:=l_text||irc_utilities_pkg.removeTags(p_pei_information13);
234 l_text:=l_text||'</pei_information13>';
235 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
236 l_text:='<pei_information14>';
237 l_text:=l_text||irc_utilities_pkg.removeTags(p_pei_information14);
238 l_text:=l_text||'</pei_information14>';
239 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
240 l_text:='<pei_information15>';
241 l_text:=l_text||irc_utilities_pkg.removeTags(p_pei_information15);
242 l_text:=l_text||'</pei_information15>';
243 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
244 l_text:='<pei_information16>';
245 l_text:=l_text||irc_utilities_pkg.removeTags(p_pei_information16);
246 l_text:=l_text||'</pei_information16>';
247 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
248 l_text:='<pei_information17>';
249 l_text:=l_text||irc_utilities_pkg.removeTags(p_pei_information17);
250 l_text:=l_text||'</pei_information17>';
251 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
252 l_text:='<pei_information18>';
253 l_text:=l_text||irc_utilities_pkg.removeTags(p_pei_information18);
254 l_text:=l_text||'</pei_information18>';
255 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
256 l_text:='<pei_information19>';
257 l_text:=l_text||irc_utilities_pkg.removeTags(p_pei_information19);
258 l_text:=l_text||'</pei_information19>';
259 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
260 l_text:='<pei_information20>';
261 l_text:=l_text||irc_utilities_pkg.removeTags(p_pei_information20);
262 l_text:=l_text||'</pei_information20>';
263 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
264 l_text:='<pei_information21>';
265 l_text:=l_text||irc_utilities_pkg.removeTags(p_pei_information21);
266 l_text:=l_text||'</pei_information21>';
267 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
268 l_text:='<pei_information22>';
269 l_text:=l_text||irc_utilities_pkg.removeTags(p_pei_information22);
270 l_text:=l_text||'</pei_information22>';
271 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
272 l_text:='<pei_information23>';
273 l_text:=l_text||irc_utilities_pkg.removeTags(p_pei_information23);
274 l_text:=l_text||'</pei_information23>';
275 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
276 l_text:='<pei_information24>';
277 l_text:=l_text||irc_utilities_pkg.removeTags(p_pei_information24);
278 l_text:=l_text||'</pei_information24>';
279 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
280 l_text:='<pei_information25>';
281 l_text:=l_text||irc_utilities_pkg.removeTags(p_pei_information25);
282 l_text:=l_text||'</pei_information25>';
283 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
284 l_text:='<pei_information26>';
285 l_text:=l_text||irc_utilities_pkg.removeTags(p_pei_information26);
286 l_text:=l_text||'</pei_information26>';
287 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
288 l_text:='<pei_information27>';
289 l_text:=l_text||irc_utilities_pkg.removeTags(p_pei_information27);
290 l_text:=l_text||'</pei_information27>';
291 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
292 l_text:='<pei_information28>';
293 l_text:=l_text||irc_utilities_pkg.removeTags(p_pei_information28);
294 l_text:=l_text||'</pei_information28>';
295 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
296 l_text:='<pei_information29>';
297 l_text:=l_text||irc_utilities_pkg.removeTags(p_pei_information29);
298 l_text:=l_text||'</pei_information29>';
299 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
300 l_text:='<pei_information30>';
301 l_text:=l_text||irc_utilities_pkg.removeTags(p_pei_information30);
302 l_text:=l_text||'</pei_information30>';
303 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
304 l_text:='<object_version_number>';
305 l_text:=l_text||fnd_number.number_to_canonical(p_object_version_number);
306 l_text:=l_text||'</object_version_number>';
307 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
308 l_text:='</person_extra_info>';
309 --
310 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
311 --
312 -- raise the event with the event data
313 wf_event.raise(p_event_name=>l_event_name
314 ,p_event_key=>l_event_key
315 ,p_event_data=>l_event_data);
316 elsif (l_message='KEY') then
317 hr_utility.set_location(l_proc,30);
318 -- get a key for the event
319 open get_seq;
320 fetch get_seq into l_event_key;
321 close get_seq;
322 -- this is a key event, so just raise the event
323 -- without the event data
324 wf_event.raise(p_event_name=>l_event_name
325 ,p_event_key=>l_event_key);
326 elsif (l_message='NONE') then
327 hr_utility.set_location(l_proc,40);
328 -- no event is required, so do nothing
329 null;
330 end if;
331 hr_utility.set_location('Leaving: '||l_proc,50);
332 end update_person_extra_info_a;
333 end hr_person_extra_info_be2;