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_STATE_TAX_RULE

Source


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