[Home] [Help]
46: where pus.state_code = p_sui_state_code;
47: --
48: Begin
49: --
50: hr_utility.set_location('Entering:'||l_proc,5);
51: --
52: -- If the value is being inserted or updated...
53: --
54: if (p_emp_fed_tax_rule_id is not null
58: --
59: -- Check that the mandatory parameters have been set
60: --
61: if p_sui_state_code is null then
62: hr_utility.set_message(801, 'PAY_72797_FED_SUI_STA_NOT_NULL');
63: hr_utility.raise_error;
64: end if;
65: --
66: -- check if sui_state_code value exists in pay_us_states table
59: -- Check that the mandatory parameters have been set
60: --
61: if p_sui_state_code is null then
62: hr_utility.set_message(801, 'PAY_72797_FED_SUI_STA_NOT_NULL');
63: hr_utility.raise_error;
64: end if;
65: --
66: -- check if sui_state_code value exists in pay_us_states table
67: --
81: close csr_state_code;
82: --
83: end if;
84: --
85: hr_utility.set_location('Leaving:'||l_proc,10);
86: --
87: End chk_sui_state_code;
88: --
89: -- ----------------------------------------------------------------------------
138: and asg.effective_end_date;
139: --
140: Begin
141: --
142: hr_utility.set_location('Entering:'||l_proc,5);
143: --
144: -- Check that the mandatory parameters have been set
145: --
146: if p_assignment_id is null then
143: --
144: -- Check that the mandatory parameters have been set
145: --
146: if p_assignment_id is null then
147: hr_utility.set_message(801, 'PAY_72780_FED_ASG_NOT_NULL');
148: hr_utility.raise_error;
149: end if;
150: --
151: if p_business_group_id is null then
144: -- Check that the mandatory parameters have been set
145: --
146: if p_assignment_id is null then
147: hr_utility.set_message(801, 'PAY_72780_FED_ASG_NOT_NULL');
148: hr_utility.raise_error;
149: end if;
150: --
151: if p_business_group_id is null then
152: hr_utility.set_message(801, 'PAY_72782_FED_BG_NOT_NULL');
148: hr_utility.raise_error;
149: end if;
150: --
151: if p_business_group_id is null then
152: hr_utility.set_message(801, 'PAY_72782_FED_BG_NOT_NULL');
153: hr_utility.raise_error;
154: end if;
155: --
156: hr_api.mandatory_arg_error
149: end if;
150: --
151: if p_business_group_id is null then
152: hr_utility.set_message(801, 'PAY_72782_FED_BG_NOT_NULL');
153: hr_utility.raise_error;
154: end if;
155: --
156: hr_api.mandatory_arg_error
157: (p_api_name => l_proc
178: --
179: -- raise error as assignment_id not found in per_assignments_f
180: -- table.
181: --
182: hr_utility.set_message(801, 'HR_51746_ASG_INV_ASG_ID');
183: hr_utility.raise_error;
184: --
185: else
186: --
179: -- raise error as assignment_id not found in per_assignments_f
180: -- table.
181: --
182: hr_utility.set_message(801, 'HR_51746_ASG_INV_ASG_ID');
183: hr_utility.raise_error;
184: --
185: else
186: --
187: if p_business_group_id <> l_business_group_id then
187: if p_business_group_id <> l_business_group_id then
188: --
189: close csr_bg_id;
190: --
191: hr_utility.set_message(801, 'PAY_72781_FED_BG_MATCH_ASG');
192: hr_utility.raise_error;
193: --
194: end if;
195: --
188: --
189: close csr_bg_id;
190: --
191: hr_utility.set_message(801, 'PAY_72781_FED_BG_MATCH_ASG');
192: hr_utility.raise_error;
193: --
194: end if;
195: --
196: close csr_bg_id;
198: end if;
199: --
200: end if;
201: --
202: hr_utility.set_location('Leaving:'||l_proc,10);
203: --
204: End chk_assignment_id;
205: --
206: -- ----------------------------------------------------------------------------
246: and psr.jurisdiction_code = p_sui_jurisdiction_code;
247: --
248: Begin
249: --
250: hr_utility.set_location('Entering:'||l_proc,5);
251: --
252: -- Check that the mandatory parameters have been set
253: --
254: hr_api.mandatory_arg_error
266: --
267: -- Check that the mandatory parameters have been set
268: --
269: if p_sui_jurisdiction_code is null then
270: hr_utility.set_message(801, 'PAY_72796_FED_SUI_JD_NOT_NULL');
271: hr_utility.raise_error;
272: end if;
273: --
274: -- check if sui_jurisdiction_code value exists in pay_state_rules table
267: -- Check that the mandatory parameters have been set
268: --
269: if p_sui_jurisdiction_code is null then
270: hr_utility.set_message(801, 'PAY_72796_FED_SUI_JD_NOT_NULL');
271: hr_utility.raise_error;
272: end if;
273: --
274: -- check if sui_jurisdiction_code value exists in pay_state_rules table
275: --
281: close csr_sui_jd;
282: --
283: -- raise error as code does not exist in pay_state_rules table.
284: --
285: hr_utility.set_message(801, 'PAY_8003_1099R_JU_CODE');
286: hr_utility.raise_error;
287: --
288: end if;
289: --
282: --
283: -- raise error as code does not exist in pay_state_rules table.
284: --
285: hr_utility.set_message(801, 'PAY_8003_1099R_JU_CODE');
286: hr_utility.raise_error;
287: --
288: end if;
289: --
290: close csr_sui_jd;
290: close csr_sui_jd;
291: --
292: end if;
293: --
294: hr_utility.set_location('Leaving:'||l_proc,10);
295: --
296: End chk_sui_jurisdiction_code;
297: --
298: -- ----------------------------------------------------------------------------
327: l_proc varchar2(72) := g_package||'chk_additional_wa_amount';
328: --
329: Begin
330: --
331: hr_utility.set_location('Entering:'||l_proc,5);
332: --
333: -- If the value is being inserted or updated...
334: --
335: if (p_emp_fed_tax_rule_id is not null
339: --
340: -- Check that the mandatory parameters have been set
341: --
342: if p_additional_wa_amount is null then
343: hr_utility.set_message(801, 'PAY_72779_FED_ADDL_WA_NOT_NULL');
344: hr_utility.raise_error;
345: end if;
346: --
347: -- check if additional_wa_amount value is in a valid range
340: -- Check that the mandatory parameters have been set
341: --
342: if p_additional_wa_amount is null then
343: hr_utility.set_message(801, 'PAY_72779_FED_ADDL_WA_NOT_NULL');
344: hr_utility.raise_error;
345: end if;
346: --
347: -- check if additional_wa_amount value is in a valid range
348: --
349: if p_additional_wa_amount < 0 then
350: --
351: -- raise error as given value is invalid
352: --
353: hr_utility.set_message(801,'PAY_72778_FED_ADDL_WA_POSITIVE');
354: hr_utility.raise_error;
355: --
356: end if;
357: --
350: --
351: -- raise error as given value is invalid
352: --
353: hr_utility.set_message(801,'PAY_72778_FED_ADDL_WA_POSITIVE');
354: hr_utility.raise_error;
355: --
356: end if;
357: --
358: end if;
356: end if;
357: --
358: end if;
359: --
360: hr_utility.set_location('Leaving:'||l_proc,10);
361: --
362: End chk_additional_wa_amount;
363: --
364: -- ----------------------------------------------------------------------------
399: l_proc varchar2(72) := g_package||'chk_filing_status_code';
400: --
401: Begin
402: --
403: hr_utility.set_location('Entering:'||l_proc,5);
404: --
405: -- Check that the mandatory parameters have been set
406: --
407: hr_api.mandatory_arg_error
419: --
420: -- Check that the mandatory parameters have been set
421: --
422: if p_filing_status_code is null then
423: hr_utility.set_message(801, 'PAY_72786_FED_FIL_STAT_NOT_NUL');
424: hr_utility.raise_error;
425: end if;
426: --
427: -- check if filing_status_code value exists in hr_lookups table
420: -- Check that the mandatory parameters have been set
421: --
422: if p_filing_status_code is null then
423: hr_utility.set_message(801, 'PAY_72786_FED_FIL_STAT_NOT_NUL');
424: hr_utility.raise_error;
425: end if;
426: --
427: -- check if filing_status_code value exists in hr_lookups table
428: --
436: --
437: -- raise error as filing_status_code does not exist in hr_lookups
438: -- table.
439: --
440: hr_utility.set_message(801,'HR_52966_INVALID_LOOKUP');
441: hr_utility.set_message_token('COLUMN','federal filing_status_code');
442: hr_utility.set_message_token('LOOKUP_TYPE','US_FIT_FILING_STATUS');
443: hr_utility.raise_error;
444: --
437: -- raise error as filing_status_code does not exist in hr_lookups
438: -- table.
439: --
440: hr_utility.set_message(801,'HR_52966_INVALID_LOOKUP');
441: hr_utility.set_message_token('COLUMN','federal filing_status_code');
442: hr_utility.set_message_token('LOOKUP_TYPE','US_FIT_FILING_STATUS');
443: hr_utility.raise_error;
444: --
445: end if;
438: -- table.
439: --
440: hr_utility.set_message(801,'HR_52966_INVALID_LOOKUP');
441: hr_utility.set_message_token('COLUMN','federal filing_status_code');
442: hr_utility.set_message_token('LOOKUP_TYPE','US_FIT_FILING_STATUS');
443: hr_utility.raise_error;
444: --
445: end if;
446: --
439: --
440: hr_utility.set_message(801,'HR_52966_INVALID_LOOKUP');
441: hr_utility.set_message_token('COLUMN','federal filing_status_code');
442: hr_utility.set_message_token('LOOKUP_TYPE','US_FIT_FILING_STATUS');
443: hr_utility.raise_error;
444: --
445: end if;
446: --
447: end if;
445: end if;
446: --
447: end if;
448: --
449: hr_utility.set_location('Leaving:'||l_proc,10);
450: --
451: End chk_filing_status_code;
452: --
453: -- ----------------------------------------------------------------------------
482: l_proc varchar2(72) := g_package||'chk_fit_override_amount';
483: --
484: Begin
485: --
486: hr_utility.set_location('Entering:'||l_proc,5);
487: --
488: -- If the value is being inserted or updated...
489: --
490: if (p_emp_fed_tax_rule_id is not null
494: --
495: -- Check that the mandatory parameters have been set
496: --
497: if p_fit_override_amount is null then
498: hr_utility.set_message(801, 'PAY_72791_FED_OVD_AMT_NOT_NUL');
499: hr_utility.raise_error;
500: end if;
501: --
502: -- check if fit_override_amount value is in a valid range
495: -- Check that the mandatory parameters have been set
496: --
497: if p_fit_override_amount is null then
498: hr_utility.set_message(801, 'PAY_72791_FED_OVD_AMT_NOT_NUL');
499: hr_utility.raise_error;
500: end if;
501: --
502: -- check if fit_override_amount value is in a valid range
503: --
504: if p_fit_override_amount < 0 then
505: --
506: -- raise error as given value is invalid
507: --
508: hr_utility.set_message(801,'PAY_72790_FED_OVRD_AMT_POSITIV');
509: hr_utility.raise_error;
510: --
511: end if;
512: --
505: --
506: -- raise error as given value is invalid
507: --
508: hr_utility.set_message(801,'PAY_72790_FED_OVRD_AMT_POSITIV');
509: hr_utility.raise_error;
510: --
511: end if;
512: --
513: end if;
511: end if;
512: --
513: end if;
514: --
515: hr_utility.set_location('Leaving:'||l_proc,10);
516: --
517: End chk_fit_override_amount;
518: --
519: -- ----------------------------------------------------------------------------
548: l_proc varchar2(72) := g_package||'chk_fit_override_rate';
549: --
550: Begin
551: --
552: hr_utility.set_location('Entering:'||l_proc,5);
553: --
554: -- If the value is being inserted or updated...
555: --
556: if (p_emp_fed_tax_rule_id is not null
560: --
561: -- Check that the mandatory parameters have been set
562: --
563: if p_fit_override_rate is null then
564: hr_utility.set_message(801, 'PAY_72793_FED_OVD_RT_NOT_NULL');
565: hr_utility.raise_error;
566: end if;
567: --
568: -- check if fit_override_rate value is in a valid range
561: -- Check that the mandatory parameters have been set
562: --
563: if p_fit_override_rate is null then
564: hr_utility.set_message(801, 'PAY_72793_FED_OVD_RT_NOT_NULL');
565: hr_utility.raise_error;
566: end if;
567: --
568: -- check if fit_override_rate value is in a valid range
569: --
570: if p_fit_override_rate < 0 or p_fit_override_rate > 100 then
571: --
572: -- raise error as given value is invalid
573: --
574: hr_utility.set_message(801,'PAY_72792_FED_OVD_RT_IN_RANGE');
575: hr_utility.raise_error;
576: --
577: end if;
578: --
571: --
572: -- raise error as given value is invalid
573: --
574: hr_utility.set_message(801,'PAY_72792_FED_OVD_RT_IN_RANGE');
575: hr_utility.raise_error;
576: --
577: end if;
578: --
579: end if;
577: end if;
578: --
579: end if;
580: --
581: hr_utility.set_location('Leaving:'||l_proc,10);
582: --
583: End chk_fit_override_rate;
584: --
585: -- ----------------------------------------------------------------------------
614: l_proc varchar2(72) := g_package||'chk_withholding_allowances';
615: --
616: Begin
617: --
618: hr_utility.set_location('Entering:'||l_proc,5);
619: --
620: -- If the value is being inserted or updated...
621: --
622: if (p_emp_fed_tax_rule_id is not null
626: --
627: -- Check that the mandatory parameters have been set
628: --
629: if p_withholding_allowances is null then
630: hr_utility.set_message(801, 'PAY_72800_FED_WA_NOT_NULL');
631: hr_utility.raise_error;
632: end if;
633: --
634: -- check if withholding_allowances value is in a valid range
627: -- Check that the mandatory parameters have been set
628: --
629: if p_withholding_allowances is null then
630: hr_utility.set_message(801, 'PAY_72800_FED_WA_NOT_NULL');
631: hr_utility.raise_error;
632: end if;
633: --
634: -- check if withholding_allowances value is in a valid range
635: --
636: if p_withholding_allowances < 0 then
637: --
638: -- raise error as given value is invalid
639: --
640: hr_utility.set_message(801,'PAY_72799_FED_WA_POSITIVE');
641: hr_utility.raise_error;
642: --
643: end if;
644: --
637: --
638: -- raise error as given value is invalid
639: --
640: hr_utility.set_message(801,'PAY_72799_FED_WA_POSITIVE');
641: hr_utility.raise_error;
642: --
643: end if;
644: --
645: end if;
643: end if;
644: --
645: end if;
646: --
647: hr_utility.set_location('Leaving:'||l_proc,10);
648: --
649: End chk_withholding_allowances;
650: --
651: -- ----------------------------------------------------------------------------
686: l_proc varchar2(72) := g_package||'chk_eic_filing_status_code';
687: --
688: Begin
689: --
690: hr_utility.set_location('Entering:'||l_proc,5);
691: --
692: -- Check that the mandatory parameters have been set
693: --
694: hr_api.mandatory_arg_error
729: end if;
730: --
731: end if;
732: --
733: hr_utility.set_location('Leaving:'||l_proc,10);
734: --
735: End chk_eic_filing_status_code;
736: --
737: -- ----------------------------------------------------------------------------
766: l_proc varchar2(72) := g_package||'chk_fit_additional_tax';
767: --
768: Begin
769: --
770: hr_utility.set_location('Entering:'||l_proc,5);
771: --
772: -- If the value is being updated or inserted...
773: --
774: if ((p_emp_fed_tax_rule_id is not null
786: if p_fit_additional_tax < 0 then
787: --
788: -- raise error as given value is invalid
789: --
790: hr_utility.set_message(801,'PAY_72777_FED_ADD_TAX_POSITIVE');
791: hr_utility.raise_error;
792: --
793: end if;
794: --
787: --
788: -- raise error as given value is invalid
789: --
790: hr_utility.set_message(801,'PAY_72777_FED_ADD_TAX_POSITIVE');
791: hr_utility.raise_error;
792: --
793: end if;
794: --
795: end if;
795: end if;
796: --
797: end if;
798: --
799: hr_utility.set_location('Leaving:'||l_proc,10);
800: --
801: End chk_fit_additional_tax;
802: --
803: -- ----------------------------------------------------------------------------
832: l_proc varchar2(72) := g_package||'chk_supp_tax_override_rate';
833: --
834: Begin
835: --
836: hr_utility.set_location('Entering:'||l_proc,5);
837: --
838: -- If the value is being updated or inserted...
839: --
840: if ((p_emp_fed_tax_rule_id is not null
852: if p_supp_tax_override_rate < 0 or p_supp_tax_override_rate > 100 then
853: --
854: -- raise error as given value is invalid
855: --
856: hr_utility.set_message(801,'PAY_72798_FED_SUPP_RT_IN_RANGE');
857: hr_utility.raise_error;
858: --
859: end if;
860: --
853: --
854: -- raise error as given value is invalid
855: --
856: hr_utility.set_message(801,'PAY_72798_FED_SUPP_RT_IN_RANGE');
857: hr_utility.raise_error;
858: --
859: end if;
860: --
861: end if;
861: end if;
862: --
863: end if;
864: --
865: hr_utility.set_location('Leaving:'||l_proc,10);
866: --
867: End chk_supp_tax_override_rate;
868: --
869: -- ----------------------------------------------------------------------------
932: where sta.assignment_id = p_assignment_id
933: and sta.effective_end_date > l_effective_date;
934: --
935: begin
936: hr_utility.set_location('Entering:'|| l_proc, 1);
937: --
938: -- Check mandatory parameters have been set
939: --
940: hr_api.mandatory_arg_error
948: ,p_argument => 'datetrack_mode'
949: ,p_argument_value => p_datetrack_mode
950: );
951: --
952: hr_utility.set_location(l_proc, 2);
953: --
954: -- Validate that this routine is called from Assignment code
955: --
956: if nvl(p_delete_routine,'X') <> 'ASSIGNMENT' then
953: --
954: -- Validate that this routine is called from Assignment code
955: --
956: if nvl(p_delete_routine,'X') <> 'ASSIGNMENT' then
957: hr_utility.set_message(801, 'HR_6674_PAY_ASSIGN');
958: hr_utility.raise_error;
959: end if;
960: --
961: --
954: -- Validate that this routine is called from Assignment code
955: --
956: if nvl(p_delete_routine,'X') <> 'ASSIGNMENT' then
957: hr_utility.set_message(801, 'HR_6674_PAY_ASSIGN');
958: hr_utility.raise_error;
959: end if;
960: --
961: --
962: if p_datetrack_mode in('ZAP', 'DELETE') then
971: --
972: open csr_check_payroll(l_effective_date);
973: fetch csr_check_payroll into l_exists;
974: if csr_check_payroll%FOUND then
975: hr_utility.set_location(l_proc,15);
976: close csr_check_payroll;
977: hr_utility.set_message(801, 'PAY_52235_TAX_RULE_DELETE');
978: hr_utility.raise_error;
979: end if;
973: fetch csr_check_payroll into l_exists;
974: if csr_check_payroll%FOUND then
975: hr_utility.set_location(l_proc,15);
976: close csr_check_payroll;
977: hr_utility.set_message(801, 'PAY_52235_TAX_RULE_DELETE');
978: hr_utility.raise_error;
979: end if;
980: close csr_check_payroll;
981: --
974: if csr_check_payroll%FOUND then
975: hr_utility.set_location(l_proc,15);
976: close csr_check_payroll;
977: hr_utility.set_message(801, 'PAY_52235_TAX_RULE_DELETE');
978: hr_utility.raise_error;
979: end if;
980: close csr_check_payroll;
981: --
982: elsif p_datetrack_mode in('DELETE_NEXT_CHANGE', 'FUTURE_CHANGE') then
984: null;
985: --
986: else
987: --
988: hr_utility.set_message(801, 'HR_7204_DT_DEL_MODE_INVALID');
989: hr_utility.raise_error;
990: --
991: end if;
992: --
985: --
986: else
987: --
988: hr_utility.set_message(801, 'HR_7204_DT_DEL_MODE_INVALID');
989: hr_utility.raise_error;
990: --
991: end if;
992: --
993: -- If any state tax rules exist for this assignment, raise an error.
995: open csr_state_tax_rules;
996: fetch csr_state_tax_rules into l_state_rule_exists;
997: if csr_state_tax_rules%found then
998: close csr_state_tax_rules;
999: hr_utility.set_message(801,'HR_7215_DT_CHILD_EXISTS');
1000: hr_utility.set_message_token('TABLE_NAME','PAY_US_EMP_STATE_TAX_RULES_F');
1001: hr_utility.raise_error;
1002: end if;
1003: close csr_state_tax_rules;
996: fetch csr_state_tax_rules into l_state_rule_exists;
997: if csr_state_tax_rules%found then
998: close csr_state_tax_rules;
999: hr_utility.set_message(801,'HR_7215_DT_CHILD_EXISTS');
1000: hr_utility.set_message_token('TABLE_NAME','PAY_US_EMP_STATE_TAX_RULES_F');
1001: hr_utility.raise_error;
1002: end if;
1003: close csr_state_tax_rules;
1004: --
997: if csr_state_tax_rules%found then
998: close csr_state_tax_rules;
999: hr_utility.set_message(801,'HR_7215_DT_CHILD_EXISTS');
1000: hr_utility.set_message_token('TABLE_NAME','PAY_US_EMP_STATE_TAX_RULES_F');
1001: hr_utility.raise_error;
1002: end if;
1003: close csr_state_tax_rules;
1004: --
1005: --
1044: l_error exception;
1045: l_argument varchar2(30);
1046: --
1047: Begin
1048: hr_utility.set_location('Entering:'||l_proc, 10);
1049: --
1050: -- Only proceed with validation if a row exists for
1051: -- the current record in the HR schema
1052: --
1054: (p_emp_fed_tax_rule_id => p_rec.emp_fed_tax_rule_id
1055: ,p_object_version_number => p_rec.object_version_number
1056: ,p_effective_date => p_effective_date
1057: ) then
1058: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
1059: hr_utility.set_message_token('PROCEDURE', l_proc);
1060: hr_utility.set_message_token('STEP', '20');
1061: end if;
1062: hr_utility.set_location(l_proc, 30);
1055: ,p_object_version_number => p_rec.object_version_number
1056: ,p_effective_date => p_effective_date
1057: ) then
1058: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
1059: hr_utility.set_message_token('PROCEDURE', l_proc);
1060: hr_utility.set_message_token('STEP', '20');
1061: end if;
1062: hr_utility.set_location(l_proc, 30);
1063: --
1056: ,p_effective_date => p_effective_date
1057: ) then
1058: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
1059: hr_utility.set_message_token('PROCEDURE', l_proc);
1060: hr_utility.set_message_token('STEP', '20');
1061: end if;
1062: hr_utility.set_location(l_proc, 30);
1063: --
1064: if (nvl(p_rec.assignment_id, hr_api.g_number) <>
1058: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
1059: hr_utility.set_message_token('PROCEDURE', l_proc);
1060: hr_utility.set_message_token('STEP', '20');
1061: end if;
1062: hr_utility.set_location(l_proc, 30);
1063: --
1064: if (nvl(p_rec.assignment_id, hr_api.g_number) <>
1065: pay_fed_shd.g_old_rec.assignment_id)then
1066: l_argument := 'assignment_id';
1065: pay_fed_shd.g_old_rec.assignment_id)then
1066: l_argument := 'assignment_id';
1067: raise l_error;
1068: end if;
1069: hr_utility.set_location(l_proc, 40);
1070: --
1071: if (nvl(p_rec.business_group_id, hr_api.g_number) <>
1072: pay_fed_shd.g_old_rec.business_group_id)then
1073: l_argument := 'business_group_id';
1072: pay_fed_shd.g_old_rec.business_group_id)then
1073: l_argument := 'business_group_id';
1074: raise l_error;
1075: end if;
1076: hr_utility.set_location(l_proc, 50);
1077: exception
1078: when l_error then
1079: hr_api.argument_changed_error
1080: (p_api_name => l_proc
1081: ,p_argument => l_argument
1082: );
1083: when others then
1084: raise;
1085: hr_utility.set_location(' Leaving:'||l_proc, 60);
1086: end chk_non_updateable_args;
1087: --
1088: -- ----------------------------------------------------------------------------
1089: -- |--------------------------< dt_update_validate >--------------------------|
1124: l_integrity_error Exception;
1125: l_table_name all_tables.table_name%TYPE;
1126: --
1127: Begin
1128: hr_utility.set_location('Entering:'||l_proc, 5);
1129: --
1130: -- Ensure that the p_datetrack_mode argument is not null
1131: --
1132: hr_api.mandatory_arg_error
1154: --
1155: --
1156: End If;
1157: --
1158: hr_utility.set_location(' Leaving:'||l_proc, 10);
1159: Exception
1160: When l_integrity_error Then
1161: --
1162: -- A referential integrity check was violated therefore
1161: --
1162: -- A referential integrity check was violated therefore
1163: -- we must error
1164: --
1165: hr_utility.set_message(801, 'HR_7216_DT_UPD_INTEGRITY_ERR');
1166: hr_utility.set_message_token('TABLE_NAME', l_table_name);
1167: hr_utility.raise_error;
1168: When Others Then
1169: --
1162: -- A referential integrity check was violated therefore
1163: -- we must error
1164: --
1165: hr_utility.set_message(801, 'HR_7216_DT_UPD_INTEGRITY_ERR');
1166: hr_utility.set_message_token('TABLE_NAME', l_table_name);
1167: hr_utility.raise_error;
1168: When Others Then
1169: --
1170: -- An unhandled or unexpected error has occurred which
1163: -- we must error
1164: --
1165: hr_utility.set_message(801, 'HR_7216_DT_UPD_INTEGRITY_ERR');
1166: hr_utility.set_message_token('TABLE_NAME', l_table_name);
1167: hr_utility.raise_error;
1168: When Others Then
1169: --
1170: -- An unhandled or unexpected error has occurred which
1171: -- we must report
1169: --
1170: -- An unhandled or unexpected error has occurred which
1171: -- we must report
1172: --
1173: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
1174: hr_utility.set_message_token('PROCEDURE', l_proc);
1175: hr_utility.set_message_token('STEP','15');
1176: hr_utility.raise_error;
1177: End dt_update_validate;
1170: -- An unhandled or unexpected error has occurred which
1171: -- we must report
1172: --
1173: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
1174: hr_utility.set_message_token('PROCEDURE', l_proc);
1175: hr_utility.set_message_token('STEP','15');
1176: hr_utility.raise_error;
1177: End dt_update_validate;
1178: --
1171: -- we must report
1172: --
1173: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
1174: hr_utility.set_message_token('PROCEDURE', l_proc);
1175: hr_utility.set_message_token('STEP','15');
1176: hr_utility.raise_error;
1177: End dt_update_validate;
1178: --
1179: -- ----------------------------------------------------------------------------
1172: --
1173: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
1174: hr_utility.set_message_token('PROCEDURE', l_proc);
1175: hr_utility.set_message_token('STEP','15');
1176: hr_utility.raise_error;
1177: End dt_update_validate;
1178: --
1179: -- ----------------------------------------------------------------------------
1180: -- |--------------------------< dt_delete_validate >--------------------------|
1221: l_rows_exist Exception;
1222: l_table_name all_tables.table_name%TYPE;
1223: --
1224: Begin
1225: hr_utility.set_location('Entering:'||l_proc, 5);
1226: --
1227: -- Ensure that the p_datetrack_mode argument is not null
1228: --
1229: hr_api.mandatory_arg_error
1258: --
1259: --
1260: End If;
1261: --
1262: hr_utility.set_location(' Leaving:'||l_proc, 10);
1263: Exception
1264: When l_rows_exist Then
1265: --
1266: -- A referential integrity check was violated therefore
1265: --
1266: -- A referential integrity check was violated therefore
1267: -- we must error
1268: --
1269: hr_utility.set_message(801, 'HR_7215_DT_CHILD_EXISTS');
1270: hr_utility.set_message_token('TABLE_NAME', l_table_name);
1271: hr_utility.raise_error;
1272: When Others Then
1273: --
1266: -- A referential integrity check was violated therefore
1267: -- we must error
1268: --
1269: hr_utility.set_message(801, 'HR_7215_DT_CHILD_EXISTS');
1270: hr_utility.set_message_token('TABLE_NAME', l_table_name);
1271: hr_utility.raise_error;
1272: When Others Then
1273: --
1274: -- An unhandled or unexpected error has occurred which
1267: -- we must error
1268: --
1269: hr_utility.set_message(801, 'HR_7215_DT_CHILD_EXISTS');
1270: hr_utility.set_message_token('TABLE_NAME', l_table_name);
1271: hr_utility.raise_error;
1272: When Others Then
1273: --
1274: -- An unhandled or unexpected error has occurred which
1275: -- we must report
1273: --
1274: -- An unhandled or unexpected error has occurred which
1275: -- we must report
1276: --
1277: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
1278: hr_utility.set_message_token('PROCEDURE', l_proc);
1279: hr_utility.set_message_token('STEP','15');
1280: hr_utility.raise_error;
1281: End dt_delete_validate;
1274: -- An unhandled or unexpected error has occurred which
1275: -- we must report
1276: --
1277: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
1278: hr_utility.set_message_token('PROCEDURE', l_proc);
1279: hr_utility.set_message_token('STEP','15');
1280: hr_utility.raise_error;
1281: End dt_delete_validate;
1282: --
1275: -- we must report
1276: --
1277: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
1278: hr_utility.set_message_token('PROCEDURE', l_proc);
1279: hr_utility.set_message_token('STEP','15');
1280: hr_utility.raise_error;
1281: End dt_delete_validate;
1282: --
1283: -- ----------------------------------------------------------------------------
1276: --
1277: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
1278: hr_utility.set_message_token('PROCEDURE', l_proc);
1279: hr_utility.set_message_token('STEP','15');
1280: hr_utility.raise_error;
1281: End dt_delete_validate;
1282: --
1283: -- ----------------------------------------------------------------------------
1284: -- |---------------------------< insert_validate >----------------------------|
1292: --
1293: l_proc varchar2(72) := g_package||'insert_validate';
1294: --
1295: Begin
1296: hr_utility.set_location('Entering:'||l_proc, 5);
1297: --
1298: -- Call all supporting business operations
1299: --
1300: chk_assignment_id
1361: (p_emp_fed_tax_rule_id => p_rec.emp_fed_tax_rule_id
1362: ,p_supp_tax_override_rate => p_rec.supp_tax_override_rate
1363: );
1364: --
1365: hr_utility.set_location(' Leaving:'||l_proc, 10);
1366: End insert_validate;
1367: --
1368: -- ----------------------------------------------------------------------------
1369: -- |---------------------------< update_validate >----------------------------|
1377: --
1378: l_proc varchar2(72) := g_package||'update_validate';
1379: --
1380: Begin
1381: hr_utility.set_location('Entering:'||l_proc, 5);
1382: --
1383: -- Call all supporting business operations
1384: --
1385: chk_non_updateable_args
1451: p_datetrack_mode => p_datetrack_mode,
1452: p_validation_start_date => p_validation_start_date,
1453: p_validation_end_date => p_validation_end_date);
1454: --
1455: hr_utility.set_location(' Leaving:'||l_proc, 10);
1456: End update_validate;
1457: --
1458: -- ----------------------------------------------------------------------------
1459: -- |---------------------------< delete_validate >----------------------------|
1469: --
1470: l_proc varchar2(72) := g_package||'delete_validate';
1471: --
1472: Begin
1473: hr_utility.set_location('Entering:'||l_proc, 5);
1474: --
1475: -- Call all supporting business operations
1476: --
1477: chk_delete
1491: p_validation_start_date => p_validation_start_date,
1492: p_validation_end_date => p_validation_end_date,
1493: p_emp_fed_tax_rule_id => p_rec.emp_fed_tax_rule_id);
1494: --
1495: hr_utility.set_location(' Leaving:'||l_proc, 10);
1496: End delete_validate;
1497: --
1498: --
1499: -- ---------------------------------------------------------------------------
1518: l_proc varchar2(72) := g_package||'return_legislation_code';
1519: --
1520: begin
1521: --
1522: hr_utility.set_location('Entering:'|| l_proc, 10);
1523: --
1524: -- Ensure that all the mandatory parameter are not null
1525: --
1526: hr_api.mandatory_arg_error(p_api_name => l_proc,
1533: -- call to this function. Just return the value in the global
1534: -- variable.
1535: --
1536: l_legislation_code := g_legislation_code;
1537: hr_utility.set_location(l_proc, 20);
1538: --
1539: else
1540: --
1541: -- The ID is different to the last call to this function
1550: close csr_leg_code;
1551: --
1552: -- The primary key is invalid therefore we must error
1553: --
1554: hr_utility.set_message(801,'HR_7220_INVALID_PRIMARY_KEY');
1555: hr_utility.raise_error;
1556: --
1557: end if;
1558: hr_utility.set_location(' Leaving:'|| l_proc, 30);
1551: --
1552: -- The primary key is invalid therefore we must error
1553: --
1554: hr_utility.set_message(801,'HR_7220_INVALID_PRIMARY_KEY');
1555: hr_utility.raise_error;
1556: --
1557: end if;
1558: hr_utility.set_location(' Leaving:'|| l_proc, 30);
1559: --
1554: hr_utility.set_message(801,'HR_7220_INVALID_PRIMARY_KEY');
1555: hr_utility.raise_error;
1556: --
1557: end if;
1558: hr_utility.set_location(' Leaving:'|| l_proc, 30);
1559: --
1560: -- Set the global variables to the values are
1561: -- available for the next call to this function
1562: --
1563: close csr_leg_code;
1564: g_fed_tax_rule_id := p_emp_fed_tax_rule_id;
1565: g_legislation_code := l_legislation_code;
1566: end if;
1567: hr_utility.set_location(' Leaving:'|| l_proc, 40);
1568: --
1569: return l_legislation_code;
1570: --
1571: end return_legislation_code;