[Home] [Help]
PACKAGE BODY: APPS.HRDPP_UPDATE_RU_PERSON
Source
1 package body hrdpp_UPDATE_RU_PERSON as
2 /*
3 * Generated by hr_pump_meta_mapper at: 2007/01/03 23:01:31
4 * Generated for API: HR_RU_PERSON_API.UPDATE_RU_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;
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_EFFECTIVE_DATE in date
83 ,P_DATETRACK_UPDATE_MODE in varchar2
84 ,P_LAST_NAME in varchar2 default null
85 ,P_APPLICANT_NUMBER in varchar2 default null
86 ,P_COMMENTS in varchar2 default null
87 ,P_DATE_EMPLOYEE_DATA_VERIFIED in date default null
88 ,I_DATE_EMPLOYEE_DATA_VERIFIED in varchar2 default 'N'
89 ,P_DATE_OF_BIRTH in date default null
90 ,I_DATE_OF_BIRTH in varchar2 default 'N'
91 ,P_EMAIL_ADDRESS in varchar2 default null
92 ,P_EMPLOYEE_NUMBER in varchar2
93 ,P_EXPENSE_CHECK_SEND_TO_ADDRES in varchar2 default null
94 ,P_FIRST_NAME in varchar2 default null
95 ,P_KNOWN_AS in varchar2 default null
96 ,P_MARITAL_STATUS in varchar2 default null
97 ,P_MIDDLE_NAMES in varchar2 default null
98 ,P_NATIONALITY in varchar2 default null
99 ,P_INN in varchar2 default null
100 ,P_PREVIOUS_LAST_NAME in varchar2 default null
101 ,P_REGISTERED_DISABLED_FLAG in varchar2 default null
102 ,P_SEX in varchar2 default null
103 ,P_TITLE in varchar2 default null
104 ,P_WORK_TELEPHONE in varchar2 default null
105 ,P_ATTRIBUTE_CATEGORY in varchar2 default null
106 ,P_ATTRIBUTE1 in varchar2 default null
107 ,P_ATTRIBUTE2 in varchar2 default null
108 ,P_ATTRIBUTE3 in varchar2 default null
109 ,P_ATTRIBUTE4 in varchar2 default null
110 ,P_ATTRIBUTE5 in varchar2 default null
111 ,P_ATTRIBUTE6 in varchar2 default null
112 ,P_ATTRIBUTE7 in varchar2 default null
113 ,P_ATTRIBUTE8 in varchar2 default null
114 ,P_ATTRIBUTE9 in varchar2 default null
115 ,P_ATTRIBUTE10 in varchar2 default null
116 ,P_ATTRIBUTE11 in varchar2 default null
117 ,P_ATTRIBUTE12 in varchar2 default null
118 ,P_ATTRIBUTE13 in varchar2 default null
119 ,P_ATTRIBUTE14 in varchar2 default null
120 ,P_ATTRIBUTE15 in varchar2 default null
121 ,P_ATTRIBUTE16 in varchar2 default null
122 ,P_ATTRIBUTE17 in varchar2 default null
123 ,P_ATTRIBUTE18 in varchar2 default null
124 ,P_ATTRIBUTE19 in varchar2 default null
125 ,P_ATTRIBUTE20 in varchar2 default null
126 ,P_ATTRIBUTE21 in varchar2 default null
127 ,P_ATTRIBUTE22 in varchar2 default null
128 ,P_ATTRIBUTE23 in varchar2 default null
129 ,P_ATTRIBUTE24 in varchar2 default null
130 ,P_ATTRIBUTE25 in varchar2 default null
131 ,P_ATTRIBUTE26 in varchar2 default null
132 ,P_ATTRIBUTE27 in varchar2 default null
133 ,P_ATTRIBUTE28 in varchar2 default null
134 ,P_ATTRIBUTE29 in varchar2 default null
135 ,P_ATTRIBUTE30 in varchar2 default null
136 ,P_PLACE_OF_BIRTH in varchar2 default null
137 ,P_REFERENCES in varchar2 default null
138 ,P_LOCAL_COEFFICIENT in varchar2 default null
139 ,P_CITIZENSHIP in varchar2 default null
140 ,P_MILITARY_DOC in varchar2 default null
141 ,P_RESERVE_CATEGORY in varchar2 default null
142 ,P_MILITARY_RANK in varchar2 default null
143 ,P_MILITARY_PROFILE in varchar2 default null
144 ,P_MILITARY_REG_CODE in varchar2 default null
145 ,P_MIL_SRVC_READINESS_CATEGORY in varchar2 default null
146 ,P_MILITARY_COMMISSARIAT in varchar2 default null
147 ,P_QUITTING_MARK in varchar2 default null
148 ,P_MILITARY_UNIT_NUMBER in varchar2 default null
149 ,P_MILITARY_REG_TYPE in varchar2 default null
150 ,P_MILITARY_REG_DETAILS in varchar2 default null
151 ,P_PENSION_FUND_NUMBER in varchar2 default null
152 ,P_DATE_OF_DEATH in date default null
153 ,I_DATE_OF_DEATH in varchar2 default 'N'
154 ,P_BACKGROUND_CHECK_STATUS in varchar2 default null
155 ,P_BACKGROUND_DATE_CHECK in date default null
156 ,I_BACKGROUND_DATE_CHECK in varchar2 default 'N'
157 ,P_BLOOD_TYPE in varchar2 default null
158 ,P_FAST_PATH_EMPLOYEE in varchar2 default null
159 ,P_FTE_CAPACITY in number default null
160 ,I_FTE_CAPACITY in varchar2 default 'N'
161 ,P_HOLD_APPLICANT_DATE_UNTIL in date default null
162 ,I_HOLD_APPLICANT_DATE_UNTIL in varchar2 default 'N'
163 ,P_HONORS in varchar2 default null
164 ,P_INTERNAL_LOCATION in varchar2 default null
165 ,P_LAST_MEDICAL_TEST_BY in varchar2 default null
166 ,P_LAST_MEDICAL_TEST_DATE in date default null
167 ,I_LAST_MEDICAL_TEST_DATE in varchar2 default 'N'
168 ,P_MAILSTOP in varchar2 default null
169 ,P_OFFICE_NUMBER in varchar2 default null
170 ,P_ON_MILITARY_SERVICE in varchar2 default null
171 ,P_GENITIVE_LAST_NAME in varchar2 default null
172 ,P_PROJECTED_START_DATE in date default null
173 ,I_PROJECTED_START_DATE in varchar2 default 'N'
174 ,P_REHIRE_AUTHORIZOR in varchar2 default null
175 ,P_REHIRE_RECOMMENDATION in varchar2 default null
176 ,P_RESUME_EXISTS in varchar2 default null
177 ,P_RESUME_LAST_UPDATED in date default null
178 ,I_RESUME_LAST_UPDATED in varchar2 default 'N'
179 ,P_SECOND_PASSPORT_EXISTS in varchar2 default null
180 ,P_STUDENT_STATUS in varchar2 default null
181 ,P_WORK_SCHEDULE in varchar2 default null
182 ,P_REHIRE_REASON in varchar2 default null
183 ,P_SUFFIX in varchar2 default null
184 ,P_RECEIPT_OF_DEATH_CERT_DATE in date default null
185 ,I_RECEIPT_OF_DEATH_CERT_DATE in varchar2 default 'N'
186 ,P_COORD_BEN_MED_PLN_NO in varchar2 default null
187 ,P_COORD_BEN_NO_CVG_FLAG in varchar2 default null
188 ,P_COORD_BEN_MED_EXT_ER in varchar2 default null
189 ,P_COORD_BEN_MED_PL_NAME in varchar2 default null
190 ,P_COORD_BEN_MED_INSR_CRR_NAME in varchar2 default null
191 ,P_COORD_BEN_MED_INSR_CRR_IDENT in varchar2 default null
192 ,P_COORD_BEN_MED_CVG_STRT_DT in date default null
193 ,I_COORD_BEN_MED_CVG_STRT_DT in varchar2 default 'N'
194 ,P_COORD_BEN_MED_CVG_END_DT in date default null
195 ,I_COORD_BEN_MED_CVG_END_DT in varchar2 default 'N'
196 ,P_USES_TOBACCO_FLAG in varchar2 default null
197 ,P_DPDNT_ADOPTION_DATE in date default null
198 ,I_DPDNT_ADOPTION_DATE in varchar2 default 'N'
199 ,P_DPDNT_VLNTRY_SVCE_FLAG in varchar2 default null
200 ,P_ORIGINAL_DATE_OF_HIRE in date default null
201 ,I_ORIGINAL_DATE_OF_HIRE in varchar2 default 'N'
202 ,P_ADJUSTED_SVC_DATE in date default null
203 ,I_ADJUSTED_SVC_DATE in varchar2 default 'N'
204 ,P_TOWN_OF_BIRTH in varchar2 default null
205 ,P_REGION_OF_BIRTH in varchar2 default null
206 ,P_COUNTRY_OF_BIRTH in varchar2 default null
207 ,P_GLOBAL_PERSON_ID in varchar2 default null
208 ,P_PARTY_ID in number default null
209 ,I_PARTY_ID in varchar2 default 'N'
210 ,P_NPW_NUMBER in varchar2 default null
211 ,P_PERSON_USER_KEY in varchar2
212 ,P_USER_PERSON_TYPE in varchar2 default null
213 ,P_LANGUAGE_CODE in varchar2 default null
214 ,P_VENDOR_NAME in varchar2 default null
215 ,P_CORRESPONDENCE_LANGUAGE in varchar2 default null
216 ,P_BENEFIT_GROUP in varchar2 default null) is
217 blid number := p_data_pump_batch_line_id;
218 begin
219 if blid is not null then
220 delete from hr_pump_batch_lines where batch_line_id = blid;
221 delete from hr_pump_batch_exceptions
222 where source_type = 'BATCH_LINE' and source_id = blid;
223 end if;
224 insert into hr_pump_batch_lines
225 (batch_id
226 ,batch_line_id
227 ,business_group_name
228 ,api_module_id
229 ,line_status
230 ,user_sequence
231 ,link_value
232 ,pval001
233 ,pval002
234 ,pval003
235 ,pval004
236 ,pval005
237 ,pval006
238 ,pval007
239 ,pval008
240 ,pval009
241 ,pval010
242 ,pval011
243 ,pval012
244 ,pval013
245 ,pval014
246 ,pval015
247 ,pval016
248 ,pval017
249 ,pval018
250 ,pval019
251 ,pval020
252 ,pval021
253 ,pval022
254 ,pval023
255 ,pval024
256 ,pval025
257 ,pval026
258 ,pval027
259 ,pval028
260 ,pval029
261 ,pval030
262 ,pval031
263 ,pval032
264 ,pval033
265 ,pval034
266 ,pval035
267 ,pval036
268 ,pval037
269 ,pval038
270 ,pval039
271 ,pval040
272 ,pval041
273 ,pval042
274 ,pval043
275 ,pval044
276 ,pval045
277 ,pval046
278 ,pval047
279 ,pval048
280 ,pval049
281 ,pval050
282 ,pval051
283 ,pval052
284 ,pval053
285 ,pval054
286 ,pval055
287 ,pval056
288 ,pval057
289 ,pval058
290 ,pval059
291 ,pval060
292 ,pval061
293 ,pval062
294 ,pval063
295 ,pval064
296 ,pval065
297 ,pval066
298 ,pval067
299 ,pval068
300 ,pval069
301 ,pval070
302 ,pval071
303 ,pval072
304 ,pval073
305 ,pval074
306 ,pval075
307 ,pval076
308 ,pval077
309 ,pval078
310 ,pval079
311 ,pval080
312 ,pval081
313 ,pval082
314 ,pval083
315 ,pval084
316 ,pval085
317 ,pval086
318 ,pval087
319 ,pval088
320 ,pval089
321 ,pval090
322 ,pval091
323 ,pval092
324 ,pval093
325 ,pval094
326 ,pval095
327 ,pval096
328 ,pval097
329 ,pval098
330 ,pval099
331 ,pval100
332 ,pval101
333 ,pval102
334 ,pval103
335 ,pval104
336 ,pval105
337 ,pval106
338 ,pval107
339 ,pval108
340 ,pval109
341 ,pval110
342 ,pval111
343 ,pval112
344 ,pval113
345 ,pval121
346 ,pval122
347 ,pval123
348 ,pval124
349 ,pval125
350 ,pval126)
351 values
352 (p_batch_id
353 ,nvl(blid,hr_pump_batch_lines_s.nextval)
354 ,p_data_pump_business_grp_name
355 ,3875
356 ,'U'
357 ,p_user_sequence
358 ,p_link_value
359 ,dc(P_EFFECTIVE_DATE)
360 ,P_DATETRACK_UPDATE_MODE
361 ,P_LAST_NAME
362 ,P_APPLICANT_NUMBER
363 ,P_COMMENTS
364 ,dd(P_DATE_EMPLOYEE_DATA_VERIFIED,I_DATE_EMPLOYEE_DATA_VERIFIED)
365 ,dd(P_DATE_OF_BIRTH,I_DATE_OF_BIRTH)
366 ,P_EMAIL_ADDRESS
367 ,P_EMPLOYEE_NUMBER
368 ,P_EXPENSE_CHECK_SEND_TO_ADDRES
369 ,P_FIRST_NAME
370 ,P_KNOWN_AS
371 ,P_MARITAL_STATUS
372 ,P_MIDDLE_NAMES
373 ,P_NATIONALITY
374 ,P_INN
375 ,P_PREVIOUS_LAST_NAME
376 ,P_REGISTERED_DISABLED_FLAG
377 ,P_SEX
378 ,P_TITLE
379 ,P_WORK_TELEPHONE
380 ,P_ATTRIBUTE_CATEGORY
381 ,P_ATTRIBUTE1
382 ,P_ATTRIBUTE2
383 ,P_ATTRIBUTE3
384 ,P_ATTRIBUTE4
385 ,P_ATTRIBUTE5
386 ,P_ATTRIBUTE6
387 ,P_ATTRIBUTE7
388 ,P_ATTRIBUTE8
389 ,P_ATTRIBUTE9
390 ,P_ATTRIBUTE10
391 ,P_ATTRIBUTE11
392 ,P_ATTRIBUTE12
393 ,P_ATTRIBUTE13
394 ,P_ATTRIBUTE14
395 ,P_ATTRIBUTE15
396 ,P_ATTRIBUTE16
397 ,P_ATTRIBUTE17
398 ,P_ATTRIBUTE18
399 ,P_ATTRIBUTE19
400 ,P_ATTRIBUTE20
401 ,P_ATTRIBUTE21
402 ,P_ATTRIBUTE22
403 ,P_ATTRIBUTE23
404 ,P_ATTRIBUTE24
405 ,P_ATTRIBUTE25
406 ,P_ATTRIBUTE26
407 ,P_ATTRIBUTE27
408 ,P_ATTRIBUTE28
409 ,P_ATTRIBUTE29
410 ,P_ATTRIBUTE30
411 ,P_PLACE_OF_BIRTH
412 ,P_REFERENCES
413 ,P_LOCAL_COEFFICIENT
414 ,P_CITIZENSHIP
415 ,P_MILITARY_DOC
416 ,P_RESERVE_CATEGORY
417 ,P_MILITARY_RANK
418 ,P_MILITARY_PROFILE
419 ,P_MILITARY_REG_CODE
420 ,P_MIL_SRVC_READINESS_CATEGORY
421 ,P_MILITARY_COMMISSARIAT
422 ,P_QUITTING_MARK
423 ,P_MILITARY_UNIT_NUMBER
424 ,P_MILITARY_REG_TYPE
425 ,P_MILITARY_REG_DETAILS
426 ,P_PENSION_FUND_NUMBER
427 ,dd(P_DATE_OF_DEATH,I_DATE_OF_DEATH)
428 ,P_BACKGROUND_CHECK_STATUS
429 ,dd(P_BACKGROUND_DATE_CHECK,I_BACKGROUND_DATE_CHECK)
430 ,P_BLOOD_TYPE
431 ,P_FAST_PATH_EMPLOYEE
432 ,nd(P_FTE_CAPACITY,I_FTE_CAPACITY)
433 ,dd(P_HOLD_APPLICANT_DATE_UNTIL,I_HOLD_APPLICANT_DATE_UNTIL)
434 ,P_HONORS
435 ,P_INTERNAL_LOCATION
436 ,P_LAST_MEDICAL_TEST_BY
437 ,dd(P_LAST_MEDICAL_TEST_DATE,I_LAST_MEDICAL_TEST_DATE)
438 ,P_MAILSTOP
439 ,P_OFFICE_NUMBER
440 ,P_ON_MILITARY_SERVICE
441 ,P_GENITIVE_LAST_NAME
442 ,dd(P_PROJECTED_START_DATE,I_PROJECTED_START_DATE)
443 ,P_REHIRE_AUTHORIZOR
444 ,P_REHIRE_RECOMMENDATION
445 ,P_RESUME_EXISTS
446 ,dd(P_RESUME_LAST_UPDATED,I_RESUME_LAST_UPDATED)
447 ,P_SECOND_PASSPORT_EXISTS
448 ,P_STUDENT_STATUS
449 ,P_WORK_SCHEDULE
450 ,P_REHIRE_REASON
451 ,P_SUFFIX
452 ,dd(P_RECEIPT_OF_DEATH_CERT_DATE,I_RECEIPT_OF_DEATH_CERT_DATE)
453 ,P_COORD_BEN_MED_PLN_NO
454 ,P_COORD_BEN_NO_CVG_FLAG
455 ,P_COORD_BEN_MED_EXT_ER
456 ,P_COORD_BEN_MED_PL_NAME
457 ,P_COORD_BEN_MED_INSR_CRR_NAME
458 ,P_COORD_BEN_MED_INSR_CRR_IDENT
459 ,dd(P_COORD_BEN_MED_CVG_STRT_DT,I_COORD_BEN_MED_CVG_STRT_DT)
460 ,dd(P_COORD_BEN_MED_CVG_END_DT,I_COORD_BEN_MED_CVG_END_DT)
461 ,P_USES_TOBACCO_FLAG
462 ,dd(P_DPDNT_ADOPTION_DATE,I_DPDNT_ADOPTION_DATE)
463 ,P_DPDNT_VLNTRY_SVCE_FLAG
464 ,dd(P_ORIGINAL_DATE_OF_HIRE,I_ORIGINAL_DATE_OF_HIRE)
465 ,dd(P_ADJUSTED_SVC_DATE,I_ADJUSTED_SVC_DATE)
466 ,P_TOWN_OF_BIRTH
467 ,P_REGION_OF_BIRTH
468 ,P_COUNTRY_OF_BIRTH
469 ,P_GLOBAL_PERSON_ID
470 ,nd(P_PARTY_ID,I_PARTY_ID)
471 ,P_NPW_NUMBER
472 ,P_PERSON_USER_KEY
473 ,P_USER_PERSON_TYPE
474 ,P_LANGUAGE_CODE
475 ,P_VENDOR_NAME
476 ,P_CORRESPONDENCE_LANGUAGE
477 ,P_BENEFIT_GROUP);
478 end insert_batch_lines;
479 --
480 procedure call
481 (p_business_group_id in number,
482 p_batch_line_id in number) is
483 cursor cr is
484 select l.rowid myrowid,
488 l.pval003 d3,
485 decode(l.pval001,cn,dn,d(l.pval001)) p1,
486 decode(l.pval002,cn,vn,l.pval002) p2,
487 decode(l.pval003,cn,vn,vn,vh,l.pval003) p3,
489 decode(l.pval004,cn,vn,vn,vh,l.pval004) p4,
490 l.pval004 d4,
491 decode(l.pval005,cn,vn,vn,vh,l.pval005) p5,
492 l.pval005 d5,
493 decode(l.pval006,cn,dn,vn,dh,d(l.pval006)) p6,
494 l.pval006 d6,
495 decode(l.pval007,cn,dn,vn,dh,d(l.pval007)) p7,
496 l.pval007 d7,
497 decode(l.pval008,cn,vn,vn,vh,l.pval008) p8,
498 l.pval008 d8,
499 decode(l.pval009,cn,vn,l.pval009) p9,
500 decode(l.pval010,cn,vn,vn,vh,
501 hr_pump_get.gl(l.pval010,'HOME_OFFICE',d(l.pval001),l.pval123)) p10,
502 l.pval010 d10,
503 decode(l.pval011,cn,vn,vn,vh,l.pval011) p11,
504 l.pval011 d11,
505 decode(l.pval012,cn,vn,vn,vh,l.pval012) p12,
506 l.pval012 d12,
507 decode(l.pval013,cn,vn,vn,vh,
508 hr_pump_get.gl(l.pval013,'MAR_STATUS',d(l.pval001),l.pval123)) p13,
509 l.pval013 d13,
510 decode(l.pval014,cn,vn,vn,vh,l.pval014) p14,
511 l.pval014 d14,
512 decode(l.pval015,cn,vn,vn,vh,
513 hr_pump_get.gl(l.pval015,'NATIONALITY',d(l.pval001),l.pval123)) p15,
514 l.pval015 d15,
515 decode(l.pval016,cn,vn,vn,vh,l.pval016) p16,
516 l.pval016 d16,
517 decode(l.pval017,cn,vn,vn,vh,l.pval017) p17,
518 l.pval017 d17,
519 decode(l.pval018,cn,vn,vn,vh,
520 hr_pump_get.gl(l.pval018,'YES_NO',d(l.pval001),l.pval123)) p18,
521 l.pval018 d18,
522 decode(l.pval019,cn,vn,vn,vh,
523 hr_pump_get.gl(l.pval019,'SEX',d(l.pval001),l.pval123)) p19,
524 l.pval019 d19,
525 decode(l.pval020,cn,vn,vn,vh,
526 hr_pump_get.gl(l.pval020,'TITLE',d(l.pval001),l.pval123)) p20,
527 l.pval020 d20,
528 decode(l.pval021,cn,vn,vn,vh,l.pval021) p21,
529 l.pval021 d21,
530 decode(l.pval022,cn,vn,vn,vh,l.pval022) p22,
531 l.pval022 d22,
532 decode(l.pval023,cn,vn,vn,vh,l.pval023) p23,
533 l.pval023 d23,
534 decode(l.pval024,cn,vn,vn,vh,l.pval024) p24,
535 l.pval024 d24,
536 decode(l.pval025,cn,vn,vn,vh,l.pval025) p25,
537 l.pval025 d25,
538 decode(l.pval026,cn,vn,vn,vh,l.pval026) p26,
539 l.pval026 d26,
540 decode(l.pval027,cn,vn,vn,vh,l.pval027) p27,
541 l.pval027 d27,
542 decode(l.pval028,cn,vn,vn,vh,l.pval028) p28,
543 l.pval028 d28,
544 decode(l.pval029,cn,vn,vn,vh,l.pval029) p29,
545 l.pval029 d29,
546 decode(l.pval030,cn,vn,vn,vh,l.pval030) p30,
547 l.pval030 d30,
548 decode(l.pval031,cn,vn,vn,vh,l.pval031) p31,
549 l.pval031 d31,
550 decode(l.pval032,cn,vn,vn,vh,l.pval032) p32,
551 l.pval032 d32,
552 decode(l.pval033,cn,vn,vn,vh,l.pval033) p33,
553 l.pval033 d33,
554 decode(l.pval034,cn,vn,vn,vh,l.pval034) p34,
555 l.pval034 d34,
556 decode(l.pval035,cn,vn,vn,vh,l.pval035) p35,
557 l.pval035 d35,
558 decode(l.pval036,cn,vn,vn,vh,l.pval036) p36,
559 l.pval036 d36,
560 decode(l.pval037,cn,vn,vn,vh,l.pval037) p37,
561 l.pval037 d37,
562 decode(l.pval038,cn,vn,vn,vh,l.pval038) p38,
563 l.pval038 d38,
564 decode(l.pval039,cn,vn,vn,vh,l.pval039) p39,
565 l.pval039 d39,
566 decode(l.pval040,cn,vn,vn,vh,l.pval040) p40,
567 l.pval040 d40,
568 decode(l.pval041,cn,vn,vn,vh,l.pval041) p41,
569 l.pval041 d41,
570 decode(l.pval042,cn,vn,vn,vh,l.pval042) p42,
571 l.pval042 d42,
572 decode(l.pval043,cn,vn,vn,vh,l.pval043) p43,
573 l.pval043 d43,
574 decode(l.pval044,cn,vn,vn,vh,l.pval044) p44,
575 l.pval044 d44,
576 decode(l.pval045,cn,vn,vn,vh,l.pval045) p45,
577 l.pval045 d45,
578 decode(l.pval046,cn,vn,vn,vh,l.pval046) p46,
579 l.pval046 d46,
580 decode(l.pval047,cn,vn,vn,vh,l.pval047) p47,
581 l.pval047 d47,
582 decode(l.pval048,cn,vn,vn,vh,l.pval048) p48,
583 l.pval048 d48,
584 decode(l.pval049,cn,vn,vn,vh,l.pval049) p49,
585 l.pval049 d49,
586 decode(l.pval050,cn,vn,vn,vh,l.pval050) p50,
587 l.pval050 d50,
588 decode(l.pval051,cn,vn,vn,vh,l.pval051) p51,
589 l.pval051 d51,
590 decode(l.pval052,cn,vn,vn,vh,l.pval052) p52,
591 l.pval052 d52,
592 decode(l.pval053,cn,vn,vn,vh,
593 hr_pump_get.gl(l.pval053,'RU_OKATO',d(l.pval001),l.pval123)) p53,
594 l.pval053 d53,
595 decode(l.pval054,cn,vn,vn,vh,l.pval054) p54,
596 l.pval054 d54,
597 decode(l.pval055,cn,vn,vn,vh,l.pval055) p55,
598 l.pval055 d55,
599 decode(l.pval056,cn,vn,vn,vh,
600 hr_pump_get.gl(l.pval056,'RU_CITIZENSHIP',d(l.pval001),l.pval123)) p56,
601 l.pval056 d56,
602 decode(l.pval057,cn,vn,vn,vh,
603 hr_pump_get.gl(l.pval057,'RU_MILITARY_DOC_TYPE',d(l.pval001),l.pval123)) p57,
604 l.pval057 d57,
605 decode(l.pval058,cn,vn,vn,vh,
606 hr_pump_get.gl(l.pval058,'RU_RESERVE_CATEGORY',d(l.pval001),l.pval123)) p58,
607 l.pval058 d58,
608 decode(l.pval059,cn,vn,vn,vh,
609 hr_pump_get.gl(l.pval059,'RU_MILITARY_RANK',d(l.pval001),l.pval123)) p59,
610 l.pval059 d59,
611 decode(l.pval060,cn,vn,vn,vh,
612 hr_pump_get.gl(l.pval060,'RU_MILITARY_PROFILE',d(l.pval001),l.pval123)) p60,
613 l.pval060 d60,
614 decode(l.pval061,cn,vn,vn,vh,l.pval061) p61,
615 l.pval061 d61,
616 decode(l.pval062,cn,vn,vn,vh,
617 hr_pump_get.gl(l.pval062,'RU_MILITARY_SERVICE_READINESS_CATEGORY',d(l.pval001),l.pval123)) p62,
618 l.pval062 d62,
619 decode(l.pval063,cn,vn,vn,vh,l.pval063) p63,
620 l.pval063 d63,
621 decode(l.pval064,cn,vn,vn,vh,
622 hr_pump_get.gl(l.pval064,'RU_QUITTING_MARK',d(l.pval001),l.pval123)) p64,
623 l.pval064 d64,
624 decode(l.pval065,cn,vn,vn,vh,l.pval065) p65,
625 l.pval065 d65,
626 decode(l.pval066,cn,vn,vn,vh,l.pval066) p66,
627 l.pval066 d66,
628 decode(l.pval067,cn,vn,vn,vh,l.pval067) p67,
629 l.pval067 d67,
630 decode(l.pval068,cn,vn,vn,vh,l.pval068) p68,
631 l.pval068 d68,
632 decode(l.pval069,cn,dn,vn,dh,d(l.pval069)) p69,
633 l.pval069 d69,
634 decode(l.pval070,cn,vn,vn,vh,
635 hr_pump_get.gl(l.pval070,'YES_NO',d(l.pval001),l.pval123)) p70,
636 l.pval070 d70,
640 hr_pump_get.gl(l.pval072,'BLOOD_TYPE',d(l.pval001),l.pval123)) p72,
637 decode(l.pval071,cn,dn,vn,dh,d(l.pval071)) p71,
638 l.pval071 d71,
639 decode(l.pval072,cn,vn,vn,vh,
641 l.pval072 d72,
642 decode(l.pval073,cn,vn,vn,vh,l.pval073) p73,
643 l.pval073 d73,
644 decode(l.pval074,cn,nn,vn,nh,n(l.pval074)) p74,
645 l.pval074 d74,
646 decode(l.pval075,cn,dn,vn,dh,d(l.pval075)) p75,
647 l.pval075 d75,
648 decode(l.pval076,cn,vn,vn,vh,l.pval076) p76,
649 l.pval076 d76,
650 decode(l.pval077,cn,vn,vn,vh,l.pval077) p77,
651 l.pval077 d77,
652 decode(l.pval078,cn,vn,vn,vh,l.pval078) p78,
653 l.pval078 d78,
654 decode(l.pval079,cn,dn,vn,dh,d(l.pval079)) p79,
655 l.pval079 d79,
656 decode(l.pval080,cn,vn,vn,vh,l.pval080) p80,
657 l.pval080 d80,
658 decode(l.pval081,cn,vn,vn,vh,l.pval081) p81,
659 l.pval081 d81,
660 decode(l.pval082,cn,vn,vn,vh,
661 hr_pump_get.gl(l.pval082,'YES_NO',d(l.pval001),l.pval123)) p82,
662 l.pval082 d82,
663 decode(l.pval083,cn,vn,vn,vh,l.pval083) p83,
664 l.pval083 d83,
665 decode(l.pval084,cn,dn,vn,dh,d(l.pval084)) p84,
666 l.pval084 d84,
667 decode(l.pval085,cn,vn,vn,vh,l.pval085) p85,
668 l.pval085 d85,
669 decode(l.pval086,cn,vn,vn,vh,
670 hr_pump_get.gl(l.pval086,'YES_NO',d(l.pval001),l.pval123)) p86,
671 l.pval086 d86,
672 decode(l.pval087,cn,vn,vn,vh,
673 hr_pump_get.gl(l.pval087,'YES_NO',d(l.pval001),l.pval123)) p87,
674 l.pval087 d87,
675 decode(l.pval088,cn,dn,vn,dh,d(l.pval088)) p88,
676 l.pval088 d88,
677 decode(l.pval089,cn,vn,vn,vh,
678 hr_pump_get.gl(l.pval089,'YES_NO',d(l.pval001),l.pval123)) p89,
679 l.pval089 d89,
680 decode(l.pval090,cn,vn,vn,vh,
681 hr_pump_get.gl(l.pval090,'STUDENT_STATUS',d(l.pval001),l.pval123)) p90,
682 l.pval090 d90,
683 decode(l.pval091,cn,vn,vn,vh,
684 hr_pump_get.gl(l.pval091,'WORK_SCHEDULE',d(l.pval001),l.pval123)) p91,
685 l.pval091 d91,
686 decode(l.pval092,cn,vn,vn,vh,l.pval092) p92,
687 l.pval092 d92,
688 decode(l.pval093,cn,vn,vn,vh,l.pval093) p93,
689 l.pval093 d93,
690 decode(l.pval094,cn,dn,vn,dh,d(l.pval094)) p94,
691 l.pval094 d94,
692 decode(l.pval095,cn,vn,vn,vh,l.pval095) p95,
693 l.pval095 d95,
694 decode(l.pval096,cn,vn,vn,vh,l.pval096) p96,
695 l.pval096 d96,
696 decode(l.pval097,cn,vn,vn,vh,l.pval097) p97,
697 l.pval097 d97,
698 decode(l.pval098,cn,vn,vn,vh,l.pval098) p98,
699 l.pval098 d98,
700 decode(l.pval099,cn,vn,vn,vh,l.pval099) p99,
701 l.pval099 d99,
702 decode(l.pval100,cn,vn,vn,vh,l.pval100) p100,
703 l.pval100 d100,
704 decode(l.pval101,cn,dn,vn,dh,d(l.pval101)) p101,
705 l.pval101 d101,
706 decode(l.pval102,cn,dn,vn,dh,d(l.pval102)) p102,
707 l.pval102 d102,
708 decode(l.pval103,cn,vn,vn,vh,l.pval103) p103,
709 l.pval103 d103,
710 decode(l.pval104,cn,dn,vn,dh,d(l.pval104)) p104,
711 l.pval104 d104,
712 decode(l.pval105,cn,vn,vn,vh,l.pval105) p105,
713 l.pval105 d105,
714 decode(l.pval106,cn,dn,vn,dh,d(l.pval106)) p106,
715 l.pval106 d106,
716 decode(l.pval107,cn,dn,vn,dh,d(l.pval107)) p107,
717 l.pval107 d107,
718 decode(l.pval108,cn,vn,vn,vh,l.pval108) p108,
719 l.pval108 d108,
720 decode(l.pval109,cn,vn,vn,vh,l.pval109) p109,
721 l.pval109 d109,
722 decode(l.pval110,cn,vn,vn,vh,l.pval110) p110,
723 l.pval110 d110,
724 decode(l.pval111,cn,vn,vn,vh,l.pval111) p111,
725 l.pval111 d111,
726 decode(l.pval112,cn,nn,vn,nh,n(l.pval112)) p112,
727 l.pval112 d112,
728 decode(l.pval113,cn,vn,vn,vh,l.pval113) p113,
729 l.pval113 d113,
730 decode(l.pval114,cn,dn,d(l.pval114)) p114,
731 decode(l.pval115,cn,dn,d(l.pval115)) p115,
732 l.pval116 p116,
733 l.pval117 p117,
734 l.pval118 p118,
735 l.pval119 p119,
736 l.pval120 p120,
737 decode(l.pval121,cn,vn,l.pval121) p121,
738 decode(l.pval122,cn,vn,vn,vh,l.pval122) p122,
739 l.pval122 d122,
740 decode(l.pval123,cn,vn,vn,vh,l.pval123) p123,
741 l.pval123 d123,
742 decode(l.pval124,cn,vn,vn,vh,l.pval124) p124,
743 l.pval124 d124,
744 decode(l.pval125,cn,vn,vn,vh,l.pval125) p125,
745 l.pval125 d125,
746 decode(l.pval126,cn,vn,vn,vh,l.pval126) p126,
747 l.pval126 d126
748 from hr_pump_batch_lines l
749 where l.batch_line_id = p_batch_line_id;
750 --
751 c cr%rowtype;
752 l_validate boolean := false;
753 L_NAME_COMBINATION_WARNING boolean;
754 L_ASSIGN_PAYROLL_WARNING boolean;
755 L_ORIG_HIRE_WARNING boolean;
756 L_PERSON_ID number;
757 L_OBJECT_VERSION_NUMBER number;
758 L_PERSON_TYPE_ID number;
759 L_VENDOR_ID number;
760 L_CORRESPONDENCE_LANGUAGE varchar2(2000);
761 L_BENEFIT_GROUP_ID number;
762 --
763 begin
764 hr_data_pump.entry('call');
765 open cr;
766 fetch cr into c;
767 if cr%notfound then
768 hr_utility.set_message(800,'HR_50326_DP_NO_ROW');
769 hr_utility.set_message_token('TABLE','HR_PUMP_BATCH_LINES');
770 hr_utility.set_message_token('COLUMN','P_BATCH_LINE_ID');
771 hr_utility.set_message_token('VALUE',p_batch_line_id);
772 hr_utility.raise_error;
773 end if;
774 --
775 if c.p121 is null then
776 L_PERSON_ID:=nn;
777 else
778 L_PERSON_ID :=
779 hr_pump_get.get_person_id
780 (P_PERSON_USER_KEY => c.p121);
781 end if;
782 --
783 if c.p121 is null or
784 c.p1 is null then
785 L_OBJECT_VERSION_NUMBER:=nn;
786 else
787 L_OBJECT_VERSION_NUMBER :=
788 hr_pump_get.GET_PER_OVN
789 (P_PERSON_USER_KEY => c.p121
790 ,P_EFFECTIVE_DATE => c.p1);
791 end if;
792 --
793 if c.d122=cn or
794 c.d123=cn then
795 L_PERSON_TYPE_ID:=nn;
796 elsif c.d122 is null or
797 c.d123 is null then
798 L_PERSON_TYPE_ID:=nh;
799 else
800 L_PERSON_TYPE_ID :=
801 hr_pump_get.get_person_type_id
802 (P_USER_PERSON_TYPE => c.p122
806 --
803 ,P_BUSINESS_GROUP_ID => P_BUSINESS_GROUP_ID
804 ,P_LANGUAGE_CODE => c.p123);
805 end if;
807 if c.d124=cn then
808 L_VENDOR_ID:=nn;
809 elsif c.d124 is null then
810 L_VENDOR_ID:=nh;
811 else
812 L_VENDOR_ID :=
813 hr_pump_get.get_vendor_id
814 (P_VENDOR_NAME => c.p124);
815 end if;
816 --
817 if c.d125=cn then
818 L_CORRESPONDENCE_LANGUAGE:=vn;
819 elsif c.d125 is null then
820 L_CORRESPONDENCE_LANGUAGE:=vh;
821 else
822 L_CORRESPONDENCE_LANGUAGE :=
823 hr_pump_get.GET_CORRESPONDENCE_LANGUAGE
824 (P_CORRESPONDENCE_LANGUAGE => c.p125);
825 end if;
826 --
827 if c.d126=cn then
828 L_BENEFIT_GROUP_ID:=nn;
829 elsif c.d126 is null then
830 L_BENEFIT_GROUP_ID:=nh;
831 else
832 L_BENEFIT_GROUP_ID :=
833 hr_pump_get.get_benefit_group_id
834 (P_BUSINESS_GROUP_ID => P_BUSINESS_GROUP_ID
835 ,P_BENEFIT_GROUP => c.p126);
836 end if;
837 --
838 hr_data_pump.api_trc_on;
839 HR_RU_PERSON_API.UPDATE_RU_PERSON
840 (p_validate => l_validate
841 ,P_EFFECTIVE_DATE => c.p1
842 ,P_DATETRACK_UPDATE_MODE => c.p2
843 ,P_PERSON_ID => L_PERSON_ID
844 ,P_OBJECT_VERSION_NUMBER => L_OBJECT_VERSION_NUMBER
845 ,P_PERSON_TYPE_ID => L_PERSON_TYPE_ID
846 ,P_LAST_NAME => c.p3
847 ,P_APPLICANT_NUMBER => c.p4
848 ,P_COMMENTS => c.p5
849 ,P_DATE_EMPLOYEE_DATA_VERIFIED => c.p6
850 ,P_DATE_OF_BIRTH => c.p7
851 ,P_EMAIL_ADDRESS => c.p8
852 ,P_EMPLOYEE_NUMBER => c.p9
853 ,P_EXPENSE_CHECK_SEND_TO_ADDRES => c.p10
854 ,P_FIRST_NAME => c.p11
855 ,P_KNOWN_AS => c.p12
856 ,P_MARITAL_STATUS => c.p13
857 ,P_MIDDLE_NAMES => c.p14
858 ,P_NATIONALITY => c.p15
859 ,P_INN => c.p16
860 ,P_PREVIOUS_LAST_NAME => c.p17
861 ,P_REGISTERED_DISABLED_FLAG => c.p18
862 ,P_SEX => c.p19
863 ,P_TITLE => c.p20
864 ,P_VENDOR_ID => L_VENDOR_ID
865 ,P_WORK_TELEPHONE => c.p21
866 ,P_ATTRIBUTE_CATEGORY => c.p22
867 ,P_ATTRIBUTE1 => c.p23
868 ,P_ATTRIBUTE2 => c.p24
869 ,P_ATTRIBUTE3 => c.p25
870 ,P_ATTRIBUTE4 => c.p26
871 ,P_ATTRIBUTE5 => c.p27
872 ,P_ATTRIBUTE6 => c.p28
873 ,P_ATTRIBUTE7 => c.p29
874 ,P_ATTRIBUTE8 => c.p30
875 ,P_ATTRIBUTE9 => c.p31
876 ,P_ATTRIBUTE10 => c.p32
877 ,P_ATTRIBUTE11 => c.p33
878 ,P_ATTRIBUTE12 => c.p34
879 ,P_ATTRIBUTE13 => c.p35
880 ,P_ATTRIBUTE14 => c.p36
881 ,P_ATTRIBUTE15 => c.p37
882 ,P_ATTRIBUTE16 => c.p38
883 ,P_ATTRIBUTE17 => c.p39
884 ,P_ATTRIBUTE18 => c.p40
885 ,P_ATTRIBUTE19 => c.p41
886 ,P_ATTRIBUTE20 => c.p42
887 ,P_ATTRIBUTE21 => c.p43
888 ,P_ATTRIBUTE22 => c.p44
889 ,P_ATTRIBUTE23 => c.p45
890 ,P_ATTRIBUTE24 => c.p46
891 ,P_ATTRIBUTE25 => c.p47
892 ,P_ATTRIBUTE26 => c.p48
893 ,P_ATTRIBUTE27 => c.p49
894 ,P_ATTRIBUTE28 => c.p50
895 ,P_ATTRIBUTE29 => c.p51
896 ,P_ATTRIBUTE30 => c.p52
897 ,P_PLACE_OF_BIRTH => c.p53
898 ,P_REFERENCES => c.p54
899 ,P_LOCAL_COEFFICIENT => c.p55
900 ,P_CITIZENSHIP => c.p56
901 ,P_MILITARY_DOC => c.p57
902 ,P_RESERVE_CATEGORY => c.p58
903 ,P_MILITARY_RANK => c.p59
904 ,P_MILITARY_PROFILE => c.p60
905 ,P_MILITARY_REG_CODE => c.p61
906 ,P_MIL_SRVC_READINESS_CATEGORY => c.p62
907 ,P_MILITARY_COMMISSARIAT => c.p63
908 ,P_QUITTING_MARK => c.p64
909 ,P_MILITARY_UNIT_NUMBER => c.p65
910 ,P_MILITARY_REG_TYPE => c.p66
911 ,P_MILITARY_REG_DETAILS => c.p67
912 ,P_PENSION_FUND_NUMBER => c.p68
913 ,P_DATE_OF_DEATH => c.p69
914 ,P_BACKGROUND_CHECK_STATUS => c.p70
915 ,P_BACKGROUND_DATE_CHECK => c.p71
916 ,P_BLOOD_TYPE => c.p72
917 ,P_CORRESPONDENCE_LANGUAGE => L_CORRESPONDENCE_LANGUAGE
918 ,P_FAST_PATH_EMPLOYEE => c.p73
919 ,P_FTE_CAPACITY => c.p74
920 ,P_HOLD_APPLICANT_DATE_UNTIL => c.p75
921 ,P_HONORS => c.p76
922 ,P_INTERNAL_LOCATION => c.p77
923 ,P_LAST_MEDICAL_TEST_BY => c.p78
924 ,P_LAST_MEDICAL_TEST_DATE => c.p79
925 ,P_MAILSTOP => c.p80
926 ,P_OFFICE_NUMBER => c.p81
927 ,P_ON_MILITARY_SERVICE => c.p82
928 ,P_GENITIVE_LAST_NAME => c.p83
929 ,P_PROJECTED_START_DATE => c.p84
930 ,P_REHIRE_AUTHORIZOR => c.p85
931 ,P_REHIRE_RECOMMENDATION => c.p86
932 ,P_RESUME_EXISTS => c.p87
933 ,P_RESUME_LAST_UPDATED => c.p88
934 ,P_SECOND_PASSPORT_EXISTS => c.p89
935 ,P_STUDENT_STATUS => c.p90
936 ,P_WORK_SCHEDULE => c.p91
937 ,P_REHIRE_REASON => c.p92
938 ,P_SUFFIX => c.p93
939 ,P_BENEFIT_GROUP_ID => L_BENEFIT_GROUP_ID
940 ,P_RECEIPT_OF_DEATH_CERT_DATE => c.p94
941 ,P_COORD_BEN_MED_PLN_NO => c.p95
942 ,P_COORD_BEN_NO_CVG_FLAG => c.p96
943 ,P_COORD_BEN_MED_EXT_ER => c.p97
944 ,P_COORD_BEN_MED_PL_NAME => c.p98
945 ,P_COORD_BEN_MED_INSR_CRR_NAME => c.p99
946 ,P_COORD_BEN_MED_INSR_CRR_IDENT => c.p100
947 ,P_COORD_BEN_MED_CVG_STRT_DT => c.p101
948 ,P_COORD_BEN_MED_CVG_END_DT => c.p102
949 ,P_USES_TOBACCO_FLAG => c.p103
950 ,P_DPDNT_ADOPTION_DATE => c.p104
951 ,P_DPDNT_VLNTRY_SVCE_FLAG => c.p105
952 ,P_ORIGINAL_DATE_OF_HIRE => c.p106
953 ,P_ADJUSTED_SVC_DATE => c.p107
954 ,P_TOWN_OF_BIRTH => c.p108
955 ,P_REGION_OF_BIRTH => c.p109
956 ,P_COUNTRY_OF_BIRTH => c.p110
957 ,P_GLOBAL_PERSON_ID => c.p111
958 ,P_PARTY_ID => c.p112
959 ,P_NPW_NUMBER => c.p113
960 ,P_EFFECTIVE_START_DATE => c.p114
961 ,P_EFFECTIVE_END_DATE => c.p115
962 ,P_FULL_NAME => c.p116
963 ,P_COMMENT_ID => c.p117
964 ,P_NAME_COMBINATION_WARNING => L_NAME_COMBINATION_WARNING
965 ,P_ASSIGN_PAYROLL_WARNING => L_ASSIGN_PAYROLL_WARNING
966 ,P_ORIG_HIRE_WARNING => L_ORIG_HIRE_WARNING);
967 hr_data_pump.api_trc_off;
968 --
969 if L_NAME_COMBINATION_WARNING then
970 c.p118 := 'TRUE';
971 else
972 c.p118 := 'FALSE';
973 end if;
974 --
975 if L_ASSIGN_PAYROLL_WARNING then
976 c.p119 := 'TRUE';
977 else
978 c.p119 := 'FALSE';
979 end if;
980 --
981 if L_ORIG_HIRE_WARNING then
982 c.p120 := 'TRUE';
983 else
984 c.p120 := 'FALSE';
985 end if;
986 --
987 update hr_pump_batch_lines l set
988 l.pval009 = decode(c.p9,null,cn,c.p9),
989 l.pval114 = decode(c.p114,null,cn,dc(c.p114)),
990 l.pval115 = decode(c.p115,null,cn,dc(c.p115)),
991 l.pval116 = decode(c.p116,null,cn,c.p116),
992 l.pval117 = decode(c.p117,null,cn,c.p117),
993 l.pval118 = decode(c.p118,null,cn,c.p118),
994 l.pval119 = decode(c.p119,null,cn,c.p119),
995 l.pval120 = decode(c.p120,null,cn,c.p120)
996 where l.rowid = c.myrowid;
997 --
998 close cr;
999 --
1000 hr_data_pump.exit('call');
1001 exception
1002 when hr_multi_message.error_message_exist then
1003 if cr%isopen then
1004 close cr;
1005 end if;
1006 hr_pump_utils.set_multi_msg_error_flag(true);
1007 when others then
1008 if cr%isopen then
1009 close cr;
1010 end if;
1011 raise;
1012 end call;
1013 end hrdpp_UPDATE_RU_PERSON;