DBA Data[Home] [Help]

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