[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: /* Commented the check for -ve amount to fix bug#13836628
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: /* Commented the check for -ve amount to fix bug#13836628
656: --
659: if p_sit_additional_tax < 0 then
660: --
661: -- raise error as given value is invalid
662: --
663: hr_utility.set_message(801,'PAY_72802_STA_ADD_TAX_POSITIVE');
664: hr_utility.raise_error;
665: --
666: end if;
667: --
660: --
661: -- raise error as given value is invalid
662: --
663: hr_utility.set_message(801,'PAY_72802_STA_ADD_TAX_POSITIVE');
664: hr_utility.raise_error;
665: --
666: end if;
667: --
668: */
667: --
668: */
669: end if;
670: --
671: hr_utility.set_location('Leaving:'||l_proc,10);
672: --
673: End chk_sit_additional_tax;
674: --
675: -- ----------------------------------------------------------------------------
704: l_proc varchar2(72) := g_package||'chk_sit_override_amount';
705: --
706: Begin
707: --
708: hr_utility.set_location('Entering:'||l_proc,5);
709: --
710: -- If the value is being inserted or updated...
711: --
712: if (p_emp_state_tax_rule_id is not null
716: --
717: -- Check that the mandatory parameters have been set
718: --
719: if p_sit_override_amount is null then
720: hr_utility.set_message(801, 'PAY_72814_STA_OVD_AMT_NOT_NULL');
721: hr_utility.raise_error;
722: end if;
723: --
724: -- check if sit_override_amount value is in a valid range
717: -- Check that the mandatory parameters have been set
718: --
719: if p_sit_override_amount is null then
720: hr_utility.set_message(801, 'PAY_72814_STA_OVD_AMT_NOT_NULL');
721: hr_utility.raise_error;
722: end if;
723: --
724: -- check if sit_override_amount value is in a valid range
725: --
726: if p_sit_override_amount < 0 then
727: --
728: -- raise error as given value is invalid
729: --
730: hr_utility.set_message(801,'PAY_72813_STA_OVD_AMT_POSITIVE');
731: hr_utility.raise_error;
732: --
733: end if;
734: --
727: --
728: -- raise error as given value is invalid
729: --
730: hr_utility.set_message(801,'PAY_72813_STA_OVD_AMT_POSITIVE');
731: hr_utility.raise_error;
732: --
733: end if;
734: --
735: end if;
733: end if;
734: --
735: end if;
736: --
737: hr_utility.set_location('Leaving:'||l_proc,10);
738: --
739: End chk_sit_override_amount;
740: --
741: -- ----------------------------------------------------------------------------
770: l_proc varchar2(72) := g_package||'chk_sit_override_rate';
771: --
772: Begin
773: --
774: hr_utility.set_location('Entering:'||l_proc,5);
775: --
776: -- If the value is being inserted or updated...
777: --
778: if (p_emp_state_tax_rule_id is not null
782: --
783: -- Check that the mandatory parameters have been set
784: --
785: if p_sit_override_rate is null then
786: hr_utility.set_message(801, 'PAY_72816_STA_OVRD_RT_NOT_NULL');
787: hr_utility.raise_error;
788: end if;
789: --
790: -- check if sit_override_rate value is in a valid range
783: -- Check that the mandatory parameters have been set
784: --
785: if p_sit_override_rate is null then
786: hr_utility.set_message(801, 'PAY_72816_STA_OVRD_RT_NOT_NULL');
787: hr_utility.raise_error;
788: end if;
789: --
790: -- check if sit_override_rate value is in a valid range
791: --
792: if p_sit_override_rate < 0 or p_sit_override_rate > 100 then
793: --
794: -- raise error as given value is invalid
795: --
796: hr_utility.set_message(801,'PAY_72815_STA_OVRD_RT_IN_RANGE');
797: hr_utility.raise_error;
798: --
799: end if;
800: --
793: --
794: -- raise error as given value is invalid
795: --
796: hr_utility.set_message(801,'PAY_72815_STA_OVRD_RT_IN_RANGE');
797: hr_utility.raise_error;
798: --
799: end if;
800: --
801: end if;
799: end if;
800: --
801: end if;
802: --
803: hr_utility.set_location('Leaving:'||l_proc,10);
804: --
805: End chk_sit_override_rate;
806: --
807: -- ----------------------------------------------------------------------------
836: l_proc varchar2(72) := g_package||'chk_remainder_percent';
837: --
838: Begin
839: --
840: hr_utility.set_location('Entering:'||l_proc,5);
841: --
842: -- If the value is being inserted or updated...
843: --
844: if (p_emp_state_tax_rule_id is not null
848: --
849: -- Check that the mandatory parameters have been set
850: --
851: if p_remainder_percent is null then
852: hr_utility.set_message(801, 'PAY_72818_STA_REM_PCT_NOT_NULL');
853: hr_utility.raise_error;
854: end if;
855: --
856: -- check if remainder_percent value is in a valid range
849: -- Check that the mandatory parameters have been set
850: --
851: if p_remainder_percent is null then
852: hr_utility.set_message(801, 'PAY_72818_STA_REM_PCT_NOT_NULL');
853: hr_utility.raise_error;
854: end if;
855: --
856: -- check if remainder_percent value is in a valid range
857: --
858: if p_remainder_percent < 0 or p_remainder_percent > 100 then
859: --
860: -- raise error as given value is invalid
861: --
862: hr_utility.set_message(801,'PAY_72817_STA_REM_PCT_IN_RANGE');
863: hr_utility.raise_error;
864: --
865: end if;
866: --
859: --
860: -- raise error as given value is invalid
861: --
862: hr_utility.set_message(801,'PAY_72817_STA_REM_PCT_IN_RANGE');
863: hr_utility.raise_error;
864: --
865: end if;
866: --
867: end if;
865: end if;
866: --
867: end if;
868: --
869: hr_utility.set_location('Leaving:'||l_proc,10);
870: --
871: End chk_remainder_percent;
872: --
873: -- ----------------------------------------------------------------------------
901: l_proc varchar2(72) := g_package||'chk_secondary_wa';
902: --
903: Begin
904: --
905: hr_utility.set_location('Entering:'||l_proc,5);
906: --
907: -- If the value is being inserted or updated...
908: --
909: if (p_emp_state_tax_rule_id is not null
913: --
914: -- Check that the mandatory parameters have been set
915: --
916: if p_secondary_wa is null then
917: hr_utility.set_message(801, 'PAY_72821_STA_SECND_WA_NOT_NUL');
918: hr_utility.raise_error;
919: end if;
920: --
921: -- check if secondary_wa value is in a valid range
914: -- Check that the mandatory parameters have been set
915: --
916: if p_secondary_wa is null then
917: hr_utility.set_message(801, 'PAY_72821_STA_SECND_WA_NOT_NUL');
918: hr_utility.raise_error;
919: end if;
920: --
921: -- check if secondary_wa value is in a valid range
922: --
923: if p_secondary_wa < 0 then
924: --
925: -- raise error as given value is invalid
926: --
927: hr_utility.set_message(801,'PAY_72820_STA_SECOND_WA_POSTVE');
928: hr_utility.raise_error;
929: --
930: end if;
931: --
924: --
925: -- raise error as given value is invalid
926: --
927: hr_utility.set_message(801,'PAY_72820_STA_SECOND_WA_POSTVE');
928: hr_utility.raise_error;
929: --
930: end if;
931: --
932: end if;
930: end if;
931: --
932: end if;
933: --
934: hr_utility.set_location('Leaving:'||l_proc,10);
935: --
936: End chk_secondary_wa;
937: --
938: -- ----------------------------------------------------------------------------
967: l_proc varchar2(72) := g_package||'chk_withholding_allowances';
968: --
969: Begin
970: --
971: hr_utility.set_location('Entering:'||l_proc,5);
972: --
973: -- If the value is being inserted or updated...
974: --
975: if (p_emp_state_tax_rule_id is not null
979: --
980: -- Check that the mandatory parameters have been set
981: --
982: if p_withholding_allowances is null then
983: hr_utility.set_message(801, 'PAY_72830_STA_WA_NOT_NULL');
984: hr_utility.raise_error;
985: end if;
986: --
987: -- check if withholding_allowances value is in a valid range
980: -- Check that the mandatory parameters have been set
981: --
982: if p_withholding_allowances is null then
983: hr_utility.set_message(801, 'PAY_72830_STA_WA_NOT_NULL');
984: hr_utility.raise_error;
985: end if;
986: --
987: -- check if withholding_allowances value is in a valid range
988: --
989: if p_withholding_allowances < 0 then
990: --
991: -- raise error as given value is invalid
992: --
993: hr_utility.set_message(801,'PAY_72829_STA_WA_POSITIVE');
994: hr_utility.raise_error;
995: --
996: end if;
997: --
990: --
991: -- raise error as given value is invalid
992: --
993: hr_utility.set_message(801,'PAY_72829_STA_WA_POSITIVE');
994: hr_utility.raise_error;
995: --
996: end if;
997: --
998: end if;
996: end if;
997: --
998: end if;
999: --
1000: hr_utility.set_location('Leaving:'||l_proc,10);
1001: --
1002: End chk_withholding_allowances;
1003: --
1004: -- ----------------------------------------------------------------------------
1033: l_proc varchar2(72) := g_package||'chk_sui_wage_base_override_amo';
1034: --
1035: Begin
1036: --
1037: hr_utility.set_location('Entering:'||l_proc,5);
1038: --
1039: -- If the value is being inserted or updated...
1040: --
1041: if ((p_emp_state_tax_rule_id is not null
1053: if p_sui_wage_base_override_amo < 0 then
1054: --
1055: -- raise error as given value is invalid
1056: --
1057: hr_utility.set_message(801,'PAY_72826_STA_SUI_OVD_POSITIVE');
1058: hr_utility.raise_error;
1059: --
1060: end if;
1061: --
1054: --
1055: -- raise error as given value is invalid
1056: --
1057: hr_utility.set_message(801,'PAY_72826_STA_SUI_OVD_POSITIVE');
1058: hr_utility.raise_error;
1059: --
1060: end if;
1061: --
1062: end if;
1062: end if;
1063: --
1064: end if;
1065: --
1066: hr_utility.set_location('Leaving:'||l_proc,10);
1067: --
1068: End chk_sui_wage_base_override_amo;
1069: --
1070: -- ----------------------------------------------------------------------------
1099: l_proc varchar2(72) := g_package||'chk_supp_tax_override_rate';
1100: --
1101: Begin
1102: --
1103: hr_utility.set_location('Entering:'||l_proc,5);
1104: --
1105: -- If the value is being inserted or updated...
1106: --
1107: if ((p_emp_state_tax_rule_id is not null
1119: if p_supp_tax_override_rate < 0 or p_supp_tax_override_rate > 100 then
1120: --
1121: -- raise error as given value is invalid
1122: --
1123: hr_utility.set_message(801,'PAY_72827_STA_SUPP_RT_IN_RANGE');
1124: hr_utility.raise_error;
1125: --
1126: end if;
1127: --
1120: --
1121: -- raise error as given value is invalid
1122: --
1123: hr_utility.set_message(801,'PAY_72827_STA_SUPP_RT_IN_RANGE');
1124: hr_utility.raise_error;
1125: --
1126: end if;
1127: --
1128: end if;
1128: end if;
1129: --
1130: end if;
1131: --
1132: hr_utility.set_location('Leaving:'||l_proc,10);
1133: --
1134: End chk_supp_tax_override_rate;
1135: --
1136: -- ----------------------------------------------------------------------------
1172: l_error exception;
1173: l_argument varchar2(30);
1174: --
1175: Begin
1176: hr_utility.set_location('Entering:'||l_proc, 10);
1177: --
1178: -- Only proceed with validation if a row exists for
1179: -- the current record in the HR schema
1180: --
1182: (p_emp_state_tax_rule_id => p_rec.emp_state_tax_rule_id
1183: ,p_object_version_number => p_rec.object_version_number
1184: ,p_effective_date => p_effective_date
1185: ) then
1186: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
1187: hr_utility.set_message_token('PROCEDURE', l_proc);
1188: hr_utility.set_message_token('STEP', '20');
1189: end if;
1190: hr_utility.set_location(l_proc, 30);
1183: ,p_object_version_number => p_rec.object_version_number
1184: ,p_effective_date => p_effective_date
1185: ) then
1186: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
1187: hr_utility.set_message_token('PROCEDURE', l_proc);
1188: hr_utility.set_message_token('STEP', '20');
1189: end if;
1190: hr_utility.set_location(l_proc, 30);
1191: --
1184: ,p_effective_date => p_effective_date
1185: ) then
1186: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
1187: hr_utility.set_message_token('PROCEDURE', l_proc);
1188: hr_utility.set_message_token('STEP', '20');
1189: end if;
1190: hr_utility.set_location(l_proc, 30);
1191: --
1192: if (nvl(p_rec.assignment_id, hr_api.g_number) <>
1186: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
1187: hr_utility.set_message_token('PROCEDURE', l_proc);
1188: hr_utility.set_message_token('STEP', '20');
1189: end if;
1190: hr_utility.set_location(l_proc, 30);
1191: --
1192: if (nvl(p_rec.assignment_id, hr_api.g_number) <>
1193: pay_sta_shd.g_old_rec.assignment_id) then
1194: l_argument := 'assignment_id';
1193: pay_sta_shd.g_old_rec.assignment_id) then
1194: l_argument := 'assignment_id';
1195: raise l_error;
1196: end if;
1197: hr_utility.set_location(l_proc, 40);
1198: --
1199: if (nvl(p_rec.business_group_id, hr_api.g_number) <>
1200: pay_sta_shd.g_old_rec.business_group_id) then
1201: l_argument := 'business_group_id';
1200: pay_sta_shd.g_old_rec.business_group_id) then
1201: l_argument := 'business_group_id';
1202: raise l_error;
1203: end if;
1204: hr_utility.set_location(l_proc, 50);
1205: --
1206: if nvl(p_rec.state_code, hr_api.g_varchar2) <>
1207: pay_sta_shd.g_old_rec.state_code then
1208: l_argument := 'state_code';
1207: pay_sta_shd.g_old_rec.state_code then
1208: l_argument := 'state_code';
1209: raise l_error;
1210: end if;
1211: hr_utility.set_location(l_proc, 60);
1212: --
1213: if nvl(p_rec.jurisdiction_code, hr_api.g_varchar2) <>
1214: pay_sta_shd.g_old_rec.jurisdiction_code then
1215: l_argument := 'jurisdiction_code';
1214: pay_sta_shd.g_old_rec.jurisdiction_code then
1215: l_argument := 'jurisdiction_code';
1216: raise l_error;
1217: end if;
1218: hr_utility.set_location(l_proc, 70);
1219: exception
1220: when l_error then
1221: hr_api.argument_changed_error
1222: (p_api_name => l_proc
1223: ,p_argument => l_argument
1224: );
1225: when others then
1226: raise;
1227: hr_utility.set_location(' Leaving:'||l_proc, 80);
1228: end chk_non_updateable_args;
1229: --
1230: -- ----------------------------------------------------------------------------
1231: -- |------------------------------< chk_delete >------------------------------|
1324: and cnt.state_code = pay_sta_shd.g_old_rec.state_code
1325: and cnt.effective_end_date > p_effective_date;
1326: --
1327: begin
1328: hr_utility.set_location('Entering:'|| l_proc, 1);
1329: --
1330: -- Check mandatory parameters have been set
1331: --
1332: hr_api.mandatory_arg_error
1340: ,p_argument => 'datetrack_mode'
1341: ,p_argument_value => p_datetrack_mode
1342: );
1343: --
1344: hr_utility.set_location(l_proc, 2);
1345: --
1346: -- Validate that this routine is called from Assignment code
1347: --
1348: if nvl(p_delete_routine,'X') = 'ASSIGNMENT' then
1350: -- Perform validation for valid datetrack delete modes.
1351: --
1352: If p_datetrack_mode in(hr_api.g_zap, hr_api.g_delete) then
1353: --
1354: hr_utility.set_location(l_proc,20);
1355: --
1356: if p_datetrack_mode = hr_api.g_zap then
1357: l_effective_date := trunc(hr_api.g_sot);
1358: else
1363: --
1364: open csr_check_payroll(l_effective_date);
1365: fetch csr_check_payroll into l_exists;
1366: if csr_check_payroll%FOUND then
1367: hr_utility.set_location(l_proc,15);
1368: close csr_check_payroll;
1369: hr_utility.set_message(801, 'PAY_52235_TAX_RULE_DELETE');
1370: hr_utility.raise_error;
1371: end if;
1365: fetch csr_check_payroll into l_exists;
1366: if csr_check_payroll%FOUND then
1367: hr_utility.set_location(l_proc,15);
1368: close csr_check_payroll;
1369: hr_utility.set_message(801, 'PAY_52235_TAX_RULE_DELETE');
1370: hr_utility.raise_error;
1371: end if;
1372: close csr_check_payroll;
1373: end if;
1366: if csr_check_payroll%FOUND then
1367: hr_utility.set_location(l_proc,15);
1368: close csr_check_payroll;
1369: hr_utility.set_message(801, 'PAY_52235_TAX_RULE_DELETE');
1370: hr_utility.raise_error;
1371: end if;
1372: close csr_check_payroll;
1373: end if;
1374: else -- p_delete_routine <> 'ASSIGNMENT'
1372: close csr_check_payroll;
1373: end if;
1374: else -- p_delete_routine <> 'ASSIGNMENT'
1375: --
1376: hr_utility.set_location(l_proc,20);
1377: --
1378: if p_datetrack_mode = hr_api.g_zap then
1379: --
1380: l_effective_date := trunc(hr_api.g_sot);
1383: --
1384: open csr_check_payroll(l_effective_date);
1385: fetch csr_check_payroll into l_exists;
1386: if csr_check_payroll%FOUND then
1387: hr_utility.set_location(l_proc,15);
1388: close csr_check_payroll;
1389: hr_utility.set_message(801, 'PAY_52235_TAX_RULE_DELETE');
1390: hr_utility.raise_error;
1391: end if;
1385: fetch csr_check_payroll into l_exists;
1386: if csr_check_payroll%FOUND then
1387: hr_utility.set_location(l_proc,15);
1388: close csr_check_payroll;
1389: hr_utility.set_message(801, 'PAY_52235_TAX_RULE_DELETE');
1390: hr_utility.raise_error;
1391: end if;
1392: close csr_check_payroll;
1393: --
1386: if csr_check_payroll%FOUND then
1387: hr_utility.set_location(l_proc,15);
1388: close csr_check_payroll;
1389: hr_utility.set_message(801, 'PAY_52235_TAX_RULE_DELETE');
1390: hr_utility.raise_error;
1391: end if;
1392: close csr_check_payroll;
1393: --
1394: -- Check if state has been assigned to a work location
1395: --
1396: open csr_check_work_loc(l_effective_date);
1397: fetch csr_check_work_loc into l_exists;
1398: if csr_check_work_loc%FOUND then
1399: hr_utility.set_location(l_proc,25);
1400: close csr_check_work_loc;
1401: hr_utility.set_message(801, 'PAY_52293_TAX_STDEL_LOC');
1402: hr_utility.raise_error;
1403: end if;
1397: fetch csr_check_work_loc into l_exists;
1398: if csr_check_work_loc%FOUND then
1399: hr_utility.set_location(l_proc,25);
1400: close csr_check_work_loc;
1401: hr_utility.set_message(801, 'PAY_52293_TAX_STDEL_LOC');
1402: hr_utility.raise_error;
1403: end if;
1404: close csr_check_work_loc;
1405: --
1398: if csr_check_work_loc%FOUND then
1399: hr_utility.set_location(l_proc,25);
1400: close csr_check_work_loc;
1401: hr_utility.set_message(801, 'PAY_52293_TAX_STDEL_LOC');
1402: hr_utility.raise_error;
1403: end if;
1404: close csr_check_work_loc;
1405: --
1406: hr_utility.set_location(l_proc,30);
1402: hr_utility.raise_error;
1403: end if;
1404: close csr_check_work_loc;
1405: --
1406: hr_utility.set_location(l_proc,30);
1407: --
1408: -- Check if state has been assigned to a primary residence
1409: --
1410: open csr_check_residence_loc(l_effective_date);
1409: --
1410: open csr_check_residence_loc(l_effective_date);
1411: fetch csr_check_residence_loc into l_exists;
1412: if csr_check_residence_loc%FOUND then
1413: hr_utility.set_location(l_proc,35);
1414: close csr_check_residence_loc;
1415: hr_utility.set_message(801, 'PAY_52296_TAX_STDEL_RES');
1416: hr_utility.raise_error;
1417: end if;
1411: fetch csr_check_residence_loc into l_exists;
1412: if csr_check_residence_loc%FOUND then
1413: hr_utility.set_location(l_proc,35);
1414: close csr_check_residence_loc;
1415: hr_utility.set_message(801, 'PAY_52296_TAX_STDEL_RES');
1416: hr_utility.raise_error;
1417: end if;
1418: close csr_check_residence_loc;
1419: --
1412: if csr_check_residence_loc%FOUND then
1413: hr_utility.set_location(l_proc,35);
1414: close csr_check_residence_loc;
1415: hr_utility.set_message(801, 'PAY_52296_TAX_STDEL_RES');
1416: hr_utility.raise_error;
1417: end if;
1418: close csr_check_residence_loc;
1419: --
1420: hr_utility.set_location(l_proc,40);
1416: hr_utility.raise_error;
1417: end if;
1418: close csr_check_residence_loc;
1419: --
1420: hr_utility.set_location(l_proc,40);
1421: --
1422: else
1423: --
1424: -- Delete not allowed for this datetrack mode
1422: else
1423: --
1424: -- Delete not allowed for this datetrack mode
1425: --
1426: hr_utility.set_message(801, 'PAY_52971_TAX_ZAP_ONLY');
1427: hr_utility.raise_error;
1428: --
1429: end if;
1430: --
1423: --
1424: -- Delete not allowed for this datetrack mode
1425: --
1426: hr_utility.set_message(801, 'PAY_52971_TAX_ZAP_ONLY');
1427: hr_utility.raise_error;
1428: --
1429: end if;
1430: --
1431: end if;
1435: open chk_county_tax_rules;
1436: fetch chk_county_tax_rules into l_county_rule_exists;
1437: if chk_county_tax_rules%found then
1438: close chk_county_tax_rules;
1439: hr_utility.set_message(801,'HR_7215_DT_CHILD_EXISTS');
1440: hr_utility.set_message_token('TABLE_NAME',
1441: 'PAY_US_EMP_COUNTY_TAX_RULES_F');
1442: hr_utility.raise_error;
1443: end if;
1436: fetch chk_county_tax_rules into l_county_rule_exists;
1437: if chk_county_tax_rules%found then
1438: close chk_county_tax_rules;
1439: hr_utility.set_message(801,'HR_7215_DT_CHILD_EXISTS');
1440: hr_utility.set_message_token('TABLE_NAME',
1441: 'PAY_US_EMP_COUNTY_TAX_RULES_F');
1442: hr_utility.raise_error;
1443: end if;
1444: close chk_county_tax_rules;
1438: close chk_county_tax_rules;
1439: hr_utility.set_message(801,'HR_7215_DT_CHILD_EXISTS');
1440: hr_utility.set_message_token('TABLE_NAME',
1441: 'PAY_US_EMP_COUNTY_TAX_RULES_F');
1442: hr_utility.raise_error;
1443: end if;
1444: close chk_county_tax_rules;
1445: --
1446: end chk_delete;
1484: l_integrity_error Exception;
1485: l_table_name all_tables.table_name%TYPE;
1486: --
1487: Begin
1488: hr_utility.set_location('Entering:'||l_proc, 5);
1489: --
1490: -- Ensure that the p_datetrack_mode argument is not null
1491: --
1492: hr_api.mandatory_arg_error
1514: --
1515: --
1516: End If;
1517: --
1518: hr_utility.set_location(' Leaving:'||l_proc, 10);
1519: Exception
1520: When l_integrity_error Then
1521: --
1522: -- A referential integrity check was violated therefore
1521: --
1522: -- A referential integrity check was violated therefore
1523: -- we must error
1524: --
1525: hr_utility.set_message(801, 'HR_7216_DT_UPD_INTEGRITY_ERR');
1526: hr_utility.set_message_token('TABLE_NAME', l_table_name);
1527: hr_utility.raise_error;
1528: When Others Then
1529: --
1522: -- A referential integrity check was violated therefore
1523: -- we must error
1524: --
1525: hr_utility.set_message(801, 'HR_7216_DT_UPD_INTEGRITY_ERR');
1526: hr_utility.set_message_token('TABLE_NAME', l_table_name);
1527: hr_utility.raise_error;
1528: When Others Then
1529: --
1530: -- An unhandled or unexpected error has occurred which
1523: -- we must error
1524: --
1525: hr_utility.set_message(801, 'HR_7216_DT_UPD_INTEGRITY_ERR');
1526: hr_utility.set_message_token('TABLE_NAME', l_table_name);
1527: hr_utility.raise_error;
1528: When Others Then
1529: --
1530: -- An unhandled or unexpected error has occurred which
1531: -- we must report
1529: --
1530: -- An unhandled or unexpected error has occurred which
1531: -- we must report
1532: --
1533: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
1534: hr_utility.set_message_token('PROCEDURE', l_proc);
1535: hr_utility.set_message_token('STEP','15');
1536: hr_utility.raise_error;
1537: End dt_update_validate;
1530: -- An unhandled or unexpected error has occurred which
1531: -- we must report
1532: --
1533: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
1534: hr_utility.set_message_token('PROCEDURE', l_proc);
1535: hr_utility.set_message_token('STEP','15');
1536: hr_utility.raise_error;
1537: End dt_update_validate;
1538: --
1531: -- we must report
1532: --
1533: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
1534: hr_utility.set_message_token('PROCEDURE', l_proc);
1535: hr_utility.set_message_token('STEP','15');
1536: hr_utility.raise_error;
1537: End dt_update_validate;
1538: --
1539: -- ----------------------------------------------------------------------------
1532: --
1533: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
1534: hr_utility.set_message_token('PROCEDURE', l_proc);
1535: hr_utility.set_message_token('STEP','15');
1536: hr_utility.raise_error;
1537: End dt_update_validate;
1538: --
1539: -- ----------------------------------------------------------------------------
1540: -- |--------------------------< dt_delete_validate >--------------------------|
1581: l_rows_exist Exception;
1582: l_table_name all_tables.table_name%TYPE;
1583: --
1584: Begin
1585: hr_utility.set_location('Entering:'||l_proc, 5);
1586: --
1587: -- Ensure that the p_datetrack_mode argument is not null
1588: --
1589: hr_api.mandatory_arg_error
1618: --
1619: --
1620: End If;
1621: --
1622: hr_utility.set_location(' Leaving:'||l_proc, 10);
1623: Exception
1624: When l_rows_exist Then
1625: --
1626: -- A referential integrity check was violated therefore
1625: --
1626: -- A referential integrity check was violated therefore
1627: -- we must error
1628: --
1629: hr_utility.set_message(801, 'HR_7215_DT_CHILD_EXISTS');
1630: hr_utility.set_message_token('TABLE_NAME', l_table_name);
1631: hr_utility.raise_error;
1632: When Others Then
1633: --
1626: -- A referential integrity check was violated therefore
1627: -- we must error
1628: --
1629: hr_utility.set_message(801, 'HR_7215_DT_CHILD_EXISTS');
1630: hr_utility.set_message_token('TABLE_NAME', l_table_name);
1631: hr_utility.raise_error;
1632: When Others Then
1633: --
1634: -- An unhandled or unexpected error has occurred which
1627: -- we must error
1628: --
1629: hr_utility.set_message(801, 'HR_7215_DT_CHILD_EXISTS');
1630: hr_utility.set_message_token('TABLE_NAME', l_table_name);
1631: hr_utility.raise_error;
1632: When Others Then
1633: --
1634: -- An unhandled or unexpected error has occurred which
1635: -- we must report
1633: --
1634: -- An unhandled or unexpected error has occurred which
1635: -- we must report
1636: --
1637: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
1638: hr_utility.set_message_token('PROCEDURE', l_proc);
1639: hr_utility.set_message_token('STEP','15');
1640: hr_utility.raise_error;
1641: End dt_delete_validate;
1634: -- An unhandled or unexpected error has occurred which
1635: -- we must report
1636: --
1637: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
1638: hr_utility.set_message_token('PROCEDURE', l_proc);
1639: hr_utility.set_message_token('STEP','15');
1640: hr_utility.raise_error;
1641: End dt_delete_validate;
1642: --
1635: -- we must report
1636: --
1637: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
1638: hr_utility.set_message_token('PROCEDURE', l_proc);
1639: hr_utility.set_message_token('STEP','15');
1640: hr_utility.raise_error;
1641: End dt_delete_validate;
1642: --
1643: -- ----------------------------------------------------------------------------
1636: --
1637: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
1638: hr_utility.set_message_token('PROCEDURE', l_proc);
1639: hr_utility.set_message_token('STEP','15');
1640: hr_utility.raise_error;
1641: End dt_delete_validate;
1642: --
1643: -- ----------------------------------------------------------------------------
1644: -- |---------------------------< insert_validate >----------------------------|
1652: --
1653: l_proc varchar2(72) := g_package||'insert_validate';
1654: --
1655: Begin
1656: hr_utility.set_location('Entering:'||l_proc, 5);
1657: --
1658: -- Call all supporting business operations
1659: --
1660: chk_state_code
1734: (p_emp_state_tax_rule_id => p_rec.emp_state_tax_rule_id
1735: ,p_supp_tax_override_rate => p_rec.supp_tax_override_rate
1736: );
1737: --
1738: hr_utility.set_location(' Leaving:'||l_proc, 10);
1739: End insert_validate;
1740: --
1741: -- ----------------------------------------------------------------------------
1742: -- |---------------------------< update_validate >----------------------------|
1750: --
1751: l_proc varchar2(72) := g_package||'update_validate';
1752: --
1753: Begin
1754: hr_utility.set_location('Entering:'||l_proc, 5);
1755: --
1756: -- Call all supporting business operations
1757: --
1758: chk_non_updateable_args
1827: p_datetrack_mode => p_datetrack_mode,
1828: p_validation_start_date => p_validation_start_date,
1829: p_validation_end_date => p_validation_end_date);
1830: --
1831: hr_utility.set_location(' Leaving:'||l_proc, 10);
1832: End update_validate;
1833: --
1834: -- ----------------------------------------------------------------------------
1835: -- |---------------------------< delete_validate >----------------------------|
1845: --
1846: l_proc varchar2(72) := g_package||'delete_validate';
1847: --
1848: Begin
1849: hr_utility.set_location('Entering:'||l_proc, 5);
1850: --
1851: -- Call all supporting business operations
1852: --
1853: chk_delete
1865: p_validation_start_date => p_validation_start_date,
1866: p_validation_end_date => p_validation_end_date,
1867: p_emp_state_tax_rule_id => p_rec.emp_state_tax_rule_id);
1868: --
1869: hr_utility.set_location(' Leaving:'||l_proc, 10);
1870: End delete_validate;
1871: --
1872: --
1873: -- ---------------------------------------------------------------------------
1892: l_proc varchar2(72) := g_package||'return_legislation_code';
1893: --
1894: begin
1895: --
1896: hr_utility.set_location('Entering:'|| l_proc, 10);
1897: --
1898: -- Ensure that all the mandatory parameter are not null
1899: --
1900: hr_api.mandatory_arg_error(p_api_name => l_proc,
1907: -- call to this function. Just return the value in the global
1908: -- variable.
1909: --
1910: l_legislation_code := g_legislation_code;
1911: hr_utility.set_location(l_proc, 20);
1912: --
1913: else
1914: --
1915: -- The ID is different to the last call to this function
1924: close csr_leg_code;
1925: --
1926: -- The primary key is invalid therefore we must error
1927: --
1928: hr_utility.set_message(801,'HR_7220_INVALID_PRIMARY_KEY');
1929: hr_utility.raise_error;
1930: --
1931: end if;
1932: hr_utility.set_location(' Leaving:'|| l_proc, 30);
1925: --
1926: -- The primary key is invalid therefore we must error
1927: --
1928: hr_utility.set_message(801,'HR_7220_INVALID_PRIMARY_KEY');
1929: hr_utility.raise_error;
1930: --
1931: end if;
1932: hr_utility.set_location(' Leaving:'|| l_proc, 30);
1933: --
1928: hr_utility.set_message(801,'HR_7220_INVALID_PRIMARY_KEY');
1929: hr_utility.raise_error;
1930: --
1931: end if;
1932: hr_utility.set_location(' Leaving:'|| l_proc, 30);
1933: --
1934: -- Set the global variables to the values are
1935: -- available for the next call to this function
1936: --
1937: close csr_leg_code;
1938: g_sta_tax_rule_id := p_emp_state_tax_rule_id;
1939: g_legislation_code := l_legislation_code;
1940: end if;
1941: hr_utility.set_location(' Leaving:'|| l_proc, 40);
1942: --
1943: return l_legislation_code;
1944: --
1945: end return_legislation_code;