DBA Data[Home] [Help]

PACKAGE BODY: APPS.HRDPP_UPDATE_ELEMENT_ENTRY

Source


1 package body hrdpp_UPDATE_ELEMENT_ENTRY as
2 /*
3  * Generated by hr_pump_meta_mapper at: 2007/01/04 02:01:33
4  * Generated for API: PY_ELEMENT_ENTRY_API.UPDATE_ELEMENT_ENTRY
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_DATETRACK_UPDATE_MODE in varchar2
83 ,P_EFFECTIVE_DATE in date
84 ,P_UPDATING_ACTION_TYPE in varchar2 default null
85 ,P_CREATOR_TYPE in varchar2 default null
86 ,P_REASON in varchar2 default null
87 ,P_SUBPRIORITY in number default null
88 ,I_SUBPRIORITY in varchar2 default 'N'
89 ,P_DATE_EARNED in date default null
90 ,I_DATE_EARNED in varchar2 default 'N'
91 ,P_ATTRIBUTE_CATEGORY in varchar2 default null
92 ,P_ATTRIBUTE1 in varchar2 default null
93 ,P_ATTRIBUTE2 in varchar2 default null
94 ,P_ATTRIBUTE3 in varchar2 default null
95 ,P_ATTRIBUTE4 in varchar2 default null
96 ,P_ATTRIBUTE5 in varchar2 default null
97 ,P_ATTRIBUTE6 in varchar2 default null
98 ,P_ATTRIBUTE7 in varchar2 default null
99 ,P_ATTRIBUTE8 in varchar2 default null
100 ,P_ATTRIBUTE9 in varchar2 default null
101 ,P_ATTRIBUTE10 in varchar2 default null
102 ,P_ATTRIBUTE11 in varchar2 default null
103 ,P_ATTRIBUTE12 in varchar2 default null
104 ,P_ATTRIBUTE13 in varchar2 default null
105 ,P_ATTRIBUTE14 in varchar2 default null
106 ,P_ATTRIBUTE15 in varchar2 default null
107 ,P_ATTRIBUTE16 in varchar2 default null
108 ,P_ATTRIBUTE17 in varchar2 default null
109 ,P_ATTRIBUTE18 in varchar2 default null
110 ,P_ATTRIBUTE19 in varchar2 default null
111 ,P_ATTRIBUTE20 in varchar2 default null
112 ,P_ENTRY_VALUE1 in varchar2 default null
113 ,P_ENTRY_VALUE2 in varchar2 default null
114 ,P_ENTRY_VALUE3 in varchar2 default null
115 ,P_ENTRY_VALUE4 in varchar2 default null
116 ,P_ENTRY_VALUE5 in varchar2 default null
117 ,P_ENTRY_VALUE6 in varchar2 default null
118 ,P_ENTRY_VALUE7 in varchar2 default null
119 ,P_ENTRY_VALUE8 in varchar2 default null
120 ,P_ENTRY_VALUE9 in varchar2 default null
121 ,P_ENTRY_VALUE10 in varchar2 default null
122 ,P_ENTRY_VALUE11 in varchar2 default null
123 ,P_ENTRY_VALUE12 in varchar2 default null
124 ,P_ENTRY_VALUE13 in varchar2 default null
125 ,P_ENTRY_VALUE14 in varchar2 default null
126 ,P_ENTRY_VALUE15 in varchar2 default null
127 ,P_ENTRY_INFORMATION_CATEGORY in varchar2 default null
128 ,P_ENTRY_INFORMATION1 in varchar2 default null
129 ,P_ENTRY_INFORMATION2 in varchar2 default null
130 ,P_ENTRY_INFORMATION3 in varchar2 default null
131 ,P_ENTRY_INFORMATION4 in varchar2 default null
132 ,P_ENTRY_INFORMATION5 in varchar2 default null
133 ,P_ENTRY_INFORMATION6 in varchar2 default null
134 ,P_ENTRY_INFORMATION7 in varchar2 default null
135 ,P_ENTRY_INFORMATION8 in varchar2 default null
136 ,P_ENTRY_INFORMATION9 in varchar2 default null
137 ,P_ENTRY_INFORMATION10 in varchar2 default null
138 ,P_ENTRY_INFORMATION11 in varchar2 default null
139 ,P_ENTRY_INFORMATION12 in varchar2 default null
140 ,P_ENTRY_INFORMATION13 in varchar2 default null
141 ,P_ENTRY_INFORMATION14 in varchar2 default null
142 ,P_ENTRY_INFORMATION15 in varchar2 default null
143 ,P_ENTRY_INFORMATION16 in varchar2 default null
144 ,P_ENTRY_INFORMATION17 in varchar2 default null
145 ,P_ENTRY_INFORMATION18 in varchar2 default null
146 ,P_ENTRY_INFORMATION19 in varchar2 default null
147 ,P_ENTRY_INFORMATION20 in varchar2 default null
148 ,P_ENTRY_INFORMATION21 in varchar2 default null
149 ,P_ENTRY_INFORMATION22 in varchar2 default null
150 ,P_ENTRY_INFORMATION23 in varchar2 default null
151 ,P_ENTRY_INFORMATION24 in varchar2 default null
152 ,P_ENTRY_INFORMATION25 in varchar2 default null
153 ,P_ENTRY_INFORMATION26 in varchar2 default null
154 ,P_ENTRY_INFORMATION27 in varchar2 default null
155 ,P_ENTRY_INFORMATION28 in varchar2 default null
156 ,P_ENTRY_INFORMATION29 in varchar2 default null
157 ,P_ENTRY_INFORMATION30 in varchar2 default null
158 ,P_OVERRIDE_USER_ENT_CHK in varchar2 default null
159 ,P_ELEMENT_ENTRY_USER_KEY in varchar2
160 ,P_COST_ALLOC_KEYFLEX_USER_KEY in varchar2 default null
161 ,P_UPDATING_ACTION_USER_KEY in varchar2 default null
162 ,P_ORIGINAL_ENTRY_USER_KEY in varchar2 default null
163 ,P_COMMENT_USER_KEY in varchar2 default null
164 ,P_PERSONAL_PAY_METHOD_USER_KEY in varchar2 default null
165 ,P_INPUT_VALUE_NAME1 in varchar2 default null
166 ,P_ELEMENT_NAME in varchar2 default null
167 ,P_LANGUAGE_CODE in varchar2 default null
168 ,P_INPUT_VALUE_NAME2 in varchar2 default null
169 ,P_INPUT_VALUE_NAME3 in varchar2 default null
170 ,P_INPUT_VALUE_NAME4 in varchar2 default null
171 ,P_INPUT_VALUE_NAME5 in varchar2 default null
172 ,P_INPUT_VALUE_NAME6 in varchar2 default null
173 ,P_INPUT_VALUE_NAME7 in varchar2 default null
174 ,P_INPUT_VALUE_NAME8 in varchar2 default null
175 ,P_INPUT_VALUE_NAME9 in varchar2 default null
176 ,P_INPUT_VALUE_NAME10 in varchar2 default null
177 ,P_INPUT_VALUE_NAME11 in varchar2 default null
178 ,P_INPUT_VALUE_NAME12 in varchar2 default null
179 ,P_INPUT_VALUE_NAME13 in varchar2 default null
180 ,P_INPUT_VALUE_NAME14 in varchar2 default null
181 ,P_INPUT_VALUE_NAME15 in varchar2 default null) is
182 blid number := p_data_pump_batch_line_id;
183 begin
184 if blid is not null then
185 delete from hr_pump_batch_lines where batch_line_id = blid;
186 delete from hr_pump_batch_exceptions
187 where source_type = 'BATCH_LINE' and source_id = blid;
188 end if;
189 insert into hr_pump_batch_lines
190 (batch_id
191 ,batch_line_id
192 ,business_group_name
193 ,api_module_id
194 ,line_status
195 ,user_sequence
196 ,link_value
197 ,pval001
198 ,pval002
199 ,pval003
200 ,pval004
201 ,pval005
202 ,pval006
203 ,pval007
204 ,pval008
205 ,pval009
206 ,pval010
207 ,pval011
208 ,pval012
209 ,pval013
210 ,pval014
211 ,pval015
212 ,pval016
213 ,pval017
214 ,pval018
215 ,pval019
216 ,pval020
217 ,pval021
218 ,pval022
219 ,pval023
220 ,pval024
221 ,pval025
222 ,pval026
223 ,pval027
224 ,pval028
225 ,pval029
226 ,pval030
227 ,pval031
228 ,pval032
229 ,pval033
230 ,pval034
231 ,pval035
232 ,pval036
233 ,pval037
234 ,pval038
235 ,pval039
236 ,pval040
237 ,pval041
238 ,pval042
239 ,pval043
240 ,pval044
241 ,pval045
242 ,pval046
243 ,pval047
244 ,pval048
245 ,pval049
246 ,pval050
247 ,pval051
248 ,pval052
249 ,pval053
250 ,pval054
251 ,pval055
252 ,pval056
253 ,pval057
254 ,pval058
255 ,pval059
256 ,pval060
257 ,pval061
258 ,pval062
259 ,pval063
260 ,pval064
261 ,pval065
262 ,pval066
263 ,pval067
264 ,pval068
265 ,pval069
266 ,pval070
267 ,pval071
268 ,pval072
269 ,pval073
270 ,pval074
271 ,pval075
272 ,pval079
273 ,pval080
274 ,pval081
275 ,pval082
276 ,pval083
277 ,pval084
278 ,pval085
279 ,pval086
280 ,pval087
281 ,pval088
282 ,pval089
283 ,pval090
284 ,pval091
285 ,pval092
286 ,pval093
287 ,pval094
288 ,pval095
289 ,pval096
290 ,pval097
291 ,pval098
292 ,pval099
293 ,pval100
294 ,pval101)
295 values
296 (p_batch_id
297 ,nvl(blid,hr_pump_batch_lines_s.nextval)
298 ,p_data_pump_business_grp_name
299 ,1383
300 ,'U'
301 ,p_user_sequence
302 ,p_link_value
303 ,P_DATETRACK_UPDATE_MODE
304 ,dc(P_EFFECTIVE_DATE)
305 ,P_UPDATING_ACTION_TYPE
306 ,P_CREATOR_TYPE
307 ,P_REASON
308 ,nd(P_SUBPRIORITY,I_SUBPRIORITY)
309 ,dd(P_DATE_EARNED,I_DATE_EARNED)
310 ,P_ATTRIBUTE_CATEGORY
311 ,P_ATTRIBUTE1
312 ,P_ATTRIBUTE2
313 ,P_ATTRIBUTE3
314 ,P_ATTRIBUTE4
315 ,P_ATTRIBUTE5
316 ,P_ATTRIBUTE6
317 ,P_ATTRIBUTE7
318 ,P_ATTRIBUTE8
319 ,P_ATTRIBUTE9
320 ,P_ATTRIBUTE10
321 ,P_ATTRIBUTE11
322 ,P_ATTRIBUTE12
323 ,P_ATTRIBUTE13
324 ,P_ATTRIBUTE14
325 ,P_ATTRIBUTE15
326 ,P_ATTRIBUTE16
327 ,P_ATTRIBUTE17
328 ,P_ATTRIBUTE18
329 ,P_ATTRIBUTE19
330 ,P_ATTRIBUTE20
331 ,P_ENTRY_VALUE1
332 ,P_ENTRY_VALUE2
333 ,P_ENTRY_VALUE3
334 ,P_ENTRY_VALUE4
335 ,P_ENTRY_VALUE5
336 ,P_ENTRY_VALUE6
337 ,P_ENTRY_VALUE7
338 ,P_ENTRY_VALUE8
339 ,P_ENTRY_VALUE9
340 ,P_ENTRY_VALUE10
341 ,P_ENTRY_VALUE11
342 ,P_ENTRY_VALUE12
343 ,P_ENTRY_VALUE13
344 ,P_ENTRY_VALUE14
345 ,P_ENTRY_VALUE15
346 ,P_ENTRY_INFORMATION_CATEGORY
347 ,P_ENTRY_INFORMATION1
348 ,P_ENTRY_INFORMATION2
349 ,P_ENTRY_INFORMATION3
350 ,P_ENTRY_INFORMATION4
351 ,P_ENTRY_INFORMATION5
352 ,P_ENTRY_INFORMATION6
353 ,P_ENTRY_INFORMATION7
354 ,P_ENTRY_INFORMATION8
355 ,P_ENTRY_INFORMATION9
356 ,P_ENTRY_INFORMATION10
357 ,P_ENTRY_INFORMATION11
358 ,P_ENTRY_INFORMATION12
359 ,P_ENTRY_INFORMATION13
360 ,P_ENTRY_INFORMATION14
361 ,P_ENTRY_INFORMATION15
362 ,P_ENTRY_INFORMATION16
363 ,P_ENTRY_INFORMATION17
364 ,P_ENTRY_INFORMATION18
365 ,P_ENTRY_INFORMATION19
366 ,P_ENTRY_INFORMATION20
367 ,P_ENTRY_INFORMATION21
368 ,P_ENTRY_INFORMATION22
369 ,P_ENTRY_INFORMATION23
370 ,P_ENTRY_INFORMATION24
371 ,P_ENTRY_INFORMATION25
372 ,P_ENTRY_INFORMATION26
373 ,P_ENTRY_INFORMATION27
374 ,P_ENTRY_INFORMATION28
375 ,P_ENTRY_INFORMATION29
376 ,P_ENTRY_INFORMATION30
377 ,P_OVERRIDE_USER_ENT_CHK
378 ,P_ELEMENT_ENTRY_USER_KEY
379 ,P_COST_ALLOC_KEYFLEX_USER_KEY
380 ,P_UPDATING_ACTION_USER_KEY
381 ,P_ORIGINAL_ENTRY_USER_KEY
382 ,P_COMMENT_USER_KEY
383 ,P_PERSONAL_PAY_METHOD_USER_KEY
384 ,P_INPUT_VALUE_NAME1
385 ,P_ELEMENT_NAME
386 ,P_LANGUAGE_CODE
387 ,P_INPUT_VALUE_NAME2
388 ,P_INPUT_VALUE_NAME3
389 ,P_INPUT_VALUE_NAME4
390 ,P_INPUT_VALUE_NAME5
391 ,P_INPUT_VALUE_NAME6
392 ,P_INPUT_VALUE_NAME7
393 ,P_INPUT_VALUE_NAME8
394 ,P_INPUT_VALUE_NAME9
395 ,P_INPUT_VALUE_NAME10
396 ,P_INPUT_VALUE_NAME11
397 ,P_INPUT_VALUE_NAME12
398 ,P_INPUT_VALUE_NAME13
399 ,P_INPUT_VALUE_NAME14
400 ,P_INPUT_VALUE_NAME15);
401 end insert_batch_lines;
402 --
403 procedure call
404 (p_business_group_id in number,
405 p_batch_line_id     in number) is
406 cursor cr is
407 select l.rowid myrowid,
408 decode(l.pval001,cn,vn,l.pval001) p1,
409 decode(l.pval002,cn,dn,d(l.pval002)) p2,
410 decode(l.pval003,cn,vn,vn,vh,l.pval003) p3,
411 l.pval003 d3,
412 decode(l.pval004,cn,vn,vn,vh,l.pval004) p4,
413 l.pval004 d4,
414 decode(l.pval005,cn,vn,vn,vh,
415  hr_pump_get.gl(l.pval005,'ELE_ENTRY_REASON',d(l.pval002),l.pval087)) p5,
416 l.pval005 d5,
417 decode(l.pval006,cn,nn,vn,nh,n(l.pval006)) p6,
418 l.pval006 d6,
419 decode(l.pval007,cn,dn,vn,dh,d(l.pval007)) p7,
420 l.pval007 d7,
421 decode(l.pval008,cn,vn,vn,vh,l.pval008) p8,
422 l.pval008 d8,
423 decode(l.pval009,cn,vn,vn,vh,l.pval009) p9,
424 l.pval009 d9,
425 decode(l.pval010,cn,vn,vn,vh,l.pval010) p10,
426 l.pval010 d10,
427 decode(l.pval011,cn,vn,vn,vh,l.pval011) p11,
428 l.pval011 d11,
429 decode(l.pval012,cn,vn,vn,vh,l.pval012) p12,
430 l.pval012 d12,
431 decode(l.pval013,cn,vn,vn,vh,l.pval013) p13,
432 l.pval013 d13,
433 decode(l.pval014,cn,vn,vn,vh,l.pval014) p14,
434 l.pval014 d14,
435 decode(l.pval015,cn,vn,vn,vh,l.pval015) p15,
436 l.pval015 d15,
437 decode(l.pval016,cn,vn,vn,vh,l.pval016) p16,
438 l.pval016 d16,
439 decode(l.pval017,cn,vn,vn,vh,l.pval017) p17,
440 l.pval017 d17,
441 decode(l.pval018,cn,vn,vn,vh,l.pval018) p18,
442 l.pval018 d18,
443 decode(l.pval019,cn,vn,vn,vh,l.pval019) p19,
444 l.pval019 d19,
445 decode(l.pval020,cn,vn,vn,vh,l.pval020) p20,
446 l.pval020 d20,
447 decode(l.pval021,cn,vn,vn,vh,l.pval021) p21,
448 l.pval021 d21,
449 decode(l.pval022,cn,vn,vn,vh,l.pval022) p22,
450 l.pval022 d22,
451 decode(l.pval023,cn,vn,vn,vh,l.pval023) p23,
452 l.pval023 d23,
453 decode(l.pval024,cn,vn,vn,vh,l.pval024) p24,
454 l.pval024 d24,
455 decode(l.pval025,cn,vn,vn,vh,l.pval025) p25,
456 l.pval025 d25,
457 decode(l.pval026,cn,vn,vn,vh,l.pval026) p26,
458 l.pval026 d26,
459 decode(l.pval027,cn,vn,vn,vh,l.pval027) p27,
460 l.pval027 d27,
461 decode(l.pval028,cn,vn,vn,vh,l.pval028) p28,
462 l.pval028 d28,
463 decode(l.pval029,cn,vn,vn,NULL,l.pval029) p29,
464 l.pval029 d29,
465 decode(l.pval030,cn,vn,vn,NULL,l.pval030) p30,
466 l.pval030 d30,
467 decode(l.pval031,cn,vn,vn,NULL,l.pval031) p31,
468 l.pval031 d31,
469 decode(l.pval032,cn,vn,vn,NULL,l.pval032) p32,
470 l.pval032 d32,
471 decode(l.pval033,cn,vn,vn,NULL,l.pval033) p33,
472 l.pval033 d33,
473 decode(l.pval034,cn,vn,vn,NULL,l.pval034) p34,
474 l.pval034 d34,
475 decode(l.pval035,cn,vn,vn,NULL,l.pval035) p35,
476 l.pval035 d35,
477 decode(l.pval036,cn,vn,vn,NULL,l.pval036) p36,
478 l.pval036 d36,
479 decode(l.pval037,cn,vn,vn,NULL,l.pval037) p37,
480 l.pval037 d37,
481 decode(l.pval038,cn,vn,vn,NULL,l.pval038) p38,
482 l.pval038 d38,
483 decode(l.pval039,cn,vn,vn,NULL,l.pval039) p39,
484 l.pval039 d39,
485 decode(l.pval040,cn,vn,vn,NULL,l.pval040) p40,
486 l.pval040 d40,
487 decode(l.pval041,cn,vn,vn,NULL,l.pval041) p41,
488 l.pval041 d41,
489 decode(l.pval042,cn,vn,vn,NULL,l.pval042) p42,
490 l.pval042 d42,
491 decode(l.pval043,cn,vn,vn,NULL,l.pval043) p43,
492 l.pval043 d43,
493 decode(l.pval044,cn,vn,vn,vh,l.pval044) p44,
494 l.pval044 d44,
495 decode(l.pval045,cn,vn,vn,vh,l.pval045) p45,
496 l.pval045 d45,
497 decode(l.pval046,cn,vn,vn,vh,l.pval046) p46,
498 l.pval046 d46,
499 decode(l.pval047,cn,vn,vn,vh,l.pval047) p47,
500 l.pval047 d47,
501 decode(l.pval048,cn,vn,vn,vh,l.pval048) p48,
502 l.pval048 d48,
506 l.pval050 d50,
503 decode(l.pval049,cn,vn,vn,vh,l.pval049) p49,
504 l.pval049 d49,
505 decode(l.pval050,cn,vn,vn,vh,l.pval050) p50,
507 decode(l.pval051,cn,vn,vn,vh,l.pval051) p51,
508 l.pval051 d51,
509 decode(l.pval052,cn,vn,vn,vh,l.pval052) p52,
510 l.pval052 d52,
511 decode(l.pval053,cn,vn,vn,vh,l.pval053) p53,
512 l.pval053 d53,
513 decode(l.pval054,cn,vn,vn,vh,l.pval054) p54,
514 l.pval054 d54,
515 decode(l.pval055,cn,vn,vn,vh,l.pval055) p55,
516 l.pval055 d55,
517 decode(l.pval056,cn,vn,vn,vh,l.pval056) p56,
518 l.pval056 d56,
519 decode(l.pval057,cn,vn,vn,vh,l.pval057) p57,
520 l.pval057 d57,
521 decode(l.pval058,cn,vn,vn,vh,l.pval058) p58,
522 l.pval058 d58,
523 decode(l.pval059,cn,vn,vn,vh,l.pval059) p59,
524 l.pval059 d59,
525 decode(l.pval060,cn,vn,vn,vh,l.pval060) p60,
526 l.pval060 d60,
527 decode(l.pval061,cn,vn,vn,vh,l.pval061) p61,
528 l.pval061 d61,
529 decode(l.pval062,cn,vn,vn,vh,l.pval062) p62,
530 l.pval062 d62,
531 decode(l.pval063,cn,vn,vn,vh,l.pval063) p63,
532 l.pval063 d63,
533 decode(l.pval064,cn,vn,vn,vh,l.pval064) p64,
534 l.pval064 d64,
535 decode(l.pval065,cn,vn,vn,vh,l.pval065) p65,
536 l.pval065 d65,
537 decode(l.pval066,cn,vn,vn,vh,l.pval066) p66,
538 l.pval066 d66,
539 decode(l.pval067,cn,vn,vn,vh,l.pval067) p67,
540 l.pval067 d67,
541 decode(l.pval068,cn,vn,vn,vh,l.pval068) p68,
542 l.pval068 d68,
543 decode(l.pval069,cn,vn,vn,vh,l.pval069) p69,
544 l.pval069 d69,
545 decode(l.pval070,cn,vn,vn,vh,l.pval070) p70,
546 l.pval070 d70,
547 decode(l.pval071,cn,vn,vn,vh,l.pval071) p71,
548 l.pval071 d71,
549 decode(l.pval072,cn,vn,vn,vh,l.pval072) p72,
550 l.pval072 d72,
551 decode(l.pval073,cn,vn,vn,vh,l.pval073) p73,
552 l.pval073 d73,
553 decode(l.pval074,cn,vn,vn,vh,l.pval074) p74,
554 l.pval074 d74,
555 decode(l.pval075,cn,vn,vn,'N',l.pval075) p75,
556 l.pval075 d75,
557 decode(l.pval076,cn,dn,d(l.pval076)) p76,
558 decode(l.pval077,cn,dn,d(l.pval077)) p77,
559 l.pval078 p78,
560 decode(l.pval079,cn,vn,l.pval079) p79,
561 decode(l.pval080,cn,vn,vn,vn,l.pval080) p80,
562 l.pval080 d80,
563 decode(l.pval081,cn,vn,vn,vn,l.pval081) p81,
564 l.pval081 d81,
565 decode(l.pval082,cn,vn,vn,vn,l.pval082) p82,
566 l.pval082 d82,
567 decode(l.pval083,cn,vn,vn,vn,l.pval083) p83,
568 l.pval083 d83,
569 decode(l.pval084,cn,vn,vn,vn,l.pval084) p84,
570 l.pval084 d84,
571 decode(l.pval085,cn,vn,vn,vh,l.pval085) p85,
572 l.pval085 d85,
573 decode(l.pval086,cn,vn,vn,vh,l.pval086) p86,
574 l.pval086 d86,
575 decode(l.pval087,cn,vn,vn,vh,l.pval087) p87,
576 l.pval087 d87,
577 decode(l.pval088,cn,vn,vn,vh,l.pval088) p88,
578 l.pval088 d88,
579 decode(l.pval089,cn,vn,vn,vh,l.pval089) p89,
580 l.pval089 d89,
581 decode(l.pval090,cn,vn,vn,vh,l.pval090) p90,
582 l.pval090 d90,
583 decode(l.pval091,cn,vn,vn,vh,l.pval091) p91,
584 l.pval091 d91,
585 decode(l.pval092,cn,vn,vn,vh,l.pval092) p92,
586 l.pval092 d92,
587 decode(l.pval093,cn,vn,vn,vh,l.pval093) p93,
588 l.pval093 d93,
589 decode(l.pval094,cn,vn,vn,vh,l.pval094) p94,
590 l.pval094 d94,
591 decode(l.pval095,cn,vn,vn,vh,l.pval095) p95,
592 l.pval095 d95,
593 decode(l.pval096,cn,vn,vn,vh,l.pval096) p96,
594 l.pval096 d96,
595 decode(l.pval097,cn,vn,vn,vh,l.pval097) p97,
596 l.pval097 d97,
597 decode(l.pval098,cn,vn,vn,vh,l.pval098) p98,
598 l.pval098 d98,
599 decode(l.pval099,cn,vn,vn,vh,l.pval099) p99,
600 l.pval099 d99,
601 decode(l.pval100,cn,vn,vn,vh,l.pval100) p100,
602 l.pval100 d100,
603 decode(l.pval101,cn,vn,vn,vh,l.pval101) p101,
604 l.pval101 d101
605 from hr_pump_batch_lines l
606 where l.batch_line_id = p_batch_line_id;
607 --
608 c cr%rowtype;
609 l_validate boolean := false;
610 L_UPDATE_WARNING boolean;
611 L_ELEMENT_ENTRY_ID number;
612 L_OBJECT_VERSION_NUMBER number;
613 L_COST_ALLOCATION_KEYFLEX_ID number;
614 L_UPDATING_ACTION_ID number;
615 L_ORIGINAL_ENTRY_ID number;
616 L_COMMENT_ID number;
617 L_CREATOR_ID number;
618 L_PERSONAL_PAYMENT_METHOD_ID number;
619 L_INPUT_VALUE_ID1 number;
620 L_INPUT_VALUE_ID2 number;
624 L_INPUT_VALUE_ID6 number;
621 L_INPUT_VALUE_ID3 number;
622 L_INPUT_VALUE_ID4 number;
623 L_INPUT_VALUE_ID5 number;
625 L_INPUT_VALUE_ID7 number;
626 L_INPUT_VALUE_ID8 number;
627 L_INPUT_VALUE_ID9 number;
628 L_INPUT_VALUE_ID10 number;
629 L_INPUT_VALUE_ID11 number;
630 L_INPUT_VALUE_ID12 number;
631 L_INPUT_VALUE_ID13 number;
632 L_INPUT_VALUE_ID14 number;
633 L_INPUT_VALUE_ID15 number;
634 --
635 begin
636 hr_data_pump.entry('call');
637 open cr;
638 fetch cr into c;
639 if cr%notfound then
640 hr_utility.set_message(800,'HR_50326_DP_NO_ROW');
641 hr_utility.set_message_token('TABLE','HR_PUMP_BATCH_LINES');
642 hr_utility.set_message_token('COLUMN','P_BATCH_LINE_ID');
643 hr_utility.set_message_token('VALUE',p_batch_line_id);
644 hr_utility.raise_error;
645 end if;
646 --
647 if c.p79 is null then
648 L_ELEMENT_ENTRY_ID:=nn;
649 else
650 L_ELEMENT_ENTRY_ID := 
651 hr_pump_get.get_element_entry_id
652 (P_ELEMENT_ENTRY_USER_KEY => c.p79);
653 end if;
654 --
655 if c.p79 is null or
656 c.p2 is null then
657 L_OBJECT_VERSION_NUMBER:=nn;
658 else
659 L_OBJECT_VERSION_NUMBER := 
660 hr_pump_get.GET_ELEMENT_ENTRY_OVN
661 (P_ELEMENT_ENTRY_USER_KEY => c.p79
662 ,P_EFFECTIVE_DATE => c.p2);
663 end if;
664 --
665 if c.d80=cn then
666 L_COST_ALLOCATION_KEYFLEX_ID:=nn;
667 elsif c.d80 is null then 
668 L_COST_ALLOCATION_KEYFLEX_ID:=nh;
669 else
670 L_COST_ALLOCATION_KEYFLEX_ID := 
671 hr_pump_get.get_cost_allocation_keyflex_id
672 (P_COST_ALLOC_KEYFLEX_USER_KEY => c.p80);
673 end if;
674 --
675 if c.d81=cn then
676 L_UPDATING_ACTION_ID:=nn;
677 elsif c.d81 is null then 
678 L_UPDATING_ACTION_ID:=nh;
679 else
680 L_UPDATING_ACTION_ID := 
681 hr_pump_get.get_updating_action_id
682 (P_UPDATING_ACTION_USER_KEY => c.p81);
683 end if;
684 --
685 if c.d82=cn then
686 L_ORIGINAL_ENTRY_ID:=nn;
687 elsif c.d82 is null then 
688 L_ORIGINAL_ENTRY_ID:=nh;
689 else
690 L_ORIGINAL_ENTRY_ID := 
691 hr_pump_get.get_original_entry_id
692 (P_ORIGINAL_ENTRY_USER_KEY => c.p82);
693 end if;
694 --
695 if c.d83=cn then
696 L_COMMENT_ID:=nn;
697 elsif c.d83 is null then 
698 L_COMMENT_ID:=nh;
699 else
700 L_COMMENT_ID := 
701 hr_pump_get.get_comment_id
702 (P_COMMENT_USER_KEY => c.p83);
703 end if;
704 --
705 L_CREATOR_ID := 
706 hr_pump_get.get_creator_id;
707 --
708 if c.d84=cn then
709 L_PERSONAL_PAYMENT_METHOD_ID:=nn;
710 elsif c.d84 is null then 
711 L_PERSONAL_PAYMENT_METHOD_ID:=nh;
712 else
713 L_PERSONAL_PAYMENT_METHOD_ID := 
714 hr_pump_get.get_personal_payment_method_id
718 if c.d85 is null or
715 (P_PERSONAL_PAY_METHOD_USER_KEY => c.p84);
716 end if;
717 --
719 c.d85=cn or
720 c.d86 is null or
721 c.d86=cn or
722 c.p2 is null or
723 c.d87 is null or
724 c.d87=cn then
725 L_INPUT_VALUE_ID1:=nn;
726 else
727 L_INPUT_VALUE_ID1 := 
728 hr_pump_get.GET_INPUT_VALUE_ID1
729 (P_INPUT_VALUE_NAME1 => c.p85
730 ,P_ELEMENT_NAME => c.p86
731 ,P_BUSINESS_GROUP_ID => P_BUSINESS_GROUP_ID
732 ,P_EFFECTIVE_DATE => c.p2
733 ,P_LANGUAGE_CODE => c.p87);
734 end if;
735 --
736 if c.d88 is null or
737 c.d88=cn or
738 c.d86 is null or
739 c.d86=cn or
740 c.p2 is null or
741 c.d87 is null or
742 c.d87=cn then
743 L_INPUT_VALUE_ID2:=nn;
744 else
745 L_INPUT_VALUE_ID2 := 
746 hr_pump_get.GET_INPUT_VALUE_ID2
747 (P_INPUT_VALUE_NAME2 => c.p88
748 ,P_ELEMENT_NAME => c.p86
749 ,P_BUSINESS_GROUP_ID => P_BUSINESS_GROUP_ID
750 ,P_EFFECTIVE_DATE => c.p2
751 ,P_LANGUAGE_CODE => c.p87);
752 end if;
753 --
754 if c.d89 is null or
755 c.d89=cn or
756 c.d86 is null or
757 c.d86=cn or
758 c.p2 is null or
759 c.d87 is null or
760 c.d87=cn then
761 L_INPUT_VALUE_ID3:=nn;
762 else
763 L_INPUT_VALUE_ID3 := 
764 hr_pump_get.GET_INPUT_VALUE_ID3
765 (P_INPUT_VALUE_NAME3 => c.p89
766 ,P_ELEMENT_NAME => c.p86
767 ,P_BUSINESS_GROUP_ID => P_BUSINESS_GROUP_ID
768 ,P_EFFECTIVE_DATE => c.p2
769 ,P_LANGUAGE_CODE => c.p87);
770 end if;
771 --
772 if c.d90 is null or
773 c.d90=cn or
774 c.d86 is null or
775 c.d86=cn or
776 c.p2 is null or
777 c.d87 is null or
778 c.d87=cn then
779 L_INPUT_VALUE_ID4:=nn;
780 else
781 L_INPUT_VALUE_ID4 := 
782 hr_pump_get.GET_INPUT_VALUE_ID4
783 (P_INPUT_VALUE_NAME4 => c.p90
784 ,P_ELEMENT_NAME => c.p86
785 ,P_BUSINESS_GROUP_ID => P_BUSINESS_GROUP_ID
786 ,P_EFFECTIVE_DATE => c.p2
787 ,P_LANGUAGE_CODE => c.p87);
788 end if;
789 --
790 if c.d91 is null or
791 c.d91=cn or
792 c.d86 is null or
793 c.d86=cn or
794 c.p2 is null or
795 c.d87 is null or
796 c.d87=cn then
797 L_INPUT_VALUE_ID5:=nn;
798 else
799 L_INPUT_VALUE_ID5 := 
800 hr_pump_get.GET_INPUT_VALUE_ID5
801 (P_INPUT_VALUE_NAME5 => c.p91
802 ,P_ELEMENT_NAME => c.p86
803 ,P_BUSINESS_GROUP_ID => P_BUSINESS_GROUP_ID
804 ,P_EFFECTIVE_DATE => c.p2
805 ,P_LANGUAGE_CODE => c.p87);
806 end if;
807 --
808 if c.d92 is null or
809 c.d92=cn or
810 c.d86 is null or
811 c.d86=cn or
812 c.p2 is null or
813 c.d87 is null or
814 c.d87=cn then
815 L_INPUT_VALUE_ID6:=nn;
816 else
817 L_INPUT_VALUE_ID6 := 
818 hr_pump_get.GET_INPUT_VALUE_ID6
819 (P_INPUT_VALUE_NAME6 => c.p92
820 ,P_ELEMENT_NAME => c.p86
821 ,P_BUSINESS_GROUP_ID => P_BUSINESS_GROUP_ID
822 ,P_EFFECTIVE_DATE => c.p2
823 ,P_LANGUAGE_CODE => c.p87);
824 end if;
825 --
826 if c.d93 is null or
827 c.d93=cn or
828 c.d86 is null or
829 c.d86=cn or
830 c.p2 is null or
831 c.d87 is null or
835 L_INPUT_VALUE_ID7 := 
832 c.d87=cn then
833 L_INPUT_VALUE_ID7:=nn;
834 else
836 hr_pump_get.GET_INPUT_VALUE_ID7
837 (P_INPUT_VALUE_NAME7 => c.p93
838 ,P_ELEMENT_NAME => c.p86
839 ,P_BUSINESS_GROUP_ID => P_BUSINESS_GROUP_ID
840 ,P_EFFECTIVE_DATE => c.p2
841 ,P_LANGUAGE_CODE => c.p87);
842 end if;
843 --
844 if c.d94 is null or
845 c.d94=cn or
846 c.d86 is null or
847 c.d86=cn or
848 c.p2 is null or
849 c.d87 is null or
850 c.d87=cn then
851 L_INPUT_VALUE_ID8:=nn;
852 else
853 L_INPUT_VALUE_ID8 := 
854 hr_pump_get.GET_INPUT_VALUE_ID8
855 (P_INPUT_VALUE_NAME8 => c.p94
856 ,P_ELEMENT_NAME => c.p86
857 ,P_BUSINESS_GROUP_ID => P_BUSINESS_GROUP_ID
858 ,P_EFFECTIVE_DATE => c.p2
859 ,P_LANGUAGE_CODE => c.p87);
860 end if;
861 --
862 if c.d95 is null or
863 c.d95=cn or
864 c.d86 is null or
865 c.d86=cn or
866 c.p2 is null or
867 c.d87 is null or
868 c.d87=cn then
869 L_INPUT_VALUE_ID9:=nn;
870 else
871 L_INPUT_VALUE_ID9 := 
872 hr_pump_get.GET_INPUT_VALUE_ID9
873 (P_INPUT_VALUE_NAME9 => c.p95
874 ,P_ELEMENT_NAME => c.p86
875 ,P_BUSINESS_GROUP_ID => P_BUSINESS_GROUP_ID
876 ,P_EFFECTIVE_DATE => c.p2
877 ,P_LANGUAGE_CODE => c.p87);
878 end if;
879 --
880 if c.d96 is null or
881 c.d96=cn or
882 c.d86 is null or
883 c.d86=cn or
884 c.p2 is null or
885 c.d87 is null or
886 c.d87=cn then
887 L_INPUT_VALUE_ID10:=nn;
888 else
889 L_INPUT_VALUE_ID10 := 
890 hr_pump_get.GET_INPUT_VALUE_ID10
891 (P_INPUT_VALUE_NAME10 => c.p96
892 ,P_ELEMENT_NAME => c.p86
893 ,P_BUSINESS_GROUP_ID => P_BUSINESS_GROUP_ID
894 ,P_EFFECTIVE_DATE => c.p2
895 ,P_LANGUAGE_CODE => c.p87);
896 end if;
897 --
898 if c.d97 is null or
899 c.d97=cn or
900 c.d86 is null or
901 c.d86=cn or
902 c.p2 is null or
903 c.d87 is null or
904 c.d87=cn then
905 L_INPUT_VALUE_ID11:=nn;
906 else
907 L_INPUT_VALUE_ID11 := 
908 hr_pump_get.GET_INPUT_VALUE_ID11
909 (P_INPUT_VALUE_NAME11 => c.p97
910 ,P_ELEMENT_NAME => c.p86
911 ,P_BUSINESS_GROUP_ID => P_BUSINESS_GROUP_ID
912 ,P_EFFECTIVE_DATE => c.p2
913 ,P_LANGUAGE_CODE => c.p87);
914 end if;
915 --
916 if c.d98 is null or
917 c.d98=cn or
918 c.d86 is null or
919 c.d86=cn or
920 c.p2 is null or
921 c.d87 is null or
922 c.d87=cn then
923 L_INPUT_VALUE_ID12:=nn;
924 else
925 L_INPUT_VALUE_ID12 := 
926 hr_pump_get.GET_INPUT_VALUE_ID12
927 (P_INPUT_VALUE_NAME12 => c.p98
928 ,P_ELEMENT_NAME => c.p86
929 ,P_BUSINESS_GROUP_ID => P_BUSINESS_GROUP_ID
930 ,P_EFFECTIVE_DATE => c.p2
931 ,P_LANGUAGE_CODE => c.p87);
932 end if;
933 --
934 if c.d99 is null or
935 c.d99=cn or
936 c.d86 is null or
937 c.d86=cn or
938 c.p2 is null or
939 c.d87 is null or
940 c.d87=cn then
941 L_INPUT_VALUE_ID13:=nn;
942 else
943 L_INPUT_VALUE_ID13 := 
944 hr_pump_get.GET_INPUT_VALUE_ID13
945 (P_INPUT_VALUE_NAME13 => c.p99
946 ,P_ELEMENT_NAME => c.p86
947 ,P_BUSINESS_GROUP_ID => P_BUSINESS_GROUP_ID
948 ,P_EFFECTIVE_DATE => c.p2
949 ,P_LANGUAGE_CODE => c.p87);
950 end if;
951 --
952 if c.d100 is null or
953 c.d100=cn or
954 c.d86 is null or
955 c.d86=cn or
956 c.p2 is null or
957 c.d87 is null or
958 c.d87=cn then
959 L_INPUT_VALUE_ID14:=nn;
960 else
961 L_INPUT_VALUE_ID14 := 
962 hr_pump_get.GET_INPUT_VALUE_ID14
963 (P_INPUT_VALUE_NAME14 => c.p100
964 ,P_ELEMENT_NAME => c.p86
965 ,P_BUSINESS_GROUP_ID => P_BUSINESS_GROUP_ID
966 ,P_EFFECTIVE_DATE => c.p2
967 ,P_LANGUAGE_CODE => c.p87);
968 end if;
969 --
970 if c.d101 is null or
971 c.d101=cn or
972 c.d86 is null or
973 c.d86=cn or
974 c.p2 is null or
975 c.d87 is null or
976 c.d87=cn then
977 L_INPUT_VALUE_ID15:=nn;
978 else
979 L_INPUT_VALUE_ID15 := 
980 hr_pump_get.GET_INPUT_VALUE_ID15
981 (P_INPUT_VALUE_NAME15 => c.p101
982 ,P_ELEMENT_NAME => c.p86
983 ,P_BUSINESS_GROUP_ID => P_BUSINESS_GROUP_ID
984 ,P_EFFECTIVE_DATE => c.p2
985 ,P_LANGUAGE_CODE => c.p87);
986 end if;
987 --
988 hr_data_pump.api_trc_on;
989 PY_ELEMENT_ENTRY_API.UPDATE_ELEMENT_ENTRY
990 (p_validate => l_validate
991 ,P_DATETRACK_UPDATE_MODE => c.p1
992 ,P_EFFECTIVE_DATE => c.p2
993 ,p_business_group_id => p_business_group_id
994 ,P_ELEMENT_ENTRY_ID => L_ELEMENT_ENTRY_ID
995 ,P_OBJECT_VERSION_NUMBER => L_OBJECT_VERSION_NUMBER
996 ,P_COST_ALLOCATION_KEYFLEX_ID => L_COST_ALLOCATION_KEYFLEX_ID
997 ,P_UPDATING_ACTION_ID => L_UPDATING_ACTION_ID
998 ,P_UPDATING_ACTION_TYPE => c.p3
999 ,P_ORIGINAL_ENTRY_ID => L_ORIGINAL_ENTRY_ID
1000 ,P_CREATOR_TYPE => c.p4
1001 ,P_COMMENT_ID => L_COMMENT_ID
1002 ,P_CREATOR_ID => L_CREATOR_ID
1003 ,P_REASON => c.p5
1004 ,P_SUBPRIORITY => c.p6
1005 ,P_DATE_EARNED => c.p7
1006 ,P_PERSONAL_PAYMENT_METHOD_ID => L_PERSONAL_PAYMENT_METHOD_ID
1007 ,P_ATTRIBUTE_CATEGORY => c.p8
1008 ,P_ATTRIBUTE1 => c.p9
1009 ,P_ATTRIBUTE2 => c.p10
1010 ,P_ATTRIBUTE3 => c.p11
1011 ,P_ATTRIBUTE4 => c.p12
1012 ,P_ATTRIBUTE5 => c.p13
1013 ,P_ATTRIBUTE6 => c.p14
1014 ,P_ATTRIBUTE7 => c.p15
1015 ,P_ATTRIBUTE8 => c.p16
1016 ,P_ATTRIBUTE9 => c.p17
1017 ,P_ATTRIBUTE10 => c.p18
1018 ,P_ATTRIBUTE11 => c.p19
1019 ,P_ATTRIBUTE12 => c.p20
1020 ,P_ATTRIBUTE13 => c.p21
1021 ,P_ATTRIBUTE14 => c.p22
1022 ,P_ATTRIBUTE15 => c.p23
1023 ,P_ATTRIBUTE16 => c.p24
1024 ,P_ATTRIBUTE17 => c.p25
1025 ,P_ATTRIBUTE18 => c.p26
1026 ,P_ATTRIBUTE19 => c.p27
1027 ,P_ATTRIBUTE20 => c.p28
1028 ,P_INPUT_VALUE_ID1 => L_INPUT_VALUE_ID1
1029 ,P_INPUT_VALUE_ID2 => L_INPUT_VALUE_ID2
1030 ,P_INPUT_VALUE_ID3 => L_INPUT_VALUE_ID3
1031 ,P_INPUT_VALUE_ID4 => L_INPUT_VALUE_ID4
1032 ,P_INPUT_VALUE_ID5 => L_INPUT_VALUE_ID5
1033 ,P_INPUT_VALUE_ID6 => L_INPUT_VALUE_ID6
1034 ,P_INPUT_VALUE_ID7 => L_INPUT_VALUE_ID7
1035 ,P_INPUT_VALUE_ID8 => L_INPUT_VALUE_ID8
1036 ,P_INPUT_VALUE_ID9 => L_INPUT_VALUE_ID9
1037 ,P_INPUT_VALUE_ID10 => L_INPUT_VALUE_ID10
1038 ,P_INPUT_VALUE_ID11 => L_INPUT_VALUE_ID11
1039 ,P_INPUT_VALUE_ID12 => L_INPUT_VALUE_ID12
1040 ,P_INPUT_VALUE_ID13 => L_INPUT_VALUE_ID13
1041 ,P_INPUT_VALUE_ID14 => L_INPUT_VALUE_ID14
1042 ,P_INPUT_VALUE_ID15 => L_INPUT_VALUE_ID15
1043 ,P_ENTRY_VALUE1 => c.p29
1044 ,P_ENTRY_VALUE2 => c.p30
1045 ,P_ENTRY_VALUE3 => c.p31
1046 ,P_ENTRY_VALUE4 => c.p32
1047 ,P_ENTRY_VALUE5 => c.p33
1048 ,P_ENTRY_VALUE6 => c.p34
1049 ,P_ENTRY_VALUE7 => c.p35
1050 ,P_ENTRY_VALUE8 => c.p36
1051 ,P_ENTRY_VALUE9 => c.p37
1052 ,P_ENTRY_VALUE10 => c.p38
1053 ,P_ENTRY_VALUE11 => c.p39
1054 ,P_ENTRY_VALUE12 => c.p40
1055 ,P_ENTRY_VALUE13 => c.p41
1056 ,P_ENTRY_VALUE14 => c.p42
1057 ,P_ENTRY_VALUE15 => c.p43
1058 ,P_ENTRY_INFORMATION_CATEGORY => c.p44
1059 ,P_ENTRY_INFORMATION1 => c.p45
1060 ,P_ENTRY_INFORMATION2 => c.p46
1061 ,P_ENTRY_INFORMATION3 => c.p47
1062 ,P_ENTRY_INFORMATION4 => c.p48
1063 ,P_ENTRY_INFORMATION5 => c.p49
1064 ,P_ENTRY_INFORMATION6 => c.p50
1065 ,P_ENTRY_INFORMATION7 => c.p51
1066 ,P_ENTRY_INFORMATION8 => c.p52
1067 ,P_ENTRY_INFORMATION9 => c.p53
1068 ,P_ENTRY_INFORMATION10 => c.p54
1069 ,P_ENTRY_INFORMATION11 => c.p55
1070 ,P_ENTRY_INFORMATION12 => c.p56
1071 ,P_ENTRY_INFORMATION13 => c.p57
1072 ,P_ENTRY_INFORMATION14 => c.p58
1073 ,P_ENTRY_INFORMATION15 => c.p59
1074 ,P_ENTRY_INFORMATION16 => c.p60
1075 ,P_ENTRY_INFORMATION17 => c.p61
1076 ,P_ENTRY_INFORMATION18 => c.p62
1077 ,P_ENTRY_INFORMATION19 => c.p63
1078 ,P_ENTRY_INFORMATION20 => c.p64
1079 ,P_ENTRY_INFORMATION21 => c.p65
1080 ,P_ENTRY_INFORMATION22 => c.p66
1081 ,P_ENTRY_INFORMATION23 => c.p67
1082 ,P_ENTRY_INFORMATION24 => c.p68
1083 ,P_ENTRY_INFORMATION25 => c.p69
1084 ,P_ENTRY_INFORMATION26 => c.p70
1085 ,P_ENTRY_INFORMATION27 => c.p71
1086 ,P_ENTRY_INFORMATION28 => c.p72
1087 ,P_ENTRY_INFORMATION29 => c.p73
1088 ,P_ENTRY_INFORMATION30 => c.p74
1089 ,P_OVERRIDE_USER_ENT_CHK => c.p75
1090 ,P_EFFECTIVE_START_DATE => c.p76
1091 ,P_EFFECTIVE_END_DATE => c.p77
1092 ,P_UPDATE_WARNING => L_UPDATE_WARNING);
1093 hr_data_pump.api_trc_off;
1094 --
1095 if L_UPDATE_WARNING then
1096 c.p78 := 'TRUE';
1097 else
1098 c.p78 := 'FALSE';
1099 end if;
1100 --
1101 update hr_pump_batch_lines l set
1102 l.pval076 = decode(c.p76,null,cn,dc(c.p76)),
1103 l.pval077 = decode(c.p77,null,cn,dc(c.p77)),
1104 l.pval078 = decode(c.p78,null,cn,c.p78)
1105 where l.rowid = c.myrowid;
1106 --
1107 close cr;
1108 --
1109 hr_data_pump.exit('call');
1110 exception
1111  when hr_multi_message.error_message_exist then
1112    if cr%isopen then
1113     close cr;
1114    end if;
1115    hr_pump_utils.set_multi_msg_error_flag(true);
1116  when others then
1117  if cr%isopen then
1118   close cr;
1119  end if;
1120  raise;
1121 end call;
1122 end hrdpp_UPDATE_ELEMENT_ENTRY;