[Home] [Help]
580: l_returned_warning1 varchar2(240) := NULL;
581:
582: begin
583:
584: l_payroll_installed := hr_utility.chk_product_install(
585: p_product => 'Oracle Payroll',
586: p_legislation => 'US');
587:
588: -- Added for SUI Wage Base enh
604: end if ;
605: */
606: if p_mode = 'DELETE_NEXT_CHANGE' and l_payroll_installed then
607:
608: hr_utility.set_location('pay_us_emp_dt_tax_rules.check_payroll_run - opening cursor ',1);
609: open csr_get_next_locations;
610: fetch csr_get_next_locations into l_location_id;
611:
612: if csr_get_next_locations%NOTFOUND then
625: end if; /* end checking of DELETE_NEXT_CHANGE */
626:
627: if p_mode = 'FUTURE_CHANGE' and l_payroll_installed then
628:
629: hr_utility.set_location('pay_us_emp_dt_tax_rules.check_payroll_run - opening cursor ',2);
630: open csr_get_next_locations;
631: loop
632: check_payroll_enabled := 1;
633: fetch csr_get_next_locations into l_location_id;
649:
650: /* Payroll Run will be checked only if Payroll is installed and legislation is US */
651:
652: if l_payroll_installed then
653: hr_utility.set_location('pay_us_emp_dt_tax_rules.check_payroll_run - opening cursor csr_loc_change',3);
654: open csr_chk_loc_change;
655: hr_utility.set_location('pay_us_emp_dt_tax_rules.check_payroll_run - opening cursor',4);
656: fetch csr_chk_loc_change into l_location_id;
657:
651:
652: if l_payroll_installed then
653: hr_utility.set_location('pay_us_emp_dt_tax_rules.check_payroll_run - opening cursor csr_loc_change',3);
654: open csr_chk_loc_change;
655: hr_utility.set_location('pay_us_emp_dt_tax_rules.check_payroll_run - opening cursor',4);
656: fetch csr_chk_loc_change into l_location_id;
657:
658: if csr_chk_loc_change%FOUND then
659:
662: exist at all or not. This is needed to be done because a default
663: location is assigned to the assignment that is created for a new
664: person */
665:
666: -- hr_utility.set_location('pay_us_emp_tax_rules.check_payroll_run...location changed',31) ;
667: -- This is being added as part of SUI Wage Base Override enh
668: -- Turning Off SUI Wage Base Override Functionality due to Bug# 5486281
669: /*
670: if l_work_state_code <> l_new_work_state_code then
690: /* in any of the next records user will get an error */
691: /* and there is no need to check for the payroll run */
692:
693: open csr_chk_payroll;
694: hr_utility.set_location('pay_us_emp_dt_tax_rules.check_payroll_run - fetching cursor',4);
695: fetch csr_chk_payroll into l_code;
696:
697: if csr_chk_payroll%FOUND then
698: hr_utility.set_location('pay_us_emp_tax_rules.check_payroll_run - payroll found',5);
694: hr_utility.set_location('pay_us_emp_dt_tax_rules.check_payroll_run - fetching cursor',4);
695: fetch csr_chk_payroll into l_code;
696:
697: if csr_chk_payroll%FOUND then
698: hr_utility.set_location('pay_us_emp_tax_rules.check_payroll_run - payroll found',5);
699: fnd_message.set_name ('PAY', 'PAY_52232_TAX_LOC_CHNG');
700: l_returned_warning := fnd_message.get;
701: close csr_chk_payroll;
702: else
699: fnd_message.set_name ('PAY', 'PAY_52232_TAX_LOC_CHNG');
700: l_returned_warning := fnd_message.get;
701: close csr_chk_payroll;
702: else
703: hr_utility.set_location('pay_us_emp_tax_rules.check_payroll_run - No payroll run',6);
704: fnd_message.set_name ('PAY', 'PAY_52233_TAX_LOC_CHNG_OVRD');
705: l_returned_warning := fnd_message.get;
706: close csr_chk_payroll;
707: end if; /* End csr_chk_payroll%found */
710: l_location_id_changed := 0;
711: end if; /* End l_location_id <> p_new_location_id */
712: end if; /* Federal record found */
713: end if; /* End csr_chk_loc_change%NOTFOUND */
714: end if; /* hr_utility.chk_product_install */
715:
716: return l_returned_warning1 || l_returned_warning;
717:
718: end check_payroll_run;
880: fetch csr_check_state into l_code;
881:
882: if csr_check_state%FOUND then
883:
884: hr_utility.set_location(
885: 'pay_us_emp_tax_rules.check_in_work_location' ||
886: ' - found work location',1);
887: p_ret_code := 1;
888: p_ret_text := 'State assigned to work location';
890:
891: open csr_check_ovrd_state;
892: fetch csr_check_ovrd_state into l_code;
893: if csr_check_ovrd_state%FOUND then
894: hr_utility.set_location(
895: 'pay_us_emp_tax_rules.check_in_work_location' ||
896: ' - found taxation location',1);
897: p_ret_code := 2;
898: p_ret_text := 'State assigned to taxation location';
896: ' - found taxation location',1);
897: p_ret_code := 2;
898: p_ret_text := 'State assigned to taxation location';
899: else
900: hr_utility.set_location(
901: 'pay_us_emp_tax_rules.check_in_work_location' ||
902: ' - not in work or taxation location',1);
903: p_ret_code := 0;
904: p_ret_text := 'State not assigned to work or taxation location';
921: fetch csr_check_county into l_code;
922:
923: if csr_check_county%FOUND then
924:
925: hr_utility.set_location(
926: 'pay_us_emp_tax_rules.check_in_work_location' ||
927: ' - found work location',2);
928: p_ret_code := 1;
929: p_ret_text := 'County assigned to work location';
933: fetch csr_check_ovrd_county into l_code;
934:
935: if csr_check_ovrd_county%FOUND then
936:
937: hr_utility.set_location(
938: 'pay_us_emp_tax_rules.check_in_work_location' ||
939: ' - found taxation location',2);
940: p_ret_code := 2;
941: p_ret_text := 'County assigned to taxation location';
941: p_ret_text := 'County assigned to taxation location';
942:
943: else
944:
945: hr_utility.set_location(
946: 'pay_us_emp_tax_rules.check_in_work_location' ||
947: ' - not in work location',2);
948: p_ret_code := 0;
949: p_ret_text := 'County not assigned to work or taxation location';
966: fetch csr_check_city into l_code;
967:
968: if csr_check_city%FOUND then
969:
970: hr_utility.set_location(
971: 'pay_us_emp_tax_rules.check_in_work_location' ||
972: ' - found work location',3);
973: p_ret_code := 1;
974: p_ret_text := 'City assigned to work location';
980: fetch csr_check_ovrd_city into l_code;
981:
982: if csr_check_ovrd_city%FOUND then
983:
984: hr_utility.set_location(
985: 'pay_us_emp_tax_rules.check_in_work_location' ||
986: ' - found taxationk location',3);
987: p_ret_code := 2;
988: p_ret_text := 'City assigned to taxation location';
987: p_ret_code := 2;
988: p_ret_text := 'City assigned to taxation location';
989:
990: else
991: hr_utility.set_location(
992: 'pay_us_emp_tax_rules.check_in_work_location' ||
993: ' - not in work location',7);
994: p_ret_code := 0;
995: p_ret_text := 'City not assigned to work or taxation location';
1104: then
1105:
1106: /* Check if the state has been assigned to the resident addr.*/
1107:
1108: hr_utility.set_location(
1109: 'pay_us_emp_tax_rules.check_in_res_addr'||
1110: ' - opening cursor',1);
1111:
1112: open csr_check_state;
1110: ' - opening cursor',1);
1111:
1112: open csr_check_state;
1113:
1114: hr_utility.set_location(
1115: 'pay_us_emp_tax_rules.check_in_res_addr'||
1116: ' - fetching cursor',2);
1117:
1118: fetch csr_check_state into l_code;
1118: fetch csr_check_state into l_code;
1119:
1120: if csr_check_state%FOUND then
1121:
1122: hr_utility.set_location(
1123: 'pay_us_emp_tax_rules.check_in_res_addr' ||
1124: ' - found work location',3);
1125:
1126: p_ret_code := 1;
1127: p_ret_text := 'State assigned to resident address.';
1128:
1129: else
1130:
1131: hr_utility.set_location(
1132: 'pay_us_emp_tax_rules.check_in_res_addr'||
1133: ' - did not find work location',4);
1134:
1135: p_ret_code := 0;
1144: then
1145:
1146: /* Check if the county has been assigned to resident addr. */
1147:
1148: hr_utility.set_location(
1149: 'pay_us_emp_tax_rules.check_in_res_addr'||
1150: ' - opening cursor',5);
1151:
1152: open csr_check_county;
1150: ' - opening cursor',5);
1151:
1152: open csr_check_county;
1153:
1154: hr_utility.set_location(
1155: 'pay_us_emp_tax_rules.check_in_res_addr'||
1156: ' - fetching cursor',6);
1157:
1158: fetch csr_check_county into l_code;
1158: fetch csr_check_county into l_code;
1159:
1160: if csr_check_county%FOUND then
1161:
1162: hr_utility.set_location(
1163: 'pay_us_emp_tax_rules.check_in_res_addr' ||
1164: ' - found work location',7);
1165:
1166: p_ret_code := 1;
1167: p_ret_text := 'County assigned to resident address.';
1168:
1169: else
1170:
1171: hr_utility.set_location(
1172: 'pay_us_emp_tax_rules.check_in_res_addr'||
1173: ' - did not find work location',8);
1174:
1175: p_ret_code := 0;
1184: then
1185:
1186: /* Check if the city has been assigned to resident addr. */
1187:
1188: hr_utility.set_location(
1189: 'pay_us_emp_tax_rules.check_in_res_addr'||
1190: ' - opening cursor',9);
1191:
1192: open csr_check_city;
1190: ' - opening cursor',9);
1191:
1192: open csr_check_city;
1193:
1194: hr_utility.set_location(
1195: 'pay_us_emp_tax_rules.check_in_res_addr'||
1196: ' - fetching cursor',10);
1197:
1198: fetch csr_check_city into l_code;
1197:
1198: fetch csr_check_city into l_code;
1199:
1200: if csr_check_city%FOUND then
1201: hr_utility.set_location(
1202: 'pay_us_emp_tax_rules.check_in_res_addr' ||
1203: ' - found work location',11);
1204:
1205: p_ret_code := 1;
1206: p_ret_text := 'City assigned to resident address.';
1207:
1208: else
1209:
1210: hr_utility.set_location(
1211: 'pay_us_emp_tax_rules.check_in_res_addr'||
1212: ' - did not find work location',12);
1213:
1214: p_ret_code := 0;
1353: then
1354:
1355: /* Check if payroll has been run the state tax rule record */
1356:
1357: hr_utility.set_location(
1358: 'pay_us_emp_tax_rules.payroll_check_for_purge'||
1359: ' - opening cursor',1);
1360:
1361: open csr_check_state_purge;
1359: ' - opening cursor',1);
1360:
1361: open csr_check_state_purge;
1362:
1363: hr_utility.set_location(
1364: 'pay_us_emp_tax_rules.payroll_check_for_purge'||
1365: ' - fetching cursor',2);
1366:
1367: fetch csr_check_state_purge into l_code;
1367: fetch csr_check_state_purge into l_code;
1368:
1369: if csr_check_state_purge%FOUND then
1370:
1371: hr_utility.set_location(
1372: 'pay_us_emp_tax_rules.payroll_check_for_purge' ||
1373: ' - found work location',3);
1374:
1375: p_ret_code := 1;
1376: p_ret_text := 'Payroll has been run for the state.';
1377:
1378: else
1379:
1380: hr_utility.set_location(
1381: 'pay_us_emp_tax_rules.payroll_check_for_purge'||
1382: ' - did not find work location',4);
1383:
1384: p_ret_code := 0;
1393: then
1394:
1395: /* Check if the county has been assigned to the work location */
1396:
1397: hr_utility.set_location(
1398: 'pay_us_emp_tax_rules.payroll_check_for_purge'||
1399: ' - opening cursor',5);
1400:
1401: open csr_check_county_purge;
1399: ' - opening cursor',5);
1400:
1401: open csr_check_county_purge;
1402:
1403: hr_utility.set_location(
1404: 'pay_us_emp_tax_rules.payroll_check_for_purge'||
1405: ' - fetching cursor',6);
1406:
1407: fetch csr_check_county_purge into l_code;
1407: fetch csr_check_county_purge into l_code;
1408:
1409: if csr_check_county_purge%FOUND then
1410:
1411: hr_utility.set_location(
1412: 'pay_us_emp_tax_rules.payroll_check_for_purge' ||
1413: ' - found work location',7);
1414:
1415: p_ret_code := 1;
1416: p_ret_text := 'Payroll has been run for the county.';
1417:
1418: else
1419:
1420: hr_utility.set_location(
1421: 'pay_us_emp_tax_rules.payroll_check_for_purge'||
1422: ' - did not find work location',8);
1423:
1424: p_ret_code := 0;
1433: then
1434:
1435: /* Check if the city has been assigned to the work location */
1436:
1437: hr_utility.set_location(
1438: 'pay_us_emp_tax_rules.payroll_check_for_purge'||
1439: ' - opening cursor',9);
1440:
1441: open csr_check_city_purge;
1439: ' - opening cursor',9);
1440:
1441: open csr_check_city_purge;
1442:
1443: hr_utility.set_location(
1444: 'pay_us_emp_tax_rules.payroll_check_for_purge'||
1445: ' - fetching cursor',10);
1446:
1447: fetch csr_check_city_purge into l_code;
1447: fetch csr_check_city_purge into l_code;
1448:
1449: if csr_check_city_purge%FOUND then
1450:
1451: hr_utility.set_location(
1452: 'pay_us_emp_tax_rules.payroll_check_for_purge' ||
1453: ' - found work location',11);
1454:
1455: p_ret_code := 1;
1456: p_ret_text := 'Payroll has been run for the city.';
1457:
1458: else
1459:
1460: hr_utility.set_location(
1461: 'pay_us_emp_tax_rules.payroll_check_for_purge'||
1462: ' - did not find work location',12);
1463:
1464: p_ret_code := 0;
1648: and puci.city_name = nvl(pa.add_information18,pa.town_or_city);
1649:
1650: begin
1651:
1652: hr_utility.set_location('pay_us_emp_dt_tax_rules.get_res_work',1);
1653:
1654: /* Get the resident address details */
1655:
1656: open csr_get_res;
1672: p_res_city_name := null;
1673:
1674: end if;
1675:
1676: hr_utility.set_location('pay_us_emp_dt_tax_rules.get_res_work',2);
1677:
1678: close csr_get_res;
1679:
1680: end get_res_codes;
1723: and puci.city_name = nvl(hrl.loc_information18,hrl.town_or_city);
1724:
1725: begin
1726:
1727: hr_utility.set_location('pay_us_emp_dt_tax_rules.get_work_codes',1);
1728:
1729: /* Get the work location details */
1730:
1731: open csr_get_work;
1747: p_work_city_name := null;
1748:
1749: end if;
1750:
1751: hr_utility.set_location('pay_us_emp_dt_tax_rules.get_work_codes',3);
1752:
1753: close csr_get_work;
1754:
1755: end get_work_codes;
1856: begin
1857:
1858: /* Check if payroll has been installed or not */
1859:
1860: l_payroll_installed := hr_utility.chk_product_install(p_product =>'Oracle Payroll',
1861: p_legislation => 'US');
1862:
1863: /* Check if the state/county/city has been assigned to a
1864: work location */
2102: l_ovrd_location_id number;
2103:
2104: begin
2105:
2106: hr_utility.set_location('pay_us_emp_dt_tax_rules.get_work_codes',1);
2107: /* Primary Work Address */
2108: p_work_state_code := null;
2109: p_work_county_code := null;
2110: p_work_city_code := null;
2233:
2234: end if; /* Assignment Record Found */
2235: close csr_get_asgn_locations;
2236:
2237: hr_utility.set_location('pay_us_emp_dt_tax_rules.get_work_codes',3);
2238: if p_work3_state_code is not null then
2239: p_sui_state_code := p_work3_state_code;
2240: elsif p_work2_state_code is not null then
2241: p_sui_state_code := p_work2_state_code;
2244: elsif p_work_state_code is not null then
2245: p_sui_state_code := p_work_state_code;
2246: end if;
2247:
2248: hr_utility.set_location('pay_us_emp_dt_tax_rules.get_work_codes',4);
2249:
2250: if p_work3_city_code is not null then
2251: p_loc_city := p_work3_state_code || '-' || p_work3_county_code || '-'||p_work3_city_code;
2252: elsif p_work2_city_code is not null then
2256: elsif p_work_city_code is not null then
2257: p_loc_city := p_work_state_code || '-' || p_work_county_code || '-'||p_work_city_code;
2258: end if;
2259:
2260: hr_utility.set_location('pay_us_emp_dt_tax_rules.get_work_codes',5);
2261: end get_all_work_codes;
2262:
2263: procedure get_orig_res_codes (p_assignment_id in number,
2264: p_session_date in date,
2297: and puci.city_name = pa.town_or_city;
2298:
2299: begin
2300:
2301: hr_utility.set_location('pay_us_emp_dt_tax_rules.get_orig_res_codes',1);
2302:
2303: /* Get the resident address details */
2304:
2305: open csr_get_res;
2321: p_res_city_name := null;
2322:
2323: end if;
2324:
2325: hr_utility.set_location('pay_us_emp_dt_tax_rules.get_orig_res_codes',2);
2326:
2327: close csr_get_res;
2328:
2329: end get_orig_res_codes;