163: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
164: -- 4537865 : RESET x_error_msg_code also
165: x_error_msg_code := SQLCODE;
166:
167: FND_MSG_PUB.add_exc_msg(p_pkg_name => 'PA_TASKS_MAINT_UTILS',
168: p_procedure_name => 'CHECK_TASK_MGR_NAME_OR_ID');
169: RAISE;
170: END CHECK_TASK_MGR_NAME_OR_ID;
171:
257: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
258: -- 4537865 : RESET x_error_msg_code also
259: x_error_msg_code := SQLCODE ;
260:
261: FND_MSG_PUB.add_exc_msg(p_pkg_name => 'PA_TASKS_MAINT_UTILS',
262: p_procedure_name => 'CHECK_PROJECT_NAME_OR_ID');
263: RAISE;
264: END CHECK_PROJECT_NAME_OR_ID;
265:
352: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
353: -- 4537865 : RESET x_error_msg_code also
354: x_error_msg_code := SQLCODE;
355:
356: FND_MSG_PUB.add_exc_msg(p_pkg_name => 'PA_TASKS_MAINT_UTILS',
357: p_procedure_name => 'CHECK_TASK_NAME_OR_ID');
358: RAISE;
359: END CHECK_TASK_NAME_OR_ID;
360:
623:
624: EXCEPTION
625: WHEN FND_API.G_EXC_ERROR THEN
626: x_return_status := FND_API.G_RET_STS_ERROR;
627: x_msg_count := FND_MSG_PUB.count_msg;
628: WHEN OTHERS THEN
629: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
630: -- 4537865 : RESET other OUT params too
631: x_msg_count := 1;
630: -- 4537865 : RESET other OUT params too
631: x_msg_count := 1;
632: x_msg_data := SUBSTRB(SQLERRM ,1,240);
633:
634: FND_MSG_PUB.add_exc_msg(p_pkg_name => 'PA_TASKS_MAINT_UTILS',
635: p_procedure_name => 'CHECK_START_DATE',
636: p_error_text => x_msg_data); -- 4537865
637: RAISE;
638: END Check_Start_Date;
807:
808: EXCEPTION
809: WHEN FND_API.G_EXC_ERROR THEN
810: x_return_status := FND_API.G_RET_STS_ERROR;
811: x_msg_count := FND_MSG_PUB.count_msg;
812: WHEN OTHERS THEN
813: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
814: -- 4537865 : RESET other OUT params too
815: x_msg_count := 1;
813: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
814: -- 4537865 : RESET other OUT params too
815: x_msg_count := 1;
816: x_msg_data := SUBSTRB(SQLERRM ,1,240);
817: FND_MSG_PUB.add_exc_msg(p_pkg_name => 'PA_TASKS_MAINT_UTILS',
818: p_procedure_name => 'CHECK_END_DATE',
819: p_error_text => x_msg_data); -- 4537865
820: END Check_End_Date;
821:
932: x_return_status := FND_API.G_RET_STS_SUCCESS;
933: EXCEPTION
934: WHEN FND_API.G_EXC_ERROR THEN
935: x_return_status := FND_API.G_RET_STS_ERROR;
936: x_msg_count := FND_MSG_PUB.count_msg;
937: WHEN OTHERS THEN
938: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
939: -- 4537865 : RESET other OUT params too
940: x_msg_count := 1;
939: -- 4537865 : RESET other OUT params too
940: x_msg_count := 1;
941: x_msg_data := SUBSTRB(SQLERRM ,1,240);
942:
943: FND_MSG_PUB.add_exc_msg(p_pkg_name => 'PA_TASKS_MAINT_UTILS',
944: p_procedure_name => 'CHECK_SCHEDULE_DATES',
945: p_error_text => x_msg_data ); -- 4537865
946: END CHECK_SCHEDULE_DATES;
947:
982:
983: EXCEPTION
984: WHEN FND_API.G_EXC_ERROR THEN
985: x_return_status := FND_API.G_RET_STS_ERROR;
986: x_msg_count := FND_MSG_PUB.count_msg;
987: WHEN OTHERS THEN
988: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
989: -- 4537865 : RESET other OUT params too
990: x_msg_count := 1;
988: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
989: -- 4537865 : RESET other OUT params too
990: x_msg_count := 1;
991: x_msg_data := SUBSTRB(SQLERRM ,1,240);
992: FND_MSG_PUB.add_exc_msg(p_pkg_name => 'PA_TASKS_MAINT_UTILS',
993: p_procedure_name => 'CHECK_ESTIMATE_DATES',
994: p_error_text => x_msg_data ); -- 4537865
995: END CHECK_ESTIMATE_DATES;
996:
1031:
1032: EXCEPTION
1033: WHEN FND_API.G_EXC_ERROR THEN
1034: x_return_status := FND_API.G_RET_STS_ERROR;
1035: x_msg_count := FND_MSG_PUB.count_msg;
1036: WHEN OTHERS THEN
1037: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1038: -- 4537865 : RESET other OUT params too
1039: x_msg_count := 1;
1037: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1038: -- 4537865 : RESET other OUT params too
1039: x_msg_count := 1;
1040: x_msg_data := SUBSTRB(SQLERRM ,1,240);
1041: FND_MSG_PUB.add_exc_msg(p_pkg_name => 'PA_TASKS_MAINT_UTILS',
1042: p_procedure_name => 'CHECK_ACTUAL_DATES',
1043: p_error_text => x_msg_data ); -- 4537865
1044: END CHECK_ACTUAL_DATES;
1045:
1238: x_service_type_code := NULL ;
1239: x_service_type_name := NULL ;
1240:
1241: x_error_msg_code := SQLCODE ;
1242: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_TASKS_MAINT_UILS',
1243: p_procedure_name => 'DEFAULT_TASK_ATTRIBUTES',
1244: p_error_text => SUBSTRB(SQLERRM,1,240));
1245: -- 4537865 : End
1246: RAISE;
1366: x_service_type_code := NULL ;
1367: x_service_type_name := NULL ;
1368:
1369: x_error_msg_code := SQLCODE ;
1370: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_TASKS_MAINT_UILS',
1371: p_procedure_name => 'FETCH_TASK_ATTIBUTES',
1372: p_error_text => SUBSTRB(SQLERRM,1,240));
1373: -- 4537865 : End
1374: RAISE;
1501: x_service_type_name := NULL ;
1502:
1503:
1504: x_error_msg_code := SQLCODE ;
1505: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_TASKS_MAINT_UILS',
1506: p_procedure_name => 'FETCH_PROJECT_ATTIBUTES',
1507: p_error_text => SUBSTRB(SQLERRM,1,240));
1508: -- 4537865 :End
1509: RAISE;
1792: END IF;
1793:
1794: IF l_start_date > l_end_date
1795: THEN
1796: IF FND_MSG_PUB.check_msg_level
1797: (FND_MSG_PUB.G_MSG_LVL_ERROR)
1798: THEN
1799: /*
1800: pa_interface_utils_pub.map_new_amg_msg
1793:
1794: IF l_start_date > l_end_date
1795: THEN
1796: IF FND_MSG_PUB.check_msg_level
1797: (FND_MSG_PUB.G_MSG_LVL_ERROR)
1798: THEN
1799: /*
1800: pa_interface_utils_pub.map_new_amg_msg
1801: ( p_old_message_code => 'PA_INVALID_START_DATE2'
1811: */
1812: fnd_message.set_name('PA', 'PA_INVALID_START_DATE2');
1813: --hsiu: commented for bug 2686499
1814: -- fnd_message.set_token('PA_DATE',l_meaning);
1815: fnd_msg_pub.add;
1816: END IF;
1817: RAISE FND_API.G_EXC_ERROR;
1818: END IF;
1819:
1834: NULL;
1835: ELSE
1836:
1837: IF l_start_date > p_old_end_date THEN
1838: IF FND_MSG_PUB.check_msg_level
1839: (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
1840: /*
1841: pa_interface_utils_pub.map_new_amg_msg
1842: ( p_old_message_code => 'PA_INVALID_START_DATE2'
1835: ELSE
1836:
1837: IF l_start_date > p_old_end_date THEN
1838: IF FND_MSG_PUB.check_msg_level
1839: (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
1840: /*
1841: pa_interface_utils_pub.map_new_amg_msg
1842: ( p_old_message_code => 'PA_INVALID_START_DATE2'
1843: ,p_msg_attribute => 'CHANGE'
1852: */
1853: fnd_message.set_name('PA', 'PA_INVALID_START_DATE2');
1854: --commented for bug 2686499
1855: -- fnd_message.set_token('PA_DATE',l_meaning);
1856: fnd_msg_pub.add;
1857: END IF;
1858: RAISE FND_API.G_EXC_ERROR;
1859: END IF;
1860: END IF;
1871:
1872: IF p_new_end_date <> PA_INTERFACE_UTILS_PUB.G_PA_MISS_DATE
1873: AND p_new_end_date IS NOT NULL
1874: THEN
1875: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
1876: THEN
1877: /*
1878: pa_interface_utils_pub.map_new_amg_msg
1879: ( p_old_message_code => 'PA_DATES_INVALID'
1888: fnd_message.set_token('PA_DATE',l_meaning);
1889: */
1890: fnd_message.set_name('PA', 'PA_DATES_INVALID');
1891: fnd_message.set_token('PA_DATE',l_meaning);
1892: fnd_msg_pub.add;
1893: END IF;
1894:
1895: RAISE FND_API.G_EXC_ERROR;
1896:
1907: p_update_end_date_flag := 'N';
1908:
1909: IF p_old_end_date IS NOT NULL --start_date is null
1910: THEN
1911: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
1912: THEN
1913: /*
1914: pa_interface_utils_pub.map_new_amg_msg
1915: ( p_old_message_code => 'PA_DATES_INVALID'
1925: */
1926: fnd_message.set_name('PA', 'PA_INVALID_START_DATE2');
1927: --commented for bug 2686499
1928: -- fnd_message.set_token('PA_DATE',l_meaning);
1929: fnd_msg_pub.add;
1930: END IF;
1931:
1932: RAISE FND_API.G_EXC_ERROR;
1933: END IF;
1946:
1947: IF p_old_start_date IS NULL
1948: OR p_old_start_date > p_new_end_date
1949: THEN
1950: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR)
1951: THEN
1952: /*
1953: pa_interface_utils_pub.map_new_amg_msg
1954: ( p_old_message_code => 'PA_INVALID_START_DATE2'
1964: */
1965: fnd_message.set_name('PA', 'PA_INVALID_START_DATE2');
1966: --commented for bug 2686499
1967: -- fnd_message.set_token('PA_DATE',l_meaning);
1968: fnd_msg_pub.add;
1969: END IF;
1970:
1971: RAISE FND_API.G_EXC_ERROR;
1972: END IF;
2021: p_update_start_date_flag := NULL ;
2022: p_update_end_date_flag := NULL ;
2023: -- 4537865 : End
2024:
2025: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2026: THEN
2027: FND_MSG_PUB.add_exc_msg
2028: ( p_pkg_name => 'PA_TASKS_MAINT_UTILS'
2029: , p_procedure_name => l_api_name );
2023: -- 4537865 : End
2024:
2025: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2026: THEN
2027: FND_MSG_PUB.add_exc_msg
2028: ( p_pkg_name => 'PA_TASKS_MAINT_UTILS'
2029: , p_procedure_name => l_api_name );
2030:
2031: END IF;
2295:
2296: -- 4537865 : RESET x_error_message_code also
2297: x_error_msg_code := SQLCODE ;
2298:
2299: Fnd_Msg_Pub.add_exc_msg
2300: ( p_pkg_name => 'PA_TASKS_MAINT_UTILS'
2301: ,p_procedure_name => 'CHECK_MOVE_FINANCIAL_TASK_OK'
2302: ,p_error_text => x_msg_data);
2303:
2430: IF c_get_WP_rec%ISOPEN THEN
2431: CLOSE c_get_WP_rec;
2432: END IF;
2433:
2434: Fnd_Msg_Pub.add_exc_msg
2435: ( p_pkg_name => 'PA_TASKS_MAINT_UTILS'
2436: ,p_procedure_name => 'CHECK_WORKPLAN_TASK_EXISTS'
2437: ,p_error_text => x_msg_data);
2438:
2524:
2525: EXCEPTION
2526: WHEN FND_API.G_EXC_ERROR THEN
2527: x_return_status := FND_API.G_RET_STS_ERROR;
2528: x_msg_count := FND_MSG_PUB.count_msg;
2529: WHEN OTHERS THEN
2530: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2531: -- 4537865 : RESET x_msg_count, x_msg_data also
2532: x_msg_count := 1 ;
2531: -- 4537865 : RESET x_msg_count, x_msg_data also
2532: x_msg_count := 1 ;
2533: x_msg_data := SUBSTRB(SQLERRM,1,240);
2534:
2535: FND_MSG_PUB.add_exc_msg(p_pkg_name => 'PA_TASKS_MAINT_UTILS',
2536: p_procedure_name => 'Check_End_Date_EI',
2537: p_error_text => x_msg_data); -- 4537865
2538: END Check_End_Date_EI;
2539: /*Check_Start_Date_EI
2614:
2615: EXCEPTION
2616: WHEN FND_API.G_EXC_ERROR THEN
2617: x_return_status := FND_API.G_RET_STS_ERROR;
2618: x_msg_count := FND_MSG_PUB.count_msg;
2619: WHEN OTHERS THEN
2620: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2621: -- 4537865 : RESET x_msg_count, x_msg_data also
2622: x_msg_count := 1 ;
2621: -- 4537865 : RESET x_msg_count, x_msg_data also
2622: x_msg_count := 1 ;
2623: x_msg_data := SUBSTRB(SQLERRM,1,240);
2624:
2625: FND_MSG_PUB.add_exc_msg(p_pkg_name => 'PA_TASKS_MAINT_UTILS',
2626: p_procedure_name => 'Check_Start_Date_EI',
2627: p_error_text => x_msg_data); -- 4537865
2628: END Check_Start_Date_EI;
2629: --Added by rtarway for BUG 4081329