77: and p_effective_date between effective_start_date and
78: effective_end_date;
79: --
80: begin
81: hr_utility.set_location('Entering: '|| l_proc, 5);
82: --
83: -- Check to see if mandatory parameters have been set.
84: --
85: if p_business_group_id is null then
82: --
83: -- Check to see if mandatory parameters have been set.
84: --
85: if p_business_group_id is null then
86: hr_utility.set_message(801,'PAY_72762_CNT_BG_NOT_NULL');
87: hr_utility.raise_error;
88: end if;
89: --
90: if p_assignment_id is null then
83: -- Check to see if mandatory parameters have been set.
84: --
85: if p_business_group_id is null then
86: hr_utility.set_message(801,'PAY_72762_CNT_BG_NOT_NULL');
87: hr_utility.raise_error;
88: end if;
89: --
90: if p_assignment_id is null then
91: hr_utility.set_message(801,'PAY_72760_CNT_ASG_NOT_NULL');
87: hr_utility.raise_error;
88: end if;
89: --
90: if p_assignment_id is null then
91: hr_utility.set_message(801,'PAY_72760_CNT_ASG_NOT_NULL');
92: hr_utility.raise_error;
93: end if;
94: --
95: hr_api.mandatory_arg_error
88: end if;
89: --
90: if p_assignment_id is null then
91: hr_utility.set_message(801,'PAY_72760_CNT_ASG_NOT_NULL');
92: hr_utility.raise_error;
93: end if;
94: --
95: hr_api.mandatory_arg_error
96: (p_api_name => l_proc
108: open csr_business_grp;
109: fetch csr_business_grp into l_business_group_id;
110: if csr_business_grp%NOTFOUND then
111: close csr_business_grp;
112: hr_utility.set_message(801, 'HR_51746_ASG_INV_ASG_ID');
113: hr_utility.raise_error;
114: else
115: --
116: close csr_business_grp;
109: fetch csr_business_grp into l_business_group_id;
110: if csr_business_grp%NOTFOUND then
111: close csr_business_grp;
112: hr_utility.set_message(801, 'HR_51746_ASG_INV_ASG_ID');
113: hr_utility.raise_error;
114: else
115: --
116: close csr_business_grp;
117: --
115: --
116: close csr_business_grp;
117: --
118: if p_business_group_id <> l_business_group_id then
119: hr_utility.set_message(801, 'PAY_72761_CNT_BG_MATCH_ASG');
120: hr_utility.raise_error;
121: else
122: open csr_defaulting;
123: fetch csr_defaulting into l_tmp;
116: close csr_business_grp;
117: --
118: if p_business_group_id <> l_business_group_id then
119: hr_utility.set_message(801, 'PAY_72761_CNT_BG_MATCH_ASG');
120: hr_utility.raise_error;
121: else
122: open csr_defaulting;
123: fetch csr_defaulting into l_tmp;
124: if csr_defaulting%NOTFOUND then
122: open csr_defaulting;
123: fetch csr_defaulting into l_tmp;
124: if csr_defaulting%NOTFOUND then
125: close csr_defaulting;
126: hr_utility.set_message(801, 'PAY_72755_CNT_NO_FED_RULE');
127: hr_utility.raise_error;
128: end if;
129: close csr_defaulting;
130: end if;
123: fetch csr_defaulting into l_tmp;
124: if csr_defaulting%NOTFOUND then
125: close csr_defaulting;
126: hr_utility.set_message(801, 'PAY_72755_CNT_NO_FED_RULE');
127: hr_utility.raise_error;
128: end if;
129: close csr_defaulting;
130: end if;
131: end if;
129: close csr_defaulting;
130: end if;
131: end if;
132: end if;
133: hr_utility.set_location(' Leaving: '||l_proc, 65);
134: end chk_assignment_id;
135: --
136: --
137: -- ---------------------------------------------------------------------------
175: from pay_us_states
176: where state_code = p_state_code;
177: --
178: begin
179: hr_utility.set_location('Entering: '|| l_proc, 5);
180: --
181: -- Check state_code is not null.
182: --
183: if (p_state_code IS NOT NULL) then
180: --
181: -- Check state_code is not null.
182: --
183: if (p_state_code IS NOT NULL) then
184: hr_utility.set_location(l_proc,10);
185: --
186: -- Check state code is valid.
187: --
188: open csr_valid_state_code;
192: pay_cnt_shd.constraint_error
193: (p_constraint_name => 'PAY_US_EMP_COUNTY_TAX_RULES_FK1');
194: end if;
195: else
196: hr_utility.set_message(801,'PAY_72774_CNT_STA_NOT_NULL');
197: hr_utility.raise_error;
198: end if;
199: close csr_valid_state_code;
200: hr_utility.set_location(' Leaving: '||l_proc, 25);
193: (p_constraint_name => 'PAY_US_EMP_COUNTY_TAX_RULES_FK1');
194: end if;
195: else
196: hr_utility.set_message(801,'PAY_72774_CNT_STA_NOT_NULL');
197: hr_utility.raise_error;
198: end if;
199: close csr_valid_state_code;
200: hr_utility.set_location(' Leaving: '||l_proc, 25);
201: end chk_state_code;
196: hr_utility.set_message(801,'PAY_72774_CNT_STA_NOT_NULL');
197: hr_utility.raise_error;
198: end if;
199: close csr_valid_state_code;
200: hr_utility.set_location(' Leaving: '||l_proc, 25);
201: end chk_state_code;
202: --
203: --
204: -- ---------------------------------------------------------------------------
246: where state_code = p_state_code
247: and county_code = p_county_code;
248: --
249: begin
250: hr_utility.set_location('Entering: '|| l_proc, 5);
251: --
252: -- Check to see if mandatory parameters have been set.
253: --
254: hr_api.mandatory_arg_error
257: ,p_argument_value => p_state_code
258: );
259: --
260: if (p_county_code IS NOT NULL) then
261: hr_utility.set_location(l_proc, 10);
262: --
263: -- Check for valid county code.
264: --
265: open csr_valid_county_code;
268: close csr_valid_county_code;
269: pay_cnt_shd.constraint_error
270: (p_constraint_name => 'PAY_US_EMP_COUNTY_TAX_RULE_FK3');
271: end if;
272: hr_utility.set_location(l_proc, 15);
273: else
274: hr_utility.set_message(801,'PAY_72763_CNT_CNT_NOT_NULL');
275: hr_utility.raise_error;
276: end if;
270: (p_constraint_name => 'PAY_US_EMP_COUNTY_TAX_RULE_FK3');
271: end if;
272: hr_utility.set_location(l_proc, 15);
273: else
274: hr_utility.set_message(801,'PAY_72763_CNT_CNT_NOT_NULL');
275: hr_utility.raise_error;
276: end if;
277: close csr_valid_county_code;
278: hr_utility.set_location(' Leaving: '||l_proc, 20);
271: end if;
272: hr_utility.set_location(l_proc, 15);
273: else
274: hr_utility.set_message(801,'PAY_72763_CNT_CNT_NOT_NULL');
275: hr_utility.raise_error;
276: end if;
277: close csr_valid_county_code;
278: hr_utility.set_location(' Leaving: '||l_proc, 20);
279: end chk_county_code;
274: hr_utility.set_message(801,'PAY_72763_CNT_CNT_NOT_NULL');
275: hr_utility.raise_error;
276: end if;
277: close csr_valid_county_code;
278: hr_utility.set_location(' Leaving: '||l_proc, 20);
279: end chk_county_code;
280: --
281: -- ---------------------------------------------------------------------------
282: -- |------------------------< chk_jurisdiction_code >------------------------|
318: l_jurisdiction_code pay_state_rules.jurisdiction_code%TYPE;
319: --
320: --
321: begin
322: hr_utility.set_location('Entering: '|| l_proc, 5);
323: --
324: if p_jurisdiction_code is null then
325: hr_utility.set_message(801,'PAY_72834_CNT_JD_NOT_NULL');
326: hr_utility.raise_error;
321: begin
322: hr_utility.set_location('Entering: '|| l_proc, 5);
323: --
324: if p_jurisdiction_code is null then
325: hr_utility.set_message(801,'PAY_72834_CNT_JD_NOT_NULL');
326: hr_utility.raise_error;
327: end if;
328: --
329: hr_api.mandatory_arg_error
322: hr_utility.set_location('Entering: '|| l_proc, 5);
323: --
324: if p_jurisdiction_code is null then
325: hr_utility.set_message(801,'PAY_72834_CNT_JD_NOT_NULL');
326: hr_utility.raise_error;
327: end if;
328: --
329: hr_api.mandatory_arg_error
330: (p_api_name => l_proc
337: ,p_argument => 'county_code'
338: ,p_argument_value => p_county_code
339: );
340: --
341: hr_utility.set_location(l_proc, 10);
342: --
343: --
344: -- Check for valid jurisdiction code
345: --
344: -- Check for valid jurisdiction code
345: --
346: l_jurisdiction_code := p_state_code||'-'||p_county_code||'-0000';
347: if p_jurisdiction_code <> l_jurisdiction_code then
348: hr_utility.set_message(801,'PAY_8003_1099R_JU_CODE');
349: hr_utility.raise_error;
350: end if;
351: hr_utility.set_location(' Leaving: '||l_proc, 20);
352: end chk_jurisdiction_code;
345: --
346: l_jurisdiction_code := p_state_code||'-'||p_county_code||'-0000';
347: if p_jurisdiction_code <> l_jurisdiction_code then
348: hr_utility.set_message(801,'PAY_8003_1099R_JU_CODE');
349: hr_utility.raise_error;
350: end if;
351: hr_utility.set_location(' Leaving: '||l_proc, 20);
352: end chk_jurisdiction_code;
353: --
347: if p_jurisdiction_code <> l_jurisdiction_code then
348: hr_utility.set_message(801,'PAY_8003_1099R_JU_CODE');
349: hr_utility.raise_error;
350: end if;
351: hr_utility.set_location(' Leaving: '||l_proc, 20);
352: end chk_jurisdiction_code;
353: --
354: --
355: --
391: --
392: l_proc varchar2(72) := g_package||'chk_additional_wa_rate';
393: --
394: begin
395: hr_utility.set_location('Entering: '|| l_proc, 5);
396: --
397: -- If value is being inserted or updated ...
398: --
399: if (p_emp_county_tax_rule_id is not null
403: --
404: -- Check that additional_wa_rate is not null.
405: --
406: if p_additional_wa_rate is null then
407: hr_utility.set_message(801,'PAY_72759_CNT_ADDL_WA_NOT_NULL');
408: hr_utility.raise_error;
409: else
410: --
411: -- Check that additional_wa_rate is in a valid range.
404: -- Check that additional_wa_rate is not null.
405: --
406: if p_additional_wa_rate is null then
407: hr_utility.set_message(801,'PAY_72759_CNT_ADDL_WA_NOT_NULL');
408: hr_utility.raise_error;
409: else
410: --
411: -- Check that additional_wa_rate is in a valid range.
412: --
411: -- Check that additional_wa_rate is in a valid range.
412: --
413: if p_additional_wa_rate < 0 or p_additional_wa_rate > 100 then
414: --
415: hr_utility.set_message(801,'PAY_72758_CNT_ADDL_WA_IN_RANGE');
416: hr_utility.raise_error;
417: end if;
418: end if;
419: end if;
412: --
413: if p_additional_wa_rate < 0 or p_additional_wa_rate > 100 then
414: --
415: hr_utility.set_message(801,'PAY_72758_CNT_ADDL_WA_IN_RANGE');
416: hr_utility.raise_error;
417: end if;
418: end if;
419: end if;
420: hr_utility.set_location(' Leaving: '||l_proc, 20);
416: hr_utility.raise_error;
417: end if;
418: end if;
419: end if;
420: hr_utility.set_location(' Leaving: '||l_proc, 20);
421: end chk_additional_wa_rate;
422: --
423: --
424: -- ---------------------------------------------------------------------------
472: l_api_updating boolean;
473: --
474: begin
475: --
476: hr_utility.set_location('Entering: '|| l_proc, 5);
477: --
478: hr_api.mandatory_arg_error
479: (p_api_name => l_proc
480: ,p_argument => 'effective_date'
480: ,p_argument => 'effective_date'
481: ,p_argument_value => p_effective_date
482: );
483: --
484: hr_utility.set_location(l_proc, 10);
485: --
486: hr_api.mandatory_arg_error
487: (p_api_name => l_proc
488: ,p_argument => 'state_code'
488: ,p_argument => 'state_code'
489: ,p_argument_value => p_state_code
490: );
491: --
492: hr_utility.set_location(l_proc, 15);
493: --
494: l_api_updating := pay_cnt_shd.api_updating
495: (p_emp_county_tax_rule_id => p_emp_county_tax_rule_id,
496: p_effective_date => p_effective_date,
505: --
506: -- Check that filing_status_code is not null.
507: --
508: if p_filing_status_code is null then
509: hr_utility.set_message(801,'PAY_72765_CNT_FIL_STAT_NOT_NUL');
510: hr_utility.raise_error;
511: else
512: --
513: -- Check that filing_status_code is a valid value.
506: -- Check that filing_status_code is not null.
507: --
508: if p_filing_status_code is null then
509: hr_utility.set_message(801,'PAY_72765_CNT_FIL_STAT_NOT_NUL');
510: hr_utility.raise_error;
511: else
512: --
513: -- Check that filing_status_code is a valid value.
514: --
519: ,p_lookup_type => 'US_LIT_FILING_STATUS'
520: ,p_lookup_code => p_filing_status_code
521: ) then
522: --
523: hr_utility.set_message(801,'PAY_72764_CNT_FIL_STAT_INVALID');
524: hr_utility.raise_error;
525: end if;
526: end if;
527: end if;
520: ,p_lookup_code => p_filing_status_code
521: ) then
522: --
523: hr_utility.set_message(801,'PAY_72764_CNT_FIL_STAT_INVALID');
524: hr_utility.raise_error;
525: end if;
526: end if;
527: end if;
528: --
525: end if;
526: end if;
527: end if;
528: --
529: hr_utility.set_location(' Leaving: '||l_proc, 25);
530: end chk_filing_status_code;
531: --
532: --
533: -- ---------------------------------------------------------------------------
568: l_proc varchar2(72) := g_package||'chk_lit_additional_tax';
569: --
570: --
571: begin
572: hr_utility.set_location('Entering: '|| l_proc, 5);
573: --
574: -- If value is being inserted or updated ...
575: --
576: if (p_emp_county_tax_rule_id is not null
580: --
581: -- Check that lit_additional_tax is not null.
582: --
583: if p_lit_additional_tax is null then
584: hr_utility.set_message(801,'PAY_72757_CNT_ADD_TAX_NOT_NULL');
585: hr_utility.raise_error;
586: else
587: --
588: -- Check that lit_additional_tax is in a valid range.
581: -- Check that lit_additional_tax is not null.
582: --
583: if p_lit_additional_tax is null then
584: hr_utility.set_message(801,'PAY_72757_CNT_ADD_TAX_NOT_NULL');
585: hr_utility.raise_error;
586: else
587: --
588: -- Check that lit_additional_tax is in a valid range.
589: --
588: -- Check that lit_additional_tax is in a valid range.
589: --
590: if p_lit_additional_tax < 0 then
591: --
592: hr_utility.set_message(801,'PAY_72756_CNT_ADDL_TAX_POSTV');
593: hr_utility.raise_error;
594: end if;
595: end if;
596: end if;
589: --
590: if p_lit_additional_tax < 0 then
591: --
592: hr_utility.set_message(801,'PAY_72756_CNT_ADDL_TAX_POSTV');
593: hr_utility.raise_error;
594: end if;
595: end if;
596: end if;
597: hr_utility.set_location(' Leaving: '||l_proc, 15);
593: hr_utility.raise_error;
594: end if;
595: end if;
596: end if;
597: hr_utility.set_location(' Leaving: '||l_proc, 15);
598: end chk_lit_additional_tax;
599: --
600: -- ---------------------------------------------------------------------------
601: -- |------------------------< chk_lit_override_amount >----------------------|
634: --
635: l_proc varchar2(72) := g_package||'chk_lit_override_amount';
636: --
637: begin
638: hr_utility.set_location('Entering: '|| l_proc, 5);
639: --
640: -- If value is being inserted or updated ...
641: --
642: if (p_emp_county_tax_rule_id is not null
646: --
647: -- Check that lit_override_amount is not null.
648: --
649: if p_lit_override_amount is null then
650: hr_utility.set_message(801,'PAY_72769_CNT_OVD_AMT_NOT_NUL');
651: hr_utility.raise_error;
652: else
653: --
654: -- Check that lit_override_amount is in a valid range.
647: -- Check that lit_override_amount is not null.
648: --
649: if p_lit_override_amount is null then
650: hr_utility.set_message(801,'PAY_72769_CNT_OVD_AMT_NOT_NUL');
651: hr_utility.raise_error;
652: else
653: --
654: -- Check that lit_override_amount is in a valid range.
655: --
652: else
653: --
654: -- Check that lit_override_amount is in a valid range.
655: --
656: hr_utility.set_location(l_proc, 10);
657: --
658: if p_lit_override_amount < 0 then
659: --
660: hr_utility.set_message(801,'PAY_72768_CNT_OVRD_AMT_POSTV');
656: hr_utility.set_location(l_proc, 10);
657: --
658: if p_lit_override_amount < 0 then
659: --
660: hr_utility.set_message(801,'PAY_72768_CNT_OVRD_AMT_POSTV');
661: hr_utility.raise_error;
662: end if;
663: end if;
664: end if;
657: --
658: if p_lit_override_amount < 0 then
659: --
660: hr_utility.set_message(801,'PAY_72768_CNT_OVRD_AMT_POSTV');
661: hr_utility.raise_error;
662: end if;
663: end if;
664: end if;
665: hr_utility.set_location(' Leaving: '||l_proc, 20);
661: hr_utility.raise_error;
662: end if;
663: end if;
664: end if;
665: hr_utility.set_location(' Leaving: '||l_proc, 20);
666: end chk_lit_override_amount;
667: --
668: -- ---------------------------------------------------------------------------
669: -- |------------------------< chk_lit_override_rate >------------------------|
702: --
703: l_proc varchar2(72) := g_package||'chk_lit_override_rate';
704: --
705: begin
706: hr_utility.set_location('Entering: '|| l_proc, 5);
707: --
708: -- If value is being inserted or updated ...
709: --
710: if (p_emp_county_tax_rule_id is not null
714: --
715: -- Check that lit_override_rate is not null.
716: --
717: if p_lit_override_rate is null then
718: hr_utility.set_message(801,'PAY_72771_CNT_OVD_RT_NOT_NULL');
719: hr_utility.raise_error;
720: else
721: --
722: -- Check that lit_override_rate is in a valid range.
715: -- Check that lit_override_rate is not null.
716: --
717: if p_lit_override_rate is null then
718: hr_utility.set_message(801,'PAY_72771_CNT_OVD_RT_NOT_NULL');
719: hr_utility.raise_error;
720: else
721: --
722: -- Check that lit_override_rate is in a valid range.
723: --
720: else
721: --
722: -- Check that lit_override_rate is in a valid range.
723: --
724: hr_utility.set_location(l_proc, 10);
725: --
726: if p_lit_override_rate < 0 or p_lit_override_rate > 100 then
727: --
728: hr_utility.set_message(801,'PAY_72770_CNT_OVR_RT_IN_RANGE');
724: hr_utility.set_location(l_proc, 10);
725: --
726: if p_lit_override_rate < 0 or p_lit_override_rate > 100 then
727: --
728: hr_utility.set_message(801,'PAY_72770_CNT_OVR_RT_IN_RANGE');
729: hr_utility.raise_error;
730: end if;
731: end if;
732: end if;
725: --
726: if p_lit_override_rate < 0 or p_lit_override_rate > 100 then
727: --
728: hr_utility.set_message(801,'PAY_72770_CNT_OVR_RT_IN_RANGE');
729: hr_utility.raise_error;
730: end if;
731: end if;
732: end if;
733: hr_utility.set_location(' Leaving: '||l_proc, 20);
729: hr_utility.raise_error;
730: end if;
731: end if;
732: end if;
733: hr_utility.set_location(' Leaving: '||l_proc, 20);
734: end chk_lit_override_rate;
735: --
736: -- ---------------------------------------------------------------------------
737: -- |------------------------< chk_withholding_allowances >-------------------|
770: --
771: l_proc varchar2(72) := g_package||'chk_withholding_allowances';
772: --
773: begin
774: hr_utility.set_location('Entering: '|| l_proc, 5);
775: --
776: -- If value is being inserted or updated ...
777: --
778: if (p_emp_county_tax_rule_id is not null
782: --
783: -- Check that withholding_allowances is not null.
784: --
785: if p_withholding_allowances is null then
786: hr_utility.set_message(801,'PAY_72776_CNT_WA_NOT_NULL');
787: hr_utility.raise_error;
788: else
789: --
790: -- Check that withholding_allowances is in a valid range.
783: -- Check that withholding_allowances is not null.
784: --
785: if p_withholding_allowances is null then
786: hr_utility.set_message(801,'PAY_72776_CNT_WA_NOT_NULL');
787: hr_utility.raise_error;
788: else
789: --
790: -- Check that withholding_allowances is in a valid range.
791: --
788: else
789: --
790: -- Check that withholding_allowances is in a valid range.
791: --
792: hr_utility.set_location(l_proc, 10);
793: --
794: if p_withholding_allowances < 0 then
795: hr_utility.set_message(801,'PAY_72775_CNT_WA_POSITIVE');
796: hr_utility.raise_error;
791: --
792: hr_utility.set_location(l_proc, 10);
793: --
794: if p_withholding_allowances < 0 then
795: hr_utility.set_message(801,'PAY_72775_CNT_WA_POSITIVE');
796: hr_utility.raise_error;
797: end if;
798: end if;
799: end if;
792: hr_utility.set_location(l_proc, 10);
793: --
794: if p_withholding_allowances < 0 then
795: hr_utility.set_message(801,'PAY_72775_CNT_WA_POSITIVE');
796: hr_utility.raise_error;
797: end if;
798: end if;
799: end if;
800: --
797: end if;
798: end if;
799: end if;
800: --
801: hr_utility.set_location(' Leaving: '||l_proc, 20);
802: end chk_withholding_allowances;
803: --
804: -- ---------------------------------------------------------------------------
805: -- |-------------------------< chk_school_district_code >--------------------|
910: NVL(p_tax_rules_id, ctr.emp_county_tax_rule_id);
911: --
912: begin
913: --
914: hr_utility.set_location('Entering: '|| l_proc, 5);
915: --
916: hr_api.mandatory_arg_error
917: (p_api_name => l_proc
918: ,p_argument => 'state_code'
941: --
942: -- Check school_district_code.
943: --
944: if p_school_district_code is not null then
945: hr_utility.set_location(l_proc, 10);
946: --
947: open csr_school_district_code (p_state_code,
948: p_county_code,
949: p_school_district_code);
967: or (csr_cnt_school_dst_code%found) then
968: close csr_cty_school_dst_code;
969: close csr_cnt_school_dst_code;
970: --
971: hr_utility.set_message(801,'PAY_52240_TAX_SD_CHK');
972: hr_utility.raise_error;
973: --
974: end if;
975: close csr_cty_school_dst_code;
968: close csr_cty_school_dst_code;
969: close csr_cnt_school_dst_code;
970: --
971: hr_utility.set_message(801,'PAY_52240_TAX_SD_CHK');
972: hr_utility.raise_error;
973: --
974: end if;
975: close csr_cty_school_dst_code;
976: close csr_cnt_school_dst_code;
976: close csr_cnt_school_dst_code;
977: else
978: --
979: close csr_school_district_code;
980: hr_utility.set_message(801,'PAY_72772_CNT_SCHL_DST_INVALID');
981: hr_utility.raise_error;
982: end if;
983: end if;
984: end if;
977: else
978: --
979: close csr_school_district_code;
980: hr_utility.set_message(801,'PAY_72772_CNT_SCHL_DST_INVALID');
981: hr_utility.raise_error;
982: end if;
983: end if;
984: end if;
985: hr_utility.set_location(' Leaving: '||l_proc, 15);
981: hr_utility.raise_error;
982: end if;
983: end if;
984: end if;
985: hr_utility.set_location(' Leaving: '||l_proc, 15);
986: end chk_school_district_code;
987: --
988: --
989: -- ---------------------------------------------------------------------------
1020: l_error exception;
1021: l_argument varchar2(30);
1022: --
1023: Begin
1024: hr_utility.set_location('Entering: '||l_proc, 10);
1025: --
1026: --
1027: if not pay_cnt_shd.api_updating
1028: (p_emp_county_tax_rule_id => p_rec.emp_county_tax_rule_id,
1028: (p_emp_county_tax_rule_id => p_rec.emp_county_tax_rule_id,
1029: p_object_version_number => p_rec.object_version_number,
1030: p_effective_date => p_effective_date
1031: ) then
1032: hr_utility.set_message(801,'HR_6153_ALL_PROCEDURE_FAIL');
1033: hr_utility.set_message_token('PROCEDURE', l_proc);
1034: hr_utility.set_message_token('STEP','20');
1035: end if;
1036: hr_utility.set_location(l_proc, 30);
1029: p_object_version_number => p_rec.object_version_number,
1030: p_effective_date => p_effective_date
1031: ) then
1032: hr_utility.set_message(801,'HR_6153_ALL_PROCEDURE_FAIL');
1033: hr_utility.set_message_token('PROCEDURE', l_proc);
1034: hr_utility.set_message_token('STEP','20');
1035: end if;
1036: hr_utility.set_location(l_proc, 30);
1037: --
1030: p_effective_date => p_effective_date
1031: ) then
1032: hr_utility.set_message(801,'HR_6153_ALL_PROCEDURE_FAIL');
1033: hr_utility.set_message_token('PROCEDURE', l_proc);
1034: hr_utility.set_message_token('STEP','20');
1035: end if;
1036: hr_utility.set_location(l_proc, 30);
1037: --
1038: if (nvl(p_rec.business_group_id, hr_api.g_number) <>
1032: hr_utility.set_message(801,'HR_6153_ALL_PROCEDURE_FAIL');
1033: hr_utility.set_message_token('PROCEDURE', l_proc);
1034: hr_utility.set_message_token('STEP','20');
1035: end if;
1036: hr_utility.set_location(l_proc, 30);
1037: --
1038: if (nvl(p_rec.business_group_id, hr_api.g_number) <>
1039: nvl(pay_cnt_shd.g_old_rec.business_group_id, hr_api.g_number)) then
1040: l_argument := 'business_group_id';
1039: nvl(pay_cnt_shd.g_old_rec.business_group_id, hr_api.g_number)) then
1040: l_argument := 'business_group_id';
1041: raise l_error;
1042: end if;
1043: hr_utility.set_location(l_proc, 40);
1044: --
1045: if (nvl(p_rec.assignment_id, hr_api.g_number) <>
1046: pay_cnt_shd.g_old_rec.assignment_id) then
1047: l_argument := 'assignment_id';
1046: pay_cnt_shd.g_old_rec.assignment_id) then
1047: l_argument := 'assignment_id';
1048: raise l_error;
1049: end if;
1050: hr_utility.set_location(l_proc, 50);
1051: --
1052: if (nvl(p_rec.state_code, hr_api.g_varchar2) <>
1053: pay_cnt_shd.g_old_rec.state_code) then
1054: l_argument := 'state_code';
1053: pay_cnt_shd.g_old_rec.state_code) then
1054: l_argument := 'state_code';
1055: raise l_error;
1056: end if;
1057: hr_utility.set_location(l_proc, 60);
1058: --
1059: if (nvl(p_rec.county_code, hr_api.g_varchar2) <>
1060: pay_cnt_shd.g_old_rec.county_code) then
1061: l_argument := 'county_code';
1060: pay_cnt_shd.g_old_rec.county_code) then
1061: l_argument := 'county_code';
1062: raise l_error;
1063: end if;
1064: hr_utility.set_location(l_proc, 70);
1065: --
1066: if (nvl(p_rec.jurisdiction_code, hr_api.g_varchar2) <>
1067: pay_cnt_shd.g_old_rec.jurisdiction_code) then
1068: l_argument := 'jurisdiction_code';
1067: pay_cnt_shd.g_old_rec.jurisdiction_code) then
1068: l_argument := 'jurisdiction_code';
1069: raise l_error;
1070: end if;
1071: hr_utility.set_location('Leaving: '||l_proc, 80);
1072: --
1073: exception
1074: when l_error then
1075: hr_api.argument_changed_error
1206: and cty.county_code = p_county_code
1207: and cty.effective_end_date > p_effective_date;
1208: --
1209: begin
1210: hr_utility.set_location('Entering: '|| l_proc, 5);
1211: --
1212: -- For ZAP mode, all records will be purged. For DELETE mode, records after
1213: -- the effective date will be removed. Check that no payroll has been run
1214: -- for this assignment, state and county after the date from which records
1214: -- for this assignment, state and county after the date from which records
1215: -- are removed.
1216: --
1217: if nvl(p_delete_mode,hr_api.g_varchar2) in ('ZAP','DELETE') then
1218: hr_utility.set_location(l_proc, 10);
1219: if p_delete_mode = hr_api.g_zap then
1220: l_effective_date := trunc(hr_api.g_sot);
1221: else
1222: l_effective_date := trunc(p_effective_date);
1224: open chk_county_payroll(l_effective_date);
1225: fetch chk_county_payroll into l_payroll_exists;
1226: if chk_county_payroll%found then
1227: close chk_county_payroll;
1228: hr_utility.set_message(801,'PAY_52235_TAX_RULE_DELETE');
1229: hr_utility.raise_error;
1230: end if;
1231: close chk_county_payroll;
1232: end if;
1225: fetch chk_county_payroll into l_payroll_exists;
1226: if chk_county_payroll%found then
1227: close chk_county_payroll;
1228: hr_utility.set_message(801,'PAY_52235_TAX_RULE_DELETE');
1229: hr_utility.raise_error;
1230: end if;
1231: close chk_county_payroll;
1232: end if;
1233: --
1237: --
1238: if nvl(p_delete_mode,hr_api.g_varchar2) = 'ZAP'
1239: and nvl(p_delete_routine,hr_api.g_varchar2)
1240: <> 'ASSIGNMENT' then
1241: hr_utility.set_location(l_proc, 15);
1242: open chk_county_work(l_effective_date);
1243: fetch chk_county_work into l_county_work_exists;
1244: if chk_county_work%found then
1245: close chk_county_work;
1242: open chk_county_work(l_effective_date);
1243: fetch chk_county_work into l_county_work_exists;
1244: if chk_county_work%found then
1245: close chk_county_work;
1246: hr_utility.set_message(801,'PAY_52294_TAX_CODEL_LOC');
1247: hr_utility.raise_error;
1248: end if;
1249: close chk_county_work;
1250: --
1243: fetch chk_county_work into l_county_work_exists;
1244: if chk_county_work%found then
1245: close chk_county_work;
1246: hr_utility.set_message(801,'PAY_52294_TAX_CODEL_LOC');
1247: hr_utility.raise_error;
1248: end if;
1249: close chk_county_work;
1250: --
1251: hr_utility.set_location(l_proc, 20);
1247: hr_utility.raise_error;
1248: end if;
1249: close chk_county_work;
1250: --
1251: hr_utility.set_location(l_proc, 20);
1252: open chk_county_residence(l_effective_date);
1253: fetch chk_county_residence into l_county_residence;
1254: if chk_county_residence%found then
1255: close chk_county_residence;
1252: open chk_county_residence(l_effective_date);
1253: fetch chk_county_residence into l_county_residence;
1254: if chk_county_residence%found then
1255: close chk_county_residence;
1256: hr_utility.set_message(801,'PAY_52297_TAX_CODEL_RES');
1257: hr_utility.raise_error;
1258: end if;
1259: close chk_county_residence;
1260: end if;
1253: fetch chk_county_residence into l_county_residence;
1254: if chk_county_residence%found then
1255: close chk_county_residence;
1256: hr_utility.set_message(801,'PAY_52297_TAX_CODEL_RES');
1257: hr_utility.raise_error;
1258: end if;
1259: close chk_county_residence;
1260: end if;
1261: --
1265: --
1266: if nvl(p_delete_mode,hr_api.g_varchar2) <> 'ZAP'
1267: and nvl(p_delete_routine,hr_api.g_varchar2)
1268: <> 'ASSIGNMENT' then
1269: hr_utility.set_message(801,'PAY_52971_TAX_ZAP_ONLY');
1270: hr_utility.raise_error;
1271: end if;
1272: --
1273: -- If any city tax rules exist for this assignment, raise an error.
1266: if nvl(p_delete_mode,hr_api.g_varchar2) <> 'ZAP'
1267: and nvl(p_delete_routine,hr_api.g_varchar2)
1268: <> 'ASSIGNMENT' then
1269: hr_utility.set_message(801,'PAY_52971_TAX_ZAP_ONLY');
1270: hr_utility.raise_error;
1271: end if;
1272: --
1273: -- If any city tax rules exist for this assignment, raise an error.
1274: --
1275: open chk_city_tax_rules;
1276: fetch chk_city_tax_rules into l_city_rule_exists;
1277: if chk_city_tax_rules%found then
1278: close chk_city_tax_rules;
1279: hr_utility.set_message(801,'HR_7215_DT_CHILD_EXISTS');
1280: hr_utility.set_message_token('TABLE_NAME','PAY_US_EMP_CITY_TAX_RULES_F');
1281: hr_utility.raise_error;
1282: end if;
1283: close chk_city_tax_rules;
1276: fetch chk_city_tax_rules into l_city_rule_exists;
1277: if chk_city_tax_rules%found then
1278: close chk_city_tax_rules;
1279: hr_utility.set_message(801,'HR_7215_DT_CHILD_EXISTS');
1280: hr_utility.set_message_token('TABLE_NAME','PAY_US_EMP_CITY_TAX_RULES_F');
1281: hr_utility.raise_error;
1282: end if;
1283: close chk_city_tax_rules;
1284: --
1277: if chk_city_tax_rules%found then
1278: close chk_city_tax_rules;
1279: hr_utility.set_message(801,'HR_7215_DT_CHILD_EXISTS');
1280: hr_utility.set_message_token('TABLE_NAME','PAY_US_EMP_CITY_TAX_RULES_F');
1281: hr_utility.raise_error;
1282: end if;
1283: close chk_city_tax_rules;
1284: --
1285: hr_utility.set_location(' Leaving: '||l_proc, 45);
1281: hr_utility.raise_error;
1282: end if;
1283: close chk_city_tax_rules;
1284: --
1285: hr_utility.set_location(' Leaving: '||l_proc, 45);
1286: end chk_delete;
1287: --
1288: --
1289: -- ----------------------------------------------------------------------------
1325: l_integrity_error Exception;
1326: l_table_name all_tables.table_name%TYPE;
1327: --
1328: Begin
1329: hr_utility.set_location('Entering:'||l_proc, 5);
1330: --
1331: -- Ensure that the p_datetrack_mode argument is not null
1332: --
1333: hr_api.mandatory_arg_error
1355: --
1356: --
1357: End If;
1358: --
1359: hr_utility.set_location(' Leaving:'||l_proc, 10);
1360: Exception
1361: When l_integrity_error Then
1362: --
1363: -- A referential integrity check was violated therefore
1362: --
1363: -- A referential integrity check was violated therefore
1364: -- we must error
1365: --
1366: hr_utility.set_message(801, 'HR_7216_DT_UPD_INTEGRITY_ERR');
1367: hr_utility.set_message_token('TABLE_NAME', l_table_name);
1368: hr_utility.raise_error;
1369: When Others Then
1370: --
1363: -- A referential integrity check was violated therefore
1364: -- we must error
1365: --
1366: hr_utility.set_message(801, 'HR_7216_DT_UPD_INTEGRITY_ERR');
1367: hr_utility.set_message_token('TABLE_NAME', l_table_name);
1368: hr_utility.raise_error;
1369: When Others Then
1370: --
1371: -- An unhandled or unexpected error has occurred which
1364: -- we must error
1365: --
1366: hr_utility.set_message(801, 'HR_7216_DT_UPD_INTEGRITY_ERR');
1367: hr_utility.set_message_token('TABLE_NAME', l_table_name);
1368: hr_utility.raise_error;
1369: When Others Then
1370: --
1371: -- An unhandled or unexpected error has occurred which
1372: -- we must report
1370: --
1371: -- An unhandled or unexpected error has occurred which
1372: -- we must report
1373: --
1374: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
1375: hr_utility.set_message_token('PROCEDURE', l_proc);
1376: hr_utility.set_message_token('STEP','15');
1377: hr_utility.raise_error;
1378: End dt_update_validate;
1371: -- An unhandled or unexpected error has occurred which
1372: -- we must report
1373: --
1374: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
1375: hr_utility.set_message_token('PROCEDURE', l_proc);
1376: hr_utility.set_message_token('STEP','15');
1377: hr_utility.raise_error;
1378: End dt_update_validate;
1379: --
1372: -- we must report
1373: --
1374: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
1375: hr_utility.set_message_token('PROCEDURE', l_proc);
1376: hr_utility.set_message_token('STEP','15');
1377: hr_utility.raise_error;
1378: End dt_update_validate;
1379: --
1380: -- ----------------------------------------------------------------------------
1373: --
1374: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
1375: hr_utility.set_message_token('PROCEDURE', l_proc);
1376: hr_utility.set_message_token('STEP','15');
1377: hr_utility.raise_error;
1378: End dt_update_validate;
1379: --
1380: -- ----------------------------------------------------------------------------
1381: -- |--------------------------< dt_delete_validate >--------------------------|
1422: l_rows_exist Exception;
1423: l_table_name all_tables.table_name%TYPE;
1424: --
1425: Begin
1426: hr_utility.set_location('Entering:'||l_proc, 5);
1427: --
1428: -- Ensure that the p_datetrack_mode argument is not null
1429: --
1430: hr_api.mandatory_arg_error
1459: --
1460: --
1461: End If;
1462: --
1463: hr_utility.set_location(' Leaving:'||l_proc, 10);
1464: Exception
1465: When l_rows_exist Then
1466: --
1467: -- A referential integrity check was violated therefore
1466: --
1467: -- A referential integrity check was violated therefore
1468: -- we must error
1469: --
1470: hr_utility.set_message(801, 'HR_7215_DT_CHILD_EXISTS');
1471: hr_utility.set_message_token('TABLE_NAME', l_table_name);
1472: hr_utility.raise_error;
1473: When Others Then
1474: --
1467: -- A referential integrity check was violated therefore
1468: -- we must error
1469: --
1470: hr_utility.set_message(801, 'HR_7215_DT_CHILD_EXISTS');
1471: hr_utility.set_message_token('TABLE_NAME', l_table_name);
1472: hr_utility.raise_error;
1473: When Others Then
1474: --
1475: -- An unhandled or unexpected error has occurred which
1468: -- we must error
1469: --
1470: hr_utility.set_message(801, 'HR_7215_DT_CHILD_EXISTS');
1471: hr_utility.set_message_token('TABLE_NAME', l_table_name);
1472: hr_utility.raise_error;
1473: When Others Then
1474: --
1475: -- An unhandled or unexpected error has occurred which
1476: -- we must report
1474: --
1475: -- An unhandled or unexpected error has occurred which
1476: -- we must report
1477: --
1478: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
1479: hr_utility.set_message_token('PROCEDURE', l_proc);
1480: hr_utility.set_message_token('STEP','15');
1481: hr_utility.raise_error;
1482: End dt_delete_validate;
1475: -- An unhandled or unexpected error has occurred which
1476: -- we must report
1477: --
1478: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
1479: hr_utility.set_message_token('PROCEDURE', l_proc);
1480: hr_utility.set_message_token('STEP','15');
1481: hr_utility.raise_error;
1482: End dt_delete_validate;
1483: --
1476: -- we must report
1477: --
1478: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
1479: hr_utility.set_message_token('PROCEDURE', l_proc);
1480: hr_utility.set_message_token('STEP','15');
1481: hr_utility.raise_error;
1482: End dt_delete_validate;
1483: --
1484: -- ----------------------------------------------------------------------------
1477: --
1478: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
1479: hr_utility.set_message_token('PROCEDURE', l_proc);
1480: hr_utility.set_message_token('STEP','15');
1481: hr_utility.raise_error;
1482: End dt_delete_validate;
1483: --
1484: -- ----------------------------------------------------------------------------
1485: -- |---------------------------< insert_validate >----------------------------|
1493: --
1494: l_proc varchar2(72) := g_package||'insert_validate';
1495: --
1496: Begin
1497: hr_utility.set_location('Entering:'||l_proc, 5);
1498: --
1499: -- Call all supporting business operations
1500: --
1501: chk_assignment_id
1566: p_object_version_number => p_rec.object_version_number
1567: );
1568: --
1569:
1570: hr_utility.set_location(' Leaving:'||l_proc, 10);
1571: End insert_validate;
1572: --
1573: -- ----------------------------------------------------------------------------
1574: -- |---------------------------< update_validate >----------------------------|
1582: --
1583: l_proc varchar2(72) := g_package||'update_validate';
1584: --
1585: Begin
1586: hr_utility.set_location('Entering:'||l_proc, 5);
1587: --
1588: -- Call all supporting business operations
1589: --
1590: chk_non_updateable_args
1642: p_datetrack_mode => p_datetrack_mode,
1643: p_validation_start_date => p_validation_start_date,
1644: p_validation_end_date => p_validation_end_date);
1645: --
1646: hr_utility.set_location(' Leaving:'||l_proc, 10);
1647: End update_validate;
1648: --
1649: -- ----------------------------------------------------------------------------
1650: -- |---------------------------< delete_validate >----------------------------|
1659: --
1660: l_proc varchar2(72) := g_package||'delete_validate';
1661: --
1662: Begin
1663: hr_utility.set_location('Entering:'||l_proc, 5);
1664: --
1665: -- Call all supporting business operations
1666: --
1667: chk_delete
1677: p_validation_start_date => p_validation_start_date,
1678: p_validation_end_date => p_validation_end_date,
1679: p_emp_county_tax_rule_id => p_rec.emp_county_tax_rule_id);
1680: --
1681: hr_utility.set_location(' Leaving:'||l_proc, 10);
1682: End delete_validate;
1683: --
1684: --
1685: -- ---------------------------------------------------------------------------
1704: l_proc varchar2(72) := g_package||'return_legislation_code';
1705: --
1706: begin
1707: --
1708: hr_utility.set_location('Entering:'|| l_proc, 10);
1709: --
1710: -- Ensure that all the mandatory parameter are not null
1711: --
1712: hr_api.mandatory_arg_error(p_api_name => l_proc,
1719: -- call to this function. Just return the value in the global
1720: -- variable.
1721: --
1722: l_legislation_code := g_legislation_code;
1723: hr_utility.set_location(l_proc, 20);
1724: --
1725: else
1726: --
1727: -- The ID is different to the last call to this function
1736: close csr_leg_code;
1737: --
1738: -- The primary key is invalid therefore we must error
1739: --
1740: hr_utility.set_message(801,'HR_7220_INVALID_PRIMARY_KEY');
1741: hr_utility.raise_error;
1742: --
1743: end if;
1744: hr_utility.set_location(' Leaving:'|| l_proc, 30);
1737: --
1738: -- The primary key is invalid therefore we must error
1739: --
1740: hr_utility.set_message(801,'HR_7220_INVALID_PRIMARY_KEY');
1741: hr_utility.raise_error;
1742: --
1743: end if;
1744: hr_utility.set_location(' Leaving:'|| l_proc, 30);
1745: --
1740: hr_utility.set_message(801,'HR_7220_INVALID_PRIMARY_KEY');
1741: hr_utility.raise_error;
1742: --
1743: end if;
1744: hr_utility.set_location(' Leaving:'|| l_proc, 30);
1745: --
1746: -- Set the global variables to the values are
1747: -- available for the next call to this function
1748: --
1749: close csr_leg_code;
1750: g_cnt_tax_rule_id := p_emp_county_tax_rule_id;
1751: g_legislation_code := l_legislation_code;
1752: end if;
1753: hr_utility.set_location(' Leaving:'|| l_proc, 40);
1754: --
1755: return l_legislation_code;
1756: --
1757: end return_legislation_code;