[Home] [Help]
PACKAGE BODY: APPS.HR_LOCATION_BE2
Source
1 package body hr_location_be2 as
2 --Code generated on 30/03/2009 04:46:08
3 /* $Header: hrapiwfe.pkb 120.4.12010000.2 2008/09/29 12:54:07 srgnanas ship $*/
4 procedure update_location_a (
5 p_effective_date date,
6 p_language_code varchar2,
7 p_location_id number,
8 p_location_code varchar2,
9 p_description varchar2,
10 p_timezone_code varchar2,
11 p_tp_header_id number,
12 p_ece_tp_location_code varchar2,
13 p_address_line_1 varchar2,
14 p_address_line_2 varchar2,
15 p_address_line_3 varchar2,
16 p_bill_to_site_flag varchar2,
17 p_country varchar2,
18 p_designated_receiver_id number,
19 p_in_organization_flag varchar2,
20 p_inactive_date date,
21 p_operating_unit_id number,
22 p_inventory_organization_id number,
23 p_office_site_flag varchar2,
24 p_postal_code varchar2,
25 p_receiving_site_flag varchar2,
26 p_region_1 varchar2,
27 p_region_2 varchar2,
28 p_region_3 varchar2,
29 p_ship_to_location_id number,
30 p_ship_to_site_flag varchar2,
31 p_style varchar2,
32 p_tax_name varchar2,
33 p_telephone_number_1 varchar2,
34 p_telephone_number_2 varchar2,
35 p_telephone_number_3 varchar2,
36 p_town_or_city varchar2,
37 p_loc_information13 varchar2,
38 p_loc_information14 varchar2,
39 p_loc_information15 varchar2,
40 p_loc_information16 varchar2,
41 p_loc_information17 varchar2,
42 p_loc_information18 varchar2,
43 p_loc_information19 varchar2,
44 p_loc_information20 varchar2,
45 p_attribute_category varchar2,
46 p_attribute1 varchar2,
47 p_attribute2 varchar2,
48 p_attribute3 varchar2,
49 p_attribute4 varchar2,
50 p_attribute5 varchar2,
51 p_attribute6 varchar2,
52 p_attribute7 varchar2,
53 p_attribute8 varchar2,
54 p_attribute9 varchar2,
55 p_attribute10 varchar2,
56 p_attribute11 varchar2,
57 p_attribute12 varchar2,
58 p_attribute13 varchar2,
59 p_attribute14 varchar2,
60 p_attribute15 varchar2,
61 p_attribute16 varchar2,
62 p_attribute17 varchar2,
63 p_attribute18 varchar2,
64 p_attribute19 varchar2,
65 p_attribute20 varchar2,
66 p_global_attribute_category varchar2,
67 p_global_attribute1 varchar2,
68 p_global_attribute2 varchar2,
69 p_global_attribute3 varchar2,
70 p_global_attribute4 varchar2,
71 p_global_attribute5 varchar2,
72 p_global_attribute6 varchar2,
73 p_global_attribute7 varchar2,
74 p_global_attribute8 varchar2,
75 p_global_attribute9 varchar2,
76 p_global_attribute10 varchar2,
77 p_global_attribute11 varchar2,
78 p_global_attribute12 varchar2,
79 p_global_attribute13 varchar2,
80 p_global_attribute14 varchar2,
81 p_global_attribute15 varchar2,
82 p_global_attribute16 varchar2,
83 p_global_attribute17 varchar2,
84 p_global_attribute18 varchar2,
85 p_global_attribute19 varchar2,
86 p_global_attribute20 varchar2,
87 p_object_version_number number) is
88 l_event_key number;
89 l_event_data clob;
90 l_event_name varchar2(250);
91 l_text varchar2(2000);
92 l_message varchar2(10);
93 --
94 cursor get_seq is
95 select per_wf_events_s.nextval from dual;
96 --
97 l_proc varchar2(72):=' hr_location_be2.update_location_a';
98 begin
99 hr_utility.set_location('Entering: '||l_proc,10);
100 -- check the status of the business event
101 l_event_name:='oracle.apps.per.api.location.update_location';
102 l_message:=wf_event.test(l_event_name);
103 --
104 if (l_message='MESSAGE') then
105 hr_utility.set_location(l_proc,20);
106 --
107 -- get a key for the event
108 --
109 open get_seq;
110 fetch get_seq into l_event_key;
111 close get_seq;
112 --
113 -- build the xml data for the event
114 --
115 dbms_lob.createTemporary(l_event_data,false,dbms_lob.call);
116 l_text:='<?xml version =''1.0'' encoding =''ASCII''?>';
117 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
118 l_text:='<location>';
119 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
120 --
121 l_text:='<effective_date>';
122 l_text:=l_text||fnd_date.date_to_canonical(p_effective_date);
123 l_text:=l_text||'</effective_date>';
124 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
125 l_text:='<language_code>';
126 l_text:=l_text||irc_utilities_pkg.removeTags(p_language_code);
127 l_text:=l_text||'</language_code>';
128 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
129 l_text:='<location_id>';
130 l_text:=l_text||fnd_number.number_to_canonical(p_location_id);
131 l_text:=l_text||'</location_id>';
132 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
133 l_text:='<location_code>';
134 l_text:=l_text||irc_utilities_pkg.removeTags(p_location_code);
135 l_text:=l_text||'</location_code>';
136 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
137 l_text:='<description>';
138 l_text:=l_text||irc_utilities_pkg.removeTags(p_description);
139 l_text:=l_text||'</description>';
140 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
141 l_text:='<timezone_code>';
142 l_text:=l_text||irc_utilities_pkg.removeTags(p_timezone_code);
143 l_text:=l_text||'</timezone_code>';
144 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
145 l_text:='<tp_header_id>';
146 l_text:=l_text||fnd_number.number_to_canonical(p_tp_header_id);
147 l_text:=l_text||'</tp_header_id>';
148 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
149 l_text:='<ece_tp_location_code>';
150 l_text:=l_text||irc_utilities_pkg.removeTags(p_ece_tp_location_code);
151 l_text:=l_text||'</ece_tp_location_code>';
152 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
153 l_text:='<address_line_1>';
154 l_text:=l_text||irc_utilities_pkg.removeTags(p_address_line_1);
155 l_text:=l_text||'</address_line_1>';
156 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
157 l_text:='<address_line_2>';
158 l_text:=l_text||irc_utilities_pkg.removeTags(p_address_line_2);
159 l_text:=l_text||'</address_line_2>';
160 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
161 l_text:='<address_line_3>';
162 l_text:=l_text||irc_utilities_pkg.removeTags(p_address_line_3);
163 l_text:=l_text||'</address_line_3>';
164 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
165 l_text:='<bill_to_site_flag>';
166 l_text:=l_text||irc_utilities_pkg.removeTags(p_bill_to_site_flag);
167 l_text:=l_text||'</bill_to_site_flag>';
168 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
169 l_text:='<country>';
170 l_text:=l_text||irc_utilities_pkg.removeTags(p_country);
171 l_text:=l_text||'</country>';
172 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
173 l_text:='<designated_receiver_id>';
174 l_text:=l_text||fnd_number.number_to_canonical(p_designated_receiver_id);
175 l_text:=l_text||'</designated_receiver_id>';
176 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
177 l_text:='<in_organization_flag>';
178 l_text:=l_text||irc_utilities_pkg.removeTags(p_in_organization_flag);
179 l_text:=l_text||'</in_organization_flag>';
180 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
181 l_text:='<inactive_date>';
182 l_text:=l_text||fnd_date.date_to_canonical(p_inactive_date);
183 l_text:=l_text||'</inactive_date>';
184 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
185 l_text:='<operating_unit_id>';
186 l_text:=l_text||fnd_number.number_to_canonical(p_operating_unit_id);
187 l_text:=l_text||'</operating_unit_id>';
188 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
189 l_text:='<inventory_organization_id>';
190 l_text:=l_text||fnd_number.number_to_canonical(p_inventory_organization_id);
191 l_text:=l_text||'</inventory_organization_id>';
192 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
193 l_text:='<office_site_flag>';
194 l_text:=l_text||irc_utilities_pkg.removeTags(p_office_site_flag);
195 l_text:=l_text||'</office_site_flag>';
196 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
197 l_text:='<postal_code>';
198 l_text:=l_text||irc_utilities_pkg.removeTags(p_postal_code);
199 l_text:=l_text||'</postal_code>';
200 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
201 l_text:='<receiving_site_flag>';
202 l_text:=l_text||irc_utilities_pkg.removeTags(p_receiving_site_flag);
203 l_text:=l_text||'</receiving_site_flag>';
204 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
205 l_text:='<region_1>';
206 l_text:=l_text||irc_utilities_pkg.removeTags(p_region_1);
207 l_text:=l_text||'</region_1>';
208 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
209 l_text:='<region_2>';
210 l_text:=l_text||irc_utilities_pkg.removeTags(p_region_2);
211 l_text:=l_text||'</region_2>';
212 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
213 l_text:='<region_3>';
214 l_text:=l_text||irc_utilities_pkg.removeTags(p_region_3);
215 l_text:=l_text||'</region_3>';
216 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
217 l_text:='<ship_to_location_id>';
218 l_text:=l_text||fnd_number.number_to_canonical(p_ship_to_location_id);
219 l_text:=l_text||'</ship_to_location_id>';
220 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
221 l_text:='<ship_to_site_flag>';
222 l_text:=l_text||irc_utilities_pkg.removeTags(p_ship_to_site_flag);
223 l_text:=l_text||'</ship_to_site_flag>';
224 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
225 l_text:='<style>';
226 l_text:=l_text||irc_utilities_pkg.removeTags(p_style);
227 l_text:=l_text||'</style>';
228 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
229 l_text:='<tax_name>';
230 l_text:=l_text||irc_utilities_pkg.removeTags(p_tax_name);
231 l_text:=l_text||'</tax_name>';
232 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
233 l_text:='<telephone_number_1>';
234 l_text:=l_text||irc_utilities_pkg.removeTags(p_telephone_number_1);
235 l_text:=l_text||'</telephone_number_1>';
236 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
237 l_text:='<telephone_number_2>';
238 l_text:=l_text||irc_utilities_pkg.removeTags(p_telephone_number_2);
239 l_text:=l_text||'</telephone_number_2>';
240 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
241 l_text:='<telephone_number_3>';
242 l_text:=l_text||irc_utilities_pkg.removeTags(p_telephone_number_3);
243 l_text:=l_text||'</telephone_number_3>';
244 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
245 l_text:='<town_or_city>';
246 l_text:=l_text||irc_utilities_pkg.removeTags(p_town_or_city);
247 l_text:=l_text||'</town_or_city>';
248 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
249 l_text:='<loc_information13>';
250 l_text:=l_text||irc_utilities_pkg.removeTags(p_loc_information13);
251 l_text:=l_text||'</loc_information13>';
252 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
253 l_text:='<loc_information14>';
254 l_text:=l_text||irc_utilities_pkg.removeTags(p_loc_information14);
255 l_text:=l_text||'</loc_information14>';
256 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
257 l_text:='<loc_information15>';
258 l_text:=l_text||irc_utilities_pkg.removeTags(p_loc_information15);
259 l_text:=l_text||'</loc_information15>';
260 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
261 l_text:='<loc_information16>';
262 l_text:=l_text||irc_utilities_pkg.removeTags(p_loc_information16);
263 l_text:=l_text||'</loc_information16>';
264 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
265 l_text:='<loc_information17>';
266 l_text:=l_text||irc_utilities_pkg.removeTags(p_loc_information17);
267 l_text:=l_text||'</loc_information17>';
268 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
269 l_text:='<loc_information18>';
270 l_text:=l_text||irc_utilities_pkg.removeTags(p_loc_information18);
271 l_text:=l_text||'</loc_information18>';
272 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
273 l_text:='<loc_information19>';
274 l_text:=l_text||irc_utilities_pkg.removeTags(p_loc_information19);
275 l_text:=l_text||'</loc_information19>';
276 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
277 l_text:='<loc_information20>';
278 l_text:=l_text||irc_utilities_pkg.removeTags(p_loc_information20);
279 l_text:=l_text||'</loc_information20>';
280 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
281 l_text:='<attribute_category>';
282 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute_category);
283 l_text:=l_text||'</attribute_category>';
284 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
285 l_text:='<attribute1>';
286 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute1);
287 l_text:=l_text||'</attribute1>';
288 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
289 l_text:='<attribute2>';
290 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute2);
291 l_text:=l_text||'</attribute2>';
292 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
293 l_text:='<attribute3>';
294 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute3);
295 l_text:=l_text||'</attribute3>';
296 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
297 l_text:='<attribute4>';
298 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute4);
299 l_text:=l_text||'</attribute4>';
300 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
301 l_text:='<attribute5>';
302 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute5);
303 l_text:=l_text||'</attribute5>';
304 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
305 l_text:='<attribute6>';
306 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute6);
307 l_text:=l_text||'</attribute6>';
308 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
309 l_text:='<attribute7>';
310 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute7);
311 l_text:=l_text||'</attribute7>';
312 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
313 l_text:='<attribute8>';
314 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute8);
315 l_text:=l_text||'</attribute8>';
316 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
317 l_text:='<attribute9>';
318 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute9);
322 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute10);
319 l_text:=l_text||'</attribute9>';
320 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
321 l_text:='<attribute10>';
323 l_text:=l_text||'</attribute10>';
324 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
325 l_text:='<attribute11>';
326 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute11);
327 l_text:=l_text||'</attribute11>';
328 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
329 l_text:='<attribute12>';
330 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute12);
331 l_text:=l_text||'</attribute12>';
332 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
333 l_text:='<attribute13>';
334 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute13);
335 l_text:=l_text||'</attribute13>';
336 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
337 l_text:='<attribute14>';
338 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute14);
339 l_text:=l_text||'</attribute14>';
340 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
341 l_text:='<attribute15>';
342 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute15);
343 l_text:=l_text||'</attribute15>';
344 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
345 l_text:='<attribute16>';
346 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute16);
347 l_text:=l_text||'</attribute16>';
348 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
349 l_text:='<attribute17>';
350 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute17);
351 l_text:=l_text||'</attribute17>';
352 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
353 l_text:='<attribute18>';
354 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute18);
355 l_text:=l_text||'</attribute18>';
356 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
357 l_text:='<attribute19>';
358 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute19);
359 l_text:=l_text||'</attribute19>';
360 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
361 l_text:='<attribute20>';
362 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute20);
363 l_text:=l_text||'</attribute20>';
364 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
365 l_text:='<global_attribute_category>';
366 l_text:=l_text||irc_utilities_pkg.removeTags(p_global_attribute_category);
367 l_text:=l_text||'</global_attribute_category>';
368 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
369 l_text:='<global_attribute1>';
370 l_text:=l_text||irc_utilities_pkg.removeTags(p_global_attribute1);
371 l_text:=l_text||'</global_attribute1>';
372 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
373 l_text:='<global_attribute2>';
374 l_text:=l_text||irc_utilities_pkg.removeTags(p_global_attribute2);
375 l_text:=l_text||'</global_attribute2>';
376 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
377 l_text:='<global_attribute3>';
378 l_text:=l_text||irc_utilities_pkg.removeTags(p_global_attribute3);
379 l_text:=l_text||'</global_attribute3>';
380 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
381 l_text:='<global_attribute4>';
382 l_text:=l_text||irc_utilities_pkg.removeTags(p_global_attribute4);
383 l_text:=l_text||'</global_attribute4>';
384 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
385 l_text:='<global_attribute5>';
386 l_text:=l_text||irc_utilities_pkg.removeTags(p_global_attribute5);
387 l_text:=l_text||'</global_attribute5>';
388 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
389 l_text:='<global_attribute6>';
390 l_text:=l_text||irc_utilities_pkg.removeTags(p_global_attribute6);
391 l_text:=l_text||'</global_attribute6>';
392 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
393 l_text:='<global_attribute7>';
394 l_text:=l_text||irc_utilities_pkg.removeTags(p_global_attribute7);
395 l_text:=l_text||'</global_attribute7>';
396 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
397 l_text:='<global_attribute8>';
398 l_text:=l_text||irc_utilities_pkg.removeTags(p_global_attribute8);
399 l_text:=l_text||'</global_attribute8>';
400 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
401 l_text:='<global_attribute9>';
402 l_text:=l_text||irc_utilities_pkg.removeTags(p_global_attribute9);
403 l_text:=l_text||'</global_attribute9>';
404 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
405 l_text:='<global_attribute10>';
406 l_text:=l_text||irc_utilities_pkg.removeTags(p_global_attribute10);
407 l_text:=l_text||'</global_attribute10>';
408 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
409 l_text:='<global_attribute11>';
410 l_text:=l_text||irc_utilities_pkg.removeTags(p_global_attribute11);
411 l_text:=l_text||'</global_attribute11>';
412 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
413 l_text:='<global_attribute12>';
414 l_text:=l_text||irc_utilities_pkg.removeTags(p_global_attribute12);
415 l_text:=l_text||'</global_attribute12>';
416 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
417 l_text:='<global_attribute13>';
418 l_text:=l_text||irc_utilities_pkg.removeTags(p_global_attribute13);
419 l_text:=l_text||'</global_attribute13>';
420 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
421 l_text:='<global_attribute14>';
422 l_text:=l_text||irc_utilities_pkg.removeTags(p_global_attribute14);
423 l_text:=l_text||'</global_attribute14>';
424 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
425 l_text:='<global_attribute15>';
426 l_text:=l_text||irc_utilities_pkg.removeTags(p_global_attribute15);
427 l_text:=l_text||'</global_attribute15>';
431 l_text:=l_text||'</global_attribute16>';
428 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
429 l_text:='<global_attribute16>';
430 l_text:=l_text||irc_utilities_pkg.removeTags(p_global_attribute16);
432 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
433 l_text:='<global_attribute17>';
434 l_text:=l_text||irc_utilities_pkg.removeTags(p_global_attribute17);
435 l_text:=l_text||'</global_attribute17>';
436 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
437 l_text:='<global_attribute18>';
438 l_text:=l_text||irc_utilities_pkg.removeTags(p_global_attribute18);
439 l_text:=l_text||'</global_attribute18>';
440 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
441 l_text:='<global_attribute19>';
442 l_text:=l_text||irc_utilities_pkg.removeTags(p_global_attribute19);
443 l_text:=l_text||'</global_attribute19>';
444 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
445 l_text:='<global_attribute20>';
446 l_text:=l_text||irc_utilities_pkg.removeTags(p_global_attribute20);
447 l_text:=l_text||'</global_attribute20>';
448 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
449 l_text:='<object_version_number>';
450 l_text:=l_text||fnd_number.number_to_canonical(p_object_version_number);
451 l_text:=l_text||'</object_version_number>';
452 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
453 l_text:='</location>';
454 --
455 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
456 --
457 -- raise the event with the event data
458 wf_event.raise(p_event_name=>l_event_name
459 ,p_event_key=>l_event_key
460 ,p_event_data=>l_event_data);
461 elsif (l_message='KEY') then
462 hr_utility.set_location(l_proc,30);
463 -- get a key for the event
464 open get_seq;
465 fetch get_seq into l_event_key;
466 close get_seq;
467 -- this is a key event, so just raise the event
468 -- without the event data
469 wf_event.raise(p_event_name=>l_event_name
470 ,p_event_key=>l_event_key);
471 elsif (l_message='NONE') then
472 hr_utility.set_location(l_proc,40);
473 -- no event is required, so do nothing
474 null;
475 end if;
476 hr_utility.set_location('Leaving: '||l_proc,50);
477 end update_location_a;
478 end hr_location_be2;