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


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