[Home] [Help]
48: where a.state_code = p_state_code;
49: --
50: Begin
51: --
52: hr_utility.set_location('Entering:'||l_proc,5);
53: --
54: -- Since update is not allowed, only checking insert case
55: --
56: if (p_emp_state_tax_rule_id is null) then
57: --
58: -- Check that the mandatory parameters have been set
59: --
60: if p_state_code is null then
61: hr_utility.set_message(801, 'PAY_72824_STA_STA_NOT_NULL');
62: hr_utility.raise_error;
63: end if;
64: --
65: -- check if state_code value exists in pay_us_states table
58: -- Check that the mandatory parameters have been set
59: --
60: if p_state_code is null then
61: hr_utility.set_message(801, 'PAY_72824_STA_STA_NOT_NULL');
62: hr_utility.raise_error;
63: end if;
64: --
65: -- check if state_code value exists in pay_us_states table
66: --
81: close c1;
82: --
83: end if;
84: --
85: hr_utility.set_location('Leaving:'||l_proc,10);
86: --
87: End chk_state_code;
88: --
89: -- ----------------------------------------------------------------------------
147: and fed.effective_end_date;
148: --
149: Begin
150: --
151: hr_utility.set_location('Entering:'||l_proc,5);
152: --
153: -- Check that the mandatory parameters have been set
154: --
155: if p_assignment_id is null then
152: --
153: -- Check that the mandatory parameters have been set
154: --
155: if p_assignment_id is null then
156: hr_utility.set_message(801, 'PAY_72806_STA_ASG_NOT_NULL');
157: hr_utility.raise_error;
158: end if;
159: --
160: if p_business_group_id is null then
153: -- Check that the mandatory parameters have been set
154: --
155: if p_assignment_id is null then
156: hr_utility.set_message(801, 'PAY_72806_STA_ASG_NOT_NULL');
157: hr_utility.raise_error;
158: end if;
159: --
160: if p_business_group_id is null then
161: hr_utility.set_message(801, 'PAY_72808_STA_BG_NOT_NULL');
157: hr_utility.raise_error;
158: end if;
159: --
160: if p_business_group_id is null then
161: hr_utility.set_message(801, 'PAY_72808_STA_BG_NOT_NULL');
162: hr_utility.raise_error;
163: end if;
164: --
165: hr_api.mandatory_arg_error
158: end if;
159: --
160: if p_business_group_id is null then
161: hr_utility.set_message(801, 'PAY_72808_STA_BG_NOT_NULL');
162: hr_utility.raise_error;
163: end if;
164: --
165: hr_api.mandatory_arg_error
166: (p_api_name => l_proc
187: --
188: -- raise error as assignment_id not found in per_assignments_f
189: -- table.
190: --
191: hr_utility.set_message(801, 'HR_51746_ASG_INV_ASG_ID');
192: hr_utility.raise_error;
193: --
194: else
195: --
188: -- raise error as assignment_id not found in per_assignments_f
189: -- table.
190: --
191: hr_utility.set_message(801, 'HR_51746_ASG_INV_ASG_ID');
192: hr_utility.raise_error;
193: --
194: else
195: --
196: close c1;
196: close c1;
197: --
198: if p_business_group_id <> l_business_group_id then
199: --
200: hr_utility.set_message(801, 'PAY_72807_STA_BG_MATCH_ASG');
201: hr_utility.raise_error;
202: --
203: else
204: --
197: --
198: if p_business_group_id <> l_business_group_id then
199: --
200: hr_utility.set_message(801, 'PAY_72807_STA_BG_MATCH_ASG');
201: hr_utility.raise_error;
202: --
203: else
204: --
205: open c2;
205: open c2;
206: fetch c2 into l_dummy;
207: if c2%notfound then
208: close c2;
209: hr_utility.set_message(801, 'PAY_72801_STA_NO_FED_RULE');
210: hr_utility.raise_error;
211: end if;
212: close c2;
213: --
206: fetch c2 into l_dummy;
207: if c2%notfound then
208: close c2;
209: hr_utility.set_message(801, 'PAY_72801_STA_NO_FED_RULE');
210: hr_utility.raise_error;
211: end if;
212: close c2;
213: --
214: end if;
216: end if;
217: --
218: end if;
219: --
220: hr_utility.set_location('Leaving:'||l_proc,10);
221: --
222: End chk_assignment_id;
223: --
224: -- ----------------------------------------------------------------------------
268:
269: --
270: Begin
271: --
272: hr_utility.set_location('Entering:'||l_proc, 5);
273: --
274: hr_api.mandatory_arg_error
275: (p_api_name => l_proc
276: ,p_argument => 'effective_date'
315: p_effective_date => p_effective_date) then
316: --
317: -- raise error as does not exist as lookup
318: --
319: hr_utility.set_message(801,'PAY_72823_STA_SIT_OPT_INVALID');
320: hr_utility.raise_error;
321: --
322: end if;
323: --
316: --
317: -- raise error as does not exist as lookup
318: --
319: hr_utility.set_message(801,'PAY_72823_STA_SIT_OPT_INVALID');
320: hr_utility.raise_error;
321: --
322: end if;
323: --
324: end if;
324: end if;
325: --
326: end if;
327: --
328: hr_utility.set_location('Leaving:'||l_proc,10);
329: --
330: end chk_sit_optional_calc_ind;
331: --
332: -- ----------------------------------------------------------------------------
372: and psr.jurisdiction_code = p_jurisdiction_code;
373: --
374: Begin
375: --
376: hr_utility.set_location('Entering:'||l_proc,5);
377: --
378: -- Check that the mandatory parameters have been set
379: --
380: hr_api.mandatory_arg_error
389: --
390: -- Check that the mandatory parameters have been set
391: --
392: if p_jurisdiction_code is null then
393: hr_utility.set_message(801, 'PAY_72811_STA_JD_NOT_NULL');
394: hr_utility.raise_error;
395: end if;
396: --
397: -- check if jurisdiction_code value exists in pay_state_rules table
390: -- Check that the mandatory parameters have been set
391: --
392: if p_jurisdiction_code is null then
393: hr_utility.set_message(801, 'PAY_72811_STA_JD_NOT_NULL');
394: hr_utility.raise_error;
395: end if;
396: --
397: -- check if jurisdiction_code value exists in pay_state_rules table
398: --
404: close c1;
405: --
406: -- raise error as code does not exist in pay_state_rules table.
407: --
408: hr_utility.set_message(801, 'PAY_8003_1099R_JU_CODE');
409: hr_utility.raise_error;
410: --
411: end if;
412: --
405: --
406: -- raise error as code does not exist in pay_state_rules table.
407: --
408: hr_utility.set_message(801, 'PAY_8003_1099R_JU_CODE');
409: hr_utility.raise_error;
410: --
411: end if;
412: --
413: close c1;
413: close c1;
414: --
415: end if;
416: --
417: hr_utility.set_location('Leaving:'||l_proc,10);
418: --
419: End chk_jurisdiction_code;
420: --
421: -- ----------------------------------------------------------------------------
450: l_proc varchar2(72) := g_package||'chk_additional_wa_amount';
451: --
452: Begin
453: --
454: hr_utility.set_location('Entering:'||l_proc,5);
455: --
456: -- If the value is being inserted or updated...
457: --
458: if (p_emp_state_tax_rule_id is not null
462: --
463: -- Check that the mandatory parameters have been set
464: --
465: if p_additional_wa_amount is null then
466: hr_utility.set_message(801, 'PAY_72805_STA_ADDL_WA_NOT_NULL');
467: hr_utility.raise_error;
468: end if;
469: --
470: -- check if additional_wa_amount value is in a valid range
463: -- Check that the mandatory parameters have been set
464: --
465: if p_additional_wa_amount is null then
466: hr_utility.set_message(801, 'PAY_72805_STA_ADDL_WA_NOT_NULL');
467: hr_utility.raise_error;
468: end if;
469: --
470: -- check if additional_wa_amount value is in a valid range
471: --
472: if p_additional_wa_amount < 0 then
473: --
474: -- raise error as given value is invalid
475: --
476: hr_utility.set_message(801,'PAY_72804_STA_ADDL_WA_POSITIVE');
477: hr_utility.raise_error;
478: --
479: end if;
480: --
473: --
474: -- raise error as given value is invalid
475: --
476: hr_utility.set_message(801,'PAY_72804_STA_ADDL_WA_POSITIVE');
477: hr_utility.raise_error;
478: --
479: end if;
480: --
481: end if;
479: end if;
480: --
481: end if;
482: --
483: hr_utility.set_location('Leaving:'||l_proc,10);
484: --
485: End chk_additional_wa_amount;
486: --
487: -- ----------------------------------------------------------------------------
532: and pus.state_abbrev = psr.state_code;
533: --
534: Begin
535: --
536: hr_utility.set_location('Entering:'||l_proc,5);
537: --
538: -- Following condition added to fix the Bug # 5968429
539: --
540: if length(p_filing_status_code) = 1
574: --
575: -- Check that the mandatory parameters have been set
576: --
577: if p_filing_status_code is null then
578: hr_utility.set_message(801, 'PAY_72810_STA_FIL_STAT_NOT_NUL');
579: hr_utility.raise_error;
580: end if;
581: --
582: -- check if filing_status_code value exists in hr_lookups table
575: -- Check that the mandatory parameters have been set
576: --
577: if p_filing_status_code is null then
578: hr_utility.set_message(801, 'PAY_72810_STA_FIL_STAT_NOT_NUL');
579: hr_utility.raise_error;
580: end if;
581: --
582: -- check if filing_status_code value exists in hr_lookups table
583: --
591: --
592: -- raise error as filing_status_code does not exist in hr_lookups
593: -- table.
594: --
595: hr_utility.set_message(801,'PAY_72809_STA_FIL_STAT_INVALID');
596: hr_utility.raise_error;
597: --
598: end if;
599: --
592: -- raise error as filing_status_code does not exist in hr_lookups
593: -- table.
594: --
595: hr_utility.set_message(801,'PAY_72809_STA_FIL_STAT_INVALID');
596: hr_utility.raise_error;
597: --
598: end if;
599: --
600: end if;
598: end if;
599: --
600: end if;
601: --
602: hr_utility.set_location('Leaving:'||l_proc,10);
603: --
604: End chk_filing_status_code;
605: --
606: -- ----------------------------------------------------------------------------
635: l_proc varchar2(72) := g_package||'chk_sit_additional_tax';
636: --
637: Begin
638: --
639: hr_utility.set_location('Entering:'||l_proc,5);
640: --
641: -- If the value is being inserted or updated...
642: --
643: if (p_emp_state_tax_rule_id is not null
647: --
648: -- Check that the mandatory parameters have been set
649: --
650: if p_sit_additional_tax is null then
651: hr_utility.set_message(801, 'PAY_72803_STA_ADDL_TAX_NOT_NUL');
652: hr_utility.raise_error;
653: end if;
654: --
655: -- check if sit_additional_tax value is in a valid range
648: -- Check that the mandatory parameters have been set
649: --
650: if p_sit_additional_tax is null then
651: hr_utility.set_message(801, 'PAY_72803_STA_ADDL_TAX_NOT_NUL');
652: hr_utility.raise_error;
653: end if;
654: --
655: -- check if sit_additional_tax value is in a valid range
656: --
657: if p_sit_additional_tax < 0 then
658: --
659: -- raise error as given value is invalid
660: --
661: hr_utility.set_message(801,'PAY_72802_STA_ADD_TAX_POSITIVE');
662: hr_utility.raise_error;
663: --
664: end if;
665: --
658: --
659: -- raise error as given value is invalid
660: --
661: hr_utility.set_message(801,'PAY_72802_STA_ADD_TAX_POSITIVE');
662: hr_utility.raise_error;
663: --
664: end if;
665: --
666: end if;
664: end if;
665: --
666: end if;
667: --
668: hr_utility.set_location('Leaving:'||l_proc,10);
669: --
670: End chk_sit_additional_tax;
671: --
672: -- ----------------------------------------------------------------------------
701: l_proc varchar2(72) := g_package||'chk_sit_override_amount';
702: --
703: Begin
704: --
705: hr_utility.set_location('Entering:'||l_proc,5);
706: --
707: -- If the value is being inserted or updated...
708: --
709: if (p_emp_state_tax_rule_id is not null
713: --
714: -- Check that the mandatory parameters have been set
715: --
716: if p_sit_override_amount is null then
717: hr_utility.set_message(801, 'PAY_72814_STA_OVD_AMT_NOT_NULL');
718: hr_utility.raise_error;
719: end if;
720: --
721: -- check if sit_override_amount value is in a valid range
714: -- Check that the mandatory parameters have been set
715: --
716: if p_sit_override_amount is null then
717: hr_utility.set_message(801, 'PAY_72814_STA_OVD_AMT_NOT_NULL');
718: hr_utility.raise_error;
719: end if;
720: --
721: -- check if sit_override_amount value is in a valid range
722: --
723: if p_sit_override_amount < 0 then
724: --
725: -- raise error as given value is invalid
726: --
727: hr_utility.set_message(801,'PAY_72813_STA_OVD_AMT_POSITIVE');
728: hr_utility.raise_error;
729: --
730: end if;
731: --
724: --
725: -- raise error as given value is invalid
726: --
727: hr_utility.set_message(801,'PAY_72813_STA_OVD_AMT_POSITIVE');
728: hr_utility.raise_error;
729: --
730: end if;
731: --
732: end if;
730: end if;
731: --
732: end if;
733: --
734: hr_utility.set_location('Leaving:'||l_proc,10);
735: --
736: End chk_sit_override_amount;
737: --
738: -- ----------------------------------------------------------------------------
767: l_proc varchar2(72) := g_package||'chk_sit_override_rate';
768: --
769: Begin
770: --
771: hr_utility.set_location('Entering:'||l_proc,5);
772: --
773: -- If the value is being inserted or updated...
774: --
775: if (p_emp_state_tax_rule_id is not null
779: --
780: -- Check that the mandatory parameters have been set
781: --
782: if p_sit_override_rate is null then
783: hr_utility.set_message(801, 'PAY_72816_STA_OVRD_RT_NOT_NULL');
784: hr_utility.raise_error;
785: end if;
786: --
787: -- check if sit_override_rate value is in a valid range
780: -- Check that the mandatory parameters have been set
781: --
782: if p_sit_override_rate is null then
783: hr_utility.set_message(801, 'PAY_72816_STA_OVRD_RT_NOT_NULL');
784: hr_utility.raise_error;
785: end if;
786: --
787: -- check if sit_override_rate value is in a valid range
788: --
789: if p_sit_override_rate < 0 or p_sit_override_rate > 100 then
790: --
791: -- raise error as given value is invalid
792: --
793: hr_utility.set_message(801,'PAY_72815_STA_OVRD_RT_IN_RANGE');
794: hr_utility.raise_error;
795: --
796: end if;
797: --
790: --
791: -- raise error as given value is invalid
792: --
793: hr_utility.set_message(801,'PAY_72815_STA_OVRD_RT_IN_RANGE');
794: hr_utility.raise_error;
795: --
796: end if;
797: --
798: end if;
796: end if;
797: --
798: end if;
799: --
800: hr_utility.set_location('Leaving:'||l_proc,10);
801: --
802: End chk_sit_override_rate;
803: --
804: -- ----------------------------------------------------------------------------
833: l_proc varchar2(72) := g_package||'chk_remainder_percent';
834: --
835: Begin
836: --
837: hr_utility.set_location('Entering:'||l_proc,5);
838: --
839: -- If the value is being inserted or updated...
840: --
841: if (p_emp_state_tax_rule_id is not null
845: --
846: -- Check that the mandatory parameters have been set
847: --
848: if p_remainder_percent is null then
849: hr_utility.set_message(801, 'PAY_72818_STA_REM_PCT_NOT_NULL');
850: hr_utility.raise_error;
851: end if;
852: --
853: -- check if remainder_percent value is in a valid range
846: -- Check that the mandatory parameters have been set
847: --
848: if p_remainder_percent is null then
849: hr_utility.set_message(801, 'PAY_72818_STA_REM_PCT_NOT_NULL');
850: hr_utility.raise_error;
851: end if;
852: --
853: -- check if remainder_percent value is in a valid range
854: --
855: if p_remainder_percent < 0 or p_remainder_percent > 100 then
856: --
857: -- raise error as given value is invalid
858: --
859: hr_utility.set_message(801,'PAY_72817_STA_REM_PCT_IN_RANGE');
860: hr_utility.raise_error;
861: --
862: end if;
863: --
856: --
857: -- raise error as given value is invalid
858: --
859: hr_utility.set_message(801,'PAY_72817_STA_REM_PCT_IN_RANGE');
860: hr_utility.raise_error;
861: --
862: end if;
863: --
864: end if;
862: end if;
863: --
864: end if;
865: --
866: hr_utility.set_location('Leaving:'||l_proc,10);
867: --
868: End chk_remainder_percent;
869: --
870: -- ----------------------------------------------------------------------------
898: l_proc varchar2(72) := g_package||'chk_secondary_wa';
899: --
900: Begin
901: --
902: hr_utility.set_location('Entering:'||l_proc,5);
903: --
904: -- If the value is being inserted or updated...
905: --
906: if (p_emp_state_tax_rule_id is not null
910: --
911: -- Check that the mandatory parameters have been set
912: --
913: if p_secondary_wa is null then
914: hr_utility.set_message(801, 'PAY_72821_STA_SECND_WA_NOT_NUL');
915: hr_utility.raise_error;
916: end if;
917: --
918: -- check if secondary_wa value is in a valid range
911: -- Check that the mandatory parameters have been set
912: --
913: if p_secondary_wa is null then
914: hr_utility.set_message(801, 'PAY_72821_STA_SECND_WA_NOT_NUL');
915: hr_utility.raise_error;
916: end if;
917: --
918: -- check if secondary_wa value is in a valid range
919: --
920: if p_secondary_wa < 0 then
921: --
922: -- raise error as given value is invalid
923: --
924: hr_utility.set_message(801,'PAY_72820_STA_SECOND_WA_POSTVE');
925: hr_utility.raise_error;
926: --
927: end if;
928: --
921: --
922: -- raise error as given value is invalid
923: --
924: hr_utility.set_message(801,'PAY_72820_STA_SECOND_WA_POSTVE');
925: hr_utility.raise_error;
926: --
927: end if;
928: --
929: end if;
927: end if;
928: --
929: end if;
930: --
931: hr_utility.set_location('Leaving:'||l_proc,10);
932: --
933: End chk_secondary_wa;
934: --
935: -- ----------------------------------------------------------------------------
964: l_proc varchar2(72) := g_package||'chk_withholding_allowances';
965: --
966: Begin
967: --
968: hr_utility.set_location('Entering:'||l_proc,5);
969: --
970: -- If the value is being inserted or updated...
971: --
972: if (p_emp_state_tax_rule_id is not null
976: --
977: -- Check that the mandatory parameters have been set
978: --
979: if p_withholding_allowances is null then
980: hr_utility.set_message(801, 'PAY_72830_STA_WA_NOT_NULL');
981: hr_utility.raise_error;
982: end if;
983: --
984: -- check if withholding_allowances value is in a valid range
977: -- Check that the mandatory parameters have been set
978: --
979: if p_withholding_allowances is null then
980: hr_utility.set_message(801, 'PAY_72830_STA_WA_NOT_NULL');
981: hr_utility.raise_error;
982: end if;
983: --
984: -- check if withholding_allowances value is in a valid range
985: --
986: if p_withholding_allowances < 0 then
987: --
988: -- raise error as given value is invalid
989: --
990: hr_utility.set_message(801,'PAY_72829_STA_WA_POSITIVE');
991: hr_utility.raise_error;
992: --
993: end if;
994: --
987: --
988: -- raise error as given value is invalid
989: --
990: hr_utility.set_message(801,'PAY_72829_STA_WA_POSITIVE');
991: hr_utility.raise_error;
992: --
993: end if;
994: --
995: end if;
993: end if;
994: --
995: end if;
996: --
997: hr_utility.set_location('Leaving:'||l_proc,10);
998: --
999: End chk_withholding_allowances;
1000: --
1001: -- ----------------------------------------------------------------------------
1030: l_proc varchar2(72) := g_package||'chk_sui_wage_base_override_amo';
1031: --
1032: Begin
1033: --
1034: hr_utility.set_location('Entering:'||l_proc,5);
1035: --
1036: -- If the value is being inserted or updated...
1037: --
1038: if ((p_emp_state_tax_rule_id is not null
1050: if p_sui_wage_base_override_amo < 0 then
1051: --
1052: -- raise error as given value is invalid
1053: --
1054: hr_utility.set_message(801,'PAY_72826_STA_SUI_OVD_POSITIVE');
1055: hr_utility.raise_error;
1056: --
1057: end if;
1058: --
1051: --
1052: -- raise error as given value is invalid
1053: --
1054: hr_utility.set_message(801,'PAY_72826_STA_SUI_OVD_POSITIVE');
1055: hr_utility.raise_error;
1056: --
1057: end if;
1058: --
1059: end if;
1059: end if;
1060: --
1061: end if;
1062: --
1063: hr_utility.set_location('Leaving:'||l_proc,10);
1064: --
1065: End chk_sui_wage_base_override_amo;
1066: --
1067: -- ----------------------------------------------------------------------------
1096: l_proc varchar2(72) := g_package||'chk_supp_tax_override_rate';
1097: --
1098: Begin
1099: --
1100: hr_utility.set_location('Entering:'||l_proc,5);
1101: --
1102: -- If the value is being inserted or updated...
1103: --
1104: if ((p_emp_state_tax_rule_id is not null
1116: if p_supp_tax_override_rate < 0 or p_supp_tax_override_rate > 100 then
1117: --
1118: -- raise error as given value is invalid
1119: --
1120: hr_utility.set_message(801,'PAY_72827_STA_SUPP_RT_IN_RANGE');
1121: hr_utility.raise_error;
1122: --
1123: end if;
1124: --
1117: --
1118: -- raise error as given value is invalid
1119: --
1120: hr_utility.set_message(801,'PAY_72827_STA_SUPP_RT_IN_RANGE');
1121: hr_utility.raise_error;
1122: --
1123: end if;
1124: --
1125: end if;
1125: end if;
1126: --
1127: end if;
1128: --
1129: hr_utility.set_location('Leaving:'||l_proc,10);
1130: --
1131: End chk_supp_tax_override_rate;
1132: --
1133: -- ----------------------------------------------------------------------------
1169: l_error exception;
1170: l_argument varchar2(30);
1171: --
1172: Begin
1173: hr_utility.set_location('Entering:'||l_proc, 10);
1174: --
1175: -- Only proceed with validation if a row exists for
1176: -- the current record in the HR schema
1177: --
1179: (p_emp_state_tax_rule_id => p_rec.emp_state_tax_rule_id
1180: ,p_object_version_number => p_rec.object_version_number
1181: ,p_effective_date => p_effective_date
1182: ) then
1183: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
1184: hr_utility.set_message_token('PROCEDURE', l_proc);
1185: hr_utility.set_message_token('STEP', '20');
1186: end if;
1187: hr_utility.set_location(l_proc, 30);
1180: ,p_object_version_number => p_rec.object_version_number
1181: ,p_effective_date => p_effective_date
1182: ) then
1183: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
1184: hr_utility.set_message_token('PROCEDURE', l_proc);
1185: hr_utility.set_message_token('STEP', '20');
1186: end if;
1187: hr_utility.set_location(l_proc, 30);
1188: --
1181: ,p_effective_date => p_effective_date
1182: ) then
1183: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
1184: hr_utility.set_message_token('PROCEDURE', l_proc);
1185: hr_utility.set_message_token('STEP', '20');
1186: end if;
1187: hr_utility.set_location(l_proc, 30);
1188: --
1189: if (nvl(p_rec.assignment_id, hr_api.g_number) <>
1183: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
1184: hr_utility.set_message_token('PROCEDURE', l_proc);
1185: hr_utility.set_message_token('STEP', '20');
1186: end if;
1187: hr_utility.set_location(l_proc, 30);
1188: --
1189: if (nvl(p_rec.assignment_id, hr_api.g_number) <>
1190: pay_sta_shd.g_old_rec.assignment_id) then
1191: l_argument := 'assignment_id';
1190: pay_sta_shd.g_old_rec.assignment_id) then
1191: l_argument := 'assignment_id';
1192: raise l_error;
1193: end if;
1194: hr_utility.set_location(l_proc, 40);
1195: --
1196: if (nvl(p_rec.business_group_id, hr_api.g_number) <>
1197: pay_sta_shd.g_old_rec.business_group_id) then
1198: l_argument := 'business_group_id';
1197: pay_sta_shd.g_old_rec.business_group_id) then
1198: l_argument := 'business_group_id';
1199: raise l_error;
1200: end if;
1201: hr_utility.set_location(l_proc, 50);
1202: --
1203: if nvl(p_rec.state_code, hr_api.g_varchar2) <>
1204: pay_sta_shd.g_old_rec.state_code then
1205: l_argument := 'state_code';
1204: pay_sta_shd.g_old_rec.state_code then
1205: l_argument := 'state_code';
1206: raise l_error;
1207: end if;
1208: hr_utility.set_location(l_proc, 60);
1209: --
1210: if nvl(p_rec.jurisdiction_code, hr_api.g_varchar2) <>
1211: pay_sta_shd.g_old_rec.jurisdiction_code then
1212: l_argument := 'jurisdiction_code';
1211: pay_sta_shd.g_old_rec.jurisdiction_code then
1212: l_argument := 'jurisdiction_code';
1213: raise l_error;
1214: end if;
1215: hr_utility.set_location(l_proc, 70);
1216: exception
1217: when l_error then
1218: hr_api.argument_changed_error
1219: (p_api_name => l_proc
1220: ,p_argument => l_argument
1221: );
1222: when others then
1223: raise;
1224: hr_utility.set_location(' Leaving:'||l_proc, 80);
1225: end chk_non_updateable_args;
1226: --
1227: -- ----------------------------------------------------------------------------
1228: -- |------------------------------< chk_delete >------------------------------|
1321: and cnt.state_code = pay_sta_shd.g_old_rec.state_code
1322: and cnt.effective_end_date > p_effective_date;
1323: --
1324: begin
1325: hr_utility.set_location('Entering:'|| l_proc, 1);
1326: --
1327: -- Check mandatory parameters have been set
1328: --
1329: hr_api.mandatory_arg_error
1337: ,p_argument => 'datetrack_mode'
1338: ,p_argument_value => p_datetrack_mode
1339: );
1340: --
1341: hr_utility.set_location(l_proc, 2);
1342: --
1343: -- Validate that this routine is called from Assignment code
1344: --
1345: if nvl(p_delete_routine,'X') = 'ASSIGNMENT' then
1347: -- Perform validation for valid datetrack delete modes.
1348: --
1349: If p_datetrack_mode in(hr_api.g_zap, hr_api.g_delete) then
1350: --
1351: hr_utility.set_location(l_proc,20);
1352: --
1353: if p_datetrack_mode = hr_api.g_zap then
1354: l_effective_date := trunc(hr_api.g_sot);
1355: else
1360: --
1361: open csr_check_payroll(l_effective_date);
1362: fetch csr_check_payroll into l_exists;
1363: if csr_check_payroll%FOUND then
1364: hr_utility.set_location(l_proc,15);
1365: close csr_check_payroll;
1366: hr_utility.set_message(801, 'PAY_52235_TAX_RULE_DELETE');
1367: hr_utility.raise_error;
1368: end if;
1362: fetch csr_check_payroll into l_exists;
1363: if csr_check_payroll%FOUND then
1364: hr_utility.set_location(l_proc,15);
1365: close csr_check_payroll;
1366: hr_utility.set_message(801, 'PAY_52235_TAX_RULE_DELETE');
1367: hr_utility.raise_error;
1368: end if;
1369: close csr_check_payroll;
1370: end if;
1363: if csr_check_payroll%FOUND then
1364: hr_utility.set_location(l_proc,15);
1365: close csr_check_payroll;
1366: hr_utility.set_message(801, 'PAY_52235_TAX_RULE_DELETE');
1367: hr_utility.raise_error;
1368: end if;
1369: close csr_check_payroll;
1370: end if;
1371: else -- p_delete_routine <> 'ASSIGNMENT'
1369: close csr_check_payroll;
1370: end if;
1371: else -- p_delete_routine <> 'ASSIGNMENT'
1372: --
1373: hr_utility.set_location(l_proc,20);
1374: --
1375: if p_datetrack_mode = hr_api.g_zap then
1376: --
1377: l_effective_date := trunc(hr_api.g_sot);
1380: --
1381: open csr_check_payroll(l_effective_date);
1382: fetch csr_check_payroll into l_exists;
1383: if csr_check_payroll%FOUND then
1384: hr_utility.set_location(l_proc,15);
1385: close csr_check_payroll;
1386: hr_utility.set_message(801, 'PAY_52235_TAX_RULE_DELETE');
1387: hr_utility.raise_error;
1388: end if;
1382: fetch csr_check_payroll into l_exists;
1383: if csr_check_payroll%FOUND then
1384: hr_utility.set_location(l_proc,15);
1385: close csr_check_payroll;
1386: hr_utility.set_message(801, 'PAY_52235_TAX_RULE_DELETE');
1387: hr_utility.raise_error;
1388: end if;
1389: close csr_check_payroll;
1390: --
1383: if csr_check_payroll%FOUND then
1384: hr_utility.set_location(l_proc,15);
1385: close csr_check_payroll;
1386: hr_utility.set_message(801, 'PAY_52235_TAX_RULE_DELETE');
1387: hr_utility.raise_error;
1388: end if;
1389: close csr_check_payroll;
1390: --
1391: -- Check if state has been assigned to a work location
1392: --
1393: open csr_check_work_loc(l_effective_date);
1394: fetch csr_check_work_loc into l_exists;
1395: if csr_check_work_loc%FOUND then
1396: hr_utility.set_location(l_proc,25);
1397: close csr_check_work_loc;
1398: hr_utility.set_message(801, 'PAY_52293_TAX_STDEL_LOC');
1399: hr_utility.raise_error;
1400: end if;
1394: fetch csr_check_work_loc into l_exists;
1395: if csr_check_work_loc%FOUND then
1396: hr_utility.set_location(l_proc,25);
1397: close csr_check_work_loc;
1398: hr_utility.set_message(801, 'PAY_52293_TAX_STDEL_LOC');
1399: hr_utility.raise_error;
1400: end if;
1401: close csr_check_work_loc;
1402: --
1395: if csr_check_work_loc%FOUND then
1396: hr_utility.set_location(l_proc,25);
1397: close csr_check_work_loc;
1398: hr_utility.set_message(801, 'PAY_52293_TAX_STDEL_LOC');
1399: hr_utility.raise_error;
1400: end if;
1401: close csr_check_work_loc;
1402: --
1403: hr_utility.set_location(l_proc,30);
1399: hr_utility.raise_error;
1400: end if;
1401: close csr_check_work_loc;
1402: --
1403: hr_utility.set_location(l_proc,30);
1404: --
1405: -- Check if state has been assigned to a primary residence
1406: --
1407: open csr_check_residence_loc(l_effective_date);
1406: --
1407: open csr_check_residence_loc(l_effective_date);
1408: fetch csr_check_residence_loc into l_exists;
1409: if csr_check_residence_loc%FOUND then
1410: hr_utility.set_location(l_proc,35);
1411: close csr_check_residence_loc;
1412: hr_utility.set_message(801, 'PAY_52296_TAX_STDEL_RES');
1413: hr_utility.raise_error;
1414: end if;
1408: fetch csr_check_residence_loc into l_exists;
1409: if csr_check_residence_loc%FOUND then
1410: hr_utility.set_location(l_proc,35);
1411: close csr_check_residence_loc;
1412: hr_utility.set_message(801, 'PAY_52296_TAX_STDEL_RES');
1413: hr_utility.raise_error;
1414: end if;
1415: close csr_check_residence_loc;
1416: --
1409: if csr_check_residence_loc%FOUND then
1410: hr_utility.set_location(l_proc,35);
1411: close csr_check_residence_loc;
1412: hr_utility.set_message(801, 'PAY_52296_TAX_STDEL_RES');
1413: hr_utility.raise_error;
1414: end if;
1415: close csr_check_residence_loc;
1416: --
1417: hr_utility.set_location(l_proc,40);
1413: hr_utility.raise_error;
1414: end if;
1415: close csr_check_residence_loc;
1416: --
1417: hr_utility.set_location(l_proc,40);
1418: --
1419: else
1420: --
1421: -- Delete not allowed for this datetrack mode
1419: else
1420: --
1421: -- Delete not allowed for this datetrack mode
1422: --
1423: hr_utility.set_message(801, 'PAY_52971_TAX_ZAP_ONLY');
1424: hr_utility.raise_error;
1425: --
1426: end if;
1427: --
1420: --
1421: -- Delete not allowed for this datetrack mode
1422: --
1423: hr_utility.set_message(801, 'PAY_52971_TAX_ZAP_ONLY');
1424: hr_utility.raise_error;
1425: --
1426: end if;
1427: --
1428: end if;
1432: open chk_county_tax_rules;
1433: fetch chk_county_tax_rules into l_county_rule_exists;
1434: if chk_county_tax_rules%found then
1435: close chk_county_tax_rules;
1436: hr_utility.set_message(801,'HR_7215_DT_CHILD_EXISTS');
1437: hr_utility.set_message_token('TABLE_NAME',
1438: 'PAY_US_EMP_COUNTY_TAX_RULES_F');
1439: hr_utility.raise_error;
1440: end if;
1433: fetch chk_county_tax_rules into l_county_rule_exists;
1434: if chk_county_tax_rules%found then
1435: close chk_county_tax_rules;
1436: hr_utility.set_message(801,'HR_7215_DT_CHILD_EXISTS');
1437: hr_utility.set_message_token('TABLE_NAME',
1438: 'PAY_US_EMP_COUNTY_TAX_RULES_F');
1439: hr_utility.raise_error;
1440: end if;
1441: close chk_county_tax_rules;
1435: close chk_county_tax_rules;
1436: hr_utility.set_message(801,'HR_7215_DT_CHILD_EXISTS');
1437: hr_utility.set_message_token('TABLE_NAME',
1438: 'PAY_US_EMP_COUNTY_TAX_RULES_F');
1439: hr_utility.raise_error;
1440: end if;
1441: close chk_county_tax_rules;
1442: --
1443: end chk_delete;
1481: l_integrity_error Exception;
1482: l_table_name all_tables.table_name%TYPE;
1483: --
1484: Begin
1485: hr_utility.set_location('Entering:'||l_proc, 5);
1486: --
1487: -- Ensure that the p_datetrack_mode argument is not null
1488: --
1489: hr_api.mandatory_arg_error
1511: --
1512: --
1513: End If;
1514: --
1515: hr_utility.set_location(' Leaving:'||l_proc, 10);
1516: Exception
1517: When l_integrity_error Then
1518: --
1519: -- A referential integrity check was violated therefore
1518: --
1519: -- A referential integrity check was violated therefore
1520: -- we must error
1521: --
1522: hr_utility.set_message(801, 'HR_7216_DT_UPD_INTEGRITY_ERR');
1523: hr_utility.set_message_token('TABLE_NAME', l_table_name);
1524: hr_utility.raise_error;
1525: When Others Then
1526: --
1519: -- A referential integrity check was violated therefore
1520: -- we must error
1521: --
1522: hr_utility.set_message(801, 'HR_7216_DT_UPD_INTEGRITY_ERR');
1523: hr_utility.set_message_token('TABLE_NAME', l_table_name);
1524: hr_utility.raise_error;
1525: When Others Then
1526: --
1527: -- An unhandled or unexpected error has occurred which
1520: -- we must error
1521: --
1522: hr_utility.set_message(801, 'HR_7216_DT_UPD_INTEGRITY_ERR');
1523: hr_utility.set_message_token('TABLE_NAME', l_table_name);
1524: hr_utility.raise_error;
1525: When Others Then
1526: --
1527: -- An unhandled or unexpected error has occurred which
1528: -- we must report
1526: --
1527: -- An unhandled or unexpected error has occurred which
1528: -- we must report
1529: --
1530: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
1531: hr_utility.set_message_token('PROCEDURE', l_proc);
1532: hr_utility.set_message_token('STEP','15');
1533: hr_utility.raise_error;
1534: End dt_update_validate;
1527: -- An unhandled or unexpected error has occurred which
1528: -- we must report
1529: --
1530: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
1531: hr_utility.set_message_token('PROCEDURE', l_proc);
1532: hr_utility.set_message_token('STEP','15');
1533: hr_utility.raise_error;
1534: End dt_update_validate;
1535: --
1528: -- we must report
1529: --
1530: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
1531: hr_utility.set_message_token('PROCEDURE', l_proc);
1532: hr_utility.set_message_token('STEP','15');
1533: hr_utility.raise_error;
1534: End dt_update_validate;
1535: --
1536: -- ----------------------------------------------------------------------------
1529: --
1530: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
1531: hr_utility.set_message_token('PROCEDURE', l_proc);
1532: hr_utility.set_message_token('STEP','15');
1533: hr_utility.raise_error;
1534: End dt_update_validate;
1535: --
1536: -- ----------------------------------------------------------------------------
1537: -- |--------------------------< dt_delete_validate >--------------------------|
1578: l_rows_exist Exception;
1579: l_table_name all_tables.table_name%TYPE;
1580: --
1581: Begin
1582: hr_utility.set_location('Entering:'||l_proc, 5);
1583: --
1584: -- Ensure that the p_datetrack_mode argument is not null
1585: --
1586: hr_api.mandatory_arg_error
1615: --
1616: --
1617: End If;
1618: --
1619: hr_utility.set_location(' Leaving:'||l_proc, 10);
1620: Exception
1621: When l_rows_exist Then
1622: --
1623: -- A referential integrity check was violated therefore
1622: --
1623: -- A referential integrity check was violated therefore
1624: -- we must error
1625: --
1626: hr_utility.set_message(801, 'HR_7215_DT_CHILD_EXISTS');
1627: hr_utility.set_message_token('TABLE_NAME', l_table_name);
1628: hr_utility.raise_error;
1629: When Others Then
1630: --
1623: -- A referential integrity check was violated therefore
1624: -- we must error
1625: --
1626: hr_utility.set_message(801, 'HR_7215_DT_CHILD_EXISTS');
1627: hr_utility.set_message_token('TABLE_NAME', l_table_name);
1628: hr_utility.raise_error;
1629: When Others Then
1630: --
1631: -- An unhandled or unexpected error has occurred which
1624: -- we must error
1625: --
1626: hr_utility.set_message(801, 'HR_7215_DT_CHILD_EXISTS');
1627: hr_utility.set_message_token('TABLE_NAME', l_table_name);
1628: hr_utility.raise_error;
1629: When Others Then
1630: --
1631: -- An unhandled or unexpected error has occurred which
1632: -- we must report
1630: --
1631: -- An unhandled or unexpected error has occurred which
1632: -- we must report
1633: --
1634: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
1635: hr_utility.set_message_token('PROCEDURE', l_proc);
1636: hr_utility.set_message_token('STEP','15');
1637: hr_utility.raise_error;
1638: End dt_delete_validate;
1631: -- An unhandled or unexpected error has occurred which
1632: -- we must report
1633: --
1634: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
1635: hr_utility.set_message_token('PROCEDURE', l_proc);
1636: hr_utility.set_message_token('STEP','15');
1637: hr_utility.raise_error;
1638: End dt_delete_validate;
1639: --
1632: -- we must report
1633: --
1634: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
1635: hr_utility.set_message_token('PROCEDURE', l_proc);
1636: hr_utility.set_message_token('STEP','15');
1637: hr_utility.raise_error;
1638: End dt_delete_validate;
1639: --
1640: -- ----------------------------------------------------------------------------
1633: --
1634: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
1635: hr_utility.set_message_token('PROCEDURE', l_proc);
1636: hr_utility.set_message_token('STEP','15');
1637: hr_utility.raise_error;
1638: End dt_delete_validate;
1639: --
1640: -- ----------------------------------------------------------------------------
1641: -- |---------------------------< insert_validate >----------------------------|
1649: --
1650: l_proc varchar2(72) := g_package||'insert_validate';
1651: --
1652: Begin
1653: hr_utility.set_location('Entering:'||l_proc, 5);
1654: --
1655: -- Call all supporting business operations
1656: --
1657: chk_state_code
1731: (p_emp_state_tax_rule_id => p_rec.emp_state_tax_rule_id
1732: ,p_supp_tax_override_rate => p_rec.supp_tax_override_rate
1733: );
1734: --
1735: hr_utility.set_location(' Leaving:'||l_proc, 10);
1736: End insert_validate;
1737: --
1738: -- ----------------------------------------------------------------------------
1739: -- |---------------------------< update_validate >----------------------------|
1747: --
1748: l_proc varchar2(72) := g_package||'update_validate';
1749: --
1750: Begin
1751: hr_utility.set_location('Entering:'||l_proc, 5);
1752: --
1753: -- Call all supporting business operations
1754: --
1755: chk_non_updateable_args
1824: p_datetrack_mode => p_datetrack_mode,
1825: p_validation_start_date => p_validation_start_date,
1826: p_validation_end_date => p_validation_end_date);
1827: --
1828: hr_utility.set_location(' Leaving:'||l_proc, 10);
1829: End update_validate;
1830: --
1831: -- ----------------------------------------------------------------------------
1832: -- |---------------------------< delete_validate >----------------------------|
1842: --
1843: l_proc varchar2(72) := g_package||'delete_validate';
1844: --
1845: Begin
1846: hr_utility.set_location('Entering:'||l_proc, 5);
1847: --
1848: -- Call all supporting business operations
1849: --
1850: chk_delete
1862: p_validation_start_date => p_validation_start_date,
1863: p_validation_end_date => p_validation_end_date,
1864: p_emp_state_tax_rule_id => p_rec.emp_state_tax_rule_id);
1865: --
1866: hr_utility.set_location(' Leaving:'||l_proc, 10);
1867: End delete_validate;
1868: --
1869: --
1870: -- ---------------------------------------------------------------------------
1889: l_proc varchar2(72) := g_package||'return_legislation_code';
1890: --
1891: begin
1892: --
1893: hr_utility.set_location('Entering:'|| l_proc, 10);
1894: --
1895: -- Ensure that all the mandatory parameter are not null
1896: --
1897: hr_api.mandatory_arg_error(p_api_name => l_proc,
1904: -- call to this function. Just return the value in the global
1905: -- variable.
1906: --
1907: l_legislation_code := g_legislation_code;
1908: hr_utility.set_location(l_proc, 20);
1909: --
1910: else
1911: --
1912: -- The ID is different to the last call to this function
1921: close csr_leg_code;
1922: --
1923: -- The primary key is invalid therefore we must error
1924: --
1925: hr_utility.set_message(801,'HR_7220_INVALID_PRIMARY_KEY');
1926: hr_utility.raise_error;
1927: --
1928: end if;
1929: hr_utility.set_location(' Leaving:'|| l_proc, 30);
1922: --
1923: -- The primary key is invalid therefore we must error
1924: --
1925: hr_utility.set_message(801,'HR_7220_INVALID_PRIMARY_KEY');
1926: hr_utility.raise_error;
1927: --
1928: end if;
1929: hr_utility.set_location(' Leaving:'|| l_proc, 30);
1930: --
1925: hr_utility.set_message(801,'HR_7220_INVALID_PRIMARY_KEY');
1926: hr_utility.raise_error;
1927: --
1928: end if;
1929: hr_utility.set_location(' Leaving:'|| l_proc, 30);
1930: --
1931: -- Set the global variables to the values are
1932: -- available for the next call to this function
1933: --
1934: close csr_leg_code;
1935: g_sta_tax_rule_id := p_emp_state_tax_rule_id;
1936: g_legislation_code := l_legislation_code;
1937: end if;
1938: hr_utility.set_location(' Leaving:'|| l_proc, 40);
1939: --
1940: return l_legislation_code;
1941: --
1942: end return_legislation_code;