[Home] [Help]
PACKAGE BODY: APPS.IRC_PARTY_BE5
Source
1 package body irc_party_be5 as
2 --Code generated on 27/11/2012 03:53:06
3 /* $Header: hrapiwfe.pkb 120.11 2011/12/24 13:28:35 vboggava ship $*/
4 procedure create_candidate_internal_a (
5 p_business_group_id number,
6 p_last_name varchar2,
7 p_first_name varchar2,
8 p_date_of_birth date,
9 p_email_address varchar2,
10 p_title varchar2,
11 p_gender varchar2,
12 p_marital_status varchar2,
13 p_previous_last_name varchar2,
14 p_middle_name varchar2,
15 p_name_suffix varchar2,
16 p_known_as varchar2,
17 p_first_name_phonetic varchar2,
18 p_last_name_phonetic varchar2,
19 p_attribute_category varchar2,
20 p_attribute1 varchar2,
21 p_attribute2 varchar2,
22 p_attribute3 varchar2,
23 p_attribute4 varchar2,
24 p_attribute5 varchar2,
25 p_attribute6 varchar2,
26 p_attribute7 varchar2,
27 p_attribute8 varchar2,
28 p_attribute9 varchar2,
29 p_attribute10 varchar2,
30 p_attribute11 varchar2,
31 p_attribute12 varchar2,
32 p_attribute13 varchar2,
33 p_attribute14 varchar2,
34 p_attribute15 varchar2,
35 p_attribute16 varchar2,
36 p_attribute17 varchar2,
37 p_attribute18 varchar2,
38 p_attribute19 varchar2,
39 p_attribute20 varchar2,
40 p_attribute21 varchar2,
41 p_attribute22 varchar2,
42 p_attribute23 varchar2,
43 p_attribute24 varchar2,
44 p_attribute25 varchar2,
45 p_attribute26 varchar2,
46 p_attribute27 varchar2,
47 p_attribute28 varchar2,
48 p_attribute29 varchar2,
49 p_attribute30 varchar2,
50 p_per_information_category varchar2,
51 p_per_information1 varchar2,
52 p_per_information2 varchar2,
53 p_per_information3 varchar2,
54 p_per_information4 varchar2,
55 p_per_information5 varchar2,
56 p_per_information6 varchar2,
57 p_per_information7 varchar2,
58 p_per_information8 varchar2,
59 p_per_information9 varchar2,
60 p_per_information10 varchar2,
61 p_per_information11 varchar2,
62 p_per_information12 varchar2,
63 p_per_information13 varchar2,
64 p_per_information14 varchar2,
65 p_per_information15 varchar2,
66 p_per_information16 varchar2,
67 p_per_information17 varchar2,
68 p_per_information18 varchar2,
69 p_per_information19 varchar2,
70 p_per_information20 varchar2,
71 p_per_information21 varchar2,
72 p_per_information22 varchar2,
73 p_per_information23 varchar2,
74 p_per_information24 varchar2,
75 p_per_information25 varchar2,
76 p_per_information26 varchar2,
77 p_per_information27 varchar2,
78 p_per_information28 varchar2,
79 p_per_information29 varchar2,
80 p_per_information30 varchar2,
81 p_nationality varchar2,
82 p_national_identifier varchar2,
83 p_town_of_birth varchar2,
84 p_region_of_birth varchar2,
85 p_country_of_birth varchar2,
86 p_person_id number,
87 p_effective_start_date date,
88 p_effective_end_date date,
89 p_allow_access varchar2,
90 p_start_date date,
91 p_party_id varchar2) is
92 l_event_key number;
93 l_event_data clob;
94 l_event_name varchar2(250);
95 l_text varchar2(2000);
96 l_message varchar2(10);
97 --
98 cursor get_seq is
99 select per_wf_events_s.nextval from dual;
100 --
101 l_proc varchar2(72):=' irc_party_be5.create_candidate_internal_a';
102 begin
103 hr_utility.set_location('Entering: '||l_proc,10);
104 -- check the status of the business event
105 l_event_name:='oracle.apps.per.irc.api.party.create_candidate_internal';
106 l_message:=wf_event.test(l_event_name);
107 --
108 if (l_message='MESSAGE') then
109 hr_utility.set_location(l_proc,20);
110 --
111 -- get a key for the event
112 --
113 open get_seq;
114 fetch get_seq into l_event_key;
115 close get_seq;
116 --
117 -- build the xml data for the event
118 --
119 dbms_lob.createTemporary(l_event_data,false,dbms_lob.call);
120 l_text:='<?xml version =''1.0'' encoding =''ASCII''?>';
121 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
122 l_text:='<party>';
123 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
124 --
125 l_text:='<business_group_id>';
126 l_text:=l_text||fnd_number.number_to_canonical(p_business_group_id);
127 l_text:=l_text||'</business_group_id>';
128 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
129 l_text:='<last_name>';
130 l_text:=l_text||irc_utilities_pkg.removeTags(p_last_name);
131 l_text:=l_text||'</last_name>';
132 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
133 l_text:='<first_name>';
134 l_text:=l_text||irc_utilities_pkg.removeTags(p_first_name);
135 l_text:=l_text||'</first_name>';
136 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
137 l_text:='<date_of_birth>';
138 l_text:=l_text||fnd_date.date_to_canonical(p_date_of_birth);
139 l_text:=l_text||'</date_of_birth>';
140 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
141 l_text:='<email_address>';
142 l_text:=l_text||irc_utilities_pkg.removeTags(p_email_address);
143 l_text:=l_text||'</email_address>';
144 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
145 l_text:='<title>';
146 l_text:=l_text||irc_utilities_pkg.removeTags(p_title);
147 l_text:=l_text||'</title>';
148 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
149 l_text:='<gender>';
150 l_text:=l_text||irc_utilities_pkg.removeTags(p_gender);
151 l_text:=l_text||'</gender>';
152 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
153 l_text:='<marital_status>';
154 l_text:=l_text||irc_utilities_pkg.removeTags(p_marital_status);
155 l_text:=l_text||'</marital_status>';
156 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
157 l_text:='<previous_last_name>';
158 l_text:=l_text||irc_utilities_pkg.removeTags(p_previous_last_name);
159 l_text:=l_text||'</previous_last_name>';
160 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
161 l_text:='<middle_name>';
162 l_text:=l_text||irc_utilities_pkg.removeTags(p_middle_name);
163 l_text:=l_text||'</middle_name>';
164 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
165 l_text:='<name_suffix>';
166 l_text:=l_text||irc_utilities_pkg.removeTags(p_name_suffix);
167 l_text:=l_text||'</name_suffix>';
168 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
169 l_text:='<known_as>';
170 l_text:=l_text||irc_utilities_pkg.removeTags(p_known_as);
171 l_text:=l_text||'</known_as>';
172 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
173 l_text:='<first_name_phonetic>';
174 l_text:=l_text||irc_utilities_pkg.removeTags(p_first_name_phonetic);
175 l_text:=l_text||'</first_name_phonetic>';
176 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
177 l_text:='<last_name_phonetic>';
178 l_text:=l_text||irc_utilities_pkg.removeTags(p_last_name_phonetic);
179 l_text:=l_text||'</last_name_phonetic>';
180 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
181 l_text:='<attribute_category>';
182 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute_category);
183 l_text:=l_text||'</attribute_category>';
184 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
185 l_text:='<attribute1>';
186 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute1);
187 l_text:=l_text||'</attribute1>';
188 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
189 l_text:='<attribute2>';
190 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute2);
191 l_text:=l_text||'</attribute2>';
192 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
193 l_text:='<attribute3>';
194 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute3);
195 l_text:=l_text||'</attribute3>';
196 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
197 l_text:='<attribute4>';
198 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute4);
199 l_text:=l_text||'</attribute4>';
200 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
201 l_text:='<attribute5>';
202 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute5);
203 l_text:=l_text||'</attribute5>';
204 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
205 l_text:='<attribute6>';
206 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute6);
207 l_text:=l_text||'</attribute6>';
208 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
209 l_text:='<attribute7>';
210 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute7);
211 l_text:=l_text||'</attribute7>';
212 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
213 l_text:='<attribute8>';
214 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute8);
215 l_text:=l_text||'</attribute8>';
216 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
217 l_text:='<attribute9>';
218 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute9);
219 l_text:=l_text||'</attribute9>';
220 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
221 l_text:='<attribute10>';
222 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute10);
223 l_text:=l_text||'</attribute10>';
224 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
225 l_text:='<attribute11>';
226 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute11);
227 l_text:=l_text||'</attribute11>';
228 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
229 l_text:='<attribute12>';
230 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute12);
231 l_text:=l_text||'</attribute12>';
232 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
233 l_text:='<attribute13>';
234 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute13);
235 l_text:=l_text||'</attribute13>';
236 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
237 l_text:='<attribute14>';
238 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute14);
239 l_text:=l_text||'</attribute14>';
240 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
241 l_text:='<attribute15>';
242 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute15);
243 l_text:=l_text||'</attribute15>';
244 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
245 l_text:='<attribute16>';
246 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute16);
247 l_text:=l_text||'</attribute16>';
248 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
249 l_text:='<attribute17>';
250 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute17);
251 l_text:=l_text||'</attribute17>';
252 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
253 l_text:='<attribute18>';
254 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute18);
255 l_text:=l_text||'</attribute18>';
256 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
257 l_text:='<attribute19>';
258 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute19);
259 l_text:=l_text||'</attribute19>';
260 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
261 l_text:='<attribute20>';
262 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute20);
263 l_text:=l_text||'</attribute20>';
264 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
265 l_text:='<attribute21>';
266 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute21);
267 l_text:=l_text||'</attribute21>';
268 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
269 l_text:='<attribute22>';
270 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute22);
271 l_text:=l_text||'</attribute22>';
272 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
273 l_text:='<attribute23>';
274 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute23);
275 l_text:=l_text||'</attribute23>';
276 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
277 l_text:='<attribute24>';
278 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute24);
279 l_text:=l_text||'</attribute24>';
280 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
281 l_text:='<attribute25>';
282 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute25);
283 l_text:=l_text||'</attribute25>';
284 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
285 l_text:='<attribute26>';
286 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute26);
287 l_text:=l_text||'</attribute26>';
288 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
289 l_text:='<attribute27>';
290 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute27);
291 l_text:=l_text||'</attribute27>';
292 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
293 l_text:='<attribute28>';
294 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute28);
295 l_text:=l_text||'</attribute28>';
296 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
297 l_text:='<attribute29>';
298 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute29);
299 l_text:=l_text||'</attribute29>';
300 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
301 l_text:='<attribute30>';
302 l_text:=l_text||irc_utilities_pkg.removeTags(p_attribute30);
303 l_text:=l_text||'</attribute30>';
304 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
305 l_text:='<per_information_category>';
306 l_text:=l_text||irc_utilities_pkg.removeTags(p_per_information_category);
307 l_text:=l_text||'</per_information_category>';
308 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
309 l_text:='<per_information1>';
310 l_text:=l_text||irc_utilities_pkg.removeTags(p_per_information1);
311 l_text:=l_text||'</per_information1>';
312 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
313 l_text:='<per_information2>';
314 l_text:=l_text||irc_utilities_pkg.removeTags(p_per_information2);
315 l_text:=l_text||'</per_information2>';
316 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
317 l_text:='<per_information3>';
318 l_text:=l_text||irc_utilities_pkg.removeTags(p_per_information3);
319 l_text:=l_text||'</per_information3>';
320 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
321 l_text:='<per_information4>';
322 l_text:=l_text||irc_utilities_pkg.removeTags(p_per_information4);
323 l_text:=l_text||'</per_information4>';
324 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
325 l_text:='<per_information5>';
326 l_text:=l_text||irc_utilities_pkg.removeTags(p_per_information5);
327 l_text:=l_text||'</per_information5>';
328 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
329 l_text:='<per_information6>';
330 l_text:=l_text||irc_utilities_pkg.removeTags(p_per_information6);
331 l_text:=l_text||'</per_information6>';
332 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
333 l_text:='<per_information7>';
334 l_text:=l_text||irc_utilities_pkg.removeTags(p_per_information7);
335 l_text:=l_text||'</per_information7>';
336 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
337 l_text:='<per_information8>';
338 l_text:=l_text||irc_utilities_pkg.removeTags(p_per_information8);
339 l_text:=l_text||'</per_information8>';
340 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
341 l_text:='<per_information9>';
342 l_text:=l_text||irc_utilities_pkg.removeTags(p_per_information9);
343 l_text:=l_text||'</per_information9>';
344 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
345 l_text:='<per_information10>';
346 l_text:=l_text||irc_utilities_pkg.removeTags(p_per_information10);
347 l_text:=l_text||'</per_information10>';
348 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
349 l_text:='<per_information11>';
350 l_text:=l_text||irc_utilities_pkg.removeTags(p_per_information11);
351 l_text:=l_text||'</per_information11>';
352 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
353 l_text:='<per_information12>';
354 l_text:=l_text||irc_utilities_pkg.removeTags(p_per_information12);
355 l_text:=l_text||'</per_information12>';
356 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
357 l_text:='<per_information13>';
358 l_text:=l_text||irc_utilities_pkg.removeTags(p_per_information13);
359 l_text:=l_text||'</per_information13>';
360 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
361 l_text:='<per_information14>';
362 l_text:=l_text||irc_utilities_pkg.removeTags(p_per_information14);
363 l_text:=l_text||'</per_information14>';
364 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
365 l_text:='<per_information15>';
366 l_text:=l_text||irc_utilities_pkg.removeTags(p_per_information15);
367 l_text:=l_text||'</per_information15>';
368 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
369 l_text:='<per_information16>';
370 l_text:=l_text||irc_utilities_pkg.removeTags(p_per_information16);
371 l_text:=l_text||'</per_information16>';
372 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
373 l_text:='<per_information17>';
374 l_text:=l_text||irc_utilities_pkg.removeTags(p_per_information17);
375 l_text:=l_text||'</per_information17>';
376 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
377 l_text:='<per_information18>';
378 l_text:=l_text||irc_utilities_pkg.removeTags(p_per_information18);
379 l_text:=l_text||'</per_information18>';
380 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
381 l_text:='<per_information19>';
382 l_text:=l_text||irc_utilities_pkg.removeTags(p_per_information19);
383 l_text:=l_text||'</per_information19>';
384 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
385 l_text:='<per_information20>';
386 l_text:=l_text||irc_utilities_pkg.removeTags(p_per_information20);
387 l_text:=l_text||'</per_information20>';
388 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
389 l_text:='<per_information21>';
390 l_text:=l_text||irc_utilities_pkg.removeTags(p_per_information21);
391 l_text:=l_text||'</per_information21>';
392 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
393 l_text:='<per_information22>';
394 l_text:=l_text||irc_utilities_pkg.removeTags(p_per_information22);
395 l_text:=l_text||'</per_information22>';
396 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
397 l_text:='<per_information23>';
398 l_text:=l_text||irc_utilities_pkg.removeTags(p_per_information23);
399 l_text:=l_text||'</per_information23>';
400 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
401 l_text:='<per_information24>';
402 l_text:=l_text||irc_utilities_pkg.removeTags(p_per_information24);
403 l_text:=l_text||'</per_information24>';
404 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
405 l_text:='<per_information25>';
406 l_text:=l_text||irc_utilities_pkg.removeTags(p_per_information25);
407 l_text:=l_text||'</per_information25>';
408 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
409 l_text:='<per_information26>';
410 l_text:=l_text||irc_utilities_pkg.removeTags(p_per_information26);
411 l_text:=l_text||'</per_information26>';
412 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
413 l_text:='<per_information27>';
414 l_text:=l_text||irc_utilities_pkg.removeTags(p_per_information27);
415 l_text:=l_text||'</per_information27>';
416 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
417 l_text:='<per_information28>';
418 l_text:=l_text||irc_utilities_pkg.removeTags(p_per_information28);
419 l_text:=l_text||'</per_information28>';
420 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
421 l_text:='<per_information29>';
422 l_text:=l_text||irc_utilities_pkg.removeTags(p_per_information29);
423 l_text:=l_text||'</per_information29>';
424 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
425 l_text:='<per_information30>';
426 l_text:=l_text||irc_utilities_pkg.removeTags(p_per_information30);
427 l_text:=l_text||'</per_information30>';
428 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
429 l_text:='<nationality>';
430 l_text:=l_text||irc_utilities_pkg.removeTags(p_nationality);
431 l_text:=l_text||'</nationality>';
432 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
433 l_text:='<national_identifier>';
434 l_text:=l_text||irc_utilities_pkg.removeTags(p_national_identifier);
435 l_text:=l_text||'</national_identifier>';
436 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
437 l_text:='<town_of_birth>';
438 l_text:=l_text||irc_utilities_pkg.removeTags(p_town_of_birth);
439 l_text:=l_text||'</town_of_birth>';
440 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
441 l_text:='<region_of_birth>';
442 l_text:=l_text||irc_utilities_pkg.removeTags(p_region_of_birth);
443 l_text:=l_text||'</region_of_birth>';
444 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
445 l_text:='<country_of_birth>';
446 l_text:=l_text||irc_utilities_pkg.removeTags(p_country_of_birth);
447 l_text:=l_text||'</country_of_birth>';
448 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
449 l_text:='<person_id>';
450 l_text:=l_text||fnd_number.number_to_canonical(p_person_id);
451 l_text:=l_text||'</person_id>';
452 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
453 l_text:='<effective_start_date>';
454 l_text:=l_text||fnd_date.date_to_canonical(p_effective_start_date);
455 l_text:=l_text||'</effective_start_date>';
456 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
457 l_text:='<effective_end_date>';
458 l_text:=l_text||fnd_date.date_to_canonical(p_effective_end_date);
459 l_text:=l_text||'</effective_end_date>';
460 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
461 l_text:='<allow_access>';
462 l_text:=l_text||irc_utilities_pkg.removeTags(p_allow_access);
463 l_text:=l_text||'</allow_access>';
464 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
465 l_text:='<start_date>';
466 l_text:=l_text||fnd_date.date_to_canonical(p_start_date);
467 l_text:=l_text||'</start_date>';
468 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
469 l_text:='<party_id>';
470 l_text:=l_text||irc_utilities_pkg.removeTags(p_party_id);
471 l_text:=l_text||'</party_id>';
472 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
473 l_text:='</party>';
474 --
475 dbms_lob.writeAppend(l_event_data,length(l_text),l_text);
476 --
477 if p_effective_start_date is not NULL and
478 p_effective_start_date > trunc(SYSDATE) and
479 fnd_profile.value('HR_DEFER_FD_BE_EVENTS') = 'Y' then
480 -- raise the event with the event data, with send date set to effective date
481 wf_event.raise(p_event_name=>l_event_name
482 ,p_event_key=>l_event_key
483 ,p_event_data=>l_event_data
484 ,p_send_date => p_effective_start_date);
485 --
486 else
487 -- raise the event with the event data
488 wf_event.raise(p_event_name=>l_event_name
489 ,p_event_key=>l_event_key
490 ,p_event_data=>l_event_data);
491 end if;
492 elsif (l_message='KEY') then
493 hr_utility.set_location(l_proc,30);
494 -- get a key for the event
495 open get_seq;
496 fetch get_seq into l_event_key;
497 close get_seq;
498 if p_effective_start_date is not NULL and
499 p_effective_start_date > trunc(SYSDATE) and
500 fnd_profile.value('HR_DEFER_FD_BE_EVENTS') = 'Y' then
501 -- this is a key event, so just raise the event
502 -- without the event data, with send date set to effective date
503 wf_event.raise(p_event_name=>l_event_name
504 ,p_event_key=>l_event_key
505 ,p_send_date => p_effective_start_date);
506 --
507 else
508 -- this is a key event, so just raise the event
509 -- without the event data
510 wf_event.raise(p_event_name=>l_event_name
511 ,p_event_key=>l_event_key);
512 end if;
513 elsif (l_message='NONE') then
514 hr_utility.set_location(l_proc,40);
515 -- no event is required, so do nothing
516 null;
517 end if;
518 hr_utility.set_location('Leaving: '||l_proc,50);
519 end create_candidate_internal_a;
520 end irc_party_be5;