DBA Data[Home] [Help]

PACKAGE BODY: APPS.HRDPP_UPDATE_US_PERSONAL_PAY_M

Source


1 package body hrdpp_UPDATE_US_PERSONAL_PAY_M as
2 /*
3  * Generated by hr_pump_meta_mapper at: 2012/11/27 04:11:03
4  * Generated for API: HR_PERSONAL_PAY_METHOD_API.UPDATE_US_PERSONAL_PAY_METHOD
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_ACCOUNT_NAME in varchar2 default null
85 ,P_ACCOUNT_NUMBER in varchar2 default null
86 ,P_TRANSIT_CODE in varchar2 default null
87 ,P_BANK_NAME in varchar2 default null
88 ,P_ACCOUNT_TYPE in varchar2 default null
89 ,P_BANK_BRANCH in varchar2 default null
90 ,P_AMOUNT in number default null
91 ,I_AMOUNT in varchar2 default 'N'
92 ,P_COMMENTS in varchar2 default null
93 ,P_PERCENTAGE in number default null
94 ,I_PERCENTAGE in varchar2 default 'N'
95 ,P_PRIORITY in number default null
96 ,I_PRIORITY in varchar2 default 'N'
97 ,P_ATTRIBUTE_CATEGORY in varchar2 default null
98 ,P_ATTRIBUTE1 in varchar2 default null
99 ,P_ATTRIBUTE2 in varchar2 default null
100 ,P_ATTRIBUTE3 in varchar2 default null
101 ,P_ATTRIBUTE4 in varchar2 default null
102 ,P_ATTRIBUTE5 in varchar2 default null
103 ,P_ATTRIBUTE6 in varchar2 default null
104 ,P_ATTRIBUTE7 in varchar2 default null
105 ,P_ATTRIBUTE8 in varchar2 default null
106 ,P_ATTRIBUTE9 in varchar2 default null
107 ,P_ATTRIBUTE10 in varchar2 default null
108 ,P_ATTRIBUTE11 in varchar2 default null
109 ,P_ATTRIBUTE12 in varchar2 default null
110 ,P_ATTRIBUTE13 in varchar2 default null
111 ,P_ATTRIBUTE14 in varchar2 default null
112 ,P_ATTRIBUTE15 in varchar2 default null
113 ,P_ATTRIBUTE16 in varchar2 default null
114 ,P_ATTRIBUTE17 in varchar2 default null
115 ,P_ATTRIBUTE18 in varchar2 default null
116 ,P_ATTRIBUTE19 in varchar2 default null
117 ,P_ATTRIBUTE20 in varchar2 default null
118 ,P_PAYEE_TYPE in varchar2 default null
119 ,P_PRENOTE_DATE in date default null
120 ,I_PRENOTE_DATE in varchar2 default 'N'
121 ,P_TERRITORY_CODE in varchar2 default null
122 ,P_PPM_INFORMATION_CATEGORY in varchar2 default null
123 ,P_PPM_INFORMATION1 in varchar2 default null
124 ,P_PPM_INFORMATION2 in varchar2 default null
125 ,P_PPM_INFORMATION3 in varchar2 default null
126 ,P_PPM_INFORMATION4 in varchar2 default null
127 ,P_PPM_INFORMATION5 in varchar2 default null
128 ,P_PPM_INFORMATION6 in varchar2 default null
129 ,P_PPM_INFORMATION7 in varchar2 default null
130 ,P_PPM_INFORMATION8 in varchar2 default null
131 ,P_PPM_INFORMATION9 in varchar2 default null
132 ,P_PPM_INFORMATION10 in varchar2 default null
133 ,P_PPM_INFORMATION11 in varchar2 default null
134 ,P_PPM_INFORMATION12 in varchar2 default null
135 ,P_PPM_INFORMATION13 in varchar2 default null
136 ,P_PPM_INFORMATION14 in varchar2 default null
137 ,P_PPM_INFORMATION15 in varchar2 default null
138 ,P_PPM_INFORMATION16 in varchar2 default null
139 ,P_PPM_INFORMATION17 in varchar2 default null
140 ,P_PPM_INFORMATION18 in varchar2 default null
141 ,P_PPM_INFORMATION19 in varchar2 default null
142 ,P_PPM_INFORMATION20 in varchar2 default null
143 ,P_PPM_INFORMATION21 in varchar2 default null
144 ,P_PPM_INFORMATION22 in varchar2 default null
145 ,P_PPM_INFORMATION23 in varchar2 default null
146 ,P_PPM_INFORMATION24 in varchar2 default null
147 ,P_PPM_INFORMATION25 in varchar2 default null
148 ,P_PPM_INFORMATION26 in varchar2 default null
149 ,P_PPM_INFORMATION27 in varchar2 default null
150 ,P_PPM_INFORMATION28 in varchar2 default null
151 ,P_PPM_INFORMATION29 in varchar2 default null
152 ,P_PPM_INFORMATION30 in varchar2 default null
153 ,P_PERSONAL_PAY_METHOD_USER_KEY in varchar2
154 ,P_PAYEE_ORG in varchar2 default null
155 ,P_PAYEE_PERSON_USER_KEY in varchar2 default null
156 ,P_LANGUAGE_CODE in varchar2 default null) is
157 blid number := p_data_pump_batch_line_id;
158 begin
159 if blid is not null then
160 delete from hr_pump_batch_lines where batch_line_id = blid;
161 delete from hr_pump_batch_exceptions
162 where source_type = 'BATCH_LINE' and source_id = blid;
163 end if;
164 insert into hr_pump_batch_lines
165 (batch_id
166 ,batch_line_id
167 ,business_group_name
168 ,api_module_id
169 ,line_status
170 ,user_sequence
171 ,link_value
172 ,pval001
173 ,pval002
174 ,pval003
175 ,pval004
176 ,pval005
177 ,pval006
178 ,pval007
179 ,pval008
180 ,pval009
181 ,pval010
182 ,pval011
183 ,pval012
184 ,pval013
185 ,pval014
186 ,pval015
187 ,pval016
188 ,pval017
189 ,pval018
190 ,pval019
191 ,pval020
192 ,pval021
193 ,pval022
194 ,pval023
195 ,pval024
196 ,pval025
197 ,pval026
198 ,pval027
199 ,pval028
200 ,pval029
201 ,pval030
202 ,pval031
203 ,pval032
204 ,pval033
205 ,pval034
206 ,pval035
207 ,pval036
208 ,pval037
209 ,pval038
210 ,pval039
211 ,pval040
212 ,pval041
213 ,pval042
214 ,pval043
215 ,pval044
216 ,pval045
217 ,pval046
218 ,pval047
219 ,pval048
220 ,pval049
221 ,pval050
222 ,pval051
223 ,pval052
224 ,pval053
225 ,pval054
226 ,pval055
227 ,pval056
228 ,pval057
229 ,pval058
230 ,pval059
231 ,pval060
232 ,pval061
233 ,pval062
234 ,pval063
235 ,pval064
236 ,pval065
237 ,pval066
238 ,pval067
239 ,pval072
240 ,pval073
241 ,pval074
242 ,pval075)
243 values
244 (p_batch_id
245 ,nvl(blid,hr_pump_batch_lines_s.nextval)
246 ,p_data_pump_business_grp_name
247 ,1388
248 ,'U'
249 ,p_user_sequence
250 ,p_link_value
251 ,dc(P_EFFECTIVE_DATE)
252 ,P_DATETRACK_UPDATE_MODE
253 ,P_ACCOUNT_NAME
254 ,P_ACCOUNT_NUMBER
255 ,P_TRANSIT_CODE
256 ,P_BANK_NAME
257 ,P_ACCOUNT_TYPE
258 ,P_BANK_BRANCH
259 ,nd(P_AMOUNT,I_AMOUNT)
260 ,P_COMMENTS
261 ,nd(P_PERCENTAGE,I_PERCENTAGE)
262 ,nd(P_PRIORITY,I_PRIORITY)
263 ,P_ATTRIBUTE_CATEGORY
264 ,P_ATTRIBUTE1
265 ,P_ATTRIBUTE2
266 ,P_ATTRIBUTE3
267 ,P_ATTRIBUTE4
268 ,P_ATTRIBUTE5
269 ,P_ATTRIBUTE6
270 ,P_ATTRIBUTE7
271 ,P_ATTRIBUTE8
272 ,P_ATTRIBUTE9
273 ,P_ATTRIBUTE10
274 ,P_ATTRIBUTE11
275 ,P_ATTRIBUTE12
276 ,P_ATTRIBUTE13
277 ,P_ATTRIBUTE14
278 ,P_ATTRIBUTE15
279 ,P_ATTRIBUTE16
280 ,P_ATTRIBUTE17
281 ,P_ATTRIBUTE18
282 ,P_ATTRIBUTE19
283 ,P_ATTRIBUTE20
284 ,P_PAYEE_TYPE
285 ,dd(P_PRENOTE_DATE,I_PRENOTE_DATE)
286 ,P_TERRITORY_CODE
287 ,P_PPM_INFORMATION_CATEGORY
288 ,P_PPM_INFORMATION1
289 ,P_PPM_INFORMATION2
290 ,P_PPM_INFORMATION3
291 ,P_PPM_INFORMATION4
292 ,P_PPM_INFORMATION5
293 ,P_PPM_INFORMATION6
294 ,P_PPM_INFORMATION7
295 ,P_PPM_INFORMATION8
296 ,P_PPM_INFORMATION9
297 ,P_PPM_INFORMATION10
298 ,P_PPM_INFORMATION11
299 ,P_PPM_INFORMATION12
300 ,P_PPM_INFORMATION13
301 ,P_PPM_INFORMATION14
302 ,P_PPM_INFORMATION15
303 ,P_PPM_INFORMATION16
304 ,P_PPM_INFORMATION17
305 ,P_PPM_INFORMATION18
306 ,P_PPM_INFORMATION19
307 ,P_PPM_INFORMATION20
308 ,P_PPM_INFORMATION21
309 ,P_PPM_INFORMATION22
310 ,P_PPM_INFORMATION23
311 ,P_PPM_INFORMATION24
312 ,P_PPM_INFORMATION25
313 ,P_PPM_INFORMATION26
314 ,P_PPM_INFORMATION27
315 ,P_PPM_INFORMATION28
316 ,P_PPM_INFORMATION29
317 ,P_PPM_INFORMATION30
318 ,P_PERSONAL_PAY_METHOD_USER_KEY
319 ,P_PAYEE_ORG
320 ,P_PAYEE_PERSON_USER_KEY
321 ,P_LANGUAGE_CODE);
322 end insert_batch_lines;
323 --
324 procedure call
325 (p_business_group_id in number,
326 p_batch_line_id     in number) is
327 cursor cr is
328 select l.rowid myrowid,
329 decode(l.pval001,cn,dn,d(l.pval001)) p1,
330 decode(l.pval002,cn,vn,l.pval002) p2,
331 decode(l.pval003,cn,vn,vn,vh,l.pval003) p3,
332 l.pval003 d3,
333 decode(l.pval004,cn,vn,vn,vh,l.pval004) p4,
334 l.pval004 d4,
335 decode(l.pval005,cn,vn,vn,vh,l.pval005) p5,
336 l.pval005 d5,
337 decode(l.pval006,cn,vn,vn,vh,l.pval006) p6,
338 l.pval006 d6,
339 decode(l.pval007,cn,vn,vn,vh,
340  hr_pump_get.gl(l.pval007,'US_ACCOUNT_TYPE',d(l.pval001),l.pval075)) p7,
341 l.pval007 d7,
342 decode(l.pval008,cn,vn,vn,vh,l.pval008) p8,
343 l.pval008 d8,
344 decode(l.pval009,cn,nn,vn,nh,n(l.pval009)) p9,
345 l.pval009 d9,
346 decode(l.pval010,cn,vn,vn,vh,l.pval010) p10,
347 l.pval010 d10,
348 decode(l.pval011,cn,nn,vn,nh,n(l.pval011)) p11,
349 l.pval011 d11,
350 decode(l.pval012,cn,nn,vn,nh,n(l.pval012)) p12,
351 l.pval012 d12,
352 decode(l.pval013,cn,vn,vn,vh,l.pval013) p13,
353 l.pval013 d13,
354 decode(l.pval014,cn,vn,vn,vh,l.pval014) p14,
355 l.pval014 d14,
356 decode(l.pval015,cn,vn,vn,vh,l.pval015) p15,
357 l.pval015 d15,
358 decode(l.pval016,cn,vn,vn,vh,l.pval016) p16,
359 l.pval016 d16,
360 decode(l.pval017,cn,vn,vn,vh,l.pval017) p17,
361 l.pval017 d17,
362 decode(l.pval018,cn,vn,vn,vh,l.pval018) p18,
363 l.pval018 d18,
364 decode(l.pval019,cn,vn,vn,vh,l.pval019) p19,
365 l.pval019 d19,
366 decode(l.pval020,cn,vn,vn,vh,l.pval020) p20,
367 l.pval020 d20,
368 decode(l.pval021,cn,vn,vn,vh,l.pval021) p21,
369 l.pval021 d21,
370 decode(l.pval022,cn,vn,vn,vh,l.pval022) p22,
371 l.pval022 d22,
372 decode(l.pval023,cn,vn,vn,vh,l.pval023) p23,
373 l.pval023 d23,
374 decode(l.pval024,cn,vn,vn,vh,l.pval024) p24,
375 l.pval024 d24,
376 decode(l.pval025,cn,vn,vn,vh,l.pval025) p25,
377 l.pval025 d25,
378 decode(l.pval026,cn,vn,vn,vh,l.pval026) p26,
379 l.pval026 d26,
380 decode(l.pval027,cn,vn,vn,vh,l.pval027) p27,
381 l.pval027 d27,
382 decode(l.pval028,cn,vn,vn,vh,l.pval028) p28,
383 l.pval028 d28,
384 decode(l.pval029,cn,vn,vn,vh,l.pval029) p29,
385 l.pval029 d29,
386 decode(l.pval030,cn,vn,vn,vh,l.pval030) p30,
387 l.pval030 d30,
388 decode(l.pval031,cn,vn,vn,vh,l.pval031) p31,
389 l.pval031 d31,
390 decode(l.pval032,cn,vn,vn,vh,l.pval032) p32,
391 l.pval032 d32,
392 decode(l.pval033,cn,vn,vn,vh,l.pval033) p33,
393 l.pval033 d33,
394 decode(l.pval034,cn,vn,vn,vh,
395  hr_pump_get.gl(l.pval034,'PAYEE_TYPE',d(l.pval001),l.pval075)) p34,
396 l.pval034 d34,
397 decode(l.pval035,cn,dn,vn,dh,d(l.pval035)) p35,
398 l.pval035 d35,
399 decode(l.pval036,cn,vn,vn,vh,l.pval036) p36,
400 l.pval036 d36,
401 decode(l.pval037,cn,vn,vn,vh,l.pval037) p37,
402 l.pval037 d37,
403 decode(l.pval038,cn,vn,vn,vh,l.pval038) p38,
404 l.pval038 d38,
405 decode(l.pval039,cn,vn,vn,vh,l.pval039) p39,
406 l.pval039 d39,
407 decode(l.pval040,cn,vn,vn,vh,l.pval040) p40,
408 l.pval040 d40,
409 decode(l.pval041,cn,vn,vn,vh,l.pval041) p41,
410 l.pval041 d41,
411 decode(l.pval042,cn,vn,vn,vh,l.pval042) p42,
412 l.pval042 d42,
413 decode(l.pval043,cn,vn,vn,vh,l.pval043) p43,
414 l.pval043 d43,
415 decode(l.pval044,cn,vn,vn,vh,l.pval044) p44,
416 l.pval044 d44,
417 decode(l.pval045,cn,vn,vn,vh,l.pval045) p45,
418 l.pval045 d45,
419 decode(l.pval046,cn,vn,vn,vh,l.pval046) p46,
420 l.pval046 d46,
421 decode(l.pval047,cn,vn,vn,vh,l.pval047) p47,
422 l.pval047 d47,
423 decode(l.pval048,cn,vn,vn,vh,l.pval048) p48,
424 l.pval048 d48,
425 decode(l.pval049,cn,vn,vn,vh,l.pval049) p49,
426 l.pval049 d49,
427 decode(l.pval050,cn,vn,vn,vh,l.pval050) p50,
428 l.pval050 d50,
429 decode(l.pval051,cn,vn,vn,vh,l.pval051) p51,
430 l.pval051 d51,
431 decode(l.pval052,cn,vn,vn,vh,l.pval052) p52,
432 l.pval052 d52,
433 decode(l.pval053,cn,vn,vn,vh,l.pval053) p53,
434 l.pval053 d53,
435 decode(l.pval054,cn,vn,vn,vh,l.pval054) p54,
436 l.pval054 d54,
437 decode(l.pval055,cn,vn,vn,vh,l.pval055) p55,
438 l.pval055 d55,
439 decode(l.pval056,cn,vn,vn,vh,l.pval056) p56,
440 l.pval056 d56,
441 decode(l.pval057,cn,vn,vn,vh,l.pval057) p57,
442 l.pval057 d57,
443 decode(l.pval058,cn,vn,vn,vh,l.pval058) p58,
444 l.pval058 d58,
445 decode(l.pval059,cn,vn,vn,vh,l.pval059) p59,
446 l.pval059 d59,
447 decode(l.pval060,cn,vn,vn,vh,l.pval060) p60,
448 l.pval060 d60,
449 decode(l.pval061,cn,vn,vn,vh,l.pval061) p61,
450 l.pval061 d61,
451 decode(l.pval062,cn,vn,vn,vh,l.pval062) p62,
452 l.pval062 d62,
453 decode(l.pval063,cn,vn,vn,vh,l.pval063) p63,
454 l.pval063 d63,
455 decode(l.pval064,cn,vn,vn,vh,l.pval064) p64,
456 l.pval064 d64,
457 decode(l.pval065,cn,vn,vn,vh,l.pval065) p65,
458 l.pval065 d65,
459 decode(l.pval066,cn,vn,vn,vh,l.pval066) p66,
460 l.pval066 d66,
461 decode(l.pval067,cn,vn,vn,vh,l.pval067) p67,
462 l.pval067 d67,
463 l.pval068 p68,
464 l.pval069 p69,
465 decode(l.pval070,cn,dn,d(l.pval070)) p70,
466 decode(l.pval071,cn,dn,d(l.pval071)) p71,
467 decode(l.pval072,cn,vn,l.pval072) p72,
468 decode(l.pval073,cn,vn,vn,vh,l.pval073) p73,
469 l.pval073 d73,
470 decode(l.pval074,cn,vn,vn,vn,l.pval074) p74,
471 l.pval074 d74,
472 decode(l.pval075,cn,vn,vn,vh,l.pval075) p75,
473 l.pval075 d75
474 from hr_pump_batch_lines l
475 where l.batch_line_id = p_batch_line_id;
476 --
477 c cr%rowtype;
478 l_validate boolean := false;
479 L_PERSONAL_PAYMENT_METHOD_ID number;
480 L_OBJECT_VERSION_NUMBER number;
481 L_PAYEE_ID number;
482 --
483 begin
484 hr_data_pump.entry('call');
485 open cr;
486 fetch cr into c;
487 if cr%notfound then
488 hr_utility.set_message(800,'HR_50326_DP_NO_ROW');
489 hr_utility.set_message_token('TABLE','HR_PUMP_BATCH_LINES');
490 hr_utility.set_message_token('COLUMN','P_BATCH_LINE_ID');
491 hr_utility.set_message_token('VALUE',p_batch_line_id);
492 hr_utility.raise_error;
493 end if;
494 --
495 if c.p72 is null then
496 L_PERSONAL_PAYMENT_METHOD_ID:=nn;
497 else
498 L_PERSONAL_PAYMENT_METHOD_ID := 
499 hr_pump_get.get_personal_payment_method_id
500 (P_PERSONAL_PAY_METHOD_USER_KEY => c.p72);
501 end if;
502 --
503 if c.p72 is null or
504 c.p1 is null then
505 L_OBJECT_VERSION_NUMBER:=nn;
506 else
507 L_OBJECT_VERSION_NUMBER := 
508 hr_pump_get.GET_PPM_OVN
509 (P_PERSONAL_PAY_METHOD_USER_KEY => c.p72
510 ,P_EFFECTIVE_DATE => c.p1);
511 end if;
512 --
513 L_PAYEE_ID := 
514 hr_pump_get.get_payee_id
515 (P_DATA_PUMP_ALWAYS_CALL => null
516 ,P_PAYEE_TYPE => c.p34
517 ,P_BUSINESS_GROUP_ID => P_BUSINESS_GROUP_ID
518 ,P_PAYEE_ORG => c.p73
519 ,P_PAYEE_PERSON_USER_KEY => c.p74
520 ,P_EFFECTIVE_DATE => c.p1
521 ,P_LANGUAGE_CODE => c.p75);
522 --
523 hr_data_pump.api_trc_on;
524 HR_PERSONAL_PAY_METHOD_API.UPDATE_US_PERSONAL_PAY_METHOD
525 (p_validate => l_validate
526 ,P_EFFECTIVE_DATE => c.p1
527 ,P_DATETRACK_UPDATE_MODE => c.p2
528 ,P_PERSONAL_PAYMENT_METHOD_ID => L_PERSONAL_PAYMENT_METHOD_ID
529 ,P_OBJECT_VERSION_NUMBER => L_OBJECT_VERSION_NUMBER
530 ,P_ACCOUNT_NAME => c.p3
531 ,P_ACCOUNT_NUMBER => c.p4
532 ,P_TRANSIT_CODE => c.p5
533 ,P_BANK_NAME => c.p6
534 ,P_ACCOUNT_TYPE => c.p7
535 ,P_BANK_BRANCH => c.p8
536 ,P_AMOUNT => c.p9
537 ,P_COMMENTS => c.p10
538 ,P_PERCENTAGE => c.p11
539 ,P_PRIORITY => c.p12
540 ,P_ATTRIBUTE_CATEGORY => c.p13
541 ,P_ATTRIBUTE1 => c.p14
542 ,P_ATTRIBUTE2 => c.p15
543 ,P_ATTRIBUTE3 => c.p16
544 ,P_ATTRIBUTE4 => c.p17
545 ,P_ATTRIBUTE5 => c.p18
546 ,P_ATTRIBUTE6 => c.p19
547 ,P_ATTRIBUTE7 => c.p20
548 ,P_ATTRIBUTE8 => c.p21
549 ,P_ATTRIBUTE9 => c.p22
550 ,P_ATTRIBUTE10 => c.p23
551 ,P_ATTRIBUTE11 => c.p24
552 ,P_ATTRIBUTE12 => c.p25
553 ,P_ATTRIBUTE13 => c.p26
554 ,P_ATTRIBUTE14 => c.p27
555 ,P_ATTRIBUTE15 => c.p28
556 ,P_ATTRIBUTE16 => c.p29
557 ,P_ATTRIBUTE17 => c.p30
558 ,P_ATTRIBUTE18 => c.p31
559 ,P_ATTRIBUTE19 => c.p32
560 ,P_ATTRIBUTE20 => c.p33
561 ,P_PAYEE_TYPE => c.p34
562 ,P_PAYEE_ID => L_PAYEE_ID
563 ,P_PRENOTE_DATE => c.p35
564 ,P_TERRITORY_CODE => c.p36
565 ,P_PPM_INFORMATION_CATEGORY => c.p37
566 ,P_PPM_INFORMATION1 => c.p38
567 ,P_PPM_INFORMATION2 => c.p39
568 ,P_PPM_INFORMATION3 => c.p40
569 ,P_PPM_INFORMATION4 => c.p41
570 ,P_PPM_INFORMATION5 => c.p42
571 ,P_PPM_INFORMATION6 => c.p43
572 ,P_PPM_INFORMATION7 => c.p44
573 ,P_PPM_INFORMATION8 => c.p45
574 ,P_PPM_INFORMATION9 => c.p46
575 ,P_PPM_INFORMATION10 => c.p47
576 ,P_PPM_INFORMATION11 => c.p48
577 ,P_PPM_INFORMATION12 => c.p49
578 ,P_PPM_INFORMATION13 => c.p50
579 ,P_PPM_INFORMATION14 => c.p51
580 ,P_PPM_INFORMATION15 => c.p52
581 ,P_PPM_INFORMATION16 => c.p53
582 ,P_PPM_INFORMATION17 => c.p54
583 ,P_PPM_INFORMATION18 => c.p55
584 ,P_PPM_INFORMATION19 => c.p56
585 ,P_PPM_INFORMATION20 => c.p57
586 ,P_PPM_INFORMATION21 => c.p58
587 ,P_PPM_INFORMATION22 => c.p59
588 ,P_PPM_INFORMATION23 => c.p60
589 ,P_PPM_INFORMATION24 => c.p61
590 ,P_PPM_INFORMATION25 => c.p62
591 ,P_PPM_INFORMATION26 => c.p63
592 ,P_PPM_INFORMATION27 => c.p64
593 ,P_PPM_INFORMATION28 => c.p65
594 ,P_PPM_INFORMATION29 => c.p66
595 ,P_PPM_INFORMATION30 => c.p67
596 ,P_COMMENT_ID => c.p68
597 ,P_EXTERNAL_ACCOUNT_ID => c.p69
598 ,P_EFFECTIVE_START_DATE => c.p70
599 ,P_EFFECTIVE_END_DATE => c.p71);
600 hr_data_pump.api_trc_off;
601 
602 --
603 update hr_pump_batch_lines l set
604 l.pval068 = decode(c.p68,null,cn,c.p68),
605 l.pval069 = decode(c.p69,null,cn,c.p69),
606 l.pval070 = decode(c.p70,null,cn,dc(c.p70)),
607 l.pval071 = decode(c.p71,null,cn,dc(c.p71))
608 where l.rowid = c.myrowid;
609 --
610 close cr;
611 --
612 hr_data_pump.exit('call');
613 exception
614  when hr_multi_message.error_message_exist then
615    if cr%isopen then
616     close cr;
617    end if;
618    hr_pump_utils.set_multi_msg_error_flag(true);
619  when others then
620  if cr%isopen then
621   close cr;
622  end if;
623  raise;
624 end call;
625 end hrdpp_UPDATE_US_PERSONAL_PAY_M;