eTRM uses javascript that opens and focuses a separate window to display reports. Your browser does not appear to support javascript. This should not prevent you from using eTRM but it does mean the window focus feature will not work. Please check the contents of other windows on your desktop if you click on a link that does not appear to do anything.
PACKAGE BODY: APPS.HRDPP_CREATE_MX_PERSON

Source


1 package body hrdpp_CREATE_MX_PERSON as
2 /*
3  * Generated by hr_pump_meta_mapper at: 2012/11/27 04:11:40
4  * Generated for API: HR_MX_CONTACT_API.CREATE_MX_PERSON
5  */
6 --
7 dh constant date := hr_api.g_date;
8 nh constant number := hr_api.g_number;
9 vh constant varchar2(64) := hr_api.g_varchar2;
10 c_sot constant date := to_date('01010001','DDMMYYYY');
11 cn constant varchar2(32) := '<NULL>';
12 dn constant date := null;
13 nn constant number := null;
14 vn constant varchar2(1) := null;
15 --
16 function dc(p in date) return varchar2 is
17 begin
18 if p<c_sot then
19  if p<>trunc(p) then
20   return to_char(p,'SYYYY/MM/DD HH24:MI:SS');
21  end if;
22  return to_char(p,'SYYYY/MM/DD');
23 elsif p<>trunc(p) then
24  return to_char(p,'YYYY/MM/DD HH24:MI:SS');
25 end if;
26 return to_char(p,'YYYY/MM/DD');
27 end dc;
31 return to_date(p,'YYYY/MM/DD');
28 function d(p in varchar2) return date is
29 begin
30 if length(p)=10 then
32 elsif length(p)=19 then
33 return to_date(p,'YYYY/MM/DD HH24:MI:SS');
34 elsif length(p)=11 then
35 return to_date(p,'SYYYY/MM/DD');
36 elsif length(p)=20 then
37 return to_date(p,'SYYYY/MM/DD HH24:MI:SS');
38 end if;
39 -- Try default format as last resort.
40 return to_date(p,'YYYY/MM/DD');
41 end d;
42 function n(p in varchar2) return number is
43 begin
44 return to_number(p);
45 end n;
46 function dd(p in date,i in varchar2)
47 return varchar2 is
48 begin
49 if upper(i) = 'N' then return dc(p);
50 else return cn; end if;
51 end dd;
52 function nd(p in number,i in varchar2)
53 return varchar2 is
54 begin
55 if upper(i) = 'N' then return to_char(p);
56 else return cn; end if;
57 end nd;
58 --
59 procedure iuk
60 (p_batch_line_id  in number,
61 p_user_key_value in varchar2,
62 p_unique_key_id  in number)
63 is
64 begin
65 hr_data_pump.entry('ins_user_key');
66 insert into hr_pump_batch_line_user_keys
67 (user_key_id, batch_line_id,user_key_value,unique_key_id)
68 values
69 (hr_pump_batch_line_user_keys_s.nextval,
70 p_batch_line_id,
71 p_user_key_value,
72 p_unique_key_id);
73 hr_data_pump.exit('ins_user_key');
74 end iuk;
75 --
76 procedure insert_batch_lines
77 (p_batch_id      in number
78 ,p_data_pump_batch_line_id in number default null
79 ,p_data_pump_business_grp_name in varchar2 default null
80 ,p_user_sequence in number default null
81 ,p_link_value    in number default null
82 ,P_START_DATE in date
83 ,P_PATERNAL_LAST_NAME in varchar2
84 ,P_SEX in varchar2
85 ,P_COMMENTS in varchar2 default null
86 ,P_DATE_EMPLOYEE_DATA_VERIFIED in date default null
87 ,P_DATE_OF_BIRTH in date default null
88 ,P_EMAIL_ADDRESS in varchar2 default null
89 ,P_EXPENSE_CHECK_SEND_TO_ADDRES in varchar2 default null
90 ,P_FIRST_NAME in varchar2 default null
91 ,P_KNOWN_AS in varchar2 default null
92 ,P_MARITAL_STATUS in varchar2 default null
93 ,P_SECOND_NAME in varchar2 default null
94 ,P_NATIONALITY in varchar2 default null
95 ,P_CURP_ID in varchar2 default null
96 ,P_PREVIOUS_LAST_NAME in varchar2 default null
97 ,P_REGISTERED_DISABLED_FLAG in varchar2 default null
98 ,P_TITLE in varchar2 default null
99 ,P_WORK_TELEPHONE in varchar2 default null
100 ,P_ATTRIBUTE_CATEGORY in varchar2 default null
101 ,P_ATTRIBUTE1 in varchar2 default null
102 ,P_ATTRIBUTE2 in varchar2 default null
103 ,P_ATTRIBUTE3 in varchar2 default null
104 ,P_ATTRIBUTE4 in varchar2 default null
105 ,P_ATTRIBUTE5 in varchar2 default null
106 ,P_ATTRIBUTE6 in varchar2 default null
107 ,P_ATTRIBUTE7 in varchar2 default null
108 ,P_ATTRIBUTE8 in varchar2 default null
109 ,P_ATTRIBUTE9 in varchar2 default null
110 ,P_ATTRIBUTE10 in varchar2 default null
111 ,P_ATTRIBUTE11 in varchar2 default null
112 ,P_ATTRIBUTE12 in varchar2 default null
113 ,P_ATTRIBUTE13 in varchar2 default null
114 ,P_ATTRIBUTE14 in varchar2 default null
115 ,P_ATTRIBUTE15 in varchar2 default null
116 ,P_ATTRIBUTE16 in varchar2 default null
117 ,P_ATTRIBUTE17 in varchar2 default null
118 ,P_ATTRIBUTE18 in varchar2 default null
119 ,P_ATTRIBUTE19 in varchar2 default null
120 ,P_ATTRIBUTE20 in varchar2 default null
121 ,P_ATTRIBUTE21 in varchar2 default null
122 ,P_ATTRIBUTE22 in varchar2 default null
123 ,P_ATTRIBUTE23 in varchar2 default null
124 ,P_ATTRIBUTE24 in varchar2 default null
125 ,P_ATTRIBUTE25 in varchar2 default null
126 ,P_ATTRIBUTE26 in varchar2 default null
127 ,P_ATTRIBUTE27 in varchar2 default null
128 ,P_ATTRIBUTE28 in varchar2 default null
129 ,P_ATTRIBUTE29 in varchar2 default null
130 ,P_ATTRIBUTE30 in varchar2 default null
131 ,P_MATERNAL_LAST_NAME in varchar2 default null
132 ,P_CORRESPONDENCE_LANGUAGE in varchar2 default null
133 ,P_HONORS in varchar2 default null
134 ,P_ON_MILITARY_SERVICE in varchar2 default null
135 ,P_STUDENT_STATUS in varchar2 default null
136 ,P_USES_TOBACCO_FLAG in varchar2 default null
137 ,P_COORD_BEN_NO_CVG_FLAG in varchar2 default null
138 ,P_PRE_NAME_ADJUNCT in varchar2 default null
139 ,P_SUFFIX in varchar2 default null
140 ,P_TOWN_OF_BIRTH in varchar2 default null
141 ,P_REGION_OF_BIRTH in varchar2 default null
142 ,P_COUNTRY_OF_BIRTH in varchar2 default null
143 ,P_GLOBAL_PERSON_ID in varchar2 default null
144 ,P_PERSON_USER_KEY in varchar2
145 ,P_USER_PERSON_TYPE in varchar2 default null
146 ,P_LANGUAGE_CODE in varchar2 default null
147 ,P_VENDOR_NAME in varchar2 default null
148 ,P_BENEFIT_GROUP in varchar2 default null) is
149 blid number := p_data_pump_batch_line_id;
150 begin
151 if blid is not null then
152 delete from hr_pump_batch_lines where batch_line_id = blid;
153 delete from hr_pump_batch_exceptions
154 where source_type = 'BATCH_LINE' and source_id = blid;
155 end if;
156 insert into hr_pump_batch_lines
157 (batch_id
158 ,batch_line_id
159 ,business_group_name
160 ,api_module_id
161 ,line_status
162 ,user_sequence
163 ,link_value
164 ,pval001
165 ,pval002
166 ,pval003
167 ,pval004
168 ,pval005
169 ,pval006
170 ,pval007
171 ,pval008
172 ,pval009
173 ,pval010
174 ,pval011
175 ,pval012
176 ,pval013
177 ,pval014
178 ,pval015
179 ,pval016
180 ,pval017
181 ,pval018
182 ,pval019
183 ,pval020
184 ,pval021
185 ,pval022
186 ,pval023
187 ,pval024
188 ,pval025
189 ,pval026
190 ,pval027
191 ,pval028
192 ,pval029
193 ,pval030
194 ,pval031
195 ,pval032
196 ,pval033
197 ,pval034
198 ,pval035
199 ,pval036
200 ,pval037
201 ,pval038
202 ,pval039
203 ,pval040
204 ,pval041
205 ,pval042
206 ,pval043
207 ,pval044
208 ,pval045
209 ,pval046
210 ,pval047
211 ,pval048
212 ,pval049
213 ,pval050
214 ,pval051
215 ,pval052
216 ,pval053
217 ,pval054
218 ,pval055
219 ,pval056
220 ,pval057
221 ,pval058
222 ,pval059
223 ,pval060
224 ,pval061
225 ,pval062
226 ,pval063
227 ,pval071
228 ,pval072
229 ,pval073
230 ,pval074)
231 values
232 (p_batch_id
233 ,nvl(blid,hr_pump_batch_lines_s.nextval)
234 ,p_data_pump_business_grp_name
235 ,3860
236 ,'U'
237 ,p_user_sequence
238 ,p_link_value
239 ,dc(P_START_DATE)
240 ,P_PATERNAL_LAST_NAME
241 ,P_SEX
242 ,P_COMMENTS
243 ,dc(P_DATE_EMPLOYEE_DATA_VERIFIED)
244 ,dc(P_DATE_OF_BIRTH)
245 ,P_EMAIL_ADDRESS
246 ,P_EXPENSE_CHECK_SEND_TO_ADDRES
247 ,P_FIRST_NAME
248 ,P_KNOWN_AS
249 ,P_MARITAL_STATUS
250 ,P_SECOND_NAME
251 ,P_NATIONALITY
252 ,P_CURP_ID
253 ,P_PREVIOUS_LAST_NAME
254 ,P_REGISTERED_DISABLED_FLAG
255 ,P_TITLE
256 ,P_WORK_TELEPHONE
257 ,P_ATTRIBUTE_CATEGORY
258 ,P_ATTRIBUTE1
259 ,P_ATTRIBUTE2
260 ,P_ATTRIBUTE3
261 ,P_ATTRIBUTE4
262 ,P_ATTRIBUTE5
263 ,P_ATTRIBUTE6
264 ,P_ATTRIBUTE7
265 ,P_ATTRIBUTE8
266 ,P_ATTRIBUTE9
267 ,P_ATTRIBUTE10
268 ,P_ATTRIBUTE11
269 ,P_ATTRIBUTE12
270 ,P_ATTRIBUTE13
271 ,P_ATTRIBUTE14
272 ,P_ATTRIBUTE15
273 ,P_ATTRIBUTE16
274 ,P_ATTRIBUTE17
275 ,P_ATTRIBUTE18
276 ,P_ATTRIBUTE19
277 ,P_ATTRIBUTE20
278 ,P_ATTRIBUTE21
279 ,P_ATTRIBUTE22
280 ,P_ATTRIBUTE23
281 ,P_ATTRIBUTE24
282 ,P_ATTRIBUTE25
283 ,P_ATTRIBUTE26
284 ,P_ATTRIBUTE27
285 ,P_ATTRIBUTE28
286 ,P_ATTRIBUTE29
287 ,P_ATTRIBUTE30
288 ,P_MATERNAL_LAST_NAME
289 ,P_CORRESPONDENCE_LANGUAGE
290 ,P_HONORS
291 ,P_ON_MILITARY_SERVICE
292 ,P_STUDENT_STATUS
293 ,P_USES_TOBACCO_FLAG
294 ,P_COORD_BEN_NO_CVG_FLAG
295 ,P_PRE_NAME_ADJUNCT
296 ,P_SUFFIX
297 ,P_TOWN_OF_BIRTH
298 ,P_REGION_OF_BIRTH
299 ,P_COUNTRY_OF_BIRTH
300 ,P_GLOBAL_PERSON_ID
301 ,P_PERSON_USER_KEY
302 ,P_USER_PERSON_TYPE
303 ,P_LANGUAGE_CODE
304 ,P_VENDOR_NAME
305 ,P_BENEFIT_GROUP);
306 end insert_batch_lines;
307 --
308 procedure call
309 (p_business_group_id in number,
310 p_batch_line_id     in number) is
311 cursor cr is
312 select l.rowid myrowid,
313 decode(l.pval001,cn,dn,d(l.pval001)) p1,
317 decode(l.pval004,cn,vn,vn,vn,l.pval004) p4,
314 decode(l.pval002,cn,vn,l.pval002) p2,
315 decode(l.pval003,cn,vn,
316  hr_pump_get.gl(l.pval003,'SEX',dn,l.pval072)) p3,
318 l.pval004 d4,
319 decode(l.pval005,cn,dn,vn,dn,d(l.pval005)) p5,
320 l.pval005 d5,
321 decode(l.pval006,cn,dn,vn,dn,d(l.pval006)) p6,
322 l.pval006 d6,
323 decode(l.pval007,cn,vn,vn,vn,l.pval007) p7,
324 l.pval007 d7,
325 decode(l.pval008,cn,vn,vn,vn,
326  hr_pump_get.gl(l.pval008,'HOME_OFFICE',dn,l.pval072)) p8,
327 l.pval008 d8,
328 decode(l.pval009,cn,vn,vn,vn,l.pval009) p9,
329 l.pval009 d9,
330 decode(l.pval010,cn,vn,vn,vn,l.pval010) p10,
331 l.pval010 d10,
332 decode(l.pval011,cn,vn,vn,vn,
333  hr_pump_get.gl(l.pval011,'MAR_STATUS',dn,l.pval072)) p11,
334 l.pval011 d11,
335 decode(l.pval012,cn,vn,vn,vn,l.pval012) p12,
336 l.pval012 d12,
337 decode(l.pval013,cn,vn,vn,vn,
338  hr_pump_get.gl(l.pval013,'NATIONALITY',dn,l.pval072)) p13,
339 l.pval013 d13,
340 decode(l.pval014,cn,vn,vn,vn,l.pval014) p14,
341 l.pval014 d14,
342 decode(l.pval015,cn,vn,vn,vn,l.pval015) p15,
343 l.pval015 d15,
344 decode(l.pval016,cn,vn,vn,vn,
345  hr_pump_get.gl(l.pval016,'REGISTERED_DISABLED',dn,l.pval072)) p16,
346 l.pval016 d16,
347 decode(l.pval017,cn,vn,vn,vn,
348  hr_pump_get.gl(l.pval017,'TITLE',dn,l.pval072)) p17,
349 l.pval017 d17,
350 decode(l.pval018,cn,vn,vn,vn,l.pval018) p18,
351 l.pval018 d18,
352 decode(l.pval019,cn,vn,vn,vn,l.pval019) p19,
353 l.pval019 d19,
354 decode(l.pval020,cn,vn,vn,vn,l.pval020) p20,
355 l.pval020 d20,
356 decode(l.pval021,cn,vn,vn,vn,l.pval021) p21,
357 l.pval021 d21,
358 decode(l.pval022,cn,vn,vn,vn,l.pval022) p22,
359 l.pval022 d22,
360 decode(l.pval023,cn,vn,vn,vn,l.pval023) p23,
361 l.pval023 d23,
362 decode(l.pval024,cn,vn,vn,vn,l.pval024) p24,
363 l.pval024 d24,
364 decode(l.pval025,cn,vn,vn,vn,l.pval025) p25,
365 l.pval025 d25,
366 decode(l.pval026,cn,vn,vn,vn,l.pval026) p26,
367 l.pval026 d26,
368 decode(l.pval027,cn,vn,vn,vn,l.pval027) p27,
369 l.pval027 d27,
370 decode(l.pval028,cn,vn,vn,vn,l.pval028) p28,
371 l.pval028 d28,
372 decode(l.pval029,cn,vn,vn,vn,l.pval029) p29,
373 l.pval029 d29,
374 decode(l.pval030,cn,vn,vn,vn,l.pval030) p30,
375 l.pval030 d30,
376 decode(l.pval031,cn,vn,vn,vn,l.pval031) p31,
377 l.pval031 d31,
378 decode(l.pval032,cn,vn,vn,vn,l.pval032) p32,
379 l.pval032 d32,
380 decode(l.pval033,cn,vn,vn,vn,l.pval033) p33,
381 l.pval033 d33,
382 decode(l.pval034,cn,vn,vn,vn,l.pval034) p34,
383 l.pval034 d34,
384 decode(l.pval035,cn,vn,vn,vn,l.pval035) p35,
385 l.pval035 d35,
386 decode(l.pval036,cn,vn,vn,vn,l.pval036) p36,
387 l.pval036 d36,
388 decode(l.pval037,cn,vn,vn,vn,l.pval037) p37,
389 l.pval037 d37,
390 decode(l.pval038,cn,vn,vn,vn,l.pval038) p38,
391 l.pval038 d38,
392 decode(l.pval039,cn,vn,vn,vn,l.pval039) p39,
393 l.pval039 d39,
394 decode(l.pval040,cn,vn,vn,vn,l.pval040) p40,
395 l.pval040 d40,
396 decode(l.pval041,cn,vn,vn,vn,l.pval041) p41,
397 l.pval041 d41,
398 decode(l.pval042,cn,vn,vn,vn,l.pval042) p42,
399 l.pval042 d42,
400 decode(l.pval043,cn,vn,vn,vn,l.pval043) p43,
401 l.pval043 d43,
402 decode(l.pval044,cn,vn,vn,vn,l.pval044) p44,
403 l.pval044 d44,
404 decode(l.pval045,cn,vn,vn,vn,l.pval045) p45,
405 l.pval045 d45,
406 decode(l.pval046,cn,vn,vn,vn,l.pval046) p46,
407 l.pval046 d46,
408 decode(l.pval047,cn,vn,vn,vn,l.pval047) p47,
409 l.pval047 d47,
410 decode(l.pval048,cn,vn,vn,vn,l.pval048) p48,
411 l.pval048 d48,
412 decode(l.pval049,cn,vn,vn,vn,l.pval049) p49,
413 l.pval049 d49,
414 decode(l.pval050,cn,vn,vn,vn,l.pval050) p50,
415 l.pval050 d50,
416 decode(l.pval051,cn,vn,vn,vn,l.pval051) p51,
417 l.pval051 d51,
418 decode(l.pval052,cn,vn,vn,vn,l.pval052) p52,
419 l.pval052 d52,
420 decode(l.pval053,cn,vn,vn,vn,l.pval053) p53,
421 l.pval053 d53,
422 decode(l.pval054,cn,vn,vn,vn,l.pval054) p54,
423 l.pval054 d54,
424 decode(l.pval055,cn,vn,vn,vn,l.pval055) p55,
425 l.pval055 d55,
426 decode(l.pval056,cn,vn,vn,vn,l.pval056) p56,
427 l.pval056 d56,
428 decode(l.pval057,cn,vn,vn,vn,l.pval057) p57,
429 l.pval057 d57,
430 decode(l.pval058,cn,vn,vn,vn,l.pval058) p58,
431 l.pval058 d58,
432 decode(l.pval059,cn,vn,vn,vn,l.pval059) p59,
433 l.pval059 d59,
434 decode(l.pval060,cn,vn,vn,vn,l.pval060) p60,
435 l.pval060 d60,
436 decode(l.pval061,cn,vn,vn,vn,l.pval061) p61,
437 l.pval061 d61,
438 decode(l.pval062,cn,vn,vn,vn,l.pval062) p62,
439 l.pval062 d62,
440 l.pval063 p63,
441 l.pval064 p64,
442 decode(l.pval065,cn,dn,d(l.pval065)) p65,
443 decode(l.pval066,cn,dn,d(l.pval066)) p66,
444 l.pval067 p67,
445 l.pval068 p68,
446 l.pval069 p69,
447 l.pval070 p70,
448 decode(l.pval071,cn,vn,vn,vn,l.pval071) p71,
449 l.pval071 d71,
450 decode(l.pval072,cn,vn,vn,vn,l.pval072) p72,
451 l.pval072 d72,
452 decode(l.pval073,cn,vn,vn,vn,l.pval073) p73,
453 l.pval073 d73,
454 decode(l.pval074,cn,vn,vn,vn,l.pval074) p74,
455 l.pval074 d74
456 from hr_pump_batch_lines l
457 where l.batch_line_id = p_batch_line_id;
458 --
459 c cr%rowtype;
460 l_validate boolean := false;
461 L_PERSON_ID number;
462 L_NAME_COMBINATION_WARNING boolean;
463 L_ORIG_HIRE_WARNING boolean;
464 L_PERSON_TYPE_ID number;
465 L_VENDOR_ID number;
466 L_BENEFIT_GROUP_ID number;
467 --
468 begin
469 hr_data_pump.entry('call');
470 open cr;
471 fetch cr into c;
472 if cr%notfound then
473 hr_utility.set_message(800,'HR_50326_DP_NO_ROW');
474 hr_utility.set_message_token('TABLE','HR_PUMP_BATCH_LINES');
475 hr_utility.set_message_token('COLUMN','P_BATCH_LINE_ID');
476 hr_utility.set_message_token('VALUE',p_batch_line_id);
477 hr_utility.raise_error;
478 end if;
479 --
480 if c.p71 is null or
481 c.p72 is null then
482 L_PERSON_TYPE_ID:=nn;
483 else
484 L_PERSON_TYPE_ID := 
485 hr_pump_get.get_person_type_id
486 (P_USER_PERSON_TYPE => c.p71
487 ,P_BUSINESS_GROUP_ID => P_BUSINESS_GROUP_ID
488 ,P_LANGUAGE_CODE => c.p72);
489 end if;
490 --
491 if c.p73 is null then
492 L_VENDOR_ID:=nn;
493 else
494 L_VENDOR_ID := 
495 hr_pump_get.get_vendor_id
496 (P_VENDOR_NAME => c.p73);
497 end if;
498 --
499 if c.p74 is null then
500 L_BENEFIT_GROUP_ID:=nn;
501 else
502 L_BENEFIT_GROUP_ID := 
503 hr_pump_get.get_benefit_group_id
504 (P_BUSINESS_GROUP_ID => P_BUSINESS_GROUP_ID
505 ,P_BENEFIT_GROUP => c.p74);
506 end if;
507 --
508 hr_data_pump.api_trc_on;
509 HR_MX_CONTACT_API.CREATE_MX_PERSON
510 (p_validate => l_validate
511 ,P_START_DATE => c.p1
512 ,p_business_group_id => p_business_group_id
513 ,P_PATERNAL_LAST_NAME => c.p2
514 ,P_SEX => c.p3
515 ,P_PERSON_TYPE_ID => L_PERSON_TYPE_ID
516 ,P_COMMENTS => c.p4
517 ,P_DATE_EMPLOYEE_DATA_VERIFIED => c.p5
518 ,P_DATE_OF_BIRTH => c.p6
519 ,P_EMAIL_ADDRESS => c.p7
520 ,P_EXPENSE_CHECK_SEND_TO_ADDRES => c.p8
521 ,P_FIRST_NAME => c.p9
522 ,P_KNOWN_AS => c.p10
523 ,P_MARITAL_STATUS => c.p11
524 ,P_SECOND_NAME => c.p12
525 ,P_NATIONALITY => c.p13
526 ,P_CURP_ID => c.p14
527 ,P_PREVIOUS_LAST_NAME => c.p15
528 ,P_REGISTERED_DISABLED_FLAG => c.p16
529 ,P_TITLE => c.p17
530 ,P_VENDOR_ID => L_VENDOR_ID
531 ,P_WORK_TELEPHONE => c.p18
532 ,P_ATTRIBUTE_CATEGORY => c.p19
533 ,P_ATTRIBUTE1 => c.p20
534 ,P_ATTRIBUTE2 => c.p21
535 ,P_ATTRIBUTE3 => c.p22
536 ,P_ATTRIBUTE4 => c.p23
537 ,P_ATTRIBUTE5 => c.p24
538 ,P_ATTRIBUTE6 => c.p25
539 ,P_ATTRIBUTE7 => c.p26
540 ,P_ATTRIBUTE8 => c.p27
541 ,P_ATTRIBUTE9 => c.p28
542 ,P_ATTRIBUTE10 => c.p29
543 ,P_ATTRIBUTE11 => c.p30
544 ,P_ATTRIBUTE12 => c.p31
545 ,P_ATTRIBUTE13 => c.p32
546 ,P_ATTRIBUTE14 => c.p33
547 ,P_ATTRIBUTE15 => c.p34
548 ,P_ATTRIBUTE16 => c.p35
549 ,P_ATTRIBUTE17 => c.p36
550 ,P_ATTRIBUTE18 => c.p37
551 ,P_ATTRIBUTE19 => c.p38
552 ,P_ATTRIBUTE20 => c.p39
553 ,P_ATTRIBUTE21 => c.p40
554 ,P_ATTRIBUTE22 => c.p41
555 ,P_ATTRIBUTE23 => c.p42
556 ,P_ATTRIBUTE24 => c.p43
557 ,P_ATTRIBUTE25 => c.p44
558 ,P_ATTRIBUTE26 => c.p45
559 ,P_ATTRIBUTE27 => c.p46
560 ,P_ATTRIBUTE28 => c.p47
561 ,P_ATTRIBUTE29 => c.p48
562 ,P_ATTRIBUTE30 => c.p49
563 ,P_MATERNAL_LAST_NAME => c.p50
564 ,P_CORRESPONDENCE_LANGUAGE => c.p51
565 ,P_HONORS => c.p52
566 ,P_BENEFIT_GROUP_ID => L_BENEFIT_GROUP_ID
567 ,P_ON_MILITARY_SERVICE => c.p53
568 ,P_STUDENT_STATUS => c.p54
569 ,P_USES_TOBACCO_FLAG => c.p55
570 ,P_COORD_BEN_NO_CVG_FLAG => c.p56
571 ,P_PRE_NAME_ADJUNCT => c.p57
572 ,P_SUFFIX => c.p58
573 ,P_TOWN_OF_BIRTH => c.p59
574 ,P_REGION_OF_BIRTH => c.p60
575 ,P_COUNTRY_OF_BIRTH => c.p61
576 ,P_GLOBAL_PERSON_ID => c.p62
577 ,P_PERSON_ID => L_PERSON_ID
578 ,P_OBJECT_VERSION_NUMBER => c.p64
579 ,P_EFFECTIVE_START_DATE => c.p65
580 ,P_EFFECTIVE_END_DATE => c.p66
581 ,P_FULL_NAME => c.p67
582 ,P_COMMENT_ID => c.p68
583 ,P_NAME_COMBINATION_WARNING => L_NAME_COMBINATION_WARNING
584 ,P_ORIG_HIRE_WARNING => L_ORIG_HIRE_WARNING);
585 hr_data_pump.api_trc_off;
586 --
587 iuk(p_batch_line_id,c.p63,L_PERSON_ID);
588 --
589 if L_NAME_COMBINATION_WARNING then
590 c.p69 := 'TRUE';
591 else
592 c.p69 := 'FALSE';
593 end if;
594 --
595 if L_ORIG_HIRE_WARNING then
596 c.p70 := 'TRUE';
597 else
598 c.p70 := 'FALSE';
599 end if;
600 --
601 update hr_pump_batch_lines l set
602 l.pval063 = decode(c.p63,null,cn,c.p63),
603 l.pval064 = decode(c.p64,null,cn,c.p64),
604 l.pval065 = decode(c.p65,null,cn,dc(c.p65)),
605 l.pval066 = decode(c.p66,null,cn,dc(c.p66)),
606 l.pval067 = decode(c.p67,null,cn,c.p67),
607 l.pval068 = decode(c.p68,null,cn,c.p68),
608 l.pval069 = decode(c.p69,null,cn,c.p69),
609 l.pval070 = decode(c.p70,null,cn,c.p70)
610 where l.rowid = c.myrowid;
611 --
612 close cr;
613 --
614 hr_data_pump.exit('call');
615 exception
616  when hr_multi_message.error_message_exist then
617    if cr%isopen then
618     close cr;
619    end if;
620    hr_pump_utils.set_multi_msg_error_flag(true);
621  when others then
622  if cr%isopen then
623   close cr;
624  end if;
625  raise;
626 end call;
627 end hrdpp_CREATE_MX_PERSON;