3: --
4: -- Package Variables
5: --
6: g_package varchar2(33) := ' pay_kr_aei_api.';
7: g_debug boolean := hr_utility.debug_enabled;
8: --
9: -- Common business group and legislation code check function
10: --
11: procedure check_bg_lc
26: fetch csr_bg
27: into l_legislation_code;
28: if csr_bg%notfound then
29: close csr_bg;
30: hr_utility.set_message(801, 'HR_7208_API_BUS_GRP_INVALID');
31: hr_utility.raise_error;
32: end if;
33: close csr_bg;
34: --
27: into l_legislation_code;
28: if csr_bg%notfound then
29: close csr_bg;
30: hr_utility.set_message(801, 'HR_7208_API_BUS_GRP_INVALID');
31: hr_utility.raise_error;
32: end if;
33: close csr_bg;
34: --
35: -- Check that the legislation of the specified business group is 'KR'.
34: --
35: -- Check that the legislation of the specified business group is 'KR'.
36: --
37: if l_legislation_code <> 'KR' then
38: hr_utility.set_message(801, 'HR_7961_PER_BUS_GRP_INVALID');
39: hr_utility.set_message_token('LEG_CODE','KR');
40: hr_utility.raise_error;
41: end if;
42: end check_bg_lc;
35: -- Check that the legislation of the specified business group is 'KR'.
36: --
37: if l_legislation_code <> 'KR' then
38: hr_utility.set_message(801, 'HR_7961_PER_BUS_GRP_INVALID');
39: hr_utility.set_message_token('LEG_CODE','KR');
40: hr_utility.raise_error;
41: end if;
42: end check_bg_lc;
43: -- ---------------------------------------------------------------------
36: --
37: if l_legislation_code <> 'KR' then
38: hr_utility.set_message(801, 'HR_7961_PER_BUS_GRP_INVALID');
39: hr_utility.set_message_token('LEG_CODE','KR');
40: hr_utility.raise_error;
41: end if;
42: end check_bg_lc;
43: -- ---------------------------------------------------------------------
44: -- |------------------< ins_yea_tax_break_info >-----------------------|
62: l_proc varchar2(72) := g_package||'ins_yea_tax_break_info';
63: --
64: begin
65: if g_debug then
66: hr_utility.set_location('Entering:'|| l_proc, 10);
67: hr_utility.trace('Inside ins_yea_tax_break_info');
68: end if;
69:
70: -- Check business group and legislation code
63: --
64: begin
65: if g_debug then
66: hr_utility.set_location('Entering:'|| l_proc, 10);
67: hr_utility.trace('Inside ins_yea_tax_break_info');
68: end if;
69:
70: -- Check business group and legislation code
71: check_bg_lc
72: (p_business_group_id => p_business_group_id
73: );
74:
75: if g_debug then
76: hr_utility.set_location(l_proc, 6);
77: end if;
78: --
79: -- Call the Assignment Extra Information Business API
80: --
91: ,p_assignment_extra_info_id => p_assignment_extra_info_id
92: );
93:
94: if g_debug then
95: hr_utility.set_location(' Leaving:'||l_proc, 40);
96: end if;
97: end ins_yea_tax_break_info;
98: --
99: -- ---------------------------------------------------------------------
116: l_proc varchar2(72) := g_package||'upd_yea_tax_break_info';
117: --
118: begin
119: if g_debug then
120: hr_utility.set_location('Entering:'|| l_proc, 10);
121: end if;
122:
123: -- Check business group and legislation code
124: check_bg_lc
125: (p_business_group_id => p_business_group_id
126: );
127:
128: if g_debug then
129: hr_utility.set_location(l_proc, 6);
130: end if;
131: --
132: -- Call the Assignment Extra Information Business API
133: --
142: ,p_aei_information4 => p_aei_information4
143: );
144:
145: if g_debug then
146: hr_utility.set_location(' Leaving:'||l_proc, 40);
147: end if;
148: end upd_yea_tax_break_info;
149: --
150: -- ---------------------------------------------------------------------
172: l_proc varchar2(72) := g_package||'ins_yea_tax_exem_info';
173: --
174: begin
175: if g_debug then
176: hr_utility.set_location('Entering:'|| l_proc, 10);
177: hr_utility.trace('Inside ins_yea_tax_exem_info');
178: end if;
179:
180: -- Check business group and legislation code
173: --
174: begin
175: if g_debug then
176: hr_utility.set_location('Entering:'|| l_proc, 10);
177: hr_utility.trace('Inside ins_yea_tax_exem_info');
178: end if;
179:
180: -- Check business group and legislation code
181: check_bg_lc
182: (p_business_group_id => p_business_group_id
183: );
184:
185: if g_debug then
186: hr_utility.set_location(l_proc, 6);
187: end if;
188: --
189: -- Call the Assignment Extra Information Business API
190: --
204: ,p_assignment_extra_info_id => p_assignment_extra_info_id
205: );
206:
207: if g_debug then
208: hr_utility.set_location(' Leaving:'||l_proc, 40);
209: end if;
210: end ins_yea_tax_exem_info;
211: --
212: -- ---------------------------------------------------------------------
232: l_proc varchar2(72) := g_package||'upd_yea_tax_exem_info';
233: --
234: begin
235: if g_debug then
236: hr_utility.set_location('Entering:'|| l_proc, 10);
237: end if;
238:
239: -- Check business group and legislation code
240: check_bg_lc
241: (p_business_group_id => p_business_group_id
242: );
243:
244: if g_debug then
245: hr_utility.set_location(l_proc, 6);
246: end if;
247: --
248: -- Call the Assignment Extra Information Business API
249: --
261: ,p_aei_information7 => p_aei_information7
262: );
263:
264: if g_debug then
265: hr_utility.set_location(' Leaving:'||l_proc, 40);
266: end if;
267: end upd_yea_tax_exem_info;
268: --
269: -- ---------------------------------------------------------------------
306: l_proc varchar2(72) := g_package||'ins_yea_sp_tax_exem_info';
307: --
308: begin
309: if g_debug then
310: hr_utility.set_location('Entering:'|| l_proc, 10);
311: hr_utility.trace('Inside ins_yea_sp_tax_exem_info');
312: end if;
313:
314: -- Check business group and legislation code
307: --
308: begin
309: if g_debug then
310: hr_utility.set_location('Entering:'|| l_proc, 10);
311: hr_utility.trace('Inside ins_yea_sp_tax_exem_info');
312: end if;
313:
314: -- Check business group and legislation code
315: check_bg_lc
316: (p_business_group_id => p_business_group_id
317: );
318:
319: if g_debug then
320: hr_utility.set_location(l_proc, 6);
321: end if;
322: --
323: -- Call the Assignment Extra Information Business API
324: --
353: ,p_assignment_extra_info_id => p_assignment_extra_info_id
354: );
355:
356: if g_debug then
357: hr_utility.set_location(' Leaving:'||l_proc, 40);
358: end if;
359: end ins_yea_sp_tax_exem_info;
360: --
361: -- ---------------------------------------------------------------------
396: l_proc varchar2(72) := g_package||'upd_yea_sp_tax_exem_info';
397: --
398: begin
399: if g_debug then
400: hr_utility.set_location('Entering:'|| l_proc, 10);
401: end if;
402:
403: -- Check business group and legislation code
404: check_bg_lc
405: (p_business_group_id => p_business_group_id
406: );
407:
408: if g_debug then
409: hr_utility.set_location(l_proc, 6);
410: end if;
411: --
412: -- Call the Assignment Extra Information Business API
413: --
440: ,p_aei_information22 => p_aei_information22
441: );
442:
443: if g_debug then
444: hr_utility.set_location(' Leaving:'||l_proc, 40);
445: end if;
446: end upd_yea_sp_tax_exem_info;
447: --
448: -- ---------------------------------------------------------------------
467: l_proc varchar2(72) := g_package||'ins_yea_dpnteduc_tax_exem_info';
468: --
469: begin
470: if g_debug then
471: hr_utility.set_location('Entering:'|| l_proc, 10);
472: hr_utility.trace('Inside ins_yea_dpnteduc_tax_exem_info');
473: end if;
474:
475: -- Check business group and legislation code
468: --
469: begin
470: if g_debug then
471: hr_utility.set_location('Entering:'|| l_proc, 10);
472: hr_utility.trace('Inside ins_yea_dpnteduc_tax_exem_info');
473: end if;
474:
475: -- Check business group and legislation code
476: check_bg_lc
477: (p_business_group_id => p_business_group_id
478: );
479:
480: if g_debug then
481: hr_utility.set_location(l_proc, 6);
482: end if;
483: --
484: -- Call the Assignment Extra Information Business API
485: --
496: ,p_assignment_extra_info_id => p_assignment_extra_info_id
497: );
498:
499: if g_debug then
500: hr_utility.set_location(' Leaving:'||l_proc, 40);
501: end if;
502: end ins_yea_dpnteduc_tax_exem_info;
503: --
504: -- ---------------------------------------------------------------------
521: l_proc varchar2(72) := g_package||'upd_yea_dpnteduc_tax_exem_info';
522: --
523: begin
524: if g_debug then
525: hr_utility.set_location('Entering:'|| l_proc, 10);
526: end if;
527:
528: -- Check business group and legislation code
529: check_bg_lc
530: (p_business_group_id => p_business_group_id
531: );
532:
533: if g_debug then
534: hr_utility.set_location(l_proc, 6);
535: end if;
536: --
537: -- Call the Assignment Extra Information Business API
538: --
547: ,p_aei_information4 => p_aei_information4
548: );
549:
550: if g_debug then
551: hr_utility.set_location(' Leaving:'||l_proc, 40);
552: end if;
553: end upd_yea_dpnteduc_tax_exem_info;
554: --
555: -- ---------------------------------------------------------------------
576: l_proc varchar2(72) := g_package||'ins_yea_fw_tax_break_info';
577: --
578: begin
579: if g_debug then
580: hr_utility.set_location('Entering:'|| l_proc, 10);
581: hr_utility.trace('Inside ins_yea_fw_tax_break_info');
582: end if;
583:
584: -- Check business group and legislation code
577: --
578: begin
579: if g_debug then
580: hr_utility.set_location('Entering:'|| l_proc, 10);
581: hr_utility.trace('Inside ins_yea_fw_tax_break_info');
582: end if;
583:
584: -- Check business group and legislation code
585: check_bg_lc
586: (p_business_group_id => p_business_group_id
587: );
588:
589: if g_debug then
590: hr_utility.set_location(l_proc, 6);
591: end if;
592: --
593: -- Call the Assignment Extra Information Business API
594: --
607: ,p_assignment_extra_info_id => p_assignment_extra_info_id
608: );
609:
610: if g_debug then
611: hr_utility.set_location(' Leaving:'||l_proc, 40);
612: end if;
613: end ins_yea_fw_tax_break_info;
614: --
615: -- ---------------------------------------------------------------------
634: l_proc varchar2(72) := g_package||'upd_yea_fw_tax_break_info';
635: --
636: begin
637: if g_debug then
638: hr_utility.set_location('Entering:'|| l_proc, 10);
639: end if;
640:
641: -- Check business group and legislation code
642: check_bg_lc
643: (p_business_group_id => p_business_group_id
644: );
645:
646: if g_debug then
647: hr_utility.set_location(l_proc, 6);
648: end if;
649: --
650: -- Call the Assignment Extra Information Business API
651: --
662: ,p_aei_information6 => p_aei_information6
663: );
664:
665: if g_debug then
666: hr_utility.set_location(' Leaving:'||l_proc, 40);
667: end if;
668: end upd_yea_fw_tax_break_info;
669: --
670: -- ---------------------------------------------------------------------
695: l_proc varchar2(72) := g_package||'ins_yea_ovs_tax_break_info';
696: --
697: begin
698: if g_debug then
699: hr_utility.set_location('Entering:'|| l_proc, 10);
700: hr_utility.trace('Inside ins_yea_ovs_tax_break_info');
701: end if;
702:
703: -- Check business group and legislation code
696: --
697: begin
698: if g_debug then
699: hr_utility.set_location('Entering:'|| l_proc, 10);
700: hr_utility.trace('Inside ins_yea_ovs_tax_break_info');
701: end if;
702:
703: -- Check business group and legislation code
704: check_bg_lc
705: (p_business_group_id => p_business_group_id
706: );
707:
708: if g_debug then
709: hr_utility.set_location(l_proc, 6);
710: end if;
711: --
712: -- Call the Assignment Extra Information Business API
713: --
730: ,p_assignment_extra_info_id => p_assignment_extra_info_id
731: );
732:
733: if g_debug then
734: hr_utility.set_location(' Leaving:'||l_proc, 40);
735: end if;
736: end ins_yea_ovs_tax_break_info;
737: --
738: -- ---------------------------------------------------------------------
761: l_proc varchar2(72) := g_package||'upd_yea_ovs_tax_break_info';
762: --
763: begin
764: if g_debug then
765: hr_utility.set_location('Entering:'|| l_proc, 10);
766: end if;
767:
768: -- Check business group and legislation code
769: check_bg_lc
770: (p_business_group_id => p_business_group_id
771: );
772:
773: if g_debug then
774: hr_utility.set_location(l_proc, 6);
775: end if;
776: --
777: -- Call the Assignment Extra Information Business API
778: --
793: ,p_aei_information10 => p_aei_information10
794: );
795:
796: if g_debug then
797: hr_utility.set_location(' Leaving:'||l_proc, 40);
798: end if;
799: end upd_yea_ovs_tax_break_info;
800: --
801: -- ---------------------------------------------------------------------
829: l_proc varchar2(72) := g_package||'upd_yea_prev_er_info';
830: --
831: begin
832: if g_debug then
833: hr_utility.set_location('Entering:'|| l_proc, 10);
834: end if;
835:
836: -- Check business group and legislation code
837: check_bg_lc
838: (p_business_group_id => p_business_group_id
839: );
840:
841: if g_debug then
842: hr_utility.set_location(l_proc, 6);
843: end if;
844: --
845: -- Call the Assignment Extra Information Business API
846: --
866: ,p_aei_information15 => p_aei_information15
867: );
868:
869: if g_debug then
870: hr_utility.set_location(' Leaving:'||l_proc, 40);
871: end if;
872: end upd_yea_prev_er_info;
873:
874: -- ---------------------------------------------------------------------
904: l_proc varchar2(72) := g_package||'ins_yea_prev_er_info';
905: --
906: begin
907: if g_debug then
908: hr_utility.set_location('Entering:'|| l_proc, 10);
909: hr_utility.trace('Inside ins_yea_prev_er_info');
910: end if;
911:
912: -- Check business group and legislation code
905: --
906: begin
907: if g_debug then
908: hr_utility.set_location('Entering:'|| l_proc, 10);
909: hr_utility.trace('Inside ins_yea_prev_er_info');
910: end if;
911:
912: -- Check business group and legislation code
913: check_bg_lc
914: (p_business_group_id => p_business_group_id
915: );
916:
917: if g_debug then
918: hr_utility.set_location(l_proc, 6);
919: end if;
920: --
921: -- Call the Assignment Extra Information Business API
922: --
944: ,p_assignment_extra_info_id => p_assignment_extra_info_id
945: );
946:
947: if g_debug then
948: hr_utility.set_location(' Leaving:'||l_proc, 40);
949: end if;
950: end ins_yea_prev_er_info;
951: --
952: --
960: end if;
961:
962: if substr(to_char(p_session_date, 'DD-MON-YYYY'), 8, 4)
963: <> substr(to_char(p_entry_date, 'DD-MON-YYYY'), 8, 4) then
964: hr_utility.set_message(801, 'PAY_KR_NOT_WITHIN_CURRENT_YEAR');
965: hr_utility.raise_error;
966: end if;
967: end chk_date_in_current_year;
968: --
961:
962: if substr(to_char(p_session_date, 'DD-MON-YYYY'), 8, 4)
963: <> substr(to_char(p_entry_date, 'DD-MON-YYYY'), 8, 4) then
964: hr_utility.set_message(801, 'PAY_KR_NOT_WITHIN_CURRENT_YEAR');
965: hr_utility.raise_error;
966: end if;
967: end chk_date_in_current_year;
968: --
969: --