[Home] [Help]
PACKAGE BODY: APPS.HR_JOB_BE1
Source
1 package body hr_job_be1 as
2 --Code generated on 30/03/2009 04:46:26
3 /* $Header: hrapiwfe.pkb 120.4.12010000.2 2008/09/29 12:54:07 srgnanas ship $*/
4 procedure create_job_a (
5 p_business_group_id number,
6 p_date_from date,
7 p_comments varchar2,
8 p_date_to date,
9 p_approval_authority number,
10 p_benchmark_job_flag varchar2,
11 p_benchmark_job_id number,
12 p_emp_rights_flag varchar2,
13 p_job_group_id number,
14 p_attribute_category varchar2,
15 p_attribute1 varchar2,
16 p_attribute2 varchar2,
17 p_attribute3 varchar2,
18 p_attribute4 varchar2,
19 p_attribute5 varchar2,
20 p_attribute6 varchar2,
21 p_attribute7 varchar2,
22 p_attribute8 varchar2,
23 p_attribute9 varchar2,
24 p_attribute10 varchar2,
25 p_attribute11 varchar2,
26 p_attribute12 varchar2,
27 p_attribute13 varchar2,
28 p_attribute14 varchar2,
29 p_attribute15 varchar2,
30 p_attribute16 varchar2,
31 p_attribute17 varchar2,
32 p_attribute18 varchar2,
33 p_attribute19 varchar2,
34 p_attribute20 varchar2,
35 p_job_information_category varchar2,
36 p_job_information1 varchar2,
37 p_job_information2 varchar2,
38 p_job_information3 varchar2,
39 p_job_information4 varchar2,
40 p_job_information5 varchar2,
41 p_job_information6 varchar2,
42 p_job_information7 varchar2,
43 p_job_information8 varchar2,
44 p_job_information9 varchar2,
45 p_job_information10 varchar2,
46 p_job_information11 varchar2,
47 p_job_information12 varchar2,
48 p_job_information13 varchar2,
49 p_job_information14 varchar2,
50 p_job_information15 varchar2,
51 p_job_information16 varchar2,
52 p_job_information17 varchar2,
53 p_job_information18 varchar2,
54 p_job_information19 varchar2,
55 p_job_information20 varchar2,
56 p_segment1 varchar2,
57 p_segment2 varchar2,
58 p_segment3 varchar2,
59 p_segment4 varchar2,
60 p_segment5 varchar2,
61 p_segment6 varchar2,
62 p_segment7 varchar2,
63 p_segment8 varchar2,
64 p_segment9 varchar2,
65 p_segment10 varchar2,
66 p_segment11 varchar2,
67 p_segment12 varchar2,
68 p_segment13 varchar2,
69 p_segment14 varchar2,
70 p_segment15 varchar2,
71 p_segment16 varchar2,
72 p_segment17 varchar2,
73 p_segment18 varchar2,
74 p_segment19 varchar2,
75 p_segment20 varchar2,
76 p_segment21 varchar2,
77 p_segment22 varchar2,
78 p_segment23 varchar2,
79 p_segment24 varchar2,
80 p_segment25 varchar2,
81 p_segment26 varchar2,
82 p_segment27 varchar2,
83 p_segment28 varchar2,
84 p_segment29 varchar2,
85 p_segment30 varchar2,
86 p_concat_segments varchar2,
87 p_job_id number,
88 p_object_version_number number,
89 p_job_definition_id number,
90 p_name varchar2) is
91 l_event_key number;
92 l_event_data clob;
93 l_event_name varchar2(250);
94 l_text varchar2(2000);
95 l_message varchar2(10);
96 --
97 cursor get_seq is
98 select per_wf_events_s.nextval from dual;
99 --
100 l_proc varchar2(72):=' hr_job_be1.create_job_a';
101 begin
102 hr_utility.set_location('Entering: '||l_proc,10);
103 -- check the status of the business event
104 l_event_name:='oracle.apps.per.api.job.create_job';
105 l_message:=wf_event.test(l_event_name);
106 --
107 if (l_message='MESSAGE') then
108 hr_utility.set_location(l_proc,20);
109 --
110 -- get a key for the event
111 --
112 open get_seq;
113 fetch get_seq into l_event_key;
114 close get_seq;
115 --
116 -- build the xml data for the event
117 --
118 dbms_lob.createTemporary(l_event_data,false,dbms_lob.call);
119 l_text:='<?xml version =''1.0'' encoding =''ASCII''?>';
120 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
121 l_text:='<job>';
122 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
123 --
124 l_text:='<business_group_id>';
125 l_text:=l_text||fnd_number.number_to_canonical(p_business_group_id);
126 l_text:=l_text||'</business_group_id>';
127 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
128 l_text:='<date_from>';
129 l_text:=l_text||fnd_date.date_to_canonical(p_date_from);
130 l_text:=l_text||'</date_from>';
131 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
132 l_text:='<comments>';
133 l_text:=l_text||irc_utilities_pkg.removeTags(p_comments);
134 l_text:=l_text||'</comments>';
135 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
136 l_text:='<date_to>';
137 l_text:=l_text||fnd_date.date_to_canonical(p_date_to);
138 l_text:=l_text||'</date_to>';
139 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
140 l_text:='<approval_authority>';
141 l_text:=l_text||fnd_number.number_to_canonical(p_approval_authority);
142 l_text:=l_text||'</approval_authority>';
143 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
144 l_text:='<benchmark_job_flag>';
145 l_text:=l_text||irc_utilities_pkg.removeTags(p_benchmark_job_flag);
146 l_text:=l_text||'</benchmark_job_flag>';
147 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
148 l_text:='<benchmark_job_id>';
149 l_text:=l_text||fnd_number.number_to_canonical(p_benchmark_job_id);
150 l_text:=l_text||'</benchmark_job_id>';
151 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
152 l_text:='<emp_rights_flag>';
153 l_text:=l_text||irc_utilities_pkg.removeTags(p_emp_rights_flag);
154 l_text:=l_text||'</emp_rights_flag>';
155 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
156 l_text:='<job_group_id>';
157 l_text:=l_text||fnd_number.number_to_canonical(p_job_group_id);
158 l_text:=l_text||'</job_group_id>';
159 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
160 l_text:='<attribute_category>';
161 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute_category);
162 l_text:=l_text||'</attribute_category>';
163 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
164 l_text:='<attribute1>';
165 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute1);
166 l_text:=l_text||'</attribute1>';
167 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
168 l_text:='<attribute2>';
169 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute2);
170 l_text:=l_text||'</attribute2>';
171 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
172 l_text:='<attribute3>';
173 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute3);
174 l_text:=l_text||'</attribute3>';
175 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
176 l_text:='<attribute4>';
177 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute4);
178 l_text:=l_text||'</attribute4>';
179 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
180 l_text:='<attribute5>';
181 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute5);
182 l_text:=l_text||'</attribute5>';
183 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
184 l_text:='<attribute6>';
185 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute6);
186 l_text:=l_text||'</attribute6>';
187 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
188 l_text:='<attribute7>';
189 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute7);
190 l_text:=l_text||'</attribute7>';
191 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
192 l_text:='<attribute8>';
193 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute8);
194 l_text:=l_text||'</attribute8>';
195 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
196 l_text:='<attribute9>';
197 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute9);
198 l_text:=l_text||'</attribute9>';
199 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
200 l_text:='<attribute10>';
201 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute10);
202 l_text:=l_text||'</attribute10>';
203 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
204 l_text:='<attribute11>';
205 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute11);
206 l_text:=l_text||'</attribute11>';
207 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
208 l_text:='<attribute12>';
209 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute12);
210 l_text:=l_text||'</attribute12>';
211 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
212 l_text:='<attribute13>';
213 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute13);
214 l_text:=l_text||'</attribute13>';
215 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
216 l_text:='<attribute14>';
217 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute14);
218 l_text:=l_text||'</attribute14>';
219 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
220 l_text:='<attribute15>';
221 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute15);
222 l_text:=l_text||'</attribute15>';
223 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
224 l_text:='<attribute16>';
225 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute16);
226 l_text:=l_text||'</attribute16>';
227 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
228 l_text:='<attribute17>';
229 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute17);
230 l_text:=l_text||'</attribute17>';
231 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
232 l_text:='<attribute18>';
233 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute18);
234 l_text:=l_text||'</attribute18>';
235 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
236 l_text:='<attribute19>';
237 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute19);
238 l_text:=l_text||'</attribute19>';
239 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
240 l_text:='<attribute20>';
241 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute20);
242 l_text:=l_text||'</attribute20>';
243 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
244 l_text:='<job_information_category>';
245 l_text:=l_text||irc_utilities_pkg.removeTags(p_job_information_category);
246 l_text:=l_text||'</job_information_category>';
247 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
248 l_text:='<job_information1>';
249 l_text:=l_text||irc_utilities_pkg.removeTags(p_job_information1);
250 l_text:=l_text||'</job_information1>';
251 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
252 l_text:='<job_information2>';
253 l_text:=l_text||irc_utilities_pkg.removeTags(p_job_information2);
254 l_text:=l_text||'</job_information2>';
255 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
256 l_text:='<job_information3>';
257 l_text:=l_text||irc_utilities_pkg.removeTags(p_job_information3);
258 l_text:=l_text||'</job_information3>';
259 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
260 l_text:='<job_information4>';
261 l_text:=l_text||irc_utilities_pkg.removeTags(p_job_information4);
262 l_text:=l_text||'</job_information4>';
263 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
264 l_text:='<job_information5>';
265 l_text:=l_text||irc_utilities_pkg.removeTags(p_job_information5);
266 l_text:=l_text||'</job_information5>';
267 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
268 l_text:='<job_information6>';
269 l_text:=l_text||irc_utilities_pkg.removeTags(p_job_information6);
270 l_text:=l_text||'</job_information6>';
271 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
272 l_text:='<job_information7>';
273 l_text:=l_text||irc_utilities_pkg.removeTags(p_job_information7);
274 l_text:=l_text||'</job_information7>';
275 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
276 l_text:='<job_information8>';
277 l_text:=l_text||irc_utilities_pkg.removeTags(p_job_information8);
278 l_text:=l_text||'</job_information8>';
279 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
280 l_text:='<job_information9>';
281 l_text:=l_text||irc_utilities_pkg.removeTags(p_job_information9);
282 l_text:=l_text||'</job_information9>';
283 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
284 l_text:='<job_information10>';
285 l_text:=l_text||irc_utilities_pkg.removeTags(p_job_information10);
286 l_text:=l_text||'</job_information10>';
287 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
288 l_text:='<job_information11>';
289 l_text:=l_text||irc_utilities_pkg.removeTags(p_job_information11);
290 l_text:=l_text||'</job_information11>';
291 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
292 l_text:='<job_information12>';
293 l_text:=l_text||irc_utilities_pkg.removeTags(p_job_information12);
294 l_text:=l_text||'</job_information12>';
295 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
296 l_text:='<job_information13>';
297 l_text:=l_text||irc_utilities_pkg.removeTags(p_job_information13);
298 l_text:=l_text||'</job_information13>';
299 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
300 l_text:='<job_information14>';
304 l_text:='<job_information15>';
301 l_text:=l_text||irc_utilities_pkg.removeTags(p_job_information14);
302 l_text:=l_text||'</job_information14>';
303 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
305 l_text:=l_text||irc_utilities_pkg.removeTags(p_job_information15);
306 l_text:=l_text||'</job_information15>';
307 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
308 l_text:='<job_information16>';
309 l_text:=l_text||irc_utilities_pkg.removeTags(p_job_information16);
310 l_text:=l_text||'</job_information16>';
311 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
312 l_text:='<job_information17>';
313 l_text:=l_text||irc_utilities_pkg.removeTags(p_job_information17);
314 l_text:=l_text||'</job_information17>';
315 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
316 l_text:='<job_information18>';
317 l_text:=l_text||irc_utilities_pkg.removeTags(p_job_information18);
318 l_text:=l_text||'</job_information18>';
319 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
320 l_text:='<job_information19>';
321 l_text:=l_text||irc_utilities_pkg.removeTags(p_job_information19);
322 l_text:=l_text||'</job_information19>';
323 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
324 l_text:='<job_information20>';
325 l_text:=l_text||irc_utilities_pkg.removeTags(p_job_information20);
326 l_text:=l_text||'</job_information20>';
327 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
328 l_text:='<segment1>';
329 l_text:=l_text||irc_utilities_pkg.removeTags(p_segment1);
330 l_text:=l_text||'</segment1>';
331 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
332 l_text:='<segment2>';
333 l_text:=l_text||irc_utilities_pkg.removeTags(p_segment2);
334 l_text:=l_text||'</segment2>';
335 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
336 l_text:='<segment3>';
337 l_text:=l_text||irc_utilities_pkg.removeTags(p_segment3);
338 l_text:=l_text||'</segment3>';
339 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
340 l_text:='<segment4>';
341 l_text:=l_text||irc_utilities_pkg.removeTags(p_segment4);
342 l_text:=l_text||'</segment4>';
343 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
344 l_text:='<segment5>';
345 l_text:=l_text||irc_utilities_pkg.removeTags(p_segment5);
346 l_text:=l_text||'</segment5>';
347 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
348 l_text:='<segment6>';
349 l_text:=l_text||irc_utilities_pkg.removeTags(p_segment6);
350 l_text:=l_text||'</segment6>';
351 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
352 l_text:='<segment7>';
353 l_text:=l_text||irc_utilities_pkg.removeTags(p_segment7);
354 l_text:=l_text||'</segment7>';
355 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
356 l_text:='<segment8>';
357 l_text:=l_text||irc_utilities_pkg.removeTags(p_segment8);
358 l_text:=l_text||'</segment8>';
359 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
360 l_text:='<segment9>';
361 l_text:=l_text||irc_utilities_pkg.removeTags(p_segment9);
362 l_text:=l_text||'</segment9>';
363 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
364 l_text:='<segment10>';
365 l_text:=l_text||irc_utilities_pkg.removeTags(p_segment10);
366 l_text:=l_text||'</segment10>';
367 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
368 l_text:='<segment11>';
369 l_text:=l_text||irc_utilities_pkg.removeTags(p_segment11);
370 l_text:=l_text||'</segment11>';
371 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
372 l_text:='<segment12>';
373 l_text:=l_text||irc_utilities_pkg.removeTags(p_segment12);
374 l_text:=l_text||'</segment12>';
375 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
376 l_text:='<segment13>';
377 l_text:=l_text||irc_utilities_pkg.removeTags(p_segment13);
378 l_text:=l_text||'</segment13>';
379 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
380 l_text:='<segment14>';
381 l_text:=l_text||irc_utilities_pkg.removeTags(p_segment14);
382 l_text:=l_text||'</segment14>';
383 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
384 l_text:='<segment15>';
385 l_text:=l_text||irc_utilities_pkg.removeTags(p_segment15);
386 l_text:=l_text||'</segment15>';
387 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
388 l_text:='<segment16>';
389 l_text:=l_text||irc_utilities_pkg.removeTags(p_segment16);
390 l_text:=l_text||'</segment16>';
391 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
392 l_text:='<segment17>';
393 l_text:=l_text||irc_utilities_pkg.removeTags(p_segment17);
394 l_text:=l_text||'</segment17>';
395 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
396 l_text:='<segment18>';
397 l_text:=l_text||irc_utilities_pkg.removeTags(p_segment18);
398 l_text:=l_text||'</segment18>';
399 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
400 l_text:='<segment19>';
401 l_text:=l_text||irc_utilities_pkg.removeTags(p_segment19);
402 l_text:=l_text||'</segment19>';
403 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
404 l_text:='<segment20>';
405 l_text:=l_text||irc_utilities_pkg.removeTags(p_segment20);
406 l_text:=l_text||'</segment20>';
407 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
408 l_text:='<segment21>';
409 l_text:=l_text||irc_utilities_pkg.removeTags(p_segment21);
410 l_text:=l_text||'</segment21>';
411 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
412 l_text:='<segment22>';
413 l_text:=l_text||irc_utilities_pkg.removeTags(p_segment22);
414 l_text:=l_text||'</segment22>';
415 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
416 l_text:='<segment23>';
417 l_text:=l_text||irc_utilities_pkg.removeTags(p_segment23);
418 l_text:=l_text||'</segment23>';
419 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
420 l_text:='<segment24>';
421 l_text:=l_text||irc_utilities_pkg.removeTags(p_segment24);
422 l_text:=l_text||'</segment24>';
423 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
424 l_text:='<segment25>';
425 l_text:=l_text||irc_utilities_pkg.removeTags(p_segment25);
426 l_text:=l_text||'</segment25>';
427 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
428 l_text:='<segment26>';
429 l_text:=l_text||irc_utilities_pkg.removeTags(p_segment26);
430 l_text:=l_text||'</segment26>';
431 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
432 l_text:='<segment27>';
433 l_text:=l_text||irc_utilities_pkg.removeTags(p_segment27);
434 l_text:=l_text||'</segment27>';
435 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
436 l_text:='<segment28>';
437 l_text:=l_text||irc_utilities_pkg.removeTags(p_segment28);
438 l_text:=l_text||'</segment28>';
439 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
440 l_text:='<segment29>';
441 l_text:=l_text||irc_utilities_pkg.removeTags(p_segment29);
442 l_text:=l_text||'</segment29>';
443 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
444 l_text:='<segment30>';
445 l_text:=l_text||irc_utilities_pkg.removeTags(p_segment30);
446 l_text:=l_text||'</segment30>';
447 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
448 l_text:='<concat_segments>';
449 l_text:=l_text||irc_utilities_pkg.removeTags(p_concat_segments);
450 l_text:=l_text||'</concat_segments>';
451 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
452 l_text:='<job_id>';
453 l_text:=l_text||fnd_number.number_to_canonical(p_job_id);
454 l_text:=l_text||'</job_id>';
455 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
456 l_text:='<object_version_number>';
457 l_text:=l_text||fnd_number.number_to_canonical(p_object_version_number);
458 l_text:=l_text||'</object_version_number>';
459 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
460 l_text:='<job_definition_id>';
461 l_text:=l_text||fnd_number.number_to_canonical(p_job_definition_id);
462 l_text:=l_text||'</job_definition_id>';
463 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
464 l_text:='<name>';
465 l_text:=l_text||irc_utilities_pkg.removeTags(p_name);
466 l_text:=l_text||'</name>';
467 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
468 l_text:='</job>';
469 --
470 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
471 --
472 -- raise the event with the event data
473 wf_event.raise(p_event_name=>l_event_name
474 ,p_event_key=>l_event_key
475 ,p_event_data=>l_event_data);
476 elsif (l_message='KEY') then
477 hr_utility.set_location(l_proc,30);
478 -- get a key for the event
479 open get_seq;
480 fetch get_seq into l_event_key;
481 close get_seq;
482 -- this is a key event, so just raise the event
483 -- without the event data
484 wf_event.raise(p_event_name=>l_event_name
485 ,p_event_key=>l_event_key);
486 elsif (l_message='NONE') then
487 hr_utility.set_location(l_proc,40);
488 -- no event is required, so do nothing
489 null;
490 end if;
491 hr_utility.set_location('Leaving: '||l_proc,50);
492 end create_job_a;
493 end hr_job_be1;