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_CREATE_PLAN_BENEFICIARY

Source


1 package body hrdpp_CREATE_PLAN_BENEFICIARY as
2 /*
3  * Generated by hr_pump_meta_mapper at: 2007/01/04 02:01:47
4  * Generated for API: ben_plan_beneficiary_api.CREATE_PLAN_BENEFICIARY
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_PL_BNF_USER_KEY in varchar2
83 ,P_PRMRY_CNTNGNT_CD in varchar2 default null
84 ,P_PCT_DSGD_NUM in number default null
85 ,P_AMT_DSGD_VAL in number default null
86 ,P_DSGN_STRT_DT in date default null
87 ,P_DSGN_THRU_DT in date default null
88 ,P_ADDL_INSTRN_TXT in varchar2 default null
89 ,P_PBN_ATTRIBUTE_CATEGORY in varchar2 default null
90 ,P_PBN_ATTRIBUTE1 in varchar2 default null
91 ,P_PBN_ATTRIBUTE2 in varchar2 default null
92 ,P_PBN_ATTRIBUTE3 in varchar2 default null
93 ,P_PBN_ATTRIBUTE4 in varchar2 default null
94 ,P_PBN_ATTRIBUTE5 in varchar2 default null
95 ,P_PBN_ATTRIBUTE6 in varchar2 default null
96 ,P_PBN_ATTRIBUTE7 in varchar2 default null
97 ,P_PBN_ATTRIBUTE8 in varchar2 default null
98 ,P_PBN_ATTRIBUTE9 in varchar2 default null
99 ,P_PBN_ATTRIBUTE10 in varchar2 default null
100 ,P_PBN_ATTRIBUTE11 in varchar2 default null
101 ,P_PBN_ATTRIBUTE12 in varchar2 default null
102 ,P_PBN_ATTRIBUTE13 in varchar2 default null
103 ,P_PBN_ATTRIBUTE14 in varchar2 default null
104 ,P_PBN_ATTRIBUTE15 in varchar2 default null
105 ,P_PBN_ATTRIBUTE16 in varchar2 default null
106 ,P_PBN_ATTRIBUTE17 in varchar2 default null
107 ,P_PBN_ATTRIBUTE18 in varchar2 default null
108 ,P_PBN_ATTRIBUTE19 in varchar2 default null
109 ,P_PBN_ATTRIBUTE20 in varchar2 default null
110 ,P_PBN_ATTRIBUTE21 in varchar2 default null
111 ,P_PBN_ATTRIBUTE22 in varchar2 default null
112 ,P_PBN_ATTRIBUTE23 in varchar2 default null
113 ,P_PBN_ATTRIBUTE24 in varchar2 default null
114 ,P_PBN_ATTRIBUTE25 in varchar2 default null
115 ,P_PBN_ATTRIBUTE26 in varchar2 default null
116 ,P_PBN_ATTRIBUTE27 in varchar2 default null
117 ,P_PBN_ATTRIBUTE28 in varchar2 default null
118 ,P_PBN_ATTRIBUTE29 in varchar2 default null
119 ,P_PBN_ATTRIBUTE30 in varchar2 default null
120 ,P_PROGRAM_UPDATE_DATE in date default null
121 ,P_EFFECTIVE_DATE in date
122 ,P_MULTI_ROW_ACTN in boolean default null
123 ,P_PRTT_ENRT_RSLT_USER_KEY in varchar2 default null
124 ,P_BNF_PERSON_USER_KEY in varchar2 default null
125 ,P_ORGANIZATION_NAME in varchar2 default null
126 ,P_LANGUAGE_CODE in varchar2 default null
127 ,P_TTEE_PERSON_USER_KEY in varchar2 default null
128 ,P_AMT_DSGD_UOM in varchar2 default null
129 ,P_PER_IN_LER_USER_KEY in varchar2 default null) is
130 blid number := p_data_pump_batch_line_id;
131  L_MULTI_ROW_ACTN varchar2(5);
132 begin
133 if P_MULTI_ROW_ACTN is null then
134  L_MULTI_ROW_ACTN := null;
135 elsif P_MULTI_ROW_ACTN then
136  L_MULTI_ROW_ACTN := 'TRUE';
137 else 
138  L_MULTI_ROW_ACTN := 'FALSE';
139 end if;
140 if blid is not null then
141 delete from hr_pump_batch_lines where batch_line_id = blid;
142 delete from hr_pump_batch_exceptions
143 where source_type = 'BATCH_LINE' and source_id = blid;
144 end if;
145 insert into hr_pump_batch_lines
146 (batch_id
147 ,batch_line_id
148 ,business_group_name
149 ,api_module_id
150 ,line_status
151 ,user_sequence
152 ,link_value
153 ,pval001
154 ,pval004
155 ,pval005
156 ,pval006
157 ,pval007
158 ,pval008
159 ,pval009
160 ,pval010
161 ,pval011
162 ,pval012
163 ,pval013
164 ,pval014
165 ,pval015
166 ,pval016
167 ,pval017
168 ,pval018
169 ,pval019
170 ,pval020
171 ,pval021
172 ,pval022
173 ,pval023
174 ,pval024
175 ,pval025
176 ,pval026
177 ,pval027
178 ,pval028
179 ,pval029
180 ,pval030
181 ,pval031
182 ,pval032
183 ,pval033
184 ,pval034
185 ,pval035
186 ,pval036
187 ,pval037
188 ,pval038
189 ,pval039
190 ,pval040
191 ,pval041
192 ,pval043
193 ,pval044
194 ,pval045
195 ,pval046
196 ,pval047
197 ,pval048
198 ,pval049
199 ,pval050
200 ,pval051)
201 values
202 (p_batch_id
203 ,nvl(blid,hr_pump_batch_lines_s.nextval)
204 ,p_data_pump_business_grp_name
205 ,563
206 ,'U'
207 ,p_user_sequence
208 ,p_link_value
209 ,P_PL_BNF_USER_KEY
210 ,P_PRMRY_CNTNGNT_CD
211 ,P_PCT_DSGD_NUM
212 ,P_AMT_DSGD_VAL
213 ,dc(P_DSGN_STRT_DT)
214 ,dc(P_DSGN_THRU_DT)
215 ,P_ADDL_INSTRN_TXT
216 ,P_PBN_ATTRIBUTE_CATEGORY
217 ,P_PBN_ATTRIBUTE1
218 ,P_PBN_ATTRIBUTE2
219 ,P_PBN_ATTRIBUTE3
220 ,P_PBN_ATTRIBUTE4
221 ,P_PBN_ATTRIBUTE5
222 ,P_PBN_ATTRIBUTE6
223 ,P_PBN_ATTRIBUTE7
224 ,P_PBN_ATTRIBUTE8
225 ,P_PBN_ATTRIBUTE9
226 ,P_PBN_ATTRIBUTE10
227 ,P_PBN_ATTRIBUTE11
228 ,P_PBN_ATTRIBUTE12
229 ,P_PBN_ATTRIBUTE13
230 ,P_PBN_ATTRIBUTE14
231 ,P_PBN_ATTRIBUTE15
232 ,P_PBN_ATTRIBUTE16
233 ,P_PBN_ATTRIBUTE17
234 ,P_PBN_ATTRIBUTE18
235 ,P_PBN_ATTRIBUTE19
236 ,P_PBN_ATTRIBUTE20
237 ,P_PBN_ATTRIBUTE21
238 ,P_PBN_ATTRIBUTE22
239 ,P_PBN_ATTRIBUTE23
240 ,P_PBN_ATTRIBUTE24
241 ,P_PBN_ATTRIBUTE25
242 ,P_PBN_ATTRIBUTE26
243 ,P_PBN_ATTRIBUTE27
244 ,P_PBN_ATTRIBUTE28
245 ,P_PBN_ATTRIBUTE29
246 ,P_PBN_ATTRIBUTE30
247 ,dc(P_PROGRAM_UPDATE_DATE)
248 ,dc(P_EFFECTIVE_DATE)
249 ,L_MULTI_ROW_ACTN
250 ,P_PRTT_ENRT_RSLT_USER_KEY
251 ,P_BNF_PERSON_USER_KEY
252 ,P_ORGANIZATION_NAME
253 ,P_LANGUAGE_CODE
254 ,P_TTEE_PERSON_USER_KEY
255 ,P_AMT_DSGD_UOM
256 ,P_PER_IN_LER_USER_KEY);
257 end insert_batch_lines;
258 --
259 procedure call
260 (p_business_group_id in number,
261 p_batch_line_id     in number) is
262 cursor cr is
263 select l.rowid myrowid,
264 l.pval001 p1,
265 decode(l.pval002,cn,dn,d(l.pval002)) p2,
266 decode(l.pval003,cn,dn,d(l.pval003)) p3,
267 decode(l.pval004,cn,vn,vn,vn,
268  hr_pump_get.gl(l.pval004,'BEN_PRMRY_CNTNGNT',d(l.pval043),l.pval048)) p4,
269 l.pval004 d4,
270 decode(l.pval005,cn,nn,vn,nn,n(l.pval005)) p5,
271 l.pval005 d5,
272 decode(l.pval006,cn,nn,vn,nn,n(l.pval006)) p6,
273 l.pval006 d6,
274 decode(l.pval007,cn,dn,vn,dn,d(l.pval007)) p7,
275 l.pval007 d7,
276 decode(l.pval008,cn,dn,vn,dn,d(l.pval008)) p8,
277 l.pval008 d8,
278 decode(l.pval009,cn,vn,vn,vn,l.pval009) p9,
279 l.pval009 d9,
280 decode(l.pval010,cn,vn,vn,vn,l.pval010) p10,
281 l.pval010 d10,
282 decode(l.pval011,cn,vn,vn,vn,l.pval011) p11,
283 l.pval011 d11,
284 decode(l.pval012,cn,vn,vn,vn,l.pval012) p12,
285 l.pval012 d12,
286 decode(l.pval013,cn,vn,vn,vn,l.pval013) p13,
287 l.pval013 d13,
288 decode(l.pval014,cn,vn,vn,vn,l.pval014) p14,
289 l.pval014 d14,
290 decode(l.pval015,cn,vn,vn,vn,l.pval015) p15,
291 l.pval015 d15,
292 decode(l.pval016,cn,vn,vn,vn,l.pval016) p16,
293 l.pval016 d16,
294 decode(l.pval017,cn,vn,vn,vn,l.pval017) p17,
295 l.pval017 d17,
296 decode(l.pval018,cn,vn,vn,vn,l.pval018) p18,
297 l.pval018 d18,
298 decode(l.pval019,cn,vn,vn,vn,l.pval019) p19,
299 l.pval019 d19,
300 decode(l.pval020,cn,vn,vn,vn,l.pval020) p20,
301 l.pval020 d20,
302 decode(l.pval021,cn,vn,vn,vn,l.pval021) p21,
303 l.pval021 d21,
304 decode(l.pval022,cn,vn,vn,vn,l.pval022) p22,
305 l.pval022 d22,
306 decode(l.pval023,cn,vn,vn,vn,l.pval023) p23,
307 l.pval023 d23,
308 decode(l.pval024,cn,vn,vn,vn,l.pval024) p24,
309 l.pval024 d24,
310 decode(l.pval025,cn,vn,vn,vn,l.pval025) p25,
311 l.pval025 d25,
312 decode(l.pval026,cn,vn,vn,vn,l.pval026) p26,
313 l.pval026 d26,
314 decode(l.pval027,cn,vn,vn,vn,l.pval027) p27,
315 l.pval027 d27,
316 decode(l.pval028,cn,vn,vn,vn,l.pval028) p28,
317 l.pval028 d28,
318 decode(l.pval029,cn,vn,vn,vn,l.pval029) p29,
319 l.pval029 d29,
320 decode(l.pval030,cn,vn,vn,vn,l.pval030) p30,
321 l.pval030 d30,
322 decode(l.pval031,cn,vn,vn,vn,l.pval031) p31,
323 l.pval031 d31,
324 decode(l.pval032,cn,vn,vn,vn,l.pval032) p32,
325 l.pval032 d32,
326 decode(l.pval033,cn,vn,vn,vn,l.pval033) p33,
327 l.pval033 d33,
328 decode(l.pval034,cn,vn,vn,vn,l.pval034) p34,
329 l.pval034 d34,
330 decode(l.pval035,cn,vn,vn,vn,l.pval035) p35,
331 l.pval035 d35,
332 decode(l.pval036,cn,vn,vn,vn,l.pval036) p36,
333 l.pval036 d36,
334 decode(l.pval037,cn,vn,vn,vn,l.pval037) p37,
335 l.pval037 d37,
336 decode(l.pval038,cn,vn,vn,vn,l.pval038) p38,
337 l.pval038 d38,
338 decode(l.pval039,cn,vn,vn,vn,l.pval039) p39,
339 l.pval039 d39,
340 decode(l.pval040,cn,vn,vn,vn,l.pval040) p40,
341 l.pval040 d40,
342 decode(l.pval041,cn,dn,vn,dn,d(l.pval041)) p41,
343 l.pval041 d41,
344 l.pval042 p42,
345 decode(l.pval043,cn,dn,d(l.pval043)) p43,
346 decode(l.pval044,cn,vn,vn,null,l.pval044) p44,
347 l.pval044 d44,
348 decode(l.pval045,cn,vn,vn,vn,l.pval045) p45,
349 l.pval045 d45,
350 decode(l.pval046,cn,vn,vn,vn,l.pval046) p46,
351 l.pval046 d46,
352 decode(l.pval047,cn,vn,vn,vn,l.pval047) p47,
353 l.pval047 d47,
354 decode(l.pval048,cn,vn,vn,vn,l.pval048) p48,
355 l.pval048 d48,
356 decode(l.pval049,cn,vn,vn,vn,l.pval049) p49,
357 l.pval049 d49,
358 decode(l.pval050,cn,vn,vn,vn,l.pval050) p50,
359 l.pval050 d50,
360 decode(l.pval051,cn,vn,vn,vn,l.pval051) p51,
361 l.pval051 d51
362 from hr_pump_batch_lines l
363 where l.batch_line_id = p_batch_line_id;
364 --
365 c cr%rowtype;
366 l_validate boolean := false;
367 L_PL_BNF_ID number;
368 L_MULTI_ROW_ACTN boolean;
369 L_PRTT_ENRT_RSLT_ID number;
370 L_BNF_PERSON_ID number;
371 L_ORGANIZATION_ID number;
372 L_TTEE_PERSON_ID number;
373 L_AMT_DSGD_UOM varchar2(2000);
374 L_REQUEST_ID number;
375 L_PROGRAM_APPLICATION_ID number;
376 L_PROGRAM_ID number;
377 L_PER_IN_LER_ID number;
378 --
379 begin
380 hr_data_pump.entry('call');
381 open cr;
382 fetch cr into c;
383 if cr%notfound then
384 hr_utility.set_message(800,'HR_50326_DP_NO_ROW');
385 hr_utility.set_message_token('TABLE','HR_PUMP_BATCH_LINES');
386 hr_utility.set_message_token('COLUMN','P_BATCH_LINE_ID');
387 hr_utility.set_message_token('VALUE',p_batch_line_id);
388 hr_utility.raise_error;
389 end if;
390 --
391 if upper(c.p44) = 'TRUE' then
392 L_MULTI_ROW_ACTN := true;
393 elsif upper(c.p44) = 'FALSE' then
394 L_MULTI_ROW_ACTN := false;
395 elsif c.p44 is not null then
396 hr_utility.set_message(800,'HR_50327_DP_TYPE_ERR');
397 hr_utility.set_message_token('TYPE','BOOLEAN');
398 hr_utility.set_message_token('PARAMETER','P_MULTI_ROW_ACTN');
399 hr_utility.set_message_token('VALUE',c.p44);
400 hr_utility.set_message_token('TABLE','HR_PUMP_BATCH_LINES');
401 hr_utility.raise_error;
402 end if;
403 --
404 if c.p45 is null then
405 L_PRTT_ENRT_RSLT_ID:=nn;
406 else
407 L_PRTT_ENRT_RSLT_ID := 
408 hr_pump_get.get_prtt_enrt_rslt_id
409 (P_PRTT_ENRT_RSLT_USER_KEY => c.p45);
410 end if;
411 --
412 if c.p46 is null then
413 L_BNF_PERSON_ID:=nn;
414 else
415 L_BNF_PERSON_ID := 
416 hr_pump_get.get_bnf_person_id
417 (P_BNF_PERSON_USER_KEY => c.p46);
418 end if;
419 --
420 if c.p47 is null or
421 c.p43 is null or
422 c.p48 is null then
423 L_ORGANIZATION_ID:=nn;
424 else
425 L_ORGANIZATION_ID := 
426 hr_pump_get.get_organization_id
427 (P_ORGANIZATION_NAME => c.p47
428 ,P_BUSINESS_GROUP_ID => P_BUSINESS_GROUP_ID
429 ,P_EFFECTIVE_DATE => c.p43
430 ,P_LANGUAGE_CODE => c.p48);
431 end if;
432 --
433 if c.p49 is null then
434 L_TTEE_PERSON_ID:=nn;
435 else
436 L_TTEE_PERSON_ID := 
437 hr_pump_get.get_ttee_person_id
438 (P_TTEE_PERSON_USER_KEY => c.p49);
439 end if;
440 --
441 if c.p50 is null or
442 c.p43 is null then
443 L_AMT_DSGD_UOM:=vn;
444 else
445 L_AMT_DSGD_UOM := 
446 hr_pump_get.GET_AMT_DSGD_UOM_CODE
447 (P_AMT_DSGD_UOM => c.p50
448 ,P_EFFECTIVE_DATE => c.p43);
449 end if;
450 --
451 L_REQUEST_ID := 
452 hr_pump_get.get_request_id;
453 --
454 L_PROGRAM_APPLICATION_ID := 
455 hr_pump_get.get_program_application_id;
456 --
457 L_PROGRAM_ID := 
458 hr_pump_get.get_program_id;
459 --
460 if c.p51 is null then
461 L_PER_IN_LER_ID:=nn;
462 else
463 L_PER_IN_LER_ID := 
464 hr_pump_get.get_per_in_ler_id
465 (P_PER_IN_LER_USER_KEY => c.p51);
466 end if;
467 --
468 hr_data_pump.api_trc_on;
469 ben_plan_beneficiary_api.CREATE_PLAN_BENEFICIARY
470 (p_validate => l_validate
471 ,P_PL_BNF_ID => L_PL_BNF_ID
472 ,P_EFFECTIVE_START_DATE => c.p2
473 ,P_EFFECTIVE_END_DATE => c.p3
474 ,p_business_group_id => p_business_group_id
475 ,P_PRTT_ENRT_RSLT_ID => L_PRTT_ENRT_RSLT_ID
476 ,P_BNF_PERSON_ID => L_BNF_PERSON_ID
477 ,P_ORGANIZATION_ID => L_ORGANIZATION_ID
478 ,P_TTEE_PERSON_ID => L_TTEE_PERSON_ID
479 ,P_PRMRY_CNTNGNT_CD => c.p4
480 ,P_PCT_DSGD_NUM => c.p5
481 ,P_AMT_DSGD_VAL => c.p6
482 ,P_AMT_DSGD_UOM => L_AMT_DSGD_UOM
483 ,P_DSGN_STRT_DT => c.p7
484 ,P_DSGN_THRU_DT => c.p8
485 ,P_ADDL_INSTRN_TXT => c.p9
486 ,P_PBN_ATTRIBUTE_CATEGORY => c.p10
487 ,P_PBN_ATTRIBUTE1 => c.p11
488 ,P_PBN_ATTRIBUTE2 => c.p12
489 ,P_PBN_ATTRIBUTE3 => c.p13
490 ,P_PBN_ATTRIBUTE4 => c.p14
491 ,P_PBN_ATTRIBUTE5 => c.p15
492 ,P_PBN_ATTRIBUTE6 => c.p16
493 ,P_PBN_ATTRIBUTE7 => c.p17
494 ,P_PBN_ATTRIBUTE8 => c.p18
495 ,P_PBN_ATTRIBUTE9 => c.p19
496 ,P_PBN_ATTRIBUTE10 => c.p20
497 ,P_PBN_ATTRIBUTE11 => c.p21
498 ,P_PBN_ATTRIBUTE12 => c.p22
499 ,P_PBN_ATTRIBUTE13 => c.p23
500 ,P_PBN_ATTRIBUTE14 => c.p24
501 ,P_PBN_ATTRIBUTE15 => c.p25
502 ,P_PBN_ATTRIBUTE16 => c.p26
503 ,P_PBN_ATTRIBUTE17 => c.p27
504 ,P_PBN_ATTRIBUTE18 => c.p28
505 ,P_PBN_ATTRIBUTE19 => c.p29
506 ,P_PBN_ATTRIBUTE20 => c.p30
507 ,P_PBN_ATTRIBUTE21 => c.p31
508 ,P_PBN_ATTRIBUTE22 => c.p32
509 ,P_PBN_ATTRIBUTE23 => c.p33
510 ,P_PBN_ATTRIBUTE24 => c.p34
511 ,P_PBN_ATTRIBUTE25 => c.p35
512 ,P_PBN_ATTRIBUTE26 => c.p36
513 ,P_PBN_ATTRIBUTE27 => c.p37
514 ,P_PBN_ATTRIBUTE28 => c.p38
515 ,P_PBN_ATTRIBUTE29 => c.p39
516 ,P_PBN_ATTRIBUTE30 => c.p40
517 ,P_REQUEST_ID => L_REQUEST_ID
518 ,P_PROGRAM_APPLICATION_ID => L_PROGRAM_APPLICATION_ID
519 ,P_PROGRAM_ID => L_PROGRAM_ID
520 ,P_PROGRAM_UPDATE_DATE => c.p41
521 ,P_OBJECT_VERSION_NUMBER => c.p42
522 ,P_PER_IN_LER_ID => L_PER_IN_LER_ID
523 ,P_EFFECTIVE_DATE => c.p43
524 ,P_MULTI_ROW_ACTN => L_MULTI_ROW_ACTN);
525 hr_data_pump.api_trc_off;
526 --
527 iuk(p_batch_line_id,c.p1,L_PL_BNF_ID);
528 --
529 update hr_pump_batch_lines l set
530 l.pval001 = decode(c.p1,null,cn,c.p1),
531 l.pval002 = decode(c.p2,null,cn,dc(c.p2)),
532 l.pval003 = decode(c.p3,null,cn,dc(c.p3)),
533 l.pval042 = decode(c.p42,null,cn,c.p42)
534 where l.rowid = c.myrowid;
535 --
536 close cr;
537 --
538 hr_data_pump.exit('call');
539 exception
540  when hr_multi_message.error_message_exist then
541    if cr%isopen then
542     close cr;
543    end if;
544    hr_pump_utils.set_multi_msg_error_flag(true);
545  when others then
546  if cr%isopen then
547   close cr;
548  end if;
549  raise;
550 end call;
551 end hrdpp_CREATE_PLAN_BENEFICIARY;