DBA Data[Home] [Help]
Skip to content

PACKAGE BODY: APPS.OTA_DELEGATE_BOOKING_BE1

Source


1 package body ota_delegate_booking_be1 as 
2 --Code generated on 27/11/2012 03:55:01
3 /* $Header: hrapiwfe.pkb 120.11 2011/12/24 13:28:35 vboggava ship $*/
4 procedure create_delegate_booking_a (
5 p_effective_date               date,
6 p_booking_status_type_id       number,
7 p_delegate_person_id           number,
8 p_contact_id                   number,
9 p_business_group_id            number,
10 p_event_id                     number,
11 p_customer_id                  number,
12 p_authorizer_person_id         number,
13 p_date_booking_placed          date,
14 p_corespondent                 varchar2,
15 p_internal_booking_flag        varchar2,
16 p_number_of_places             number,
17 p_administrator                number,
18 p_booking_priority             varchar2,
19 p_comments                     varchar2,
20 p_contact_address_id           number,
21 p_delegate_contact_phone       varchar2,
22 p_delegate_contact_fax         varchar2,
23 p_third_party_customer_id      number,
24 p_third_party_contact_id       number,
25 p_third_party_address_id       number,
26 p_third_party_contact_phone    varchar2,
27 p_third_party_contact_fax      varchar2,
28 p_date_status_changed          date,
29 p_failure_reason               varchar2,
30 p_attendance_result            varchar2,
31 p_language_id                  number,
32 p_source_of_booking            varchar2,
33 p_special_booking_instructions varchar2,
34 p_successful_attendance_flag   varchar2,
35 p_tdb_information_category     varchar2,
36 p_tdb_information1             varchar2,
37 p_tdb_information2             varchar2,
38 p_tdb_information3             varchar2,
39 p_tdb_information4             varchar2,
40 p_tdb_information5             varchar2,
41 p_tdb_information6             varchar2,
42 p_tdb_information7             varchar2,
43 p_tdb_information8             varchar2,
44 p_tdb_information9             varchar2,
45 p_tdb_information10            varchar2,
46 p_tdb_information11            varchar2,
47 p_tdb_information12            varchar2,
48 p_tdb_information13            varchar2,
49 p_tdb_information14            varchar2,
50 p_tdb_information15            varchar2,
51 p_tdb_information16            varchar2,
52 p_tdb_information17            varchar2,
53 p_tdb_information18            varchar2,
54 p_tdb_information19            varchar2,
55 p_tdb_information20            varchar2,
56 p_create_finance_line          varchar2,
57 p_finance_header_id            number,
58 p_currency_code                varchar2,
59 p_standard_amount              number,
60 p_unitary_amount               number,
61 p_money_amount                 number,
62 p_booking_deal_id              number,
63 p_booking_deal_type            varchar2,
64 p_finance_line_id              number,
65 p_enrollment_type              varchar2,
66 p_organization_id              number,
67 p_sponsor_person_id            number,
68 p_sponsor_assignment_id        number,
69 p_person_address_id            number,
70 p_delegate_assignment_id       number,
71 p_delegate_contact_id          number,
72 p_delegate_contact_email       varchar2,
73 p_third_party_email            varchar2,
74 p_person_address_type          varchar2,
75 p_line_id                      number,
76 p_org_id                       number,
77 p_daemon_flag                  varchar2,
78 p_daemon_type                  varchar2,
79 p_old_event_id                 number,
80 p_quote_line_id                number,
81 p_interface_source             varchar2,
82 p_total_training_time          varchar2,
83 p_content_player_status        varchar2,
84 p_score                        number,
85 p_completed_content            number,
86 p_total_content                number,
87 p_booking_justification_id     number,
88 p_is_history_flag              varchar2,
89 p_is_mandatory_enrollment      varchar2,
90 p_booking_id                   number) 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):='  ota_delegate_booking_be1.create_delegate_booking_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.ota.api.delegate_booking.create_delegate_booking';
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:='<delegate_booking>';
122     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
123     --
124     l_text:='<effective_date>';
125     l_text:=l_text||fnd_date.date_to_canonical(p_effective_date);
126     l_text:=l_text||'</effective_date>';
127     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
128     l_text:='<booking_status_type_id>';
129     l_text:=l_text||fnd_number.number_to_canonical(p_booking_status_type_id);
130     l_text:=l_text||'</booking_status_type_id>';
131     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
132     l_text:='<delegate_person_id>';
133     l_text:=l_text||fnd_number.number_to_canonical(p_delegate_person_id);
134     l_text:=l_text||'</delegate_person_id>';
135     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
136     l_text:='<contact_id>';
137     l_text:=l_text||fnd_number.number_to_canonical(p_contact_id);
138     l_text:=l_text||'</contact_id>';
139     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
140     l_text:='<business_group_id>';
141     l_text:=l_text||fnd_number.number_to_canonical(p_business_group_id);
142     l_text:=l_text||'</business_group_id>';
143     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
144     l_text:='<event_id>';
145     l_text:=l_text||fnd_number.number_to_canonical(p_event_id);
146     l_text:=l_text||'</event_id>';
147     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
148     l_text:='<customer_id>';
149     l_text:=l_text||fnd_number.number_to_canonical(p_customer_id);
150     l_text:=l_text||'</customer_id>';
151     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
152     l_text:='<authorizer_person_id>';
153     l_text:=l_text||fnd_number.number_to_canonical(p_authorizer_person_id);
154     l_text:=l_text||'</authorizer_person_id>';
155     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
156     l_text:='<date_booking_placed>';
157     l_text:=l_text||fnd_date.date_to_canonical(p_date_booking_placed);
158     l_text:=l_text||'</date_booking_placed>';
159     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
160     l_text:='<corespondent>';
161     l_text:=l_text||irc_utilities_pkg.removeTags(p_corespondent);
162     l_text:=l_text||'</corespondent>';
163     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
164     l_text:='<internal_booking_flag>';
165     l_text:=l_text||irc_utilities_pkg.removeTags(p_internal_booking_flag);
166     l_text:=l_text||'</internal_booking_flag>';
167     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
168     l_text:='<number_of_places>';
169     l_text:=l_text||fnd_number.number_to_canonical(p_number_of_places);
170     l_text:=l_text||'</number_of_places>';
171     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
172     l_text:='<administrator>';
173     l_text:=l_text||fnd_number.number_to_canonical(p_administrator);
174     l_text:=l_text||'</administrator>';
175     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
176     l_text:='<booking_priority>';
177     l_text:=l_text||irc_utilities_pkg.removeTags(p_booking_priority);
178     l_text:=l_text||'</booking_priority>';
179     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
180     l_text:='<comments>';
181     l_text:=l_text||irc_utilities_pkg.removeTags(p_comments);
182     l_text:=l_text||'</comments>';
183     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
184     l_text:='<contact_address_id>';
185     l_text:=l_text||fnd_number.number_to_canonical(p_contact_address_id);
186     l_text:=l_text||'</contact_address_id>';
187     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
188     l_text:='<delegate_contact_phone>';
189     l_text:=l_text||irc_utilities_pkg.removeTags(p_delegate_contact_phone);
190     l_text:=l_text||'</delegate_contact_phone>';
191     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
192     l_text:='<delegate_contact_fax>';
193     l_text:=l_text||irc_utilities_pkg.removeTags(p_delegate_contact_fax);
194     l_text:=l_text||'</delegate_contact_fax>';
195     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
196     l_text:='<third_party_customer_id>';
197     l_text:=l_text||fnd_number.number_to_canonical(p_third_party_customer_id);
198     l_text:=l_text||'</third_party_customer_id>';
199     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
200     l_text:='<third_party_contact_id>';
201     l_text:=l_text||fnd_number.number_to_canonical(p_third_party_contact_id);
202     l_text:=l_text||'</third_party_contact_id>';
203     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
204     l_text:='<third_party_address_id>';
205     l_text:=l_text||fnd_number.number_to_canonical(p_third_party_address_id);
206     l_text:=l_text||'</third_party_address_id>';
207     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
208     l_text:='<third_party_contact_phone>';
209     l_text:=l_text||irc_utilities_pkg.removeTags(p_third_party_contact_phone);
210     l_text:=l_text||'</third_party_contact_phone>';
211     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
212     l_text:='<third_party_contact_fax>';
213     l_text:=l_text||irc_utilities_pkg.removeTags(p_third_party_contact_fax);
214     l_text:=l_text||'</third_party_contact_fax>';
215     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
216     l_text:='<date_status_changed>';
217     l_text:=l_text||fnd_date.date_to_canonical(p_date_status_changed);
218     l_text:=l_text||'</date_status_changed>';
219     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
220     l_text:='<failure_reason>';
221     l_text:=l_text||irc_utilities_pkg.removeTags(p_failure_reason);
222     l_text:=l_text||'</failure_reason>';
223     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
224     l_text:='<attendance_result>';
225     l_text:=l_text||irc_utilities_pkg.removeTags(p_attendance_result);
226     l_text:=l_text||'</attendance_result>';
227     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
228     l_text:='<language_id>';
229     l_text:=l_text||fnd_number.number_to_canonical(p_language_id);
230     l_text:=l_text||'</language_id>';
231     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
232     l_text:='<source_of_booking>';
233     l_text:=l_text||irc_utilities_pkg.removeTags(p_source_of_booking);
234     l_text:=l_text||'</source_of_booking>';
235     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
236     l_text:='<special_booking_instructions>';
237     l_text:=l_text||irc_utilities_pkg.removeTags(p_special_booking_instructions);
238     l_text:=l_text||'</special_booking_instructions>';
239     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
240     l_text:='<successful_attendance_flag>';
241     l_text:=l_text||irc_utilities_pkg.removeTags(p_successful_attendance_flag);
242     l_text:=l_text||'</successful_attendance_flag>';
243     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
244     l_text:='<tdb_information_category>';
245     l_text:=l_text||irc_utilities_pkg.removeTags(p_tdb_information_category);
246     l_text:=l_text||'</tdb_information_category>';
247     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
248     l_text:='<tdb_information1>';
249     l_text:=l_text||irc_utilities_pkg.removeTags(p_tdb_information1);
250     l_text:=l_text||'</tdb_information1>';
251     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
252     l_text:='<tdb_information2>';
253     l_text:=l_text||irc_utilities_pkg.removeTags(p_tdb_information2);
254     l_text:=l_text||'</tdb_information2>';
255     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
256     l_text:='<tdb_information3>';
257     l_text:=l_text||irc_utilities_pkg.removeTags(p_tdb_information3);
258     l_text:=l_text||'</tdb_information3>';
259     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
260     l_text:='<tdb_information4>';
261     l_text:=l_text||irc_utilities_pkg.removeTags(p_tdb_information4);
262     l_text:=l_text||'</tdb_information4>';
263     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
264     l_text:='<tdb_information5>';
265     l_text:=l_text||irc_utilities_pkg.removeTags(p_tdb_information5);
266     l_text:=l_text||'</tdb_information5>';
267     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
268     l_text:='<tdb_information6>';
269     l_text:=l_text||irc_utilities_pkg.removeTags(p_tdb_information6);
270     l_text:=l_text||'</tdb_information6>';
271     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
272     l_text:='<tdb_information7>';
273     l_text:=l_text||irc_utilities_pkg.removeTags(p_tdb_information7);
274     l_text:=l_text||'</tdb_information7>';
275     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
276     l_text:='<tdb_information8>';
277     l_text:=l_text||irc_utilities_pkg.removeTags(p_tdb_information8);
278     l_text:=l_text||'</tdb_information8>';
279     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
280     l_text:='<tdb_information9>';
281     l_text:=l_text||irc_utilities_pkg.removeTags(p_tdb_information9);
282     l_text:=l_text||'</tdb_information9>';
283     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
284     l_text:='<tdb_information10>';
285     l_text:=l_text||irc_utilities_pkg.removeTags(p_tdb_information10);
286     l_text:=l_text||'</tdb_information10>';
287     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
288     l_text:='<tdb_information11>';
289     l_text:=l_text||irc_utilities_pkg.removeTags(p_tdb_information11);
290     l_text:=l_text||'</tdb_information11>';
291     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
292     l_text:='<tdb_information12>';
293     l_text:=l_text||irc_utilities_pkg.removeTags(p_tdb_information12);
294     l_text:=l_text||'</tdb_information12>';
295     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
296     l_text:='<tdb_information13>';
297     l_text:=l_text||irc_utilities_pkg.removeTags(p_tdb_information13);
298     l_text:=l_text||'</tdb_information13>';
299     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
300     l_text:='<tdb_information14>';
301     l_text:=l_text||irc_utilities_pkg.removeTags(p_tdb_information14);
302     l_text:=l_text||'</tdb_information14>';
303     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
304     l_text:='<tdb_information15>';
305     l_text:=l_text||irc_utilities_pkg.removeTags(p_tdb_information15);
306     l_text:=l_text||'</tdb_information15>';
307     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
308     l_text:='<tdb_information16>';
309     l_text:=l_text||irc_utilities_pkg.removeTags(p_tdb_information16);
310     l_text:=l_text||'</tdb_information16>';
311     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
312     l_text:='<tdb_information17>';
313     l_text:=l_text||irc_utilities_pkg.removeTags(p_tdb_information17);
314     l_text:=l_text||'</tdb_information17>';
315     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
316     l_text:='<tdb_information18>';
317     l_text:=l_text||irc_utilities_pkg.removeTags(p_tdb_information18);
318     l_text:=l_text||'</tdb_information18>';
319     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
320     l_text:='<tdb_information19>';
321     l_text:=l_text||irc_utilities_pkg.removeTags(p_tdb_information19);
322     l_text:=l_text||'</tdb_information19>';
323     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
324     l_text:='<tdb_information20>';
325     l_text:=l_text||irc_utilities_pkg.removeTags(p_tdb_information20);
326     l_text:=l_text||'</tdb_information20>';
327     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
328     l_text:='<create_finance_line>';
329     l_text:=l_text||irc_utilities_pkg.removeTags(p_create_finance_line);
330     l_text:=l_text||'</create_finance_line>';
331     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
332     l_text:='<finance_header_id>';
333     l_text:=l_text||fnd_number.number_to_canonical(p_finance_header_id);
334     l_text:=l_text||'</finance_header_id>';
335     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
336     l_text:='<currency_code>';
337     l_text:=l_text||irc_utilities_pkg.removeTags(p_currency_code);
338     l_text:=l_text||'</currency_code>';
339     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
340     l_text:='<standard_amount>';
341     l_text:=l_text||fnd_number.number_to_canonical(p_standard_amount);
342     l_text:=l_text||'</standard_amount>';
343     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
344     l_text:='<unitary_amount>';
345     l_text:=l_text||fnd_number.number_to_canonical(p_unitary_amount);
346     l_text:=l_text||'</unitary_amount>';
347     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
348     l_text:='<money_amount>';
349     l_text:=l_text||fnd_number.number_to_canonical(p_money_amount);
350     l_text:=l_text||'</money_amount>';
351     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
352     l_text:='<booking_deal_id>';
353     l_text:=l_text||fnd_number.number_to_canonical(p_booking_deal_id);
354     l_text:=l_text||'</booking_deal_id>';
355     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
356     l_text:='<booking_deal_type>';
357     l_text:=l_text||irc_utilities_pkg.removeTags(p_booking_deal_type);
358     l_text:=l_text||'</booking_deal_type>';
359     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
360     l_text:='<finance_line_id>';
361     l_text:=l_text||fnd_number.number_to_canonical(p_finance_line_id);
362     l_text:=l_text||'</finance_line_id>';
363     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
364     l_text:='<enrollment_type>';
365     l_text:=l_text||irc_utilities_pkg.removeTags(p_enrollment_type);
366     l_text:=l_text||'</enrollment_type>';
367     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
368     l_text:='<organization_id>';
369     l_text:=l_text||fnd_number.number_to_canonical(p_organization_id);
370     l_text:=l_text||'</organization_id>';
371     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
372     l_text:='<sponsor_person_id>';
373     l_text:=l_text||fnd_number.number_to_canonical(p_sponsor_person_id);
374     l_text:=l_text||'</sponsor_person_id>';
375     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
376     l_text:='<sponsor_assignment_id>';
377     l_text:=l_text||fnd_number.number_to_canonical(p_sponsor_assignment_id);
378     l_text:=l_text||'</sponsor_assignment_id>';
379     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
380     l_text:='<person_address_id>';
381     l_text:=l_text||fnd_number.number_to_canonical(p_person_address_id);
382     l_text:=l_text||'</person_address_id>';
383     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
384     l_text:='<delegate_assignment_id>';
385     l_text:=l_text||fnd_number.number_to_canonical(p_delegate_assignment_id);
386     l_text:=l_text||'</delegate_assignment_id>';
387     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
388     l_text:='<delegate_contact_id>';
389     l_text:=l_text||fnd_number.number_to_canonical(p_delegate_contact_id);
390     l_text:=l_text||'</delegate_contact_id>';
391     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
392     l_text:='<delegate_contact_email>';
393     l_text:=l_text||irc_utilities_pkg.removeTags(p_delegate_contact_email);
394     l_text:=l_text||'</delegate_contact_email>';
395     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
396     l_text:='<third_party_email>';
397     l_text:=l_text||irc_utilities_pkg.removeTags(p_third_party_email);
398     l_text:=l_text||'</third_party_email>';
399     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
400     l_text:='<person_address_type>';
401     l_text:=l_text||irc_utilities_pkg.removeTags(p_person_address_type);
402     l_text:=l_text||'</person_address_type>';
403     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
404     l_text:='<line_id>';
405     l_text:=l_text||fnd_number.number_to_canonical(p_line_id);
406     l_text:=l_text||'</line_id>';
407     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
408     l_text:='<org_id>';
409     l_text:=l_text||fnd_number.number_to_canonical(p_org_id);
410     l_text:=l_text||'</org_id>';
411     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
412     l_text:='<daemon_flag>';
413     l_text:=l_text||irc_utilities_pkg.removeTags(p_daemon_flag);
414     l_text:=l_text||'</daemon_flag>';
415     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
416     l_text:='<daemon_type>';
417     l_text:=l_text||irc_utilities_pkg.removeTags(p_daemon_type);
418     l_text:=l_text||'</daemon_type>';
419     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
420     l_text:='<old_event_id>';
421     l_text:=l_text||fnd_number.number_to_canonical(p_old_event_id);
422     l_text:=l_text||'</old_event_id>';
423     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
424     l_text:='<quote_line_id>';
425     l_text:=l_text||fnd_number.number_to_canonical(p_quote_line_id);
426     l_text:=l_text||'</quote_line_id>';
427     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
428     l_text:='<interface_source>';
429     l_text:=l_text||irc_utilities_pkg.removeTags(p_interface_source);
430     l_text:=l_text||'</interface_source>';
431     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
432     l_text:='<total_training_time>';
433     l_text:=l_text||irc_utilities_pkg.removeTags(p_total_training_time);
434     l_text:=l_text||'</total_training_time>';
435     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
436     l_text:='<content_player_status>';
437     l_text:=l_text||irc_utilities_pkg.removeTags(p_content_player_status);
438     l_text:=l_text||'</content_player_status>';
439     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
440     l_text:='<score>';
441     l_text:=l_text||fnd_number.number_to_canonical(p_score);
442     l_text:=l_text||'</score>';
443     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
444     l_text:='<completed_content>';
445     l_text:=l_text||fnd_number.number_to_canonical(p_completed_content);
446     l_text:=l_text||'</completed_content>';
447     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
448     l_text:='<total_content>';
449     l_text:=l_text||fnd_number.number_to_canonical(p_total_content);
450     l_text:=l_text||'</total_content>';
451     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
452     l_text:='<booking_justification_id>';
453     l_text:=l_text||fnd_number.number_to_canonical(p_booking_justification_id);
454     l_text:=l_text||'</booking_justification_id>';
455     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
456     l_text:='<is_history_flag>';
457     l_text:=l_text||irc_utilities_pkg.removeTags(p_is_history_flag);
458     l_text:=l_text||'</is_history_flag>';
459     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
460     l_text:='<is_mandatory_enrollment>';
461     l_text:=l_text||irc_utilities_pkg.removeTags(p_is_mandatory_enrollment);
462     l_text:=l_text||'</is_mandatory_enrollment>';
463     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
464     l_text:='<booking_id>';
465     l_text:=l_text||fnd_number.number_to_canonical(p_booking_id);
466     l_text:=l_text||'</booking_id>';
467     dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
468     l_text:='</delegate_booking>';
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_delegate_booking_a;
493 end ota_delegate_booking_be1;