648: if get_payroll_id_csr%NOTFOUND then
649: FND_MESSAGE.SET_NAME('PSP','PSP_INVALID_PERIOD');
650: fnd_msg_pub.add;
651: close get_payroll_id_csr;
652: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
653: end if;
654:
655: close get_payroll_id_csr ;
656:
667: if l_record_count > 1 then
668: FND_MESSAGE.SET_NAME('PSP','PSP_INVALID_NO_OF_BOOKS');
669: fnd_msg_pub.add;
670: close get_set_of_books_csr;
671: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
672: end if;
673: end loop;
674: close get_set_of_books_csr;
675:
678: if get_set_of_books_csr%NOTFOUND then
679: FND_MESSAGE.SET_NAME('PSP','PSP_NO_SET_OF_BOOKS');
680: fnd_msg_pub.add;
681: close get_set_of_books_csr;
682: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
683: elsif NVL(l_resp_set_of_books_id, 0) = 0 then
684: FND_MESSAGE.SET_NAME('PSP','PSP_PI_NO_SOB_FOR_PAYROLL');
685: fnd_msg_pub.add;
686: close get_set_of_books_csr;
683: elsif NVL(l_resp_set_of_books_id, 0) = 0 then
684: FND_MESSAGE.SET_NAME('PSP','PSP_PI_NO_SOB_FOR_PAYROLL');
685: fnd_msg_pub.add;
686: close get_set_of_books_csr;
687: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
688: end if;
689:
690: close get_set_of_books_csr;
691: End of comment for bug fix 3098050 *****/
736:
737: IF (l_column_count > 1) AND (l_column_count < 4) THEN
738: fnd_message.set_name('PSP', 'PSP_EE_INCOMPLETE_CI');
739: fnd_msg_pub.add;
740: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
741: END IF;
742:
743:
744: -- Introduced the following for bug fix 2916848
768: if get_clearing_account_csr%NOTFOUND or l_clearing_account = 0 then
769: FND_MESSAGE.SET_NAME('PSP','PSP_NO_CLEARING_ACCOUNT');
770: fnd_msg_pub.add;
771: close get_clearing_account_csr;
772: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
773: end if;
774: close get_clearing_account_csr;
775:
776: fnd_file.put_line(fnd_file.log, fnd_date.date_to_canonical(SYSDATE) || ' l_clearing_account ='||l_clearing_account );
1044: fnd_message.set_token('TABLE', l_table);
1045: fnd_message.set_token('BATCH_NAME', NULL);
1046: fnd_message.set_token('PERSON_NAME', l_employee_name);
1047: fnd_msg_pub.add;
1048: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1049: END IF;
1050: CLOSE exp_org_cur;
1051:
1052: OPEN project_id_cur;
1064: fnd_message.set_token('TABLE',l_table);
1065: fnd_message.set_token('BATCH_NAME', NULL);
1066: fnd_message.set_token('PERSON_NAME', l_employee_name);
1067: fnd_msg_pub.add;
1068: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1069: END IF;
1070: CLOSE project_id_cur;
1071:
1072: OPEN org_id_cur;
1084: fnd_message.set_token('TABLE',l_table);
1085: fnd_message.set_token('BATCH_NAME', NULL);
1086: fnd_message.set_token('PERSON_NAME', l_employee_name);
1087: fnd_msg_pub.add;
1088: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1089: END IF;
1090: CLOSE org_id_cur;
1091:
1092: OPEN task_id_cur;
1104: fnd_message.set_token('TABLE',l_table);
1105: fnd_message.set_token('BATCH_NAME', NULL);
1106: fnd_message.set_token('PERSON_NAME', l_employee_name);
1107: fnd_msg_pub.add;
1108: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1109: END IF;
1110: CLOSE task_id_cur;
1111:
1112: IF (l_or_award_id IS NOT NULL) THEN
1125: fnd_message.set_token('TABLE',l_table);
1126: fnd_message.set_token('BATCH_NAME', NULL);
1127: fnd_message.set_token('PERSON_NAME', l_employee_name);
1128: fnd_msg_pub.add;
1129: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1130: END IF;
1131: CLOSE award_id_cur;
1132: END IF;
1133:
1146: fnd_message.set_token('TABLE',l_table);
1147: fnd_message.set_token('BATCH_NAME', NULL);
1148: fnd_message.set_token('PERSON_NAME', l_employee_name);
1149: fnd_msg_pub.add;
1150: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1151: END IF;
1152: CLOSE expenditure_type_cur;
1153: END IF;
1154:
1177:
1178: hr_utility.trace(' UPDATE_WCAL_ASG_END_DATE');
1179: UPDATE_WCAL_ASG_END_DATE(X_ASSIGNMENT_ID => l_assignment_id,
1180: X_RETURN_STATUS => l_return_status);
1181: if l_return_status <> FND_API.G_RET_STS_SUCCESS then
1182: l_error_api_name := 'UPDATE_WCAL_ASG_END_DATE : ';
1183: raise FND_API.G_EXC_UNEXPECTED_ERROR;
1184: end if;
1185:
1179: UPDATE_WCAL_ASG_END_DATE(X_ASSIGNMENT_ID => l_assignment_id,
1180: X_RETURN_STATUS => l_return_status);
1181: if l_return_status <> FND_API.G_RET_STS_SUCCESS then
1182: l_error_api_name := 'UPDATE_WCAL_ASG_END_DATE : ';
1183: raise FND_API.G_EXC_UNEXPECTED_ERROR;
1184: end if;
1185:
1186: hr_utility.trace(' UPDATE_WCAL_ASG_BEGIN_DATE');
1187: UPDATE_WCAL_ASG_BEGIN_DATE(X_ASSIGNMENT_ID => l_assignment_id,
1185:
1186: hr_utility.trace(' UPDATE_WCAL_ASG_BEGIN_DATE');
1187: UPDATE_WCAL_ASG_BEGIN_DATE(X_ASSIGNMENT_ID => l_assignment_id,
1188: X_RETURN_STATUS => l_return_status);
1189: if l_return_status <> FND_API.G_RET_STS_SUCCESS then
1190: l_error_api_name := 'UPDATE_WCAL_ASG_BEGIN_DATE : ';
1191: raise FND_API.G_EXC_UNEXPECTED_ERROR;
1192: end if;
1193:
1187: UPDATE_WCAL_ASG_BEGIN_DATE(X_ASSIGNMENT_ID => l_assignment_id,
1188: X_RETURN_STATUS => l_return_status);
1189: if l_return_status <> FND_API.G_RET_STS_SUCCESS then
1190: l_error_api_name := 'UPDATE_WCAL_ASG_BEGIN_DATE : ';
1191: raise FND_API.G_EXC_UNEXPECTED_ERROR;
1192: end if;
1193:
1194: -- This procedure looks into per_assignments_f for assignment
1195: -- status. If the assignment status is 'Suspend' or 'Terminate' for any of the days
1197:
1198: hr_utility.trace(' UPDATE_WCAL_ASG_STATUS');
1199: UPDATE_WCAL_ASG_STATUS(X_ASSIGNMENT_ID => l_assignment_id,
1200: X_RETURN_STATUS => l_return_status);
1201: if l_return_status <> FND_API.G_RET_STS_SUCCESS then
1202: l_error_api_name := 'UPDATE_WCAL_ASG_STATUS : ';
1203: raise FND_API.G_EXC_UNEXPECTED_ERROR;
1204: end if;
1205: hr_utility.trace(' AFTER UPDATE_WCAL_ASG_STATUS');
1199: UPDATE_WCAL_ASG_STATUS(X_ASSIGNMENT_ID => l_assignment_id,
1200: X_RETURN_STATUS => l_return_status);
1201: if l_return_status <> FND_API.G_RET_STS_SUCCESS then
1202: l_error_api_name := 'UPDATE_WCAL_ASG_STATUS : ';
1203: raise FND_API.G_EXC_UNEXPECTED_ERROR;
1204: end if;
1205: hr_utility.trace(' AFTER UPDATE_WCAL_ASG_STATUS');
1206: begin
1207: l_export_id := null;
1241: x_start_date => TRUNC(g_start_date), --Bug 6046087
1242: x_end_date => TRUNC(g_end_date), --Bug 6046087
1243: X_RETURN_STATUS => l_return_status);
1244:
1245: if l_return_status <> FND_API.G_RET_STS_SUCCESS then
1246: l_error_api_name := 'CHECK_ZERO_WORK_DAYS : ';
1247: RAISE ZERO_WORK_DAYS;
1248: end if;
1249: /*END IF;*/
1397: l_error_api_name := 'GET_GL_CCID : ';
1398: fnd_message.set_name('PSP','PSP_NO_GL_FOR_COSTING');
1399: fnd_message.set_token('COST_ID', g_pay_costs_rec.cost_allocation_keyflex_id);
1400: fnd_msg_pub.add;
1401: raise FND_API.G_EXC_UNEXPECTED_ERROR;
1402: ELSIF l_gl_ccid <> l_clearing_account then
1403: l_gl_value := psp_general.get_gl_values(l_resp_set_of_books_id, l_gl_ccid);
1404: l_clearing_account_value := psp_general.get_gl_values(l_resp_set_of_books_id, l_clearing_account);
1405: l_error_api_name := 'GET_GL_CCID : ';
1407: fnd_message.set_token('GL_ACCOUNT', l_gl_value);
1408: fnd_message.set_token('CLEARING', l_clearing_account_value);
1409: fnd_msg_pub.add;
1410: hr_utility.trace(' fail kff ='|| g_pay_costs_rec.cost_allocation_keyflex_id);
1411: raise FND_API.G_EXC_UNEXPECTED_ERROR;
1412: END IF;
1413: hr_utility.trace(' pass kff ='|| g_pay_costs_rec.cost_allocation_keyflex_id);
1414:
1415: SELECT PSP_PAYROLL_LINES_S.NEXTVAL into l_line_id
1529: CREATE_SLINE_TERM_EMP( X_PAYROLL_LINE_ID => l_line_id,
1530: X_REASON => l_reason,
1531: X_RETURN_STATUS => l_return_status);
1532:
1533: IF l_return_status <> FND_API.G_RET_STS_SUCCESS then
1534: l_error_api_name := 'CREATE_SLINE_TERM_EMP'||' '||l_reason;
1535: Raise FND_API.G_EXC_UNEXPECTED_ERROR;
1536: END IF;
1537:
1531: X_RETURN_STATUS => l_return_status);
1532:
1533: IF l_return_status <> FND_API.G_RET_STS_SUCCESS then
1534: l_error_api_name := 'CREATE_SLINE_TERM_EMP'||' '||l_reason;
1535: Raise FND_API.G_EXC_UNEXPECTED_ERROR;
1536: END IF;
1537:
1538: ELSE
1539: ---End of changes made for Non active assignments: Done as part of Bug 1994421 -Zero Work Days Build -lveerubh
1579: X_ASSIGNMENT_ID => l_assignment_id,
1580: X_time_period_id => p_time_period_id,
1581: X_ELEMENT_TYPE_ID => g_pay_costs_rec.element_type_id,
1582: X_RETURN_STATUS => l_return_status);
1583: IF l_return_status <> FND_API.G_RET_STS_SUCCESS then
1584: l_error_api_name := 'CREATE_DAILY_RATE_CALENDAR : ';
1585: raise FND_API.G_EXC_UNEXPECTED_ERROR;
1586: END IF;
1587:
1581: X_ELEMENT_TYPE_ID => g_pay_costs_rec.element_type_id,
1582: X_RETURN_STATUS => l_return_status);
1583: IF l_return_status <> FND_API.G_RET_STS_SUCCESS then
1584: l_error_api_name := 'CREATE_DAILY_RATE_CALENDAR : ';
1585: raise FND_API.G_EXC_UNEXPECTED_ERROR;
1586: END IF;
1587:
1588:
1589: -- Sum up the salary from daily calendar array
1592:
1593: CALCULATE_BALANCE_AMOUNT(X_PAY_AMOUNT => g_pay_costs_rec.costed_value,
1594: X_BALANCE_AMOUNT => l_balance_amount,
1595: X_RETURN_STATUS => l_return_status);
1596: if l_return_status <> FND_API.G_RET_STS_SUCCESS then
1597: l_error_api_name := 'CREATE_BALANCE_AMOUNT : ';
1598: --dbms_output.PUT_LINE('...CREATE_BALANCE_AMOUNT :');
1599: raise FND_API.G_EXC_UNEXPECTED_ERROR;
1600: end if;
1595: X_RETURN_STATUS => l_return_status);
1596: if l_return_status <> FND_API.G_RET_STS_SUCCESS then
1597: l_error_api_name := 'CREATE_BALANCE_AMOUNT : ';
1598: --dbms_output.PUT_LINE('...CREATE_BALANCE_AMOUNT :');
1599: raise FND_API.G_EXC_UNEXPECTED_ERROR;
1600: end if;
1601:
1602: /* commented for 4897071
1603: -- Introduced the following for bug fix 2916848
1608: p_pay_amount => g_pay_costs_rec.costed_value,
1609: p_payroll_line_id => l_line_id,
1610: p_balance_amount => l_balance_amount,
1611: p_return_status => l_return_status);
1612: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1613: l_error_api_name := 'CREATE_PRORATE_CALENDAR : ';
1614: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1615: END IF;
1616:
1610: p_balance_amount => l_balance_amount,
1611: p_return_status => l_return_status);
1612: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1613: l_error_api_name := 'CREATE_PRORATE_CALENDAR : ';
1614: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1615: END IF;
1616:
1617:
1618: END IF;
1658: x_end_date => TRUNC(g_end_date), -- Bug 6046087
1659: X_RETURN_STATUS => l_return_status);
1660:
1661:
1662: IF l_return_status <> FND_API.G_RET_STS_SUCCESS then
1663: l_error_api_name := 'CREATE_SLINE_SALARY_CHANGE : ';
1664: raise FND_API.G_EXC_UNEXPECTED_ERROR;
1665: END IF;
1666:
1660:
1661:
1662: IF l_return_status <> FND_API.G_RET_STS_SUCCESS then
1663: l_error_api_name := 'CREATE_SLINE_SALARY_CHANGE : ';
1664: raise FND_API.G_EXC_UNEXPECTED_ERROR;
1665: END IF;
1666:
1667: ----END IF; -- Introduced for bug fix 2916848
1668:
1675:
1676: CREATE_SLINE_ASG_CHANGE (X_PAYROLL_LINE_ID => l_line_id,
1677: X_ASSIGNMENT_ID => l_assignment_id,
1678: X_RETURN_STATUS => l_return_status);
1679: if l_return_status <> FND_API.G_RET_STS_SUCCESS then
1680: l_error_api_name := 'CREATE_SLINE_ASG_CHANGE : ';
1681: ----dbms_output.PUT_LINE('...CREATE_SLINE_ASG_CHANGE :');
1682: raise FND_API.G_EXC_UNEXPECTED_ERROR;
1683: end if;
1678: X_RETURN_STATUS => l_return_status);
1679: if l_return_status <> FND_API.G_RET_STS_SUCCESS then
1680: l_error_api_name := 'CREATE_SLINE_ASG_CHANGE : ';
1681: ----dbms_output.PUT_LINE('...CREATE_SLINE_ASG_CHANGE :');
1682: raise FND_API.G_EXC_UNEXPECTED_ERROR;
1683: end if;
1684:
1685:
1686: -- Looks in to per_assignments_f for assignment statuses either
1691: CREATE_SLINE_ASG_STATUS_CHANGE (X_PAYROLL_LINE_ID => l_line_id,
1692: X_ASSIGNMENT_ID => l_assignment_id,
1693: X_BALANCE_AMOUNT => l_balance_amount,
1694: X_RETURN_STATUS => l_return_status);
1695: if l_return_status <> FND_API.G_RET_STS_SUCCESS then
1696: l_error_api_name := 'CREATE_SLINE_ASG_STATUS_CHANGE : ';
1697: ----dbms_output.PUT_LINE('...CREATE_SLINE_ASG_STATUS_CHANGE :');
1698: raise FND_API.G_EXC_UNEXPECTED_ERROR;
1699: end if;
1694: X_RETURN_STATUS => l_return_status);
1695: if l_return_status <> FND_API.G_RET_STS_SUCCESS then
1696: l_error_api_name := 'CREATE_SLINE_ASG_STATUS_CHANGE : ';
1697: ----dbms_output.PUT_LINE('...CREATE_SLINE_ASG_STATUS_CHANGE :');
1698: raise FND_API.G_EXC_UNEXPECTED_ERROR;
1699: end if;
1700:
1701:
1702: -- Looks into per_periods_of_service for ending employment.
1705:
1706: CREATE_SLINE_EMP_END_DATE(X_PAYROLL_LINE_ID => l_line_id,
1707: X_PERSON_ID => l_person_id,
1708: X_RETURN_STATUS => l_return_status);
1709: if l_return_status <> FND_API.G_RET_STS_SUCCESS then
1710: l_error_api_name := 'CREATE_SLINE_EMP_END_DATE : ';
1711: ----dbms_output.PUT_LINE('...CREATE_SLINE_EMP_END_DATE :');
1712: raise FND_API.G_EXC_UNEXPECTED_ERROR;
1713: end if;
1708: X_RETURN_STATUS => l_return_status);
1709: if l_return_status <> FND_API.G_RET_STS_SUCCESS then
1710: l_error_api_name := 'CREATE_SLINE_EMP_END_DATE : ';
1711: ----dbms_output.PUT_LINE('...CREATE_SLINE_EMP_END_DATE :');
1712: raise FND_API.G_EXC_UNEXPECTED_ERROR;
1713: end if;
1714:
1715: -- Looks into per_assignments_f for Organization change during the pay period.
1716: -- If found split the sub-line into two sub-lines and delete the existing sub-line.
1718: CREATE_SLINE_ORG_CHANGE(X_PAYROLL_LINE_ID => l_line_id,
1719: X_ASSIGNMENT_ID => l_assignment_id,
1720: X_BALANCE_AMOUNT => l_balance_amount,
1721: X_RETURN_STATUS => l_return_status);
1722: if l_return_status <> FND_API.G_RET_STS_SUCCESS then
1723: l_error_api_name := 'CREATE_SLINE_ORG_CHANGE : ';
1724: ----dbms_output.PUT_LINE('...CREATE_SLINE_ORG_CHANGE :');
1725: raise FND_API.G_EXC_UNEXPECTED_ERROR;
1726: end if;
1721: X_RETURN_STATUS => l_return_status);
1722: if l_return_status <> FND_API.G_RET_STS_SUCCESS then
1723: l_error_api_name := 'CREATE_SLINE_ORG_CHANGE : ';
1724: ----dbms_output.PUT_LINE('...CREATE_SLINE_ORG_CHANGE :');
1725: raise FND_API.G_EXC_UNEXPECTED_ERROR;
1726: end if;
1727:
1728:
1729: -- Looks into per_assignments_f for Job change during the pay period.
1734: X_ASSIGNMENT_ID => l_assignment_id,
1735: X_BALANCE_AMOUNT => l_balance_amount,
1736: X_RETURN_STATUS => l_return_status);
1737:
1738: if l_return_status <> FND_API.G_RET_STS_SUCCESS then
1739: l_error_api_name := 'CREATE_SLINE_JOB_CHANGE : ';
1740: raise FND_API.G_EXC_UNEXPECTED_ERROR;
1741: end if;
1742:
1736: X_RETURN_STATUS => l_return_status);
1737:
1738: if l_return_status <> FND_API.G_RET_STS_SUCCESS then
1739: l_error_api_name := 'CREATE_SLINE_JOB_CHANGE : ';
1740: raise FND_API.G_EXC_UNEXPECTED_ERROR;
1741: end if;
1742:
1743:
1744: -- Looks into per_assignments_f for Position change during the pay period.
1748: X_ASSIGNMENT_ID => l_assignment_id,
1749: X_BALANCE_AMOUNT => l_balance_amount,
1750: X_RETURN_STATUS => l_return_status);
1751:
1752: if l_return_status <> FND_API.G_RET_STS_SUCCESS then
1753: l_error_api_name := 'CREATE_SLINE_POSITION_CHANGE : ';
1754: raise FND_API.G_EXC_UNEXPECTED_ERROR;
1755: end if;
1756:
1750: X_RETURN_STATUS => l_return_status);
1751:
1752: if l_return_status <> FND_API.G_RET_STS_SUCCESS then
1753: l_error_api_name := 'CREATE_SLINE_POSITION_CHANGE : ';
1754: raise FND_API.G_EXC_UNEXPECTED_ERROR;
1755: end if;
1756:
1757: /* New Procedures added for splitting sublines by garde and people group */
1758:
1761: X_ASSIGNMENT_ID => l_assignment_id,
1762: X_BALANCE_AMOUNT => l_balance_amount,
1763: X_RETURN_STATUS => l_return_status);
1764:
1765: if l_return_status <> FND_API.G_RET_STS_SUCCESS then
1766: l_error_api_name := 'CREATE_SLINE_GRADE_CHANGE : ';
1767: raise FND_API.G_EXC_UNEXPECTED_ERROR;
1768: end if;
1769:
1763: X_RETURN_STATUS => l_return_status);
1764:
1765: if l_return_status <> FND_API.G_RET_STS_SUCCESS then
1766: l_error_api_name := 'CREATE_SLINE_GRADE_CHANGE : ';
1767: raise FND_API.G_EXC_UNEXPECTED_ERROR;
1768: end if;
1769:
1770:
1771:
1774: X_ASSIGNMENT_ID => l_assignment_id,
1775: X_BALANCE_AMOUNT => l_balance_amount,
1776: X_RETURN_STATUS => l_return_status);
1777:
1778: if l_return_status <> FND_API.G_RET_STS_SUCCESS then
1779: l_error_api_name := 'CREATE_SLINE_PPGROUP_CHANGE : ';
1780: raise FND_API.G_EXC_UNEXPECTED_ERROR;
1781: end if;
1782:
1776: X_RETURN_STATUS => l_return_status);
1777:
1778: if l_return_status <> FND_API.G_RET_STS_SUCCESS then
1779: l_error_api_name := 'CREATE_SLINE_PPGROUP_CHANGE : ';
1780: raise FND_API.G_EXC_UNEXPECTED_ERROR;
1781: end if;
1782:
1783:
1784:
1792: X_ASSIGNMENT_ID => l_assignment_id,
1793: X_BALANCE_AMOUNT => l_balance_amount,
1794: X_RETURN_STATUS => l_return_status);
1795:
1796: if l_return_status <> FND_API.G_RET_STS_SUCCESS then
1797: l_error_api_name := 'CREATE_SLINE_FTE_CHANGE : ';
1798: raise FND_API.G_EXC_UNEXPECTED_ERROR;
1799: end if;
1800: End of code changes for bug 4055483 */
1794: X_RETURN_STATUS => l_return_status);
1795:
1796: if l_return_status <> FND_API.G_RET_STS_SUCCESS then
1797: l_error_api_name := 'CREATE_SLINE_FTE_CHANGE : ';
1798: raise FND_API.G_EXC_UNEXPECTED_ERROR;
1799: end if;
1800: End of code changes for bug 4055483 */
1801:
1802: CREATE_SLINE_BUDGET_CHANGE(X_PAYROLL_LINE_ID => l_line_id,
1803: X_ASSIGNMENT_ID => l_assignment_id,
1804: X_BALANCE_AMOUNT => l_balance_amount,
1805: X_RETURN_STATUS => l_return_status);
1806:
1807: if l_return_status <> FND_API.G_RET_STS_SUCCESS then
1808: l_error_api_name := 'CREATE_SLINE_BUDGET_CHANGE : ';
1809: raise FND_API.G_EXC_UNEXPECTED_ERROR;
1810: end if;
1811:
1805: X_RETURN_STATUS => l_return_status);
1806:
1807: if l_return_status <> FND_API.G_RET_STS_SUCCESS then
1808: l_error_api_name := 'CREATE_SLINE_BUDGET_CHANGE : ';
1809: raise FND_API.G_EXC_UNEXPECTED_ERROR;
1810: end if;
1811:
1812: hr_utility.trace(' Opening get_difference_csr cursor');
1813:
1815: open get_difference_csr;
1816: fetch get_difference_csr into l_subline_sum;
1817: if get_difference_csr%NOTFOUND then
1818: l_error_api_name := 'PSP_PAYTRN : error at GET_DIFFERECE_CSR';
1819: raise FND_API.G_EXC_UNEXPECTED_ERROR;
1820: end if;
1821: close get_difference_csr;
1822: -- Added daily rate not equal to 0 to where clause to fix bug no 89157
1823: if (NVL(to_number(g_pay_costs_rec.costed_value),0) - NVL(l_subline_sum,0)) <> 0 then
1828: pay_amount <> 0 and --- rounding difference to nonzero amount .. 4670588
1829: rownum = 1;
1830: if SQL%NOTFOUND then
1831: l_error_api_name := 'PSP_PAYTRN : error while updating subline for rounding';
1832: raise FND_API.G_EXC_UNEXPECTED_ERROR;
1833: end if;
1834: end if;
1835:
1836: end if;
1843: /* Added to let the program continue with next record if zero work days is encountered for any assignment */
1844: EXCEPTION
1845: WHEN ZERO_WORK_DAYS then
1846:
1847: retcode:= FND_API.G_RET_STS_SUCCESS;
1848:
1849: END;
1850: END LOOP; -- LOOP1 end
1851: close get_pay_costs_csr;
1851: close get_pay_costs_csr;
1852:
1853: EXCEPTION
1854:
1855: WHEN FND_API.G_EXC_UNEXPECTED_ERROR then
1856: rollback;
1857: retcode := 2;
1858:
1859:
1857: retcode := 2;
1858:
1859:
1860: psp_message_s.print_error(p_mode=>FND_FILE.log,
1861: p_print_header=>FND_API.G_TRUE
1862: );
1863:
1864: return;
1865: WHEN NO_COST_DATA_FOUND then
1887: FND_MESSAGE.Set_Name('PSP', 'PSP_PI_NO_COSTING_EMP');
1888: FND_MESSAGE.set_token('Employee',l_employee_name);
1889: FND_MSG_PUB.ADD;
1890:
1891: retcode:= FND_API.G_RET_STS_SUCCESS;
1892:
1893: WHEN OTHERS then
1894: retcode := 2;
1895:
1898: hr_utility.trace(' Process failed here');
1899: hr_utility.trace('-exception 20- sqlerrm = '||sqlerrm);
1900:
1901: psp_message_s.print_error(p_mode=>FND_FILE.log,
1902: p_print_header=>FND_API.G_TRUE
1903: );
1904:
1905:
1906: return;
1947: where payroll_control_id = r_payroll_control_array.r_payroll_control_id(K);
1948:
1949: IF sql%NOTFOUND then
1950: fnd_msg_pub.add_exc_msg('PSP_PAYTRN','Error while Updating Sublines Total in Payroll Controls ');
1951: raise FND_API.G_EXC_UNEXPECTED_ERROR;
1952: END IF;
1953:
1954: IF l_total_num_rec=0 then
1955: fnd_message.set_name('PSP','PSP_PI_NO_PAYROLL_TRXN');
1976: fnd_file.put_line(fnd_file.log,'********************************************************');
1977:
1978: fnd_message.set_name('PSP','PSP_PROGRAM_SUCCESS') ;
1979: fnd_msg_pub.add;
1980: retcode:= FND_API.G_RET_STS_SUCCESS;
1981:
1982: COMMIT;
1983:
1984: psp_message_s.print_error(p_mode=>FND_FILE.log,
1981:
1982: COMMIT;
1983:
1984: psp_message_s.print_error(p_mode=>FND_FILE.log,
1985: p_print_header=>FND_API.G_FALSE);
1986:
1987: fnd_file.put_line(fnd_file.log,'********************************************************');
1988: fnd_file.put_line(fnd_file.log, '');
1989:
2049: fnd_message.set_name('PSP','PSP_PI_NO_PAYROLL_TRXN');
2050: fnd_msg_pub.add;
2051: fnd_message.set_name('PSP','PSP_PROGRAM_SUCCESS') ;
2052: fnd_msg_pub.add;
2053: retcode:= FND_API.G_RET_STS_SUCCESS;
2054:
2055:
2056: psp_message_s.print_error(p_mode=>FND_FILE.log,
2057: p_print_header=>FND_API.G_FALSE);
2053: retcode:= FND_API.G_RET_STS_SUCCESS;
2054:
2055:
2056: psp_message_s.print_error(p_mode=>FND_FILE.log,
2057: p_print_header=>FND_API.G_FALSE);
2058: return;
2059:
2060: WHEN FND_API.G_EXC_UNEXPECTED_ERROR then
2061: retcode := 2;
2056: psp_message_s.print_error(p_mode=>FND_FILE.log,
2057: p_print_header=>FND_API.G_FALSE);
2058: return;
2059:
2060: WHEN FND_API.G_EXC_UNEXPECTED_ERROR then
2061: retcode := 2;
2062: rollback;
2063:
2064:
2062: rollback;
2063:
2064:
2065: psp_message_s.print_error(p_mode=>FND_FILE.log,
2066: p_print_header=>FND_API.G_TRUE
2067: );
2068:
2069: return;
2070: /* Added Exceptions for bug 2056877 */
2071: WHEN NO_PROFILE_EXISTS THEN
2072: fnd_message.set_name('PSP','PSP_NO_PROFILE_EXISTS');
2073: fnd_msg_pub.add;
2074: psp_message_s.print_error(p_mode=>FND_FILE.log,
2075: p_print_header=>FND_API.G_TRUE);
2076: retcode := 2;
2077:
2078:
2079: WHEN NO_VAL_DATE_MATCHES THEN
2080: fnd_message.set_name('PSP','PSP_IMP_NO_VAL_DATE_MATCHES');
2081: fnd_message.set_token('PAYROLL_DATE',l_end_date);
2082: fnd_msg_pub.add;
2083: psp_message_s.print_error(p_mode=>FND_FILE.log,
2084: p_print_header=>FND_API.G_TRUE);
2085: retcode := 2;
2086:
2087: WHEN NO_GLOBAL_ACCT_EXISTS THEN
2088: -- commented the below line and replaced it with the next line, fix done is fixing the gscc warning on not to use chr(x)
2092: fnd_message.set_name('PSP','PSP_IMP_NO_GLOBAL_ACCT_EXISTS');
2093: fnd_message.set_token('PAYROLL_DATE',l_end_date);
2094: fnd_msg_pub.add;
2095: psp_message_s.print_error(p_mode=>FND_FILE.log,
2096: p_print_header=>FND_API.G_TRUE);
2097: retcode := 2; --End of Modification for Bug 2056877.
2098:
2099: WHEN OTHERS then
2100: retcode := 2;
2102: fnd_msg_pub.add_exc_msg('PSP_PAYTRN','IMPORT_PAY_TRNS');
2103:
2104:
2105: psp_message_s.print_error(p_mode=>FND_FILE.log,
2106: p_print_header=>FND_API.G_TRUE
2107: );
2108:
2109: return;
2110: END;
2202: end loop;
2203: end if;
2204: end if;
2205: close get_asg_end_date_csr;
2206: x_return_status := FND_API.G_RET_STS_SUCCESS;
2207: return;
2208: EXCEPTION
2209: WHEN OTHERS then
2210: ------dbms_output.put_line('When others Error...........');
2208: EXCEPTION
2209: WHEN OTHERS then
2210: ------dbms_output.put_line('When others Error...........');
2211: fnd_msg_pub.add_exc_msg('PSP_PAYTRN','UPDATE_WCAL_ASG_END_DATE');
2212: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2213:
2214: end;
2215:
2216: --------------------------UPDATE_WCAL_ASG_BEGIN_DATE------------------------------
2298: i:= i+1;
2299: end loop;
2300: end if;
2301: end if;
2302: x_return_status := FND_API.G_RET_STS_SUCCESS;
2303: return;
2304: EXCEPTION
2305: WHEN OTHERS then
2306: -- ------dbms_output.put_line('When others Error...........'||SUBSTR(SQLERRM,1,200));
2304: EXCEPTION
2305: WHEN OTHERS then
2306: -- ------dbms_output.put_line('When others Error...........'||SUBSTR(SQLERRM,1,200));
2307: fnd_msg_pub.add_exc_msg('PSP_PAYTRN','UPDATE_WCAL_ASG_BEGIN_DATE',SUBSTR(SQLERRM,1,100));
2308: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2309:
2310: end;
2311:
2312: /*
2353: end loop;
2354: end if;
2355: end if;
2356: close get_asg_begin_date_csr;
2357: x_return_status := FND_API.G_RET_STS_SUCCESS;
2358: return;
2359: EXCEPTION
2360: WHEN OTHERS then
2361: ----dbms_output.put_line('When others Error...........');
2359: EXCEPTION
2360: WHEN OTHERS then
2361: ----dbms_output.put_line('When others Error...........');
2362: fnd_msg_pub.add_exc_msg('PSP_PAYTRN','UPDATE_WCAL_ASG_BEGIN_DATE');
2363: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2364:
2365: end;
2366: */
2367: ---------------------------UPDATE_WCAL_ASG_STATUS-----------------------------------
2413: i := i + 1;
2414: end loop;
2415: END LOOP;
2416: close get_asg_status_csr;
2417: x_return_status := FND_API.G_RET_STS_SUCCESS;
2418: return;
2419: EXCEPTION
2420: WHEN OTHERS then
2421: close get_asg_status_csr;
2419: EXCEPTION
2420: WHEN OTHERS then
2421: close get_asg_status_csr;
2422: fnd_msg_pub.add_exc_msg('PSP_PAYTRN','UPDATE_WCAL_ASG_STATUS');
2423: x_return_status := FND_API.G_RET_STS_SUCCESS;
2424: return;
2425: end UPDATE_WCAL_ASG_STATUS;
2426: --
2427: ----------------------CREATE_DAILY_RATE_CALENDAR---------------------------
2574: if get_no_per_fiscal_year_csr%NOTFOUND then
2575: FND_MESSAGE.Set_Name('PSP', 'PSP_PI_NO_PERIOD_TYPES');
2576: FND_MESSAGE.Set_Token('TIME_PERIOD_ID',x_time_period_id);
2577: FND_MSG_PUB.Add;
2578: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2579: end if;
2580: close get_no_per_fiscal_year_csr;
2581: --dbms_output.PUT_LINE('No. of periods for fiscal year... ' || to_char(l_no_fiscal_year));
2582: l_change_start_date := trunc(g_start_date);
2734: --dbms_output.PUT_LINE('i ............' || to_char(l_change_start_date,'YYYY/MM/DD HH24:MI:SS'));
2735: end loop;
2736:
2737: close get_proposal_csr;
2738: x_return_status := FND_API.G_RET_STS_SUCCESS;
2739: EXCEPTION
2740: WHEN NO_DATA_FOUND then
2741: begin
2742: i := 1;
2787: end;
2788: --dbms_output.PUT_LINE( 'Daily Rate ' || to_char(l_daily_rate));
2789: --dbms_output.PUT_LINE( 'Previous Salary ' || to_char(l_previous_salary));
2790: close get_previous_proposal_csr;
2791: x_return_status := FND_API.G_RET_STS_SUCCESS;
2792: WHEN FND_API.G_EXC_UNEXPECTED_ERROR then
2793: fnd_msg_pub.add_exc_msg('PSP_PAYTRN','CREATE_DAILY_RATE_CALENDAR');
2794: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2795:
2788: --dbms_output.PUT_LINE( 'Daily Rate ' || to_char(l_daily_rate));
2789: --dbms_output.PUT_LINE( 'Previous Salary ' || to_char(l_previous_salary));
2790: close get_previous_proposal_csr;
2791: x_return_status := FND_API.G_RET_STS_SUCCESS;
2792: WHEN FND_API.G_EXC_UNEXPECTED_ERROR then
2793: fnd_msg_pub.add_exc_msg('PSP_PAYTRN','CREATE_DAILY_RATE_CALENDAR');
2794: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2795:
2796: WHEN OTHERS then
2790: close get_previous_proposal_csr;
2791: x_return_status := FND_API.G_RET_STS_SUCCESS;
2792: WHEN FND_API.G_EXC_UNEXPECTED_ERROR then
2793: fnd_msg_pub.add_exc_msg('PSP_PAYTRN','CREATE_DAILY_RATE_CALENDAR');
2794: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2795:
2796: WHEN OTHERS then
2797: fnd_msg_pub.add_exc_msg('PSP_PAYTRN','CREATE_DAILY_RATE_CALENDAR');
2798: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2794: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2795:
2796: WHEN OTHERS then
2797: fnd_msg_pub.add_exc_msg('PSP_PAYTRN','CREATE_DAILY_RATE_CALENDAR');
2798: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2799:
2800: end create_daily_rate_calendar;
2801: ----------------CALCULATE_BALANCE_AMOUNT--------------------------------
2802: --
2825: x_balance_amount := x_pay_amount - l_total_salary;
2826: else
2827: x_balance_amount := 0.00;
2828: end if;
2829: x_return_status := FND_API.G_RET_STS_SUCCESS;
2830:
2831: hr_utility.trace(' Leaving CALCULATE_BALANCE_AMOUNT');
2832:
2833: EXCEPTION
2832:
2833: EXCEPTION
2834: WHEN OTHERS then
2835: fnd_msg_pub.add_exc_msg('PSP_PAYTRN','CALCULATE_BALANCE_AMOUNT');
2836: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2837:
2838: end calculate_balance_amount;
2839: --------------CREATE_SLINE_SALARY_CHANGE-----------------------------------
2840: --
3006: if get_payroll_line_csr%NOTFOUND then
3007: fnd_message.set_name('PSP', 'PSP_NO_PAYROLL_LINES');
3008: fnd_msg_pub.add;
3009: close get_payroll_line_csr;
3010: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3011: end if;
3012: close get_payroll_line_csr;
3013: ---hr_utility.trace(' Pay amount .. ' || to_char(g_payroll_line_rec.pay_amount));
3014: ---hr_utility.trace(' Balance amount .. ' || to_char(g_payroll_line_rec.balance_amount));
3244: hr_utility.trace(' Leaving CREATE_SLINE_SALARY_CHANGE');
3245:
3246:
3247: EXCEPTION
3248: WHEN FND_API.G_EXC_UNEXPECTED_ERROR then
3249: -- fnd_msg_pub.add_exc_msg('PSP_PAYTRN','CREATE_DAILY_RATE_CALENDAR'); Commented for bug fix 2439207
3250: fnd_msg_pub.add_exc_msg('PSP_PAYTRN','CREATE_SLINE_SALARY_CHANGE'); -- Introduced for bug 2439207
3251: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3252:
3247: EXCEPTION
3248: WHEN FND_API.G_EXC_UNEXPECTED_ERROR then
3249: -- fnd_msg_pub.add_exc_msg('PSP_PAYTRN','CREATE_DAILY_RATE_CALENDAR'); Commented for bug fix 2439207
3250: fnd_msg_pub.add_exc_msg('PSP_PAYTRN','CREATE_SLINE_SALARY_CHANGE'); -- Introduced for bug 2439207
3251: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3252:
3253: WHEN NO_DATA_FOUND then
3254: begin
3255: ----hr_utility.trace(' Entered NO_DATA_FOUND');
3406: hr_utility.trace(' Failing with the OTHERS exception');
3407: ----dbms_output.PUT_LINE('Error Num : ' || to_char(SQLCODE) || 'Err Msg : ' || SUBSTR(SQLERRM,1,100));
3408: -- fnd_msg_pub.add_exc_msg('PSP_PAYTRN','CREATE_DAILY_RATE_CALENDAR'); Commented for bug fix 2439207
3409: fnd_msg_pub.add_exc_msg('PSP_PAYTRN','CREATE_SLINE_SALARY_CHANGE'); -- Introduced for bug 2439207
3410: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3411:
3412: end CREATE_SLINE_SALARY_CHANGE;
3413:
3414: ---------------------CREATE_SLINE_ASG_CHANGE--------------------------------
3485: end if;
3486: close get_sublines_csr;
3487: end if;
3488: close get_asg_end_date_csr;
3489: x_return_status := FND_API.G_RET_STS_SUCCESS;
3490:
3491: hr_utility.trace(' Leaving CREATE_SLINE_ASG_CHANGE');
3492:
3493: EXCEPTION
3493: EXCEPTION
3494: WHEN OTHERS then
3495: close get_asg_end_date_csr;
3496: fnd_msg_pub.add_exc_msg('PSP_PAYTRN','CREATE_SLINE_ASG_CHANGE');
3497: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3498:
3499: end CREATE_SLINE_ASG_CHANGE;
3500:
3501:
4237: end;
4238: end if;
4239: end loop;
4240: close get_sublines_csr;
4241: x_return_status := FND_API.G_RET_STS_SUCCESS;
4242: EXCEPTION
4243: WHEN OTHERS then
4244: fnd_msg_pub.add_exc_msg('PSP_PAYTRN','CREATE_SLINE_ASG_STATUS_CHANGE');
4245: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4241: x_return_status := FND_API.G_RET_STS_SUCCESS;
4242: EXCEPTION
4243: WHEN OTHERS then
4244: fnd_msg_pub.add_exc_msg('PSP_PAYTRN','CREATE_SLINE_ASG_STATUS_CHANGE');
4245: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4246: close get_sublines_csr;
4247: end;
4248: END LOOP;
4249: close get_asg_status_csr;
4246: close get_sublines_csr;
4247: end;
4248: END LOOP;
4249: close get_asg_status_csr;
4250: x_return_status := FND_API.G_RET_STS_SUCCESS;
4251:
4252: hr_utility.trace(' Leaving CREATE_SLINE_ASG_STATUS_CHANGE');
4253: EXCEPTION
4254: WHEN NO_DATA_FOUND then
4251:
4252: hr_utility.trace(' Leaving CREATE_SLINE_ASG_STATUS_CHANGE');
4253: EXCEPTION
4254: WHEN NO_DATA_FOUND then
4255: x_return_status := FND_API.G_RET_STS_SUCCESS;
4256: close get_asg_status_csr;
4257:
4258: WHEN OTHERS then
4259: fnd_msg_pub.add_exc_msg('PSP_PAYTRN','CREATE_SLINE_ASG_STATUS_CHANGE');
4256: close get_asg_status_csr;
4257:
4258: WHEN OTHERS then
4259: fnd_msg_pub.add_exc_msg('PSP_PAYTRN','CREATE_SLINE_ASG_STATUS_CHANGE');
4260: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4261: close get_asg_status_csr;
4262:
4263: end create_sline_asg_status_change;
4264:
4529: close get_sublines_csr; -- bug fix 2806589
4530:
4531: END LOOP;
4532: close check_service_period_end_csr; -- bug fix 2806589
4533: x_return_status := FND_API.G_RET_STS_SUCCESS;
4534:
4535: hr_utility.trace(' Leaving CREATE_SLINE_EMP_END_DATE');
4536:
4537: EXCEPTION
4536:
4537: EXCEPTION
4538: WHEN OTHERS then
4539: fnd_msg_pub.add_exc_msg('PSP_PAYTRN','CREATE_SLINE_EMP_END_DATE');
4540: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4541: end create_sline_emp_end_date;
4542: ------------------------------CREATE_SLINE_ORG_CHANGE-------------------
4543: ---
4544: PROCEDURE CREATE_SLINE_ORG_CHANGE(X_PAYROLL_LINE_ID IN NUMBER,
5116: end;
5117: end if;
5118: END LOOP;
5119: close get_assg_csr;
5120: x_return_status := FND_API.G_RET_STS_SUCCESS;
5121:
5122: hr_utility.trace(' Leaving CREATE_SLINE_ORG_CHANGE');
5123:
5124: EXCEPTION
5122: hr_utility.trace(' Leaving CREATE_SLINE_ORG_CHANGE');
5123:
5124: EXCEPTION
5125: WHEN NO_DATA_FOUND then
5126: x_return_status := FND_API.G_RET_STS_SUCCESS;
5127: close get_assg_csr;
5128: WHEN OTHERS then
5129: fnd_msg_pub.add_exc_msg('PSP_PAYTRN','CREATE_SLINE_ORG_CHANGE');
5130: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5126: x_return_status := FND_API.G_RET_STS_SUCCESS;
5127: close get_assg_csr;
5128: WHEN OTHERS then
5129: fnd_msg_pub.add_exc_msg('PSP_PAYTRN','CREATE_SLINE_ORG_CHANGE');
5130: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5131: close get_assg_csr;
5132:
5133: end create_sline_org_change;
5134:
5697: end if;
5698: l_old_job_id := l_new_job_id;
5699: END LOOP;
5700: close get_sublines_csr;
5701: x_return_status := FND_API.G_RET_STS_SUCCESS;
5702: EXCEPTION
5703: WHEN NO_DATA_FOUND then
5704: x_return_status := FND_API.G_RET_STS_SUCCESS;
5705: close get_sublines_csr;
5700: close get_sublines_csr;
5701: x_return_status := FND_API.G_RET_STS_SUCCESS;
5702: EXCEPTION
5703: WHEN NO_DATA_FOUND then
5704: x_return_status := FND_API.G_RET_STS_SUCCESS;
5705: close get_sublines_csr;
5706: WHEN OTHERS then
5707: fnd_msg_pub.add_exc_msg('PSP_PAYTRN','CREATE_SLINE_JOB_CHANGE');
5708: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5704: x_return_status := FND_API.G_RET_STS_SUCCESS;
5705: close get_sublines_csr;
5706: WHEN OTHERS then
5707: fnd_msg_pub.add_exc_msg('PSP_PAYTRN','CREATE_SLINE_JOB_CHANGE');
5708: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5709: close get_sublines_csr;
5710: end;
5711: end if;
5712: END LOOP;
5710: end;
5711: end if;
5712: END LOOP;
5713: close get_assg_csr;
5714: x_return_status := FND_API.G_RET_STS_SUCCESS;
5715: hr_utility.trace(' Leaving CREATE_SLINE_JOB_CHANGE');
5716: EXCEPTION
5717: WHEN NO_DATA_FOUND then
5718: x_return_status := FND_API.G_RET_STS_SUCCESS;
5714: x_return_status := FND_API.G_RET_STS_SUCCESS;
5715: hr_utility.trace(' Leaving CREATE_SLINE_JOB_CHANGE');
5716: EXCEPTION
5717: WHEN NO_DATA_FOUND then
5718: x_return_status := FND_API.G_RET_STS_SUCCESS;
5719: close get_assg_csr;
5720: WHEN OTHERS then
5721: fnd_msg_pub.add_exc_msg('PSP_PAYTRN','CREATE_SLINE_JOB_CHANGE');
5722: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5718: x_return_status := FND_API.G_RET_STS_SUCCESS;
5719: close get_assg_csr;
5720: WHEN OTHERS then
5721: fnd_msg_pub.add_exc_msg('PSP_PAYTRN','CREATE_SLINE_JOB_CHANGE');
5722: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5723: close get_assg_csr;
5724: end create_sline_job_change;
5725: --------------------------------CREATE_SLINE_POSITION_CHANGE--------------
5726: ---
6287: end if;
6288: l_old_position_id := l_new_position_id;
6289: END LOOP;
6290: close get_sublines_csr;
6291: x_return_status := FND_API.G_RET_STS_SUCCESS;
6292: EXCEPTION
6293: WHEN NO_DATA_FOUND then
6294: x_return_status := FND_API.G_RET_STS_SUCCESS;
6295: close get_sublines_csr;
6290: close get_sublines_csr;
6291: x_return_status := FND_API.G_RET_STS_SUCCESS;
6292: EXCEPTION
6293: WHEN NO_DATA_FOUND then
6294: x_return_status := FND_API.G_RET_STS_SUCCESS;
6295: close get_sublines_csr;
6296: WHEN OTHERS then
6297: fnd_msg_pub.add_exc_msg('PSP_PAYTRN','CREATE_SLINE_POSITION_CHANGE');
6298: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6294: x_return_status := FND_API.G_RET_STS_SUCCESS;
6295: close get_sublines_csr;
6296: WHEN OTHERS then
6297: fnd_msg_pub.add_exc_msg('PSP_PAYTRN','CREATE_SLINE_POSITION_CHANGE');
6298: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6299: close get_sublines_csr;
6300: end;
6301: end if;
6302: END LOOP;
6300: end;
6301: end if;
6302: END LOOP;
6303: close get_assg_csr;
6304: x_return_status := FND_API.G_RET_STS_SUCCESS;
6305: hr_utility.trace(' Leaving CREATE_SLINE_POSITION_CHANGE');
6306: EXCEPTION
6307: WHEN NO_DATA_FOUND then
6308: x_return_status := FND_API.G_RET_STS_SUCCESS;
6304: x_return_status := FND_API.G_RET_STS_SUCCESS;
6305: hr_utility.trace(' Leaving CREATE_SLINE_POSITION_CHANGE');
6306: EXCEPTION
6307: WHEN NO_DATA_FOUND then
6308: x_return_status := FND_API.G_RET_STS_SUCCESS;
6309: close get_assg_csr;
6310: WHEN OTHERS then
6311: fnd_msg_pub.add_exc_msg('PSP_PAYTRN','CREATE_SLINE_POSITION_CHANGE');
6312: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6308: x_return_status := FND_API.G_RET_STS_SUCCESS;
6309: close get_assg_csr;
6310: WHEN OTHERS then
6311: fnd_msg_pub.add_exc_msg('PSP_PAYTRN','CREATE_SLINE_POSITION_CHANGE');
6312: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6313: close get_assg_csr;
6314:
6315: end create_sline_position_change;
6316:
6878: end if;
6879: l_old_grade_id := l_new_grade_id;
6880: END LOOP;
6881: close get_sublines_csr;
6882: x_return_status := FND_API.G_RET_STS_SUCCESS;
6883: hr_utility.trace(' Leaving CREATE_SLINE_GRADE_CHANGE');
6884: EXCEPTION
6885: WHEN NO_DATA_FOUND then
6886: x_return_status := FND_API.G_RET_STS_SUCCESS;
6882: x_return_status := FND_API.G_RET_STS_SUCCESS;
6883: hr_utility.trace(' Leaving CREATE_SLINE_GRADE_CHANGE');
6884: EXCEPTION
6885: WHEN NO_DATA_FOUND then
6886: x_return_status := FND_API.G_RET_STS_SUCCESS;
6887: close get_sublines_csr;
6888: WHEN OTHERS then
6889: fnd_msg_pub.add_exc_msg('PSP_PAYTRN','CREATE_SLINE_GRADE_CHANGE');
6890: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6886: x_return_status := FND_API.G_RET_STS_SUCCESS;
6887: close get_sublines_csr;
6888: WHEN OTHERS then
6889: fnd_msg_pub.add_exc_msg('PSP_PAYTRN','CREATE_SLINE_GRADE_CHANGE');
6890: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6891: close get_sublines_csr;
6892: end;
6893: end if;
6894: END LOOP;
6892: end;
6893: end if;
6894: END LOOP;
6895: close get_assg_csr;
6896: x_return_status := FND_API.G_RET_STS_SUCCESS;
6897: EXCEPTION
6898: WHEN NO_DATA_FOUND then
6899: x_return_status := FND_API.G_RET_STS_SUCCESS;
6900: close get_assg_csr;
6895: close get_assg_csr;
6896: x_return_status := FND_API.G_RET_STS_SUCCESS;
6897: EXCEPTION
6898: WHEN NO_DATA_FOUND then
6899: x_return_status := FND_API.G_RET_STS_SUCCESS;
6900: close get_assg_csr;
6901: WHEN OTHERS then
6902: fnd_msg_pub.add_exc_msg('PSP_PAYTRN','CREATE_SLINE_GRADE_CHANGE');
6903: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6899: x_return_status := FND_API.G_RET_STS_SUCCESS;
6900: close get_assg_csr;
6901: WHEN OTHERS then
6902: fnd_msg_pub.add_exc_msg('PSP_PAYTRN','CREATE_SLINE_GRADE_CHANGE');
6903: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6904: close get_assg_csr;
6905:
6906: end create_sline_grade_change;
6907:
7473: end if;
7474: l_old_ppgroup_id := l_new_ppgroup_id;
7475: END LOOP;
7476: close get_sublines_csr;
7477: x_return_status := FND_API.G_RET_STS_SUCCESS;
7478: EXCEPTION
7479: WHEN NO_DATA_FOUND then
7480: x_return_status := FND_API.G_RET_STS_SUCCESS;
7481: close get_sublines_csr;
7476: close get_sublines_csr;
7477: x_return_status := FND_API.G_RET_STS_SUCCESS;
7478: EXCEPTION
7479: WHEN NO_DATA_FOUND then
7480: x_return_status := FND_API.G_RET_STS_SUCCESS;
7481: close get_sublines_csr;
7482: WHEN OTHERS then
7483: fnd_msg_pub.add_exc_msg('PSP_PAYTRN','CREATE_SLINE_POSITION_CHANGE');
7484: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
7480: x_return_status := FND_API.G_RET_STS_SUCCESS;
7481: close get_sublines_csr;
7482: WHEN OTHERS then
7483: fnd_msg_pub.add_exc_msg('PSP_PAYTRN','CREATE_SLINE_POSITION_CHANGE');
7484: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
7485: close get_sublines_csr;
7486: end;
7487: end if;
7488: END LOOP;
7486: end;
7487: end if;
7488: END LOOP;
7489: close get_assg_csr;
7490: x_return_status := FND_API.G_RET_STS_SUCCESS;
7491: hr_utility.trace(' Leaving CREATE_SLINE_PPGROUP_CHANGE');
7492: EXCEPTION
7493: WHEN NO_DATA_FOUND then
7494: x_return_status := FND_API.G_RET_STS_SUCCESS;
7490: x_return_status := FND_API.G_RET_STS_SUCCESS;
7491: hr_utility.trace(' Leaving CREATE_SLINE_PPGROUP_CHANGE');
7492: EXCEPTION
7493: WHEN NO_DATA_FOUND then
7494: x_return_status := FND_API.G_RET_STS_SUCCESS;
7495: close get_assg_csr;
7496: WHEN OTHERS then
7497: fnd_msg_pub.add_exc_msg('PSP_PAYTRN','CREATE_SLINE_PPGROUP_CHANGE');
7498: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
7494: x_return_status := FND_API.G_RET_STS_SUCCESS;
7495: close get_assg_csr;
7496: WHEN OTHERS then
7497: fnd_msg_pub.add_exc_msg('PSP_PAYTRN','CREATE_SLINE_PPGROUP_CHANGE');
7498: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
7499: close get_assg_csr;
7500:
7501: end create_sline_ppgroup_change;
7502:
7549: hr_utility.trace(' Entering CREATE_SLINE_FTE_CHANGE');
7550: -- l_fte_option_value := FND_PROFILE.VALue('PSP_FTE_OPTIONS');
7551: l_fte_option_value :=psp_general.get_specific_profile('PSP_FTE_OPTIONS');
7552: if NVL(l_fte_option_value,' ') = 'BUDGET_VALUES' or l_fte_option_value IS NULL then
7553: x_return_status := FND_API.G_RET_STS_SUCCESS;
7554: return;
7555: end if;
7556: ----dbms_output.PUT_LINE('Crossed First if of FTE Change... '|| l_fte_option_value );
7557: -- l_fte_value := FND_PROFILE.VALUE('PSP_FTE_ATTRIBUTE');
7556: ----dbms_output.PUT_LINE('Crossed First if of FTE Change... '|| l_fte_option_value );
7557: -- l_fte_value := FND_PROFILE.VALUE('PSP_FTE_ATTRIBUTE');
7558: l_fte_value:=psp_general.get_specific_profile('PSP_FTE_ATTRIBUTE');
7559: if l_fte_value IS NULL then
7560: x_return_status := FND_API.G_RET_STS_SUCCESS;
7561: return;
7562: end if;
7563: ----dbms_output.PUT_LINE('Crossed Second if of FTE Change...' || l_fte_value);
7564: l_cur_handle := dbms_sql.open_cursor;
8150: end if;
8151: l_old_fte := l_new_fte;
8152: END LOOP;
8153: close get_sublines_csr;
8154: x_return_status := FND_API.G_RET_STS_SUCCESS;
8155: EXCEPTION
8156: WHEN OTHERS then
8157: fnd_msg_pub.add_exc_msg('PSP_PAYTRN','CREATE_SLINE_FTE_CHANGE');
8158: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
8154: x_return_status := FND_API.G_RET_STS_SUCCESS;
8155: EXCEPTION
8156: WHEN OTHERS then
8157: fnd_msg_pub.add_exc_msg('PSP_PAYTRN','CREATE_SLINE_FTE_CHANGE');
8158: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
8159: close get_sublines_csr;
8160: end;
8161: end if;
8162:
8161: end if;
8162:
8163: END LOOP;
8164: dbms_sql.close_cursor(l_cur_handle);
8165: x_return_status := FND_API.G_RET_STS_SUCCESS;
8166: hr_utility.trace(' Leaving CREATE_SLINE_FTE_CHANGE');
8167: EXCEPTION
8168: WHEN OTHERS then
8169: fnd_msg_pub.add_exc_msg('PSP_PAYTRN','CREATE_SLINE_FTE_CHANGE');
8166: hr_utility.trace(' Leaving CREATE_SLINE_FTE_CHANGE');
8167: EXCEPTION
8168: WHEN OTHERS then
8169: fnd_msg_pub.add_exc_msg('PSP_PAYTRN','CREATE_SLINE_FTE_CHANGE');
8170: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
8171: dbms_sql.close_cursor(l_cur_handle);
8172:
8173: end create_sline_fte_change;
8174:
8242: -- l_fte_option_value:= psp_general.get_specific_profile('PSP_FTE_OPTIONS'); Commented for bug 4055483
8243: /*
8244: Commented for Bug 4055483
8245: if l_fte_option_value IS NULL or l_fte_option_value <> 'BUDGET_VALUES' then
8246: x_return_status := FND_API.G_RET_STS_SUCCESS;
8247: return;
8248: end if;
8249: */
8250:
8755: end if;
8756: l_old_value := l_new_value;
8757: END LOOP;
8758: close get_sublines_csr;
8759: x_return_status := FND_API.G_RET_STS_SUCCESS;
8760: EXCEPTION
8761: WHEN NO_DATA_FOUND then
8762: x_return_status := FND_API.G_RET_STS_SUCCESS;
8763: close get_sublines_csr;
8758: close get_sublines_csr;
8759: x_return_status := FND_API.G_RET_STS_SUCCESS;
8760: EXCEPTION
8761: WHEN NO_DATA_FOUND then
8762: x_return_status := FND_API.G_RET_STS_SUCCESS;
8763: close get_sublines_csr;
8764: WHEN OTHERS then
8765: fnd_msg_pub.add_exc_msg('PSP_PAYTRN','CREATE_SLINE_BUDGET_CHANGE');
8766: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
8762: x_return_status := FND_API.G_RET_STS_SUCCESS;
8763: close get_sublines_csr;
8764: WHEN OTHERS then
8765: fnd_msg_pub.add_exc_msg('PSP_PAYTRN','CREATE_SLINE_BUDGET_CHANGE');
8766: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
8767: close get_sublines_csr;
8768: end;
8769: end if;
8770: END LOOP;
8768: end;
8769: end if;
8770: END LOOP;
8771: close get_assg_csr;
8772: x_return_status := FND_API.G_RET_STS_SUCCESS;
8773: hr_utility.trace(' Leaving CREATE_SLINE_BUDGET_CHANGE');
8774: EXCEPTION
8775: WHEN NO_DATA_FOUND then
8776: x_return_status := FND_API.G_RET_STS_SUCCESS;
8772: x_return_status := FND_API.G_RET_STS_SUCCESS;
8773: hr_utility.trace(' Leaving CREATE_SLINE_BUDGET_CHANGE');
8774: EXCEPTION
8775: WHEN NO_DATA_FOUND then
8776: x_return_status := FND_API.G_RET_STS_SUCCESS;
8777: close get_assg_csr;
8778: WHEN OTHERS then
8779: fnd_msg_pub.add_exc_msg('PSP_PAYTRN','CREATE_SLINE_BUDGET_CHANGE');
8780: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
8776: x_return_status := FND_API.G_RET_STS_SUCCESS;
8777: close get_assg_csr;
8778: WHEN OTHERS then
8779: fnd_msg_pub.add_exc_msg('PSP_PAYTRN','CREATE_SLINE_BUDGET_CHANGE');
8780: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
8781: close get_assg_csr;
8782:
8783: end create_sline_budget_change;
8784:
8835:
8836: IF l_count_asg_active > 0 THEN
8837: hr_utility.trace(' assignment_id l_count_asg_active > 0 asg = '||x_assignment_id);
8838: g_non_active_flag := 'Y';
8839: x_return_status:=FND_API.G_RET_STS_SUCCESS;
8840: return;
8841: END IF;
8842:
8843: OPEN hire_zero_days_csr;
8849: -- IF to_char(l_effective_start_date,'DY', 'nls_date_language=english') IN ('SUN','SAT') THEN
8850: IF (psp_general.business_days(l_effective_start_date, l_effective_start_date, x_assignment_id) = 0) THEN
8851: hr_utility.trace(' assignment starts in non working day = '||x_assignment_id);
8852: g_hire_zero_work_days := 'Y';
8853: x_return_status:=FND_API.G_RET_STS_SUCCESS;
8854: return;
8855: END IF;
8856: -- End of the changes -lveerubh
8857:
8857:
8858: /*Bug 5642002: Added element only on Sat Sun condition*/
8859: IF trunc(x_end_date) - trunc(x_start_date) <= 1 AND psp_general.business_days(trunc(x_start_date), trunc(x_end_date)) <= 0 THEN
8860: g_all_holiday_zero_work_days := 'Y';
8861: x_return_status:=FND_API.G_RET_STS_SUCCESS;
8862: return;
8863: END IF;
8864:
8865: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
8861: x_return_status:=FND_API.G_RET_STS_SUCCESS;
8862: return;
8863: END IF;
8864:
8865: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
8866: END IF;
8867: x_return_status:=FND_API.G_RET_STS_SUCCESS;
8868:
8869: hr_utility.trace(' Leaving CHECK_ZERO_WORK_DAYS');
8863: END IF;
8864:
8865: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
8866: END IF;
8867: x_return_status:=FND_API.G_RET_STS_SUCCESS;
8868:
8869: hr_utility.trace(' Leaving CHECK_ZERO_WORK_DAYS');
8870:
8871: EXCEPTION
8879: fnd_message.set_token('LINE_AMT',x_costed_value );
8880: fnd_msg_pub.add;
8881:
8882: -- fnd_msg_pub.add_exc_msg('PSP-PAYTRN','CHECK_ZERO_WORK_DAYS','Assg_ID '||x_assignment_id||' Amt '||x_costed_value);
8883: x_return_status:= FND_API.G_RET_STS_UNEXP_ERROR;
8884:
8885: END check_zero_work_days;
8886:
8887: /***************************************************************************************************
8983: X_PAYROLL_SUB_LINE_ID => l_sub_line_id,
8984: X_REASON_CODE => x_reason,
8985: X_PARENT_LINE_ID => l_sub_line_id,
8986: X_MODE => 'R');
8987: x_return_status := FND_API.G_RET_STS_SUCCESS;
8988:
8989: hr_utility.trace(' Leaving CREATE_SLINE_TERM_EMP');
8990:
8991: EXCEPTION
8988:
8989: hr_utility.trace(' Leaving CREATE_SLINE_TERM_EMP');
8990:
8991: EXCEPTION
8992: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
8993: FND_MSG_PUB.ADD_EXC_MSG('PSP_PAYTRN','CREATE_SLINE_TERM_EMP');
8994: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
8995: WHEN OTHERS THEN
8996: FND_MSG_PUB.ADD_EXC_MSG('PSP_PAYTRN','CREATE_SLINE_TERM_EMP');
8990:
8991: EXCEPTION
8992: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
8993: FND_MSG_PUB.ADD_EXC_MSG('PSP_PAYTRN','CREATE_SLINE_TERM_EMP');
8994: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
8995: WHEN OTHERS THEN
8996: FND_MSG_PUB.ADD_EXC_MSG('PSP_PAYTRN','CREATE_SLINE_TERM_EMP');
8997: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
8998:
8993: FND_MSG_PUB.ADD_EXC_MSG('PSP_PAYTRN','CREATE_SLINE_TERM_EMP');
8994: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
8995: WHEN OTHERS THEN
8996: FND_MSG_PUB.ADD_EXC_MSG('PSP_PAYTRN','CREATE_SLINE_TERM_EMP');
8997: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
8998:
8999: END create_sline_term_emp;
9000: --======================= End of procedure =================
9001:
9169: X_PARENT_LINE_ID => l_sub_line_id,
9170: X_MODE => 'R');
9171:
9172: p_balance_amount :=l_balance_amount;
9173: p_return_status := FND_API.G_RET_STS_SUCCESS;
9174: hr_utility.trace(' Leaving CREATE PRORATE CALENDAR');
9175: EXCEPTION
9176: WHEN fnd_api.g_exc_unexpected_error THEN
9177: fnd_msg_pub.add_exc_msg('PSP_PAYTRN','CREATE_PRORATE_CALENDAR');
9172: p_balance_amount :=l_balance_amount;
9173: p_return_status := FND_API.G_RET_STS_SUCCESS;
9174: hr_utility.trace(' Leaving CREATE PRORATE CALENDAR');
9175: EXCEPTION
9176: WHEN fnd_api.g_exc_unexpected_error THEN
9177: fnd_msg_pub.add_exc_msg('PSP_PAYTRN','CREATE_PRORATE_CALENDAR');
9178: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
9179: WHEN OTHERS THEN
9180: fnd_msg_pub.add_exc_msg('PSP_PAYTRN','CREATE_PRORATE_CALENDAR');
9174: hr_utility.trace(' Leaving CREATE PRORATE CALENDAR');
9175: EXCEPTION
9176: WHEN fnd_api.g_exc_unexpected_error THEN
9177: fnd_msg_pub.add_exc_msg('PSP_PAYTRN','CREATE_PRORATE_CALENDAR');
9178: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
9179: WHEN OTHERS THEN
9180: fnd_msg_pub.add_exc_msg('PSP_PAYTRN','CREATE_PRORATE_CALENDAR');
9181: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
9182: END create_prorate_calendar;
9177: fnd_msg_pub.add_exc_msg('PSP_PAYTRN','CREATE_PRORATE_CALENDAR');
9178: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
9179: WHEN OTHERS THEN
9180: fnd_msg_pub.add_exc_msg('PSP_PAYTRN','CREATE_PRORATE_CALENDAR');
9181: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
9182: END create_prorate_calendar;
9183:
9184: END PSP_PAYTRN; -- End of Package Body