DBA Data[Home] [Help]

PACKAGE BODY: APPS.HRDPP_CREATE_CONTACT

Source


1 package body hrdpp_CREATE_CONTACT as
2 /*
3  * Generated by hr_pump_meta_mapper at: 2007/01/04 02:01:27
4  * Generated for API: HR_CONTACT_REL_API.CREATE_CONTACT
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;
28 function d(p in varchar2) return date is
29 begin
30 if length(p)=10 then
31 return to_date(p,'YYYY/MM/DD');
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_CONTACT_TYPE in varchar2
84 ,P_CTR_COMMENTS in varchar2 default null
85 ,P_PRIMARY_CONTACT_FLAG in varchar2 default null
86 ,P_DATE_START in date default null
87 ,P_DATE_END in date default null
88 ,P_RLTD_PER_RSDS_W_DSGNTR_FLAG in varchar2 default null
89 ,P_PERSONAL_FLAG in varchar2 default null
90 ,P_SEQUENCE_NUMBER in number default null
91 ,P_CONT_ATTRIBUTE_CATEGORY in varchar2 default null
92 ,P_CONT_ATTRIBUTE1 in varchar2 default null
93 ,P_CONT_ATTRIBUTE2 in varchar2 default null
94 ,P_CONT_ATTRIBUTE3 in varchar2 default null
95 ,P_CONT_ATTRIBUTE4 in varchar2 default null
96 ,P_CONT_ATTRIBUTE5 in varchar2 default null
97 ,P_CONT_ATTRIBUTE6 in varchar2 default null
98 ,P_CONT_ATTRIBUTE7 in varchar2 default null
99 ,P_CONT_ATTRIBUTE8 in varchar2 default null
100 ,P_CONT_ATTRIBUTE9 in varchar2 default null
101 ,P_CONT_ATTRIBUTE10 in varchar2 default null
102 ,P_CONT_ATTRIBUTE11 in varchar2 default null
103 ,P_CONT_ATTRIBUTE12 in varchar2 default null
104 ,P_CONT_ATTRIBUTE13 in varchar2 default null
105 ,P_CONT_ATTRIBUTE14 in varchar2 default null
106 ,P_CONT_ATTRIBUTE15 in varchar2 default null
107 ,P_CONT_ATTRIBUTE16 in varchar2 default null
108 ,P_CONT_ATTRIBUTE17 in varchar2 default null
109 ,P_CONT_ATTRIBUTE18 in varchar2 default null
110 ,P_CONT_ATTRIBUTE19 in varchar2 default null
111 ,P_CONT_ATTRIBUTE20 in varchar2 default null
112 ,P_CONT_INFORMATION_CATEGORY in varchar2 default null
113 ,P_CONT_INFORMATION1 in varchar2 default null
114 ,P_CONT_INFORMATION2 in varchar2 default null
115 ,P_CONT_INFORMATION3 in varchar2 default null
116 ,P_CONT_INFORMATION4 in varchar2 default null
117 ,P_CONT_INFORMATION5 in varchar2 default null
118 ,P_CONT_INFORMATION6 in varchar2 default null
119 ,P_CONT_INFORMATION7 in varchar2 default null
120 ,P_CONT_INFORMATION8 in varchar2 default null
121 ,P_CONT_INFORMATION9 in varchar2 default null
122 ,P_CONT_INFORMATION10 in varchar2 default null
123 ,P_CONT_INFORMATION11 in varchar2 default null
124 ,P_CONT_INFORMATION12 in varchar2 default null
125 ,P_CONT_INFORMATION13 in varchar2 default null
126 ,P_CONT_INFORMATION14 in varchar2 default null
127 ,P_CONT_INFORMATION15 in varchar2 default null
128 ,P_CONT_INFORMATION16 in varchar2 default null
129 ,P_CONT_INFORMATION17 in varchar2 default null
130 ,P_CONT_INFORMATION18 in varchar2 default null
131 ,P_CONT_INFORMATION19 in varchar2 default null
132 ,P_CONT_INFORMATION20 in varchar2 default null
133 ,P_THIRD_PARTY_PAY_FLAG in varchar2 default null
134 ,P_BONDHOLDER_FLAG in varchar2 default null
135 ,P_DEPENDENT_FLAG in varchar2 default null
136 ,P_BENEFICIARY_FLAG in varchar2 default null
137 ,P_LAST_NAME in varchar2 default null
138 ,P_SEX in varchar2 default null
139 ,P_PER_COMMENTS in varchar2 default null
140 ,P_DATE_OF_BIRTH in date default null
141 ,P_EMAIL_ADDRESS in varchar2 default null
142 ,P_FIRST_NAME in varchar2 default null
143 ,P_KNOWN_AS in varchar2 default null
144 ,P_MARITAL_STATUS in varchar2 default null
145 ,P_MIDDLE_NAMES in varchar2 default null
146 ,P_NATIONALITY in varchar2 default null
147 ,P_NATIONAL_IDENTIFIER in varchar2 default null
148 ,P_PREVIOUS_LAST_NAME in varchar2 default null
149 ,P_REGISTERED_DISABLED_FLAG in varchar2 default null
150 ,P_TITLE in varchar2 default null
151 ,P_WORK_TELEPHONE in varchar2 default null
152 ,P_ATTRIBUTE_CATEGORY in varchar2 default null
153 ,P_ATTRIBUTE1 in varchar2 default null
154 ,P_ATTRIBUTE2 in varchar2 default null
155 ,P_ATTRIBUTE3 in varchar2 default null
156 ,P_ATTRIBUTE4 in varchar2 default null
157 ,P_ATTRIBUTE5 in varchar2 default null
158 ,P_ATTRIBUTE6 in varchar2 default null
159 ,P_ATTRIBUTE7 in varchar2 default null
160 ,P_ATTRIBUTE8 in varchar2 default null
161 ,P_ATTRIBUTE9 in varchar2 default null
162 ,P_ATTRIBUTE10 in varchar2 default null
163 ,P_ATTRIBUTE11 in varchar2 default null
164 ,P_ATTRIBUTE12 in varchar2 default null
165 ,P_ATTRIBUTE13 in varchar2 default null
166 ,P_ATTRIBUTE14 in varchar2 default null
167 ,P_ATTRIBUTE15 in varchar2 default null
168 ,P_ATTRIBUTE16 in varchar2 default null
169 ,P_ATTRIBUTE17 in varchar2 default null
170 ,P_ATTRIBUTE18 in varchar2 default null
171 ,P_ATTRIBUTE19 in varchar2 default null
172 ,P_ATTRIBUTE20 in varchar2 default null
173 ,P_ATTRIBUTE21 in varchar2 default null
174 ,P_ATTRIBUTE22 in varchar2 default null
175 ,P_ATTRIBUTE23 in varchar2 default null
176 ,P_ATTRIBUTE24 in varchar2 default null
177 ,P_ATTRIBUTE25 in varchar2 default null
178 ,P_ATTRIBUTE26 in varchar2 default null
179 ,P_ATTRIBUTE27 in varchar2 default null
180 ,P_ATTRIBUTE28 in varchar2 default null
181 ,P_ATTRIBUTE29 in varchar2 default null
182 ,P_ATTRIBUTE30 in varchar2 default null
183 ,P_PER_INFORMATION_CATEGORY in varchar2 default null
184 ,P_PER_INFORMATION1 in varchar2 default null
185 ,P_PER_INFORMATION2 in varchar2 default null
186 ,P_PER_INFORMATION3 in varchar2 default null
187 ,P_PER_INFORMATION4 in varchar2 default null
188 ,P_PER_INFORMATION5 in varchar2 default null
189 ,P_PER_INFORMATION6 in varchar2 default null
190 ,P_PER_INFORMATION7 in varchar2 default null
191 ,P_PER_INFORMATION8 in varchar2 default null
192 ,P_PER_INFORMATION9 in varchar2 default null
193 ,P_PER_INFORMATION10 in varchar2 default null
194 ,P_PER_INFORMATION11 in varchar2 default null
195 ,P_PER_INFORMATION12 in varchar2 default null
196 ,P_PER_INFORMATION13 in varchar2 default null
197 ,P_PER_INFORMATION14 in varchar2 default null
198 ,P_PER_INFORMATION15 in varchar2 default null
199 ,P_PER_INFORMATION16 in varchar2 default null
200 ,P_PER_INFORMATION17 in varchar2 default null
201 ,P_PER_INFORMATION18 in varchar2 default null
202 ,P_PER_INFORMATION19 in varchar2 default null
203 ,P_PER_INFORMATION20 in varchar2 default null
204 ,P_PER_INFORMATION21 in varchar2 default null
205 ,P_PER_INFORMATION22 in varchar2 default null
206 ,P_PER_INFORMATION23 in varchar2 default null
207 ,P_PER_INFORMATION24 in varchar2 default null
208 ,P_PER_INFORMATION25 in varchar2 default null
209 ,P_PER_INFORMATION26 in varchar2 default null
210 ,P_PER_INFORMATION27 in varchar2 default null
211 ,P_PER_INFORMATION28 in varchar2 default null
212 ,P_PER_INFORMATION29 in varchar2 default null
213 ,P_PER_INFORMATION30 in varchar2 default null
214 ,P_CORRESPONDENCE_LANGUAGE in varchar2 default null
215 ,P_HONORS in varchar2 default null
216 ,P_PRE_NAME_ADJUNCT in varchar2 default null
217 ,P_SUFFIX in varchar2 default null
218 ,P_CREATE_MIRROR_FLAG in varchar2 default null
219 ,P_MIRROR_TYPE in varchar2 default null
220 ,P_MIRROR_CONT_ATTRIBUTE_CAT in varchar2 default null
221 ,P_MIRROR_CONT_ATTRIBUTE1 in varchar2 default null
222 ,P_MIRROR_CONT_ATTRIBUTE2 in varchar2 default null
223 ,P_MIRROR_CONT_ATTRIBUTE3 in varchar2 default null
224 ,P_MIRROR_CONT_ATTRIBUTE4 in varchar2 default null
225 ,P_MIRROR_CONT_ATTRIBUTE5 in varchar2 default null
226 ,P_MIRROR_CONT_ATTRIBUTE6 in varchar2 default null
230 ,P_MIRROR_CONT_ATTRIBUTE10 in varchar2 default null
227 ,P_MIRROR_CONT_ATTRIBUTE7 in varchar2 default null
228 ,P_MIRROR_CONT_ATTRIBUTE8 in varchar2 default null
229 ,P_MIRROR_CONT_ATTRIBUTE9 in varchar2 default null
231 ,P_MIRROR_CONT_ATTRIBUTE11 in varchar2 default null
232 ,P_MIRROR_CONT_ATTRIBUTE12 in varchar2 default null
233 ,P_MIRROR_CONT_ATTRIBUTE13 in varchar2 default null
234 ,P_MIRROR_CONT_ATTRIBUTE14 in varchar2 default null
235 ,P_MIRROR_CONT_ATTRIBUTE15 in varchar2 default null
236 ,P_MIRROR_CONT_ATTRIBUTE16 in varchar2 default null
237 ,P_MIRROR_CONT_ATTRIBUTE17 in varchar2 default null
238 ,P_MIRROR_CONT_ATTRIBUTE18 in varchar2 default null
239 ,P_MIRROR_CONT_ATTRIBUTE19 in varchar2 default null
240 ,P_MIRROR_CONT_ATTRIBUTE20 in varchar2 default null
241 ,P_MIRROR_CONT_INFORMATION_CAT in varchar2 default null
242 ,P_MIRROR_CONT_INFORMATION1 in varchar2 default null
243 ,P_MIRROR_CONT_INFORMATION2 in varchar2 default null
244 ,P_MIRROR_CONT_INFORMATION3 in varchar2 default null
245 ,P_MIRROR_CONT_INFORMATION4 in varchar2 default null
246 ,P_MIRROR_CONT_INFORMATION5 in varchar2 default null
247 ,P_MIRROR_CONT_INFORMATION6 in varchar2 default null
248 ,P_MIRROR_CONT_INFORMATION7 in varchar2 default null
249 ,P_MIRROR_CONT_INFORMATION8 in varchar2 default null
250 ,P_MIRROR_CONT_INFORMATION9 in varchar2 default null
251 ,P_MIRROR_CONT_INFORMATION10 in varchar2 default null
252 ,P_MIRROR_CONT_INFORMATION11 in varchar2 default null
253 ,P_MIRROR_CONT_INFORMATION12 in varchar2 default null
254 ,P_MIRROR_CONT_INFORMATION13 in varchar2 default null
255 ,P_MIRROR_CONT_INFORMATION14 in varchar2 default null
256 ,P_MIRROR_CONT_INFORMATION15 in varchar2 default null
257 ,P_MIRROR_CONT_INFORMATION16 in varchar2 default null
258 ,P_MIRROR_CONT_INFORMATION17 in varchar2 default null
259 ,P_MIRROR_CONT_INFORMATION18 in varchar2 default null
260 ,P_MIRROR_CONT_INFORMATION19 in varchar2 default null
261 ,P_MIRROR_CONT_INFORMATION20 in varchar2 default null
262 ,P_PER_PERSON_USER_KEY in varchar2
263 ,P_PERSON_USER_KEY in varchar2
264 ,P_CONTACT_PERSON_USER_KEY in varchar2 default null
265 ,P_START_LIFE_REASON in varchar2 default null
266 ,P_END_LIFE_REASON in varchar2 default null
267 ,P_USER_PERSON_TYPE in varchar2 default null
268 ,P_LANGUAGE_CODE in varchar2 default null) is
269 blid number := p_data_pump_batch_line_id;
270 begin
271 if blid is not null then
272 delete from hr_pump_batch_lines where batch_line_id = blid;
273 delete from hr_pump_batch_exceptions
274 where source_type = 'BATCH_LINE' and source_id = blid;
275 end if;
276 insert into hr_pump_batch_lines
277 (batch_id
278 ,batch_line_id
279 ,business_group_name
280 ,api_module_id
281 ,line_status
282 ,user_sequence
283 ,link_value
284 ,pval001
285 ,pval002
286 ,pval003
287 ,pval004
288 ,pval005
289 ,pval006
290 ,pval007
291 ,pval008
292 ,pval009
293 ,pval010
294 ,pval011
295 ,pval012
296 ,pval013
297 ,pval014
298 ,pval015
299 ,pval016
300 ,pval017
301 ,pval018
302 ,pval019
303 ,pval020
304 ,pval021
305 ,pval022
306 ,pval023
307 ,pval024
308 ,pval025
309 ,pval026
310 ,pval027
311 ,pval028
312 ,pval029
313 ,pval030
314 ,pval031
315 ,pval032
316 ,pval033
317 ,pval034
318 ,pval035
319 ,pval036
320 ,pval037
321 ,pval038
322 ,pval039
323 ,pval040
324 ,pval041
325 ,pval042
326 ,pval043
327 ,pval044
328 ,pval045
329 ,pval046
330 ,pval047
331 ,pval048
332 ,pval049
333 ,pval050
334 ,pval051
335 ,pval052
336 ,pval053
337 ,pval054
338 ,pval055
339 ,pval056
340 ,pval057
341 ,pval058
342 ,pval059
343 ,pval060
344 ,pval061
345 ,pval062
346 ,pval063
347 ,pval064
348 ,pval065
349 ,pval066
350 ,pval067
351 ,pval068
352 ,pval069
353 ,pval070
354 ,pval071
355 ,pval072
356 ,pval073
357 ,pval074
358 ,pval075
359 ,pval076
360 ,pval077
361 ,pval078
362 ,pval079
363 ,pval080
364 ,pval081
365 ,pval082
366 ,pval083
367 ,pval084
368 ,pval085
369 ,pval086
370 ,pval087
371 ,pval088
372 ,pval089
373 ,pval090
374 ,pval091
375 ,pval092
379 ,pval096
376 ,pval093
377 ,pval094
378 ,pval095
380 ,pval097
381 ,pval098
382 ,pval099
383 ,pval100
384 ,pval101
385 ,pval102
386 ,pval103
387 ,pval104
388 ,pval105
389 ,pval106
390 ,pval107
391 ,pval108
392 ,pval109
393 ,pval110
394 ,pval111
395 ,pval112
396 ,pval113
397 ,pval114
398 ,pval115
399 ,pval116
400 ,pval117
401 ,pval118
402 ,pval119
403 ,pval120
404 ,pval121
405 ,pval122
406 ,pval123
407 ,pval124
408 ,pval125
409 ,pval126
410 ,pval127
411 ,pval128
412 ,pval129
413 ,pval130
414 ,pval131
415 ,pval132
416 ,pval133
417 ,pval134
418 ,pval135
419 ,pval136
420 ,pval137
421 ,pval138
422 ,pval139
423 ,pval140
424 ,pval141
425 ,pval142
426 ,pval143
427 ,pval144
428 ,pval145
429 ,pval146
430 ,pval147
431 ,pval148
432 ,pval149
433 ,pval150
434 ,pval151
435 ,pval152
436 ,pval153
437 ,pval154
438 ,pval155
439 ,pval156
440 ,pval157
441 ,pval158
442 ,pval159
443 ,pval160
444 ,pval161
445 ,pval162
446 ,pval163
447 ,pval164
448 ,pval165
449 ,pval166
450 ,pval167
451 ,pval168
452 ,pval169
453 ,pval170
454 ,pval171
455 ,pval172
456 ,pval173
457 ,pval174
458 ,pval175
459 ,pval176
460 ,pval177
461 ,pval178
462 ,pval179
463 ,pval180
464 ,pval183
465 ,pval191
466 ,pval192
467 ,pval193
468 ,pval194
469 ,pval195
470 ,pval196)
471 values
472 (p_batch_id
473 ,nvl(blid,hr_pump_batch_lines_s.nextval)
474 ,p_data_pump_business_grp_name
475 ,1238
476 ,'U'
477 ,p_user_sequence
478 ,p_link_value
479 ,dc(P_START_DATE)
480 ,P_CONTACT_TYPE
481 ,P_CTR_COMMENTS
482 ,P_PRIMARY_CONTACT_FLAG
483 ,dc(P_DATE_START)
484 ,dc(P_DATE_END)
485 ,P_RLTD_PER_RSDS_W_DSGNTR_FLAG
486 ,P_PERSONAL_FLAG
487 ,P_SEQUENCE_NUMBER
488 ,P_CONT_ATTRIBUTE_CATEGORY
489 ,P_CONT_ATTRIBUTE1
490 ,P_CONT_ATTRIBUTE2
491 ,P_CONT_ATTRIBUTE3
492 ,P_CONT_ATTRIBUTE4
493 ,P_CONT_ATTRIBUTE5
494 ,P_CONT_ATTRIBUTE6
495 ,P_CONT_ATTRIBUTE7
496 ,P_CONT_ATTRIBUTE8
497 ,P_CONT_ATTRIBUTE9
498 ,P_CONT_ATTRIBUTE10
499 ,P_CONT_ATTRIBUTE11
500 ,P_CONT_ATTRIBUTE12
501 ,P_CONT_ATTRIBUTE13
502 ,P_CONT_ATTRIBUTE14
503 ,P_CONT_ATTRIBUTE15
504 ,P_CONT_ATTRIBUTE16
505 ,P_CONT_ATTRIBUTE17
506 ,P_CONT_ATTRIBUTE18
507 ,P_CONT_ATTRIBUTE19
508 ,P_CONT_ATTRIBUTE20
509 ,P_CONT_INFORMATION_CATEGORY
510 ,P_CONT_INFORMATION1
511 ,P_CONT_INFORMATION2
512 ,P_CONT_INFORMATION3
513 ,P_CONT_INFORMATION4
514 ,P_CONT_INFORMATION5
515 ,P_CONT_INFORMATION6
516 ,P_CONT_INFORMATION7
517 ,P_CONT_INFORMATION8
518 ,P_CONT_INFORMATION9
519 ,P_CONT_INFORMATION10
520 ,P_CONT_INFORMATION11
521 ,P_CONT_INFORMATION12
522 ,P_CONT_INFORMATION13
523 ,P_CONT_INFORMATION14
524 ,P_CONT_INFORMATION15
525 ,P_CONT_INFORMATION16
526 ,P_CONT_INFORMATION17
527 ,P_CONT_INFORMATION18
528 ,P_CONT_INFORMATION19
529 ,P_CONT_INFORMATION20
530 ,P_THIRD_PARTY_PAY_FLAG
531 ,P_BONDHOLDER_FLAG
532 ,P_DEPENDENT_FLAG
533 ,P_BENEFICIARY_FLAG
534 ,P_LAST_NAME
535 ,P_SEX
536 ,P_PER_COMMENTS
537 ,dc(P_DATE_OF_BIRTH)
538 ,P_EMAIL_ADDRESS
539 ,P_FIRST_NAME
540 ,P_KNOWN_AS
541 ,P_MARITAL_STATUS
542 ,P_MIDDLE_NAMES
543 ,P_NATIONALITY
544 ,P_NATIONAL_IDENTIFIER
545 ,P_PREVIOUS_LAST_NAME
546 ,P_REGISTERED_DISABLED_FLAG
547 ,P_TITLE
548 ,P_WORK_TELEPHONE
549 ,P_ATTRIBUTE_CATEGORY
550 ,P_ATTRIBUTE1
551 ,P_ATTRIBUTE2
552 ,P_ATTRIBUTE3
553 ,P_ATTRIBUTE4
554 ,P_ATTRIBUTE5
555 ,P_ATTRIBUTE6
556 ,P_ATTRIBUTE7
557 ,P_ATTRIBUTE8
558 ,P_ATTRIBUTE9
559 ,P_ATTRIBUTE10
560 ,P_ATTRIBUTE11
561 ,P_ATTRIBUTE12
562 ,P_ATTRIBUTE13
563 ,P_ATTRIBUTE14
564 ,P_ATTRIBUTE15
565 ,P_ATTRIBUTE16
566 ,P_ATTRIBUTE17
567 ,P_ATTRIBUTE18
568 ,P_ATTRIBUTE19
569 ,P_ATTRIBUTE20
570 ,P_ATTRIBUTE21
571 ,P_ATTRIBUTE22
572 ,P_ATTRIBUTE23
573 ,P_ATTRIBUTE24
574 ,P_ATTRIBUTE25
575 ,P_ATTRIBUTE26
576 ,P_ATTRIBUTE27
577 ,P_ATTRIBUTE28
578 ,P_ATTRIBUTE29
579 ,P_ATTRIBUTE30
580 ,P_PER_INFORMATION_CATEGORY
581 ,P_PER_INFORMATION1
582 ,P_PER_INFORMATION2
583 ,P_PER_INFORMATION3
584 ,P_PER_INFORMATION4
585 ,P_PER_INFORMATION5
586 ,P_PER_INFORMATION6
587 ,P_PER_INFORMATION7
588 ,P_PER_INFORMATION8
589 ,P_PER_INFORMATION9
590 ,P_PER_INFORMATION10
591 ,P_PER_INFORMATION11
592 ,P_PER_INFORMATION12
593 ,P_PER_INFORMATION13
594 ,P_PER_INFORMATION14
595 ,P_PER_INFORMATION15
596 ,P_PER_INFORMATION16
597 ,P_PER_INFORMATION17
598 ,P_PER_INFORMATION18
599 ,P_PER_INFORMATION19
600 ,P_PER_INFORMATION20
601 ,P_PER_INFORMATION21
602 ,P_PER_INFORMATION22
603 ,P_PER_INFORMATION23
604 ,P_PER_INFORMATION24
605 ,P_PER_INFORMATION25
606 ,P_PER_INFORMATION26
607 ,P_PER_INFORMATION27
608 ,P_PER_INFORMATION28
609 ,P_PER_INFORMATION29
610 ,P_PER_INFORMATION30
611 ,P_CORRESPONDENCE_LANGUAGE
615 ,P_CREATE_MIRROR_FLAG
612 ,P_HONORS
613 ,P_PRE_NAME_ADJUNCT
614 ,P_SUFFIX
616 ,P_MIRROR_TYPE
617 ,P_MIRROR_CONT_ATTRIBUTE_CAT
618 ,P_MIRROR_CONT_ATTRIBUTE1
619 ,P_MIRROR_CONT_ATTRIBUTE2
620 ,P_MIRROR_CONT_ATTRIBUTE3
621 ,P_MIRROR_CONT_ATTRIBUTE4
622 ,P_MIRROR_CONT_ATTRIBUTE5
623 ,P_MIRROR_CONT_ATTRIBUTE6
624 ,P_MIRROR_CONT_ATTRIBUTE7
625 ,P_MIRROR_CONT_ATTRIBUTE8
626 ,P_MIRROR_CONT_ATTRIBUTE9
627 ,P_MIRROR_CONT_ATTRIBUTE10
628 ,P_MIRROR_CONT_ATTRIBUTE11
629 ,P_MIRROR_CONT_ATTRIBUTE12
630 ,P_MIRROR_CONT_ATTRIBUTE13
631 ,P_MIRROR_CONT_ATTRIBUTE14
632 ,P_MIRROR_CONT_ATTRIBUTE15
633 ,P_MIRROR_CONT_ATTRIBUTE16
634 ,P_MIRROR_CONT_ATTRIBUTE17
635 ,P_MIRROR_CONT_ATTRIBUTE18
636 ,P_MIRROR_CONT_ATTRIBUTE19
637 ,P_MIRROR_CONT_ATTRIBUTE20
638 ,P_MIRROR_CONT_INFORMATION_CAT
639 ,P_MIRROR_CONT_INFORMATION1
640 ,P_MIRROR_CONT_INFORMATION2
641 ,P_MIRROR_CONT_INFORMATION3
642 ,P_MIRROR_CONT_INFORMATION4
643 ,P_MIRROR_CONT_INFORMATION5
644 ,P_MIRROR_CONT_INFORMATION6
645 ,P_MIRROR_CONT_INFORMATION7
646 ,P_MIRROR_CONT_INFORMATION8
647 ,P_MIRROR_CONT_INFORMATION9
648 ,P_MIRROR_CONT_INFORMATION10
649 ,P_MIRROR_CONT_INFORMATION11
650 ,P_MIRROR_CONT_INFORMATION12
651 ,P_MIRROR_CONT_INFORMATION13
652 ,P_MIRROR_CONT_INFORMATION14
653 ,P_MIRROR_CONT_INFORMATION15
654 ,P_MIRROR_CONT_INFORMATION16
655 ,P_MIRROR_CONT_INFORMATION17
656 ,P_MIRROR_CONT_INFORMATION18
657 ,P_MIRROR_CONT_INFORMATION19
658 ,P_MIRROR_CONT_INFORMATION20
659 ,P_PER_PERSON_USER_KEY
660 ,P_PERSON_USER_KEY
661 ,P_CONTACT_PERSON_USER_KEY
662 ,P_START_LIFE_REASON
663 ,P_END_LIFE_REASON
664 ,P_USER_PERSON_TYPE
665 ,P_LANGUAGE_CODE);
666 end insert_batch_lines;
667 --
668 procedure call
669 (p_business_group_id in number,
670 p_batch_line_id     in number) is
671 cursor cr is
672 select l.rowid myrowid,
673 decode(l.pval001,cn,dn,d(l.pval001)) p1,
674 decode(l.pval002,cn,vn,
675  hr_pump_get.gl(l.pval002,'CONTACT',d(l.pval001),l.pval196)) p2,
676 decode(l.pval003,cn,vn,vn,vn,l.pval003) p3,
677 l.pval003 d3,
678 decode(l.pval004,cn,vn,vn,'N',
679  hr_pump_get.gl(l.pval004,'YES_NO',d(l.pval001),l.pval196)) p4,
680 l.pval004 d4,
681 decode(l.pval005,cn,dn,vn,dn,d(l.pval005)) p5,
682 l.pval005 d5,
683 decode(l.pval006,cn,dn,vn,dn,d(l.pval006)) p6,
684 l.pval006 d6,
685 decode(l.pval007,cn,vn,vn,'N',
686  hr_pump_get.gl(l.pval007,'YES_NO',d(l.pval001),l.pval196)) p7,
687 l.pval007 d7,
688 decode(l.pval008,cn,vn,vn,'N',
689  hr_pump_get.gl(l.pval008,'YES_NO',d(l.pval001),l.pval196)) p8,
690 l.pval008 d8,
691 decode(l.pval009,cn,nn,vn,nn,n(l.pval009)) p9,
692 l.pval009 d9,
693 decode(l.pval010,cn,vn,vn,vn,l.pval010) p10,
694 l.pval010 d10,
695 decode(l.pval011,cn,vn,vn,vn,l.pval011) p11,
696 l.pval011 d11,
697 decode(l.pval012,cn,vn,vn,vn,l.pval012) p12,
698 l.pval012 d12,
699 decode(l.pval013,cn,vn,vn,vn,l.pval013) p13,
700 l.pval013 d13,
701 decode(l.pval014,cn,vn,vn,vn,l.pval014) p14,
702 l.pval014 d14,
703 decode(l.pval015,cn,vn,vn,vn,l.pval015) p15,
704 l.pval015 d15,
705 decode(l.pval016,cn,vn,vn,vn,l.pval016) p16,
706 l.pval016 d16,
707 decode(l.pval017,cn,vn,vn,vn,l.pval017) p17,
708 l.pval017 d17,
709 decode(l.pval018,cn,vn,vn,vn,l.pval018) p18,
710 l.pval018 d18,
711 decode(l.pval019,cn,vn,vn,vn,l.pval019) p19,
712 l.pval019 d19,
713 decode(l.pval020,cn,vn,vn,vn,l.pval020) p20,
714 l.pval020 d20,
715 decode(l.pval021,cn,vn,vn,vn,l.pval021) p21,
716 l.pval021 d21,
717 decode(l.pval022,cn,vn,vn,vn,l.pval022) p22,
718 l.pval022 d22,
719 decode(l.pval023,cn,vn,vn,vn,l.pval023) p23,
720 l.pval023 d23,
721 decode(l.pval024,cn,vn,vn,vn,l.pval024) p24,
722 l.pval024 d24,
723 decode(l.pval025,cn,vn,vn,vn,l.pval025) p25,
724 l.pval025 d25,
725 decode(l.pval026,cn,vn,vn,vn,l.pval026) p26,
726 l.pval026 d26,
727 decode(l.pval027,cn,vn,vn,vn,l.pval027) p27,
728 l.pval027 d27,
729 decode(l.pval028,cn,vn,vn,vn,l.pval028) p28,
730 l.pval028 d28,
731 decode(l.pval029,cn,vn,vn,vn,l.pval029) p29,
732 l.pval029 d29,
733 decode(l.pval030,cn,vn,vn,vn,l.pval030) p30,
734 l.pval030 d30,
735 decode(l.pval031,cn,vn,vn,vn,l.pval031) p31,
736 l.pval031 d31,
737 decode(l.pval032,cn,vn,vn,vn,l.pval032) p32,
738 l.pval032 d32,
739 decode(l.pval033,cn,vn,vn,vn,l.pval033) p33,
740 l.pval033 d33,
744 l.pval035 d35,
741 decode(l.pval034,cn,vn,vn,vn,l.pval034) p34,
742 l.pval034 d34,
743 decode(l.pval035,cn,vn,vn,vn,l.pval035) p35,
745 decode(l.pval036,cn,vn,vn,vn,l.pval036) p36,
746 l.pval036 d36,
747 decode(l.pval037,cn,vn,vn,vn,l.pval037) p37,
748 l.pval037 d37,
749 decode(l.pval038,cn,vn,vn,vn,l.pval038) p38,
750 l.pval038 d38,
751 decode(l.pval039,cn,vn,vn,vn,l.pval039) p39,
752 l.pval039 d39,
753 decode(l.pval040,cn,vn,vn,vn,l.pval040) p40,
754 l.pval040 d40,
755 decode(l.pval041,cn,vn,vn,vn,l.pval041) p41,
756 l.pval041 d41,
757 decode(l.pval042,cn,vn,vn,vn,l.pval042) p42,
758 l.pval042 d42,
759 decode(l.pval043,cn,vn,vn,vn,l.pval043) p43,
760 l.pval043 d43,
761 decode(l.pval044,cn,vn,vn,vn,l.pval044) p44,
762 l.pval044 d44,
763 decode(l.pval045,cn,vn,vn,vn,l.pval045) p45,
764 l.pval045 d45,
765 decode(l.pval046,cn,vn,vn,vn,l.pval046) p46,
766 l.pval046 d46,
767 decode(l.pval047,cn,vn,vn,vn,l.pval047) p47,
768 l.pval047 d47,
769 decode(l.pval048,cn,vn,vn,vn,l.pval048) p48,
770 l.pval048 d48,
771 decode(l.pval049,cn,vn,vn,vn,l.pval049) p49,
772 l.pval049 d49,
773 decode(l.pval050,cn,vn,vn,vn,l.pval050) p50,
774 l.pval050 d50,
775 decode(l.pval051,cn,vn,vn,vn,l.pval051) p51,
776 l.pval051 d51,
777 decode(l.pval052,cn,vn,vn,'N',
778  hr_pump_get.gl(l.pval052,'YES_NO',d(l.pval001),l.pval196)) p52,
779 l.pval052 d52,
780 decode(l.pval053,cn,vn,vn,'N',
781  hr_pump_get.gl(l.pval053,'YES_NO',d(l.pval001),l.pval196)) p53,
782 l.pval053 d53,
783 decode(l.pval054,cn,vn,vn,'N',
784  hr_pump_get.gl(l.pval054,'YES_NO',d(l.pval001),l.pval196)) p54,
785 l.pval054 d54,
786 decode(l.pval055,cn,vn,vn,'N',
787  hr_pump_get.gl(l.pval055,'YES_NO',d(l.pval001),l.pval196)) p55,
788 l.pval055 d55,
789 decode(l.pval056,cn,vn,vn,vn,l.pval056) p56,
790 l.pval056 d56,
791 decode(l.pval057,cn,vn,vn,vn,
792  hr_pump_get.gl(l.pval057,'SEX',d(l.pval001),l.pval196)) p57,
793 l.pval057 d57,
794 decode(l.pval058,cn,vn,vn,vn,l.pval058) p58,
795 l.pval058 d58,
796 decode(l.pval059,cn,dn,vn,dn,d(l.pval059)) p59,
797 l.pval059 d59,
798 decode(l.pval060,cn,vn,vn,vn,l.pval060) p60,
799 l.pval060 d60,
800 decode(l.pval061,cn,vn,vn,vn,l.pval061) p61,
801 l.pval061 d61,
802 decode(l.pval062,cn,vn,vn,vn,l.pval062) p62,
803 l.pval062 d62,
804 decode(l.pval063,cn,vn,vn,vn,
805  hr_pump_get.gl(l.pval063,'MAR_STATUS',d(l.pval001),l.pval196)) p63,
806 l.pval063 d63,
807 decode(l.pval064,cn,vn,vn,vn,l.pval064) p64,
808 l.pval064 d64,
809 decode(l.pval065,cn,vn,vn,vn,
810  hr_pump_get.gl(l.pval065,'NATIONALITY',d(l.pval001),l.pval196)) p65,
811 l.pval065 d65,
812 decode(l.pval066,cn,vn,vn,vn,l.pval066) p66,
813 l.pval066 d66,
814 decode(l.pval067,cn,vn,vn,vn,l.pval067) p67,
815 l.pval067 d67,
816 decode(l.pval068,cn,vn,vn,vn,
817  hr_pump_get.gl(l.pval068,'REGISTERED_DISABLED',d(l.pval001),l.pval196)) p68,
818 l.pval068 d68,
819 decode(l.pval069,cn,vn,vn,vn,
820  hr_pump_get.gl(l.pval069,'TITLE',d(l.pval001),l.pval196)) p69,
821 l.pval069 d69,
822 decode(l.pval070,cn,vn,vn,vn,l.pval070) p70,
823 l.pval070 d70,
824 decode(l.pval071,cn,vn,vn,vn,l.pval071) p71,
825 l.pval071 d71,
826 decode(l.pval072,cn,vn,vn,vn,l.pval072) p72,
827 l.pval072 d72,
828 decode(l.pval073,cn,vn,vn,vn,l.pval073) p73,
829 l.pval073 d73,
830 decode(l.pval074,cn,vn,vn,vn,l.pval074) p74,
831 l.pval074 d74,
832 decode(l.pval075,cn,vn,vn,vn,l.pval075) p75,
833 l.pval075 d75,
834 decode(l.pval076,cn,vn,vn,vn,l.pval076) p76,
835 l.pval076 d76,
836 decode(l.pval077,cn,vn,vn,vn,l.pval077) p77,
837 l.pval077 d77,
838 decode(l.pval078,cn,vn,vn,vn,l.pval078) p78,
842 decode(l.pval080,cn,vn,vn,vn,l.pval080) p80,
839 l.pval078 d78,
840 decode(l.pval079,cn,vn,vn,vn,l.pval079) p79,
841 l.pval079 d79,
843 l.pval080 d80,
844 decode(l.pval081,cn,vn,vn,vn,l.pval081) p81,
845 l.pval081 d81,
846 decode(l.pval082,cn,vn,vn,vn,l.pval082) p82,
847 l.pval082 d82,
848 decode(l.pval083,cn,vn,vn,vn,l.pval083) p83,
849 l.pval083 d83,
850 decode(l.pval084,cn,vn,vn,vn,l.pval084) p84,
851 l.pval084 d84,
852 decode(l.pval085,cn,vn,vn,vn,l.pval085) p85,
853 l.pval085 d85,
854 decode(l.pval086,cn,vn,vn,vn,l.pval086) p86,
855 l.pval086 d86,
856 decode(l.pval087,cn,vn,vn,vn,l.pval087) p87,
857 l.pval087 d87,
858 decode(l.pval088,cn,vn,vn,vn,l.pval088) p88,
859 l.pval088 d88,
860 decode(l.pval089,cn,vn,vn,vn,l.pval089) p89,
861 l.pval089 d89,
862 decode(l.pval090,cn,vn,vn,vn,l.pval090) p90,
863 l.pval090 d90,
864 decode(l.pval091,cn,vn,vn,vn,l.pval091) p91,
865 l.pval091 d91,
866 decode(l.pval092,cn,vn,vn,vn,l.pval092) p92,
867 l.pval092 d92,
868 decode(l.pval093,cn,vn,vn,vn,l.pval093) p93,
869 l.pval093 d93,
870 decode(l.pval094,cn,vn,vn,vn,l.pval094) p94,
871 l.pval094 d94,
872 decode(l.pval095,cn,vn,vn,vn,l.pval095) p95,
873 l.pval095 d95,
874 decode(l.pval096,cn,vn,vn,vn,l.pval096) p96,
875 l.pval096 d96,
876 decode(l.pval097,cn,vn,vn,vn,l.pval097) p97,
877 l.pval097 d97,
878 decode(l.pval098,cn,vn,vn,vn,l.pval098) p98,
879 l.pval098 d98,
880 decode(l.pval099,cn,vn,vn,vn,l.pval099) p99,
881 l.pval099 d99,
882 decode(l.pval100,cn,vn,vn,vn,l.pval100) p100,
883 l.pval100 d100,
884 decode(l.pval101,cn,vn,vn,vn,l.pval101) p101,
885 l.pval101 d101,
886 decode(l.pval102,cn,vn,vn,vn,l.pval102) p102,
887 l.pval102 d102,
888 decode(l.pval103,cn,vn,vn,vn,l.pval103) p103,
889 l.pval103 d103,
890 decode(l.pval104,cn,vn,vn,vn,l.pval104) p104,
891 l.pval104 d104,
892 decode(l.pval105,cn,vn,vn,vn,l.pval105) p105,
893 l.pval105 d105,
894 decode(l.pval106,cn,vn,vn,vn,l.pval106) p106,
895 l.pval106 d106,
896 decode(l.pval107,cn,vn,vn,vn,l.pval107) p107,
897 l.pval107 d107,
898 decode(l.pval108,cn,vn,vn,vn,l.pval108) p108,
899 l.pval108 d108,
900 decode(l.pval109,cn,vn,vn,vn,l.pval109) p109,
901 l.pval109 d109,
902 decode(l.pval110,cn,vn,vn,vn,l.pval110) p110,
903 l.pval110 d110,
904 decode(l.pval111,cn,vn,vn,vn,l.pval111) p111,
905 l.pval111 d111,
906 decode(l.pval112,cn,vn,vn,vn,l.pval112) p112,
907 l.pval112 d112,
908 decode(l.pval113,cn,vn,vn,vn,l.pval113) p113,
909 l.pval113 d113,
910 decode(l.pval114,cn,vn,vn,vn,l.pval114) p114,
911 l.pval114 d114,
912 decode(l.pval115,cn,vn,vn,vn,l.pval115) p115,
913 l.pval115 d115,
914 decode(l.pval116,cn,vn,vn,vn,l.pval116) p116,
915 l.pval116 d116,
916 decode(l.pval117,cn,vn,vn,vn,l.pval117) p117,
917 l.pval117 d117,
918 decode(l.pval118,cn,vn,vn,vn,l.pval118) p118,
919 l.pval118 d118,
920 decode(l.pval119,cn,vn,vn,vn,l.pval119) p119,
921 l.pval119 d119,
922 decode(l.pval120,cn,vn,vn,vn,l.pval120) p120,
923 l.pval120 d120,
924 decode(l.pval121,cn,vn,vn,vn,l.pval121) p121,
925 l.pval121 d121,
926 decode(l.pval122,cn,vn,vn,vn,l.pval122) p122,
927 l.pval122 d122,
928 decode(l.pval123,cn,vn,vn,vn,l.pval123) p123,
929 l.pval123 d123,
930 decode(l.pval124,cn,vn,vn,vn,l.pval124) p124,
931 l.pval124 d124,
932 decode(l.pval125,cn,vn,vn,vn,l.pval125) p125,
933 l.pval125 d125,
934 decode(l.pval126,cn,vn,vn,vn,l.pval126) p126,
935 l.pval126 d126,
936 decode(l.pval127,cn,vn,vn,vn,l.pval127) p127,
937 l.pval127 d127,
938 decode(l.pval128,cn,vn,vn,vn,l.pval128) p128,
939 l.pval128 d128,
940 decode(l.pval129,cn,vn,vn,vn,l.pval129) p129,
941 l.pval129 d129,
942 decode(l.pval130,cn,vn,vn,vn,l.pval130) p130,
943 l.pval130 d130,
944 decode(l.pval131,cn,vn,vn,vn,l.pval131) p131,
945 l.pval131 d131,
946 decode(l.pval132,cn,vn,vn,vn,l.pval132) p132,
947 l.pval132 d132,
948 decode(l.pval133,cn,vn,vn,vn,l.pval133) p133,
949 l.pval133 d133,
950 decode(l.pval134,cn,vn,vn,vn,l.pval134) p134,
951 l.pval134 d134,
952 decode(l.pval135,cn,vn,vn,vn,l.pval135) p135,
953 l.pval135 d135,
954 decode(l.pval136,cn,vn,vn,vn,l.pval136) p136,
955 l.pval136 d136,
956 decode(l.pval137,cn,vn,vn,'N',
957  hr_pump_get.gl(l.pval137,'YES_NO',d(l.pval001),l.pval196)) p137,
958 l.pval137 d137,
959 decode(l.pval138,cn,vn,vn,vn,
960  hr_pump_get.gl(l.pval138,'CONTACT_TYPE',d(l.pval001),l.pval196)) p138,
961 l.pval138 d138,
962 decode(l.pval139,cn,vn,vn,vn,l.pval139) p139,
963 l.pval139 d139,
964 decode(l.pval140,cn,vn,vn,vn,l.pval140) p140,
965 l.pval140 d140,
966 decode(l.pval141,cn,vn,vn,vn,l.pval141) p141,
967 l.pval141 d141,
968 decode(l.pval142,cn,vn,vn,vn,l.pval142) p142,
969 l.pval142 d142,
970 decode(l.pval143,cn,vn,vn,vn,l.pval143) p143,
971 l.pval143 d143,
972 decode(l.pval144,cn,vn,vn,vn,l.pval144) p144,
973 l.pval144 d144,
974 decode(l.pval145,cn,vn,vn,vn,l.pval145) p145,
975 l.pval145 d145,
976 decode(l.pval146,cn,vn,vn,vn,l.pval146) p146,
977 l.pval146 d146,
978 decode(l.pval147,cn,vn,vn,vn,l.pval147) p147,
979 l.pval147 d147,
980 decode(l.pval148,cn,vn,vn,vn,l.pval148) p148,
981 l.pval148 d148,
982 decode(l.pval149,cn,vn,vn,vn,l.pval149) p149,
983 l.pval149 d149,
984 decode(l.pval150,cn,vn,vn,vn,l.pval150) p150,
985 l.pval150 d150,
986 decode(l.pval151,cn,vn,vn,vn,l.pval151) p151,
987 l.pval151 d151,
988 decode(l.pval152,cn,vn,vn,vn,l.pval152) p152,
989 l.pval152 d152,
993 l.pval154 d154,
990 decode(l.pval153,cn,vn,vn,vn,l.pval153) p153,
991 l.pval153 d153,
992 decode(l.pval154,cn,vn,vn,vn,l.pval154) p154,
994 decode(l.pval155,cn,vn,vn,vn,l.pval155) p155,
995 l.pval155 d155,
996 decode(l.pval156,cn,vn,vn,vn,l.pval156) p156,
997 l.pval156 d156,
998 decode(l.pval157,cn,vn,vn,vn,l.pval157) p157,
999 l.pval157 d157,
1000 decode(l.pval158,cn,vn,vn,vn,l.pval158) p158,
1001 l.pval158 d158,
1002 decode(l.pval159,cn,vn,vn,vn,l.pval159) p159,
1003 l.pval159 d159,
1004 decode(l.pval160,cn,vn,vn,vn,l.pval160) p160,
1005 l.pval160 d160,
1006 decode(l.pval161,cn,vn,vn,vn,l.pval161) p161,
1007 l.pval161 d161,
1008 decode(l.pval162,cn,vn,vn,vn,l.pval162) p162,
1009 l.pval162 d162,
1010 decode(l.pval163,cn,vn,vn,vn,l.pval163) p163,
1011 l.pval163 d163,
1012 decode(l.pval164,cn,vn,vn,vn,l.pval164) p164,
1013 l.pval164 d164,
1014 decode(l.pval165,cn,vn,vn,vn,l.pval165) p165,
1015 l.pval165 d165,
1016 decode(l.pval166,cn,vn,vn,vn,l.pval166) p166,
1017 l.pval166 d166,
1018 decode(l.pval167,cn,vn,vn,vn,l.pval167) p167,
1019 l.pval167 d167,
1020 decode(l.pval168,cn,vn,vn,vn,l.pval168) p168,
1021 l.pval168 d168,
1022 decode(l.pval169,cn,vn,vn,vn,l.pval169) p169,
1023 l.pval169 d169,
1024 decode(l.pval170,cn,vn,vn,vn,l.pval170) p170,
1025 l.pval170 d170,
1026 decode(l.pval171,cn,vn,vn,vn,l.pval171) p171,
1027 l.pval171 d171,
1028 decode(l.pval172,cn,vn,vn,vn,l.pval172) p172,
1029 l.pval172 d172,
1030 decode(l.pval173,cn,vn,vn,vn,l.pval173) p173,
1031 l.pval173 d173,
1032 decode(l.pval174,cn,vn,vn,vn,l.pval174) p174,
1033 l.pval174 d174,
1034 decode(l.pval175,cn,vn,vn,vn,l.pval175) p175,
1035 l.pval175 d175,
1036 decode(l.pval176,cn,vn,vn,vn,l.pval176) p176,
1037 l.pval176 d176,
1038 decode(l.pval177,cn,vn,vn,vn,l.pval177) p177,
1039 l.pval177 d177,
1040 decode(l.pval178,cn,vn,vn,vn,l.pval178) p178,
1041 l.pval178 d178,
1042 decode(l.pval179,cn,vn,vn,vn,l.pval179) p179,
1043 l.pval179 d179,
1044 decode(l.pval180,cn,vn,vn,vn,l.pval180) p180,
1045 l.pval180 d180,
1046 l.pval181 p181,
1047 l.pval182 p182,
1048 l.pval183 p183,
1049 l.pval184 p184,
1050 decode(l.pval185,cn,dn,d(l.pval185)) p185,
1051 decode(l.pval186,cn,dn,d(l.pval186)) p186,
1052 l.pval187 p187,
1053 l.pval188 p188,
1054 l.pval189 p189,
1055 l.pval190 p190,
1056 decode(l.pval191,cn,vn,l.pval191) p191,
1057 decode(l.pval192,cn,vn,vn,vn,l.pval192) p192,
1058 l.pval192 d192,
1059 decode(l.pval193,cn,vn,vn,vn,l.pval193) p193,
1060 l.pval193 d193,
1061 decode(l.pval194,cn,vn,vn,vn,l.pval194) p194,
1062 l.pval194 d194,
1063 decode(l.pval195,cn,vn,vn,vn,l.pval195) p195,
1064 l.pval195 d195,
1065 decode(l.pval196,cn,vn,vn,vn,l.pval196) p196,
1066 l.pval196 d196
1067 from hr_pump_batch_lines l
1068 where l.batch_line_id = p_batch_line_id;
1069 --
1070 c cr%rowtype;
1071 l_validate boolean := false;
1072 L_PER_PERSON_ID number;
1073 L_NAME_COMBINATION_WARNING boolean;
1074 L_ORIG_HIRE_WARNING boolean;
1075 L_PERSON_ID number;
1076 L_CONTACT_PERSON_ID number;
1077 L_START_LIFE_REASON_ID number;
1078 L_END_LIFE_REASON_ID number;
1079 L_PERSON_TYPE_ID number;
1080 --
1081 begin
1082 hr_data_pump.entry('call');
1083 open cr;
1084 fetch cr into c;
1085 if cr%notfound then
1086 hr_utility.set_message(800,'HR_50326_DP_NO_ROW');
1087 hr_utility.set_message_token('TABLE','HR_PUMP_BATCH_LINES');
1088 hr_utility.set_message_token('COLUMN','P_BATCH_LINE_ID');
1089 hr_utility.set_message_token('VALUE',p_batch_line_id);
1090 hr_utility.raise_error;
1091 end if;
1092 --
1093 if c.p191 is null then
1094 L_PERSON_ID:=nn;
1095 else
1096 L_PERSON_ID := 
1097 hr_pump_get.get_person_id
1098 (P_PERSON_USER_KEY => c.p191);
1099 end if;
1100 --
1101 if c.p192 is null then
1102 L_CONTACT_PERSON_ID:=nn;
1103 else
1104 L_CONTACT_PERSON_ID := 
1105 hr_pump_get.get_contact_person_id
1106 (P_CONTACT_PERSON_USER_KEY => c.p192);
1107 end if;
1108 --
1109 if c.p1 is null or
1110 c.p193 is null then
1111 L_START_LIFE_REASON_ID:=nn;
1112 else
1113 L_START_LIFE_REASON_ID := 
1114 hr_pump_get.get_start_life_reason_id
1115 (P_BUSINESS_GROUP_ID => P_BUSINESS_GROUP_ID
1116 ,P_EFFECTIVE_DATE => c.p1
1117 ,P_START_LIFE_REASON => c.p193);
1118 end if;
1119 --
1120 if c.p1 is null or
1121 c.p194 is null then
1122 L_END_LIFE_REASON_ID:=nn;
1123 else
1124 L_END_LIFE_REASON_ID := 
1125 hr_pump_get.get_end_life_reason_id
1126 (P_BUSINESS_GROUP_ID => P_BUSINESS_GROUP_ID
1127 ,P_EFFECTIVE_DATE => c.p1
1128 ,P_END_LIFE_REASON => c.p194);
1129 end if;
1130 --
1131 if c.p195 is null or
1132 c.p196 is null then
1133 L_PERSON_TYPE_ID:=nn;
1134 else
1135 L_PERSON_TYPE_ID := 
1136 hr_pump_get.get_person_type_id
1137 (P_USER_PERSON_TYPE => c.p195
1138 ,P_BUSINESS_GROUP_ID => P_BUSINESS_GROUP_ID
1139 ,P_LANGUAGE_CODE => c.p196);
1140 end if;
1141 --
1142 hr_data_pump.api_trc_on;
1143 HR_CONTACT_REL_API.CREATE_CONTACT
1144 (p_validate => l_validate
1145 ,P_START_DATE => c.p1
1146 ,p_business_group_id => p_business_group_id
1147 ,P_PERSON_ID => L_PERSON_ID
1148 ,P_CONTACT_PERSON_ID => L_CONTACT_PERSON_ID
1149 ,P_CONTACT_TYPE => c.p2
1150 ,P_CTR_COMMENTS => c.p3
1151 ,P_PRIMARY_CONTACT_FLAG => c.p4
1152 ,P_DATE_START => c.p5
1153 ,P_START_LIFE_REASON_ID => L_START_LIFE_REASON_ID
1154 ,P_DATE_END => c.p6
1155 ,P_END_LIFE_REASON_ID => L_END_LIFE_REASON_ID
1156 ,P_RLTD_PER_RSDS_W_DSGNTR_FLAG => c.p7
1157 ,P_PERSONAL_FLAG => c.p8
1158 ,P_SEQUENCE_NUMBER => c.p9
1159 ,P_CONT_ATTRIBUTE_CATEGORY => c.p10
1160 ,P_CONT_ATTRIBUTE1 => c.p11
1161 ,P_CONT_ATTRIBUTE2 => c.p12
1162 ,P_CONT_ATTRIBUTE3 => c.p13
1163 ,P_CONT_ATTRIBUTE4 => c.p14
1167 ,P_CONT_ATTRIBUTE8 => c.p18
1164 ,P_CONT_ATTRIBUTE5 => c.p15
1165 ,P_CONT_ATTRIBUTE6 => c.p16
1166 ,P_CONT_ATTRIBUTE7 => c.p17
1168 ,P_CONT_ATTRIBUTE9 => c.p19
1169 ,P_CONT_ATTRIBUTE10 => c.p20
1170 ,P_CONT_ATTRIBUTE11 => c.p21
1171 ,P_CONT_ATTRIBUTE12 => c.p22
1172 ,P_CONT_ATTRIBUTE13 => c.p23
1173 ,P_CONT_ATTRIBUTE14 => c.p24
1174 ,P_CONT_ATTRIBUTE15 => c.p25
1175 ,P_CONT_ATTRIBUTE16 => c.p26
1176 ,P_CONT_ATTRIBUTE17 => c.p27
1177 ,P_CONT_ATTRIBUTE18 => c.p28
1178 ,P_CONT_ATTRIBUTE19 => c.p29
1179 ,P_CONT_ATTRIBUTE20 => c.p30
1180 ,P_CONT_INFORMATION_CATEGORY => c.p31
1181 ,P_CONT_INFORMATION1 => c.p32
1182 ,P_CONT_INFORMATION2 => c.p33
1183 ,P_CONT_INFORMATION3 => c.p34
1184 ,P_CONT_INFORMATION4 => c.p35
1185 ,P_CONT_INFORMATION5 => c.p36
1186 ,P_CONT_INFORMATION6 => c.p37
1187 ,P_CONT_INFORMATION7 => c.p38
1188 ,P_CONT_INFORMATION8 => c.p39
1189 ,P_CONT_INFORMATION9 => c.p40
1190 ,P_CONT_INFORMATION10 => c.p41
1191 ,P_CONT_INFORMATION11 => c.p42
1192 ,P_CONT_INFORMATION12 => c.p43
1193 ,P_CONT_INFORMATION13 => c.p44
1194 ,P_CONT_INFORMATION14 => c.p45
1195 ,P_CONT_INFORMATION15 => c.p46
1196 ,P_CONT_INFORMATION16 => c.p47
1197 ,P_CONT_INFORMATION17 => c.p48
1198 ,P_CONT_INFORMATION18 => c.p49
1199 ,P_CONT_INFORMATION19 => c.p50
1200 ,P_CONT_INFORMATION20 => c.p51
1201 ,P_THIRD_PARTY_PAY_FLAG => c.p52
1202 ,P_BONDHOLDER_FLAG => c.p53
1203 ,P_DEPENDENT_FLAG => c.p54
1204 ,P_BENEFICIARY_FLAG => c.p55
1205 ,P_LAST_NAME => c.p56
1206 ,P_SEX => c.p57
1207 ,P_PERSON_TYPE_ID => L_PERSON_TYPE_ID
1208 ,P_PER_COMMENTS => c.p58
1209 ,P_DATE_OF_BIRTH => c.p59
1210 ,P_EMAIL_ADDRESS => c.p60
1211 ,P_FIRST_NAME => c.p61
1212 ,P_KNOWN_AS => c.p62
1213 ,P_MARITAL_STATUS => c.p63
1214 ,P_MIDDLE_NAMES => c.p64
1215 ,P_NATIONALITY => c.p65
1216 ,P_NATIONAL_IDENTIFIER => c.p66
1217 ,P_PREVIOUS_LAST_NAME => c.p67
1218 ,P_REGISTERED_DISABLED_FLAG => c.p68
1219 ,P_TITLE => c.p69
1220 ,P_WORK_TELEPHONE => c.p70
1221 ,P_ATTRIBUTE_CATEGORY => c.p71
1222 ,P_ATTRIBUTE1 => c.p72
1223 ,P_ATTRIBUTE2 => c.p73
1224 ,P_ATTRIBUTE3 => c.p74
1225 ,P_ATTRIBUTE4 => c.p75
1226 ,P_ATTRIBUTE5 => c.p76
1227 ,P_ATTRIBUTE6 => c.p77
1228 ,P_ATTRIBUTE7 => c.p78
1229 ,P_ATTRIBUTE8 => c.p79
1230 ,P_ATTRIBUTE9 => c.p80
1231 ,P_ATTRIBUTE10 => c.p81
1232 ,P_ATTRIBUTE11 => c.p82
1233 ,P_ATTRIBUTE12 => c.p83
1234 ,P_ATTRIBUTE13 => c.p84
1235 ,P_ATTRIBUTE14 => c.p85
1236 ,P_ATTRIBUTE15 => c.p86
1237 ,P_ATTRIBUTE16 => c.p87
1238 ,P_ATTRIBUTE17 => c.p88
1239 ,P_ATTRIBUTE18 => c.p89
1240 ,P_ATTRIBUTE19 => c.p90
1241 ,P_ATTRIBUTE20 => c.p91
1242 ,P_ATTRIBUTE21 => c.p92
1243 ,P_ATTRIBUTE22 => c.p93
1244 ,P_ATTRIBUTE23 => c.p94
1245 ,P_ATTRIBUTE24 => c.p95
1246 ,P_ATTRIBUTE25 => c.p96
1247 ,P_ATTRIBUTE26 => c.p97
1248 ,P_ATTRIBUTE27 => c.p98
1249 ,P_ATTRIBUTE28 => c.p99
1250 ,P_ATTRIBUTE29 => c.p100
1251 ,P_ATTRIBUTE30 => c.p101
1252 ,P_PER_INFORMATION_CATEGORY => c.p102
1253 ,P_PER_INFORMATION1 => c.p103
1254 ,P_PER_INFORMATION2 => c.p104
1255 ,P_PER_INFORMATION3 => c.p105
1256 ,P_PER_INFORMATION4 => c.p106
1257 ,P_PER_INFORMATION5 => c.p107
1258 ,P_PER_INFORMATION6 => c.p108
1259 ,P_PER_INFORMATION7 => c.p109
1260 ,P_PER_INFORMATION8 => c.p110
1261 ,P_PER_INFORMATION9 => c.p111
1262 ,P_PER_INFORMATION10 => c.p112
1263 ,P_PER_INFORMATION11 => c.p113
1264 ,P_PER_INFORMATION12 => c.p114
1265 ,P_PER_INFORMATION13 => c.p115
1266 ,P_PER_INFORMATION14 => c.p116
1267 ,P_PER_INFORMATION15 => c.p117
1268 ,P_PER_INFORMATION16 => c.p118
1269 ,P_PER_INFORMATION17 => c.p119
1270 ,P_PER_INFORMATION18 => c.p120
1271 ,P_PER_INFORMATION19 => c.p121
1272 ,P_PER_INFORMATION20 => c.p122
1273 ,P_PER_INFORMATION21 => c.p123
1274 ,P_PER_INFORMATION22 => c.p124
1275 ,P_PER_INFORMATION23 => c.p125
1276 ,P_PER_INFORMATION24 => c.p126
1277 ,P_PER_INFORMATION25 => c.p127
1278 ,P_PER_INFORMATION26 => c.p128
1279 ,P_PER_INFORMATION27 => c.p129
1280 ,P_PER_INFORMATION28 => c.p130
1281 ,P_PER_INFORMATION29 => c.p131
1282 ,P_PER_INFORMATION30 => c.p132
1283 ,P_CORRESPONDENCE_LANGUAGE => c.p133
1284 ,P_HONORS => c.p134
1285 ,P_PRE_NAME_ADJUNCT => c.p135
1286 ,P_SUFFIX => c.p136
1287 ,P_CREATE_MIRROR_FLAG => c.p137
1288 ,P_MIRROR_TYPE => c.p138
1289 ,P_MIRROR_CONT_ATTRIBUTE_CAT => c.p139
1290 ,P_MIRROR_CONT_ATTRIBUTE1 => c.p140
1291 ,P_MIRROR_CONT_ATTRIBUTE2 => c.p141
1292 ,P_MIRROR_CONT_ATTRIBUTE3 => c.p142
1293 ,P_MIRROR_CONT_ATTRIBUTE4 => c.p143
1294 ,P_MIRROR_CONT_ATTRIBUTE5 => c.p144
1295 ,P_MIRROR_CONT_ATTRIBUTE6 => c.p145
1296 ,P_MIRROR_CONT_ATTRIBUTE7 => c.p146
1297 ,P_MIRROR_CONT_ATTRIBUTE8 => c.p147
1298 ,P_MIRROR_CONT_ATTRIBUTE9 => c.p148
1299 ,P_MIRROR_CONT_ATTRIBUTE10 => c.p149
1300 ,P_MIRROR_CONT_ATTRIBUTE11 => c.p150
1301 ,P_MIRROR_CONT_ATTRIBUTE12 => c.p151
1302 ,P_MIRROR_CONT_ATTRIBUTE13 => c.p152
1303 ,P_MIRROR_CONT_ATTRIBUTE14 => c.p153
1304 ,P_MIRROR_CONT_ATTRIBUTE15 => c.p154
1305 ,P_MIRROR_CONT_ATTRIBUTE16 => c.p155
1306 ,P_MIRROR_CONT_ATTRIBUTE17 => c.p156
1307 ,P_MIRROR_CONT_ATTRIBUTE18 => c.p157
1308 ,P_MIRROR_CONT_ATTRIBUTE19 => c.p158
1309 ,P_MIRROR_CONT_ATTRIBUTE20 => c.p159
1310 ,P_MIRROR_CONT_INFORMATION_CAT => c.p160
1311 ,P_MIRROR_CONT_INFORMATION1 => c.p161
1312 ,P_MIRROR_CONT_INFORMATION2 => c.p162
1313 ,P_MIRROR_CONT_INFORMATION3 => c.p163
1314 ,P_MIRROR_CONT_INFORMATION4 => c.p164
1315 ,P_MIRROR_CONT_INFORMATION5 => c.p165
1316 ,P_MIRROR_CONT_INFORMATION6 => c.p166
1317 ,P_MIRROR_CONT_INFORMATION7 => c.p167
1318 ,P_MIRROR_CONT_INFORMATION8 => c.p168
1319 ,P_MIRROR_CONT_INFORMATION9 => c.p169
1320 ,P_MIRROR_CONT_INFORMATION10 => c.p170
1321 ,P_MIRROR_CONT_INFORMATION11 => c.p171
1322 ,P_MIRROR_CONT_INFORMATION12 => c.p172
1323 ,P_MIRROR_CONT_INFORMATION13 => c.p173
1327 ,P_MIRROR_CONT_INFORMATION17 => c.p177
1324 ,P_MIRROR_CONT_INFORMATION14 => c.p174
1325 ,P_MIRROR_CONT_INFORMATION15 => c.p175
1326 ,P_MIRROR_CONT_INFORMATION16 => c.p176
1328 ,P_MIRROR_CONT_INFORMATION18 => c.p178
1329 ,P_MIRROR_CONT_INFORMATION19 => c.p179
1330 ,P_MIRROR_CONT_INFORMATION20 => c.p180
1331 ,P_CONTACT_RELATIONSHIP_ID => c.p181
1332 ,P_CTR_OBJECT_VERSION_NUMBER => c.p182
1333 ,P_PER_PERSON_ID => L_PER_PERSON_ID
1334 ,P_PER_OBJECT_VERSION_NUMBER => c.p184
1335 ,P_PER_EFFECTIVE_START_DATE => c.p185
1336 ,P_PER_EFFECTIVE_END_DATE => c.p186
1337 ,P_FULL_NAME => c.p187
1338 ,P_PER_COMMENT_ID => c.p188
1339 ,P_NAME_COMBINATION_WARNING => L_NAME_COMBINATION_WARNING
1340 ,P_ORIG_HIRE_WARNING => L_ORIG_HIRE_WARNING);
1341 hr_data_pump.api_trc_off;
1342 --
1343 iuk(p_batch_line_id,c.p183,L_PER_PERSON_ID);
1344 --
1345 if L_NAME_COMBINATION_WARNING then
1346 c.p189 := 'TRUE';
1347 else
1348 c.p189 := 'FALSE';
1349 end if;
1350 --
1351 if L_ORIG_HIRE_WARNING then
1352 c.p190 := 'TRUE';
1353 else
1354 c.p190 := 'FALSE';
1355 end if;
1356 --
1357 update hr_pump_batch_lines l set
1358 l.pval181 = decode(c.p181,null,cn,c.p181),
1359 l.pval182 = decode(c.p182,null,cn,c.p182),
1360 l.pval183 = decode(c.p183,null,cn,c.p183),
1361 l.pval184 = decode(c.p184,null,cn,c.p184),
1362 l.pval185 = decode(c.p185,null,cn,dc(c.p185)),
1363 l.pval186 = decode(c.p186,null,cn,dc(c.p186)),
1364 l.pval187 = decode(c.p187,null,cn,c.p187),
1365 l.pval188 = decode(c.p188,null,cn,c.p188),
1366 l.pval189 = decode(c.p189,null,cn,c.p189),
1367 l.pval190 = decode(c.p190,null,cn,c.p190)
1368 where l.rowid = c.myrowid;
1369 --
1370 close cr;
1371 --
1372 hr_data_pump.exit('call');
1373 exception
1374  when hr_multi_message.error_message_exist then
1375    if cr%isopen then
1376     close cr;
1377    end if;
1378    hr_pump_utils.set_multi_msg_error_flag(true);
1379  when others then
1380  if cr%isopen then
1381   close cr;
1382  end if;
1383  raise;
1384 end call;
1385 end hrdpp_CREATE_CONTACT;