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

Source


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