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_FED_TAX_RULE

Source


4  * Generated for API: PAY_FEDERAL_TAX_RULE_API.UPDATE_FED_TAX_RULE
1 package body hrdpp_UPDATE_FED_TAX_RULE as
2 /*
3  * Generated by hr_pump_meta_mapper at: 2012/11/27 04:11:44
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_SUI_STATE_CODE in varchar2 default null
85 ,P_ADDITIONAL_WA_AMOUNT in number default null
86 ,I_ADDITIONAL_WA_AMOUNT in varchar2 default 'N'
87 ,P_FILING_STATUS_CODE in varchar2 default null
88 ,P_FIT_OVERRIDE_AMOUNT in number default null
89 ,I_FIT_OVERRIDE_AMOUNT in varchar2 default 'N'
90 ,P_FIT_OVERRIDE_RATE in number default null
91 ,I_FIT_OVERRIDE_RATE in varchar2 default 'N'
92 ,P_WITHHOLDING_ALLOWANCES in number default null
93 ,I_WITHHOLDING_ALLOWANCES in varchar2 default 'N'
94 ,P_CUMULATIVE_TAXATION in varchar2 default null
95 ,P_EIC_FILING_STATUS_CODE in varchar2 default null
96 ,P_FIT_ADDITIONAL_TAX in number default null
97 ,I_FIT_ADDITIONAL_TAX in varchar2 default 'N'
98 ,P_FIT_EXEMPT in varchar2 default null
99 ,P_FUTA_TAX_EXEMPT in varchar2 default null
100 ,P_MEDICARE_TAX_EXEMPT in varchar2 default null
101 ,P_SS_TAX_EXEMPT in varchar2 default null
102 ,P_WAGE_EXEMPT in varchar2 default null
103 ,P_STATUTORY_EMPLOYEE in varchar2 default null
104 ,P_W2_FILED_YEAR in number default null
105 ,I_W2_FILED_YEAR in varchar2 default 'N'
106 ,P_SUPP_TAX_OVERRIDE_RATE in number default null
107 ,I_SUPP_TAX_OVERRIDE_RATE in varchar2 default 'N'
108 ,P_EXCESSIVE_WA_REJECT_DATE in date default null
109 ,I_EXCESSIVE_WA_REJECT_DATE in varchar2 default 'N'
110 ,P_ATTRIBUTE_CATEGORY in varchar2 default null
111 ,P_ATTRIBUTE1 in varchar2 default null
112 ,P_ATTRIBUTE2 in varchar2 default null
113 ,P_ATTRIBUTE3 in varchar2 default null
114 ,P_ATTRIBUTE4 in varchar2 default null
115 ,P_ATTRIBUTE5 in varchar2 default null
116 ,P_ATTRIBUTE6 in varchar2 default null
117 ,P_ATTRIBUTE7 in varchar2 default null
118 ,P_ATTRIBUTE8 in varchar2 default null
119 ,P_ATTRIBUTE9 in varchar2 default null
120 ,P_ATTRIBUTE10 in varchar2 default null
121 ,P_ATTRIBUTE11 in varchar2 default null
122 ,P_ATTRIBUTE12 in varchar2 default null
123 ,P_ATTRIBUTE13 in varchar2 default null
124 ,P_ATTRIBUTE14 in varchar2 default null
125 ,P_ATTRIBUTE15 in varchar2 default null
126 ,P_ATTRIBUTE16 in varchar2 default null
127 ,P_ATTRIBUTE17 in varchar2 default null
128 ,P_ATTRIBUTE18 in varchar2 default null
129 ,P_ATTRIBUTE19 in varchar2 default null
130 ,P_ATTRIBUTE20 in varchar2 default null
131 ,P_ATTRIBUTE21 in varchar2 default null
132 ,P_ATTRIBUTE22 in varchar2 default null
133 ,P_ATTRIBUTE23 in varchar2 default null
134 ,P_ATTRIBUTE24 in varchar2 default null
135 ,P_ATTRIBUTE25 in varchar2 default null
136 ,P_ATTRIBUTE26 in varchar2 default null
137 ,P_ATTRIBUTE27 in varchar2 default null
138 ,P_ATTRIBUTE28 in varchar2 default null
139 ,P_ATTRIBUTE29 in varchar2 default null
140 ,P_ATTRIBUTE30 in varchar2 default null
141 ,P_FED_INFORMATION_CATEGORY in varchar2 default null
142 ,P_FED_INFORMATION1 in varchar2 default null
143 ,P_FED_INFORMATION2 in varchar2 default null
144 ,P_FED_INFORMATION3 in varchar2 default null
145 ,P_FED_INFORMATION4 in varchar2 default null
146 ,P_FED_INFORMATION5 in varchar2 default null
147 ,P_FED_INFORMATION6 in varchar2 default null
148 ,P_FED_INFORMATION7 in varchar2 default null
149 ,P_FED_INFORMATION8 in varchar2 default null
150 ,P_FED_INFORMATION9 in varchar2 default null
151 ,P_FED_INFORMATION10 in varchar2 default null
152 ,P_FED_INFORMATION11 in varchar2 default null
153 ,P_FED_INFORMATION12 in varchar2 default null
154 ,P_FED_INFORMATION13 in varchar2 default null
155 ,P_FED_INFORMATION14 in varchar2 default null
156 ,P_FED_INFORMATION15 in varchar2 default null
157 ,P_FED_INFORMATION16 in varchar2 default null
158 ,P_FED_INFORMATION17 in varchar2 default null
159 ,P_FED_INFORMATION18 in varchar2 default null
160 ,P_FED_INFORMATION19 in varchar2 default null
161 ,P_FED_INFORMATION20 in varchar2 default null
162 ,P_FED_INFORMATION21 in varchar2 default null
163 ,P_FED_INFORMATION22 in varchar2 default null
164 ,P_FED_INFORMATION23 in varchar2 default null
165 ,P_FED_INFORMATION24 in varchar2 default null
166 ,P_FED_INFORMATION25 in varchar2 default null
167 ,P_FED_INFORMATION26 in varchar2 default null
168 ,P_FED_INFORMATION27 in varchar2 default null
169 ,P_FED_INFORMATION28 in varchar2 default null
170 ,P_FED_INFORMATION29 in varchar2 default null
171 ,P_FED_INFORMATION30 in varchar2 default null
172 ,P_EMP_FED_TAX_RULE_USER_KEY in varchar2) is
173 blid number := p_data_pump_batch_line_id;
174 begin
175 if blid is not null then
176 delete from hr_pump_batch_lines where batch_line_id = blid;
177 delete from hr_pump_batch_exceptions
178 where source_type = 'BATCH_LINE' and source_id = blid;
179 end if;
180 insert into hr_pump_batch_lines
181 (batch_id
182 ,batch_line_id
183 ,business_group_name
184 ,api_module_id
185 ,line_status
186 ,user_sequence
187 ,link_value
188 ,pval001
189 ,pval002
190 ,pval003
191 ,pval004
192 ,pval005
193 ,pval006
194 ,pval007
195 ,pval008
196 ,pval009
197 ,pval010
198 ,pval011
199 ,pval012
200 ,pval013
201 ,pval014
202 ,pval015
203 ,pval016
204 ,pval017
205 ,pval018
206 ,pval019
207 ,pval020
208 ,pval021
209 ,pval022
210 ,pval023
211 ,pval024
212 ,pval025
213 ,pval026
214 ,pval027
215 ,pval028
216 ,pval029
217 ,pval030
218 ,pval031
219 ,pval032
220 ,pval033
221 ,pval034
222 ,pval035
223 ,pval036
224 ,pval037
225 ,pval038
226 ,pval039
227 ,pval040
228 ,pval041
229 ,pval042
230 ,pval043
231 ,pval044
232 ,pval045
233 ,pval046
234 ,pval047
235 ,pval048
236 ,pval049
237 ,pval050
238 ,pval051
239 ,pval052
240 ,pval053
241 ,pval054
242 ,pval055
243 ,pval056
244 ,pval057
245 ,pval058
246 ,pval059
247 ,pval060
248 ,pval061
252 ,pval065
249 ,pval062
250 ,pval063
251 ,pval064
253 ,pval066
254 ,pval067
255 ,pval068
256 ,pval069
257 ,pval070
258 ,pval071
259 ,pval072
260 ,pval073
261 ,pval074
262 ,pval075
263 ,pval076
264 ,pval077
265 ,pval078
266 ,pval079
267 ,pval080
268 ,pval081
269 ,pval082
270 ,pval085)
271 values
272 (p_batch_id
273 ,nvl(blid,hr_pump_batch_lines_s.nextval)
274 ,p_data_pump_business_grp_name
275 ,1706
276 ,'U'
277 ,p_user_sequence
278 ,p_link_value
279 ,dc(P_EFFECTIVE_DATE)
280 ,P_DATETRACK_UPDATE_MODE
281 ,P_SUI_STATE_CODE
282 ,nd(P_ADDITIONAL_WA_AMOUNT,I_ADDITIONAL_WA_AMOUNT)
283 ,P_FILING_STATUS_CODE
284 ,nd(P_FIT_OVERRIDE_AMOUNT,I_FIT_OVERRIDE_AMOUNT)
285 ,nd(P_FIT_OVERRIDE_RATE,I_FIT_OVERRIDE_RATE)
286 ,nd(P_WITHHOLDING_ALLOWANCES,I_WITHHOLDING_ALLOWANCES)
287 ,P_CUMULATIVE_TAXATION
288 ,P_EIC_FILING_STATUS_CODE
289 ,nd(P_FIT_ADDITIONAL_TAX,I_FIT_ADDITIONAL_TAX)
290 ,P_FIT_EXEMPT
291 ,P_FUTA_TAX_EXEMPT
292 ,P_MEDICARE_TAX_EXEMPT
293 ,P_SS_TAX_EXEMPT
294 ,P_WAGE_EXEMPT
295 ,P_STATUTORY_EMPLOYEE
296 ,nd(P_W2_FILED_YEAR,I_W2_FILED_YEAR)
297 ,nd(P_SUPP_TAX_OVERRIDE_RATE,I_SUPP_TAX_OVERRIDE_RATE)
298 ,dd(P_EXCESSIVE_WA_REJECT_DATE,I_EXCESSIVE_WA_REJECT_DATE)
299 ,P_ATTRIBUTE_CATEGORY
300 ,P_ATTRIBUTE1
301 ,P_ATTRIBUTE2
302 ,P_ATTRIBUTE3
303 ,P_ATTRIBUTE4
304 ,P_ATTRIBUTE5
305 ,P_ATTRIBUTE6
306 ,P_ATTRIBUTE7
307 ,P_ATTRIBUTE8
308 ,P_ATTRIBUTE9
309 ,P_ATTRIBUTE10
310 ,P_ATTRIBUTE11
311 ,P_ATTRIBUTE12
312 ,P_ATTRIBUTE13
313 ,P_ATTRIBUTE14
314 ,P_ATTRIBUTE15
315 ,P_ATTRIBUTE16
316 ,P_ATTRIBUTE17
317 ,P_ATTRIBUTE18
318 ,P_ATTRIBUTE19
319 ,P_ATTRIBUTE20
320 ,P_ATTRIBUTE21
321 ,P_ATTRIBUTE22
322 ,P_ATTRIBUTE23
323 ,P_ATTRIBUTE24
324 ,P_ATTRIBUTE25
325 ,P_ATTRIBUTE26
326 ,P_ATTRIBUTE27
327 ,P_ATTRIBUTE28
328 ,P_ATTRIBUTE29
329 ,P_ATTRIBUTE30
330 ,P_FED_INFORMATION_CATEGORY
331 ,P_FED_INFORMATION1
332 ,P_FED_INFORMATION2
333 ,P_FED_INFORMATION3
334 ,P_FED_INFORMATION4
335 ,P_FED_INFORMATION5
336 ,P_FED_INFORMATION6
337 ,P_FED_INFORMATION7
338 ,P_FED_INFORMATION8
339 ,P_FED_INFORMATION9
340 ,P_FED_INFORMATION10
341 ,P_FED_INFORMATION11
342 ,P_FED_INFORMATION12
343 ,P_FED_INFORMATION13
344 ,P_FED_INFORMATION14
345 ,P_FED_INFORMATION15
346 ,P_FED_INFORMATION16
347 ,P_FED_INFORMATION17
348 ,P_FED_INFORMATION18
349 ,P_FED_INFORMATION19
350 ,P_FED_INFORMATION20
351 ,P_FED_INFORMATION21
352 ,P_FED_INFORMATION22
353 ,P_FED_INFORMATION23
354 ,P_FED_INFORMATION24
355 ,P_FED_INFORMATION25
356 ,P_FED_INFORMATION26
357 ,P_FED_INFORMATION27
358 ,P_FED_INFORMATION28
359 ,P_FED_INFORMATION29
360 ,P_FED_INFORMATION30
361 ,P_EMP_FED_TAX_RULE_USER_KEY);
362 end insert_batch_lines;
363 --
364 procedure call
365 (p_business_group_id in number,
366 p_batch_line_id     in number) is
367 cursor cr is
368 select l.rowid myrowid,
369 decode(l.pval001,cn,dn,d(l.pval001)) p1,
370 decode(l.pval002,cn,vn,l.pval002) p2,
371 decode(l.pval003,cn,vn,vn,vh,l.pval003) p3,
372 l.pval003 d3,
373 decode(l.pval004,cn,nn,vn,nh,n(l.pval004)) p4,
374 l.pval004 d4,
375 decode(l.pval005,cn,vn,vn,vh,
376  hr_pump_get.gl(l.pval005,'US_FIT_FILING_STATUS',d(l.pval001),vn)) p5,
377 l.pval005 d5,
378 decode(l.pval006,cn,nn,vn,nh,n(l.pval006)) p6,
379 l.pval006 d6,
380 decode(l.pval007,cn,nn,vn,nh,n(l.pval007)) p7,
381 l.pval007 d7,
382 decode(l.pval008,cn,nn,vn,nh,n(l.pval008)) p8,
383 l.pval008 d8,
384 decode(l.pval009,cn,vn,vn,vh,
385  hr_pump_get.gl(l.pval009,'YES_NO',d(l.pval001),vn)) p9,
386 l.pval009 d9,
387 decode(l.pval010,cn,vn,vn,vh,
388  hr_pump_get.gl(l.pval010,'US_EIC_FILING_STATUS',d(l.pval001),vn)) p10,
389 l.pval010 d10,
390 decode(l.pval011,cn,nn,vn,nh,n(l.pval011)) p11,
391 l.pval011 d11,
392 decode(l.pval012,cn,vn,vn,vh,
393  hr_pump_get.gl(l.pval012,'YES_NO',d(l.pval001),vn)) p12,
394 l.pval012 d12,
395 decode(l.pval013,cn,vn,vn,vh,
396  hr_pump_get.gl(l.pval013,'YES_NO',d(l.pval001),vn)) p13,
397 l.pval013 d13,
398 decode(l.pval014,cn,vn,vn,vh,
399  hr_pump_get.gl(l.pval014,'YES_NO',d(l.pval001),vn)) p14,
400 l.pval014 d14,
401 decode(l.pval015,cn,vn,vn,vh,
402  hr_pump_get.gl(l.pval015,'YES_NO',d(l.pval001),vn)) p15,
403 l.pval015 d15,
404 decode(l.pval016,cn,vn,vn,vh,l.pval016) p16,
405 l.pval016 d16,
406 decode(l.pval017,cn,vn,vn,vh,
407  hr_pump_get.gl(l.pval017,'YES_NO',d(l.pval001),vn)) p17,
408 l.pval017 d17,
409 decode(l.pval018,cn,nn,vn,nh,n(l.pval018)) p18,
410 l.pval018 d18,
411 decode(l.pval019,cn,nn,vn,nh,n(l.pval019)) p19,
412 l.pval019 d19,
413 decode(l.pval020,cn,dn,vn,dh,d(l.pval020)) p20,
414 l.pval020 d20,
415 decode(l.pval021,cn,vn,vn,vh,l.pval021) p21,
416 l.pval021 d21,
417 decode(l.pval022,cn,vn,vn,vh,l.pval022) p22,
418 l.pval022 d22,
419 decode(l.pval023,cn,vn,vn,vh,l.pval023) p23,
420 l.pval023 d23,
421 decode(l.pval024,cn,vn,vn,vh,l.pval024) p24,
422 l.pval024 d24,
423 decode(l.pval025,cn,vn,vn,vh,l.pval025) p25,
424 l.pval025 d25,
425 decode(l.pval026,cn,vn,vn,vh,l.pval026) p26,
426 l.pval026 d26,
427 decode(l.pval027,cn,vn,vn,vh,l.pval027) p27,
428 l.pval027 d27,
429 decode(l.pval028,cn,vn,vn,vh,l.pval028) p28,
430 l.pval028 d28,
434 l.pval030 d30,
431 decode(l.pval029,cn,vn,vn,vh,l.pval029) p29,
432 l.pval029 d29,
433 decode(l.pval030,cn,vn,vn,vh,l.pval030) p30,
435 decode(l.pval031,cn,vn,vn,vh,l.pval031) p31,
436 l.pval031 d31,
437 decode(l.pval032,cn,vn,vn,vh,l.pval032) p32,
438 l.pval032 d32,
439 decode(l.pval033,cn,vn,vn,vh,l.pval033) p33,
440 l.pval033 d33,
441 decode(l.pval034,cn,vn,vn,vh,l.pval034) p34,
442 l.pval034 d34,
443 decode(l.pval035,cn,vn,vn,vh,l.pval035) p35,
444 l.pval035 d35,
445 decode(l.pval036,cn,vn,vn,vh,l.pval036) p36,
446 l.pval036 d36,
447 decode(l.pval037,cn,vn,vn,vh,l.pval037) p37,
448 l.pval037 d37,
449 decode(l.pval038,cn,vn,vn,vh,l.pval038) p38,
450 l.pval038 d38,
451 decode(l.pval039,cn,vn,vn,vh,l.pval039) p39,
452 l.pval039 d39,
453 decode(l.pval040,cn,vn,vn,vh,l.pval040) p40,
454 l.pval040 d40,
455 decode(l.pval041,cn,vn,vn,vh,l.pval041) p41,
456 l.pval041 d41,
457 decode(l.pval042,cn,vn,vn,vh,l.pval042) p42,
458 l.pval042 d42,
459 decode(l.pval043,cn,vn,vn,vh,l.pval043) p43,
460 l.pval043 d43,
461 decode(l.pval044,cn,vn,vn,vh,l.pval044) p44,
462 l.pval044 d44,
463 decode(l.pval045,cn,vn,vn,vh,l.pval045) p45,
464 l.pval045 d45,
465 decode(l.pval046,cn,vn,vn,vh,l.pval046) p46,
466 l.pval046 d46,
467 decode(l.pval047,cn,vn,vn,vh,l.pval047) p47,
468 l.pval047 d47,
469 decode(l.pval048,cn,vn,vn,vh,l.pval048) p48,
470 l.pval048 d48,
471 decode(l.pval049,cn,vn,vn,vh,l.pval049) p49,
472 l.pval049 d49,
473 decode(l.pval050,cn,vn,vn,vh,l.pval050) p50,
474 l.pval050 d50,
475 decode(l.pval051,cn,vn,vn,vh,l.pval051) p51,
476 l.pval051 d51,
477 decode(l.pval052,cn,vn,vn,vh,l.pval052) p52,
478 l.pval052 d52,
479 decode(l.pval053,cn,vn,vn,vh,l.pval053) p53,
480 l.pval053 d53,
481 decode(l.pval054,cn,vn,vn,vh,l.pval054) p54,
482 l.pval054 d54,
483 decode(l.pval055,cn,vn,vn,vh,l.pval055) p55,
484 l.pval055 d55,
485 decode(l.pval056,cn,vn,vn,vh,l.pval056) p56,
486 l.pval056 d56,
487 decode(l.pval057,cn,vn,vn,vh,l.pval057) p57,
488 l.pval057 d57,
489 decode(l.pval058,cn,vn,vn,vh,l.pval058) p58,
490 l.pval058 d58,
491 decode(l.pval059,cn,vn,vn,vh,l.pval059) p59,
492 l.pval059 d59,
493 decode(l.pval060,cn,vn,vn,vh,l.pval060) p60,
494 l.pval060 d60,
495 decode(l.pval061,cn,vn,vn,vh,l.pval061) p61,
496 l.pval061 d61,
497 decode(l.pval062,cn,vn,vn,vh,l.pval062) p62,
498 l.pval062 d62,
499 decode(l.pval063,cn,vn,vn,vh,l.pval063) p63,
500 l.pval063 d63,
501 decode(l.pval064,cn,vn,vn,vh,l.pval064) p64,
502 l.pval064 d64,
503 decode(l.pval065,cn,vn,vn,vh,l.pval065) p65,
504 l.pval065 d65,
505 decode(l.pval066,cn,vn,vn,vh,l.pval066) p66,
506 l.pval066 d66,
507 decode(l.pval067,cn,vn,vn,vh,l.pval067) p67,
508 l.pval067 d67,
509 decode(l.pval068,cn,vn,vn,vh,l.pval068) p68,
510 l.pval068 d68,
511 decode(l.pval069,cn,vn,vn,vh,l.pval069) p69,
512 l.pval069 d69,
513 decode(l.pval070,cn,vn,vn,vh,l.pval070) p70,
514 l.pval070 d70,
515 decode(l.pval071,cn,vn,vn,vh,l.pval071) p71,
516 l.pval071 d71,
517 decode(l.pval072,cn,vn,vn,vh,l.pval072) p72,
518 l.pval072 d72,
519 decode(l.pval073,cn,vn,vn,vh,l.pval073) p73,
520 l.pval073 d73,
521 decode(l.pval074,cn,vn,vn,vh,l.pval074) p74,
522 l.pval074 d74,
523 decode(l.pval075,cn,vn,vn,vh,l.pval075) p75,
524 l.pval075 d75,
525 decode(l.pval076,cn,vn,vn,vh,l.pval076) p76,
526 l.pval076 d76,
527 decode(l.pval077,cn,vn,vn,vh,l.pval077) p77,
528 l.pval077 d77,
529 decode(l.pval078,cn,vn,vn,vh,l.pval078) p78,
530 l.pval078 d78,
531 decode(l.pval079,cn,vn,vn,vh,l.pval079) p79,
532 l.pval079 d79,
533 decode(l.pval080,cn,vn,vn,vh,l.pval080) p80,
534 l.pval080 d80,
535 decode(l.pval081,cn,vn,vn,vh,l.pval081) p81,
536 l.pval081 d81,
537 decode(l.pval082,cn,vn,vn,vh,l.pval082) p82,
538 l.pval082 d82,
539 decode(l.pval083,cn,dn,d(l.pval083)) p83,
540 decode(l.pval084,cn,dn,d(l.pval084)) p84,
541 decode(l.pval085,cn,vn,l.pval085) p85
542 from hr_pump_batch_lines l
543 where l.batch_line_id = p_batch_line_id;
544 --
545 c cr%rowtype;
546 l_validate boolean := false;
547 L_EMP_FED_TAX_RULE_ID number;
548 L_OBJECT_VERSION_NUMBER number;
549 --
550 begin
551 hr_data_pump.entry('call');
552 open cr;
553 fetch cr into c;
554 if cr%notfound then
555 hr_utility.set_message(800,'HR_50326_DP_NO_ROW');
556 hr_utility.set_message_token('TABLE','HR_PUMP_BATCH_LINES');
557 hr_utility.set_message_token('COLUMN','P_BATCH_LINE_ID');
558 hr_utility.set_message_token('VALUE',p_batch_line_id);
559 hr_utility.raise_error;
560 end if;
561 --
562 if c.p85 is null then
563 L_EMP_FED_TAX_RULE_ID:=nn;
564 else
565 L_EMP_FED_TAX_RULE_ID := 
566 hr_pump_get.get_emp_fed_tax_rule_id
567 (P_EMP_FED_TAX_RULE_USER_KEY => c.p85);
568 end if;
569 --
570 if c.p85 is null or
571 c.p1 is null then
572 L_OBJECT_VERSION_NUMBER:=nn;
573 else
574 L_OBJECT_VERSION_NUMBER := 
575 hr_pump_get.GET_FED_TAX_RULE_OVN
576 (P_EMP_FED_TAX_RULE_USER_KEY => c.p85
577 ,P_EFFECTIVE_DATE => c.p1);
578 end if;
579 --
580 hr_data_pump.api_trc_on;
581 PAY_FEDERAL_TAX_RULE_API.UPDATE_FED_TAX_RULE
582 (p_validate => l_validate
583 ,P_EFFECTIVE_DATE => c.p1
584 ,P_DATETRACK_UPDATE_MODE => c.p2
585 ,P_EMP_FED_TAX_RULE_ID => L_EMP_FED_TAX_RULE_ID
586 ,P_OBJECT_VERSION_NUMBER => L_OBJECT_VERSION_NUMBER
587 ,P_SUI_STATE_CODE => c.p3
588 ,P_ADDITIONAL_WA_AMOUNT => c.p4
589 ,P_FILING_STATUS_CODE => c.p5
590 ,P_FIT_OVERRIDE_AMOUNT => c.p6
591 ,P_FIT_OVERRIDE_RATE => c.p7
592 ,P_WITHHOLDING_ALLOWANCES => c.p8
593 ,P_CUMULATIVE_TAXATION => c.p9
594 ,P_EIC_FILING_STATUS_CODE => c.p10
595 ,P_FIT_ADDITIONAL_TAX => c.p11
596 ,P_FIT_EXEMPT => c.p12
597 ,P_FUTA_TAX_EXEMPT => c.p13
598 ,P_MEDICARE_TAX_EXEMPT => c.p14
599 ,P_SS_TAX_EXEMPT => c.p15
600 ,P_WAGE_EXEMPT => c.p16
601 ,P_STATUTORY_EMPLOYEE => c.p17
602 ,P_W2_FILED_YEAR => c.p18
603 ,P_SUPP_TAX_OVERRIDE_RATE => c.p19
604 ,P_EXCESSIVE_WA_REJECT_DATE => c.p20
605 ,P_ATTRIBUTE_CATEGORY => c.p21
606 ,P_ATTRIBUTE1 => c.p22
607 ,P_ATTRIBUTE2 => c.p23
608 ,P_ATTRIBUTE3 => c.p24
609 ,P_ATTRIBUTE4 => c.p25
610 ,P_ATTRIBUTE5 => c.p26
611 ,P_ATTRIBUTE6 => c.p27
612 ,P_ATTRIBUTE7 => c.p28
613 ,P_ATTRIBUTE8 => c.p29
614 ,P_ATTRIBUTE9 => c.p30
615 ,P_ATTRIBUTE10 => c.p31
616 ,P_ATTRIBUTE11 => c.p32
617 ,P_ATTRIBUTE12 => c.p33
618 ,P_ATTRIBUTE13 => c.p34
619 ,P_ATTRIBUTE14 => c.p35
620 ,P_ATTRIBUTE15 => c.p36
621 ,P_ATTRIBUTE16 => c.p37
622 ,P_ATTRIBUTE17 => c.p38
623 ,P_ATTRIBUTE18 => c.p39
624 ,P_ATTRIBUTE19 => c.p40
625 ,P_ATTRIBUTE20 => c.p41
626 ,P_ATTRIBUTE21 => c.p42
627 ,P_ATTRIBUTE22 => c.p43
628 ,P_ATTRIBUTE23 => c.p44
629 ,P_ATTRIBUTE24 => c.p45
630 ,P_ATTRIBUTE25 => c.p46
631 ,P_ATTRIBUTE26 => c.p47
632 ,P_ATTRIBUTE27 => c.p48
633 ,P_ATTRIBUTE28 => c.p49
634 ,P_ATTRIBUTE29 => c.p50
635 ,P_ATTRIBUTE30 => c.p51
636 ,P_FED_INFORMATION_CATEGORY => c.p52
637 ,P_FED_INFORMATION1 => c.p53
638 ,P_FED_INFORMATION2 => c.p54
639 ,P_FED_INFORMATION3 => c.p55
640 ,P_FED_INFORMATION4 => c.p56
641 ,P_FED_INFORMATION5 => c.p57
642 ,P_FED_INFORMATION6 => c.p58
643 ,P_FED_INFORMATION7 => c.p59
644 ,P_FED_INFORMATION8 => c.p60
645 ,P_FED_INFORMATION9 => c.p61
646 ,P_FED_INFORMATION10 => c.p62
647 ,P_FED_INFORMATION11 => c.p63
648 ,P_FED_INFORMATION12 => c.p64
649 ,P_FED_INFORMATION13 => c.p65
650 ,P_FED_INFORMATION14 => c.p66
651 ,P_FED_INFORMATION15 => c.p67
652 ,P_FED_INFORMATION16 => c.p68
653 ,P_FED_INFORMATION17 => c.p69
654 ,P_FED_INFORMATION18 => c.p70
655 ,P_FED_INFORMATION19 => c.p71
656 ,P_FED_INFORMATION20 => c.p72
657 ,P_FED_INFORMATION21 => c.p73
658 ,P_FED_INFORMATION22 => c.p74
659 ,P_FED_INFORMATION23 => c.p75
660 ,P_FED_INFORMATION24 => c.p76
661 ,P_FED_INFORMATION25 => c.p77
662 ,P_FED_INFORMATION26 => c.p78
663 ,P_FED_INFORMATION27 => c.p79
664 ,P_FED_INFORMATION28 => c.p80
665 ,P_FED_INFORMATION29 => c.p81
666 ,P_FED_INFORMATION30 => c.p82
667 ,P_EFFECTIVE_START_DATE => c.p83
668 ,P_EFFECTIVE_END_DATE => c.p84);
669 hr_data_pump.api_trc_off;
670 
671 --
672 update hr_pump_batch_lines l set
673 l.pval083 = decode(c.p83,null,cn,dc(c.p83)),
674 l.pval084 = decode(c.p84,null,cn,dc(c.p84))
675 where l.rowid = c.myrowid;
676 --
677 close cr;
678 --
679 hr_data_pump.exit('call');
680 exception
681  when hr_multi_message.error_message_exist then
682    if cr%isopen then
683     close cr;
684    end if;
685    hr_pump_utils.set_multi_msg_error_flag(true);
686  when others then
687  if cr%isopen then
688   close cr;
689  end if;
690  raise;
691 end call;
692 end hrdpp_UPDATE_FED_TAX_RULE;