2: /* $Header: ozfvaegb.pls 120.6 2006/03/08 02:40:54 inanaiah ship $ */
3: -- g_version CONSTANT CHAR(80) := '$Header: ozfvaegb.pls 120.6 2006/03/08 02:40:54 inanaiah ship $';
4: g_pkg_name CONSTANT VARCHAR2(30):='OZF_ALLOCATION_ENGINE_PVT';
5:
6: OZF_DEBUG_HIGH_ON CONSTANT BOOLEAN := FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_debug_high);
7: OZF_DEBUG_MEDIUM_ON CONSTANT BOOLEAN := FND_MSG_PUB.CHECK_MSG_LEVEL(FND_MSG_PUB.G_MSG_LVL_DEBUG_MEDIUM);
8: OZF_DEBUG_LOW_ON CONSTANT BOOLEAN := FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_debug_low);
9: G_DEBUG_LEVEL BOOLEAN := FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_debug_high);
10:
3: -- g_version CONSTANT CHAR(80) := '$Header: ozfvaegb.pls 120.6 2006/03/08 02:40:54 inanaiah ship $';
4: g_pkg_name CONSTANT VARCHAR2(30):='OZF_ALLOCATION_ENGINE_PVT';
5:
6: OZF_DEBUG_HIGH_ON CONSTANT BOOLEAN := FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_debug_high);
7: OZF_DEBUG_MEDIUM_ON CONSTANT BOOLEAN := FND_MSG_PUB.CHECK_MSG_LEVEL(FND_MSG_PUB.G_MSG_LVL_DEBUG_MEDIUM);
8: OZF_DEBUG_LOW_ON CONSTANT BOOLEAN := FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_debug_low);
9: G_DEBUG_LEVEL BOOLEAN := FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_debug_high);
10:
11: g_phase VARCHAR2(500);
4: g_pkg_name CONSTANT VARCHAR2(30):='OZF_ALLOCATION_ENGINE_PVT';
5:
6: OZF_DEBUG_HIGH_ON CONSTANT BOOLEAN := FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_debug_high);
7: OZF_DEBUG_MEDIUM_ON CONSTANT BOOLEAN := FND_MSG_PUB.CHECK_MSG_LEVEL(FND_MSG_PUB.G_MSG_LVL_DEBUG_MEDIUM);
8: OZF_DEBUG_LOW_ON CONSTANT BOOLEAN := FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_debug_low);
9: G_DEBUG_LEVEL BOOLEAN := FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_debug_high);
10:
11: g_phase VARCHAR2(500);
12: g_user_id NUMBER;
5:
6: OZF_DEBUG_HIGH_ON CONSTANT BOOLEAN := FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_debug_high);
7: OZF_DEBUG_MEDIUM_ON CONSTANT BOOLEAN := FND_MSG_PUB.CHECK_MSG_LEVEL(FND_MSG_PUB.G_MSG_LVL_DEBUG_MEDIUM);
8: OZF_DEBUG_LOW_ON CONSTANT BOOLEAN := FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_debug_low);
9: G_DEBUG_LEVEL BOOLEAN := FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_debug_high);
10:
11: g_phase VARCHAR2(500);
12: g_user_id NUMBER;
13: g_login_id NUMBER;
707: RETURNING t.allocation_for_id INTO l_temp_product_allocation_id;
708:
709:
710: IF (SQL%NOTFOUND) THEN
711: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_error) THEN
712: fnd_message.set_name ('OZF', 'OZF_TP_ROUNDING_TIME_ERR');
713: fnd_message.set_token('OZF_TP_OBJECT_TYPE_TOKEN',l_object_type);
714: fnd_message.set_token('OZF_TP_OBJECT_ID_TOKEN',l_object_id);
715: fnd_msg_pub.ADD;
711: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_error) THEN
712: fnd_message.set_name ('OZF', 'OZF_TP_ROUNDING_TIME_ERR');
713: fnd_message.set_token('OZF_TP_OBJECT_TYPE_TOKEN',l_object_type);
714: fnd_message.set_token('OZF_TP_OBJECT_ID_TOKEN',l_object_id);
715: fnd_msg_pub.ADD;
716: END IF;
717: RAISE fnd_api.g_exc_unexpected_error;
718: END IF;
719:
725: p.last_update_login = FND_GLOBAL.CONC_LOGIN_ID
726: WHERE p.product_allocation_id = l_temp_product_allocation_id;
727:
728: IF (SQL%NOTFOUND) THEN
729: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_error) THEN
730: fnd_message.set_name ('OZF', 'OZF_TP_ROUNDING_PROD_ERR');
731: fnd_message.set_token('OZF_TP_OBJECT_TYPE_TOKEN',l_object_type);
732: fnd_message.set_token('OZF_TP_OBJECT_ID_TOKEN',l_object_id);
733: fnd_msg_pub.ADD;
729: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_error) THEN
730: fnd_message.set_name ('OZF', 'OZF_TP_ROUNDING_PROD_ERR');
731: fnd_message.set_token('OZF_TP_OBJECT_TYPE_TOKEN',l_object_type);
732: fnd_message.set_token('OZF_TP_OBJECT_ID_TOKEN',l_object_id);
733: fnd_msg_pub.ADD;
734: END IF;
735: RAISE fnd_api.g_exc_unexpected_error;
736: END IF;
737:
752: );
753:
754:
755: IF (SQL%NOTFOUND) THEN
756: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_error) THEN
757: fnd_message.set_name ('OZF', 'OZF_TP_TIMEALLOC_NOT_FOUND_TXT');
758: fnd_msg_pub.ADD;
759: END IF;
760: RAISE fnd_api.g_exc_unexpected_error;
754:
755: IF (SQL%NOTFOUND) THEN
756: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_error) THEN
757: fnd_message.set_name ('OZF', 'OZF_TP_TIMEALLOC_NOT_FOUND_TXT');
758: fnd_msg_pub.ADD;
759: END IF;
760: RAISE fnd_api.g_exc_unexpected_error;
761: END IF;
762:
770: AND p.allocation_for_id = l_account_allocation_id
771: AND p.item_id = -9999;
772:
773: IF (SQL%NOTFOUND) THEN
774: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_error) THEN
775: fnd_message.set_name ('OZF', 'OZF_TP_PRODALLOC_NOT_FOUND_TXT');
776: fnd_msg_pub.ADD;
777: END IF;
778: RAISE fnd_api.g_exc_unexpected_error;
772:
773: IF (SQL%NOTFOUND) THEN
774: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_error) THEN
775: fnd_message.set_name ('OZF', 'OZF_TP_PRODALLOC_NOT_FOUND_TXT');
776: fnd_msg_pub.ADD;
777: END IF;
778: RAISE fnd_api.g_exc_unexpected_error;
779: END IF;
780: ---------------------------------------------------------------------------------------------------
1076: END IF;
1077:
1078: -- Initialize message list if p_init_msg_list is set to TRUE.
1079: IF FND_API.to_Boolean( p_init_msg_list ) THEN
1080: FND_MSG_PUB.initialize;
1081: END IF;
1082:
1083: -- Initialize API return status to SUCCESS
1084: x_return_status := FND_API.g_ret_sts_success;
1406: AND p.item_id = -9999 )
1407: );
1408:
1409: IF (SQL%NOTFOUND) THEN
1410: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_error) THEN
1411: fnd_message.set_name ('OZF', 'OZF_TP_ROUNDING_TIME_ERR');
1412: fnd_message.set_token('OZF_TP_OBJECT_TYPE_TOKEN','FACT');
1413: fnd_message.set_token('OZF_TP_OBJECT_ID_TOKEN',l_fact_id);
1414: fnd_msg_pub.ADD;
1410: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_error) THEN
1411: fnd_message.set_name ('OZF', 'OZF_TP_ROUNDING_TIME_ERR');
1412: fnd_message.set_token('OZF_TP_OBJECT_TYPE_TOKEN','FACT');
1413: fnd_message.set_token('OZF_TP_OBJECT_ID_TOKEN',l_fact_id);
1414: fnd_msg_pub.ADD;
1415: END IF;
1416: RAISE fnd_api.g_exc_unexpected_error;
1417: END IF;
1418:
1427: AND p.allocation_for_id = l_fact_id
1428: AND p.item_id = -9999;
1429:
1430: IF (SQL%NOTFOUND) THEN
1431: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_error) THEN
1432: fnd_message.set_name ('OZF', 'OZF_TP_ROUNDING_PROD_ERR');
1433: fnd_message.set_token('OZF_TP_OBJECT_TYPE_TOKEN','FACT');
1434: fnd_message.set_token('OZF_TP_OBJECT_ID_TOKEN',l_fact_id);
1435: fnd_msg_pub.ADD;
1431: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_error) THEN
1432: fnd_message.set_name ('OZF', 'OZF_TP_ROUNDING_PROD_ERR');
1433: fnd_message.set_token('OZF_TP_OBJECT_TYPE_TOKEN','FACT');
1434: fnd_message.set_token('OZF_TP_OBJECT_ID_TOKEN',l_fact_id);
1435: fnd_msg_pub.ADD;
1436: END IF;
1437: RAISE fnd_api.g_exc_unexpected_error;
1438: END IF;
1439:
1451: EXCEPTION
1452: WHEN OZF_TP_DIFF_TIME_SPREAD THEN
1453: ROLLBACK TO create_old_fact_product_spread;
1454: FND_MESSAGE.set_name('OZF', 'OZF_TP_DIFF_TIME_SPREAD_TXT');
1455: FND_MSG_PUB.add;
1456: x_return_status := FND_API.g_ret_sts_error ;
1457: FND_MSG_PUB.count_and_get (p_count => x_error_number,
1458: p_data => x_error_message);
1459: OZF_UTILITY_PVT.debug_message(l_full_api_name||' : TIME SPREAD MISMATCH EXCEPTION = '||sqlerrm(sqlcode));
1453: ROLLBACK TO create_old_fact_product_spread;
1454: FND_MESSAGE.set_name('OZF', 'OZF_TP_DIFF_TIME_SPREAD_TXT');
1455: FND_MSG_PUB.add;
1456: x_return_status := FND_API.g_ret_sts_error ;
1457: FND_MSG_PUB.count_and_get (p_count => x_error_number,
1458: p_data => x_error_message);
1459: OZF_UTILITY_PVT.debug_message(l_full_api_name||' : TIME SPREAD MISMATCH EXCEPTION = '||sqlerrm(sqlcode));
1460: OZF_UTILITY_PVT.debug_message(fnd_message.get_string('OZF', 'OZF_TP_DIFF_TIME_SPREAD_TXT'));
1461:
1461:
1462: WHEN OZF_TP_BLANK_PERIOD_TBL THEN
1463: ROLLBACK TO create_old_fact_product_spread;
1464: FND_MESSAGE.set_name('OZF', 'OZF_TP_BLANK_PERIOD_TBL_TXT');
1465: FND_MSG_PUB.add;
1466: x_return_status := FND_API.g_ret_sts_error ;
1467: FND_MSG_PUB.count_and_get (p_count => x_error_number,
1468: p_data => x_error_message);
1469: OZF_UTILITY_PVT.debug_message(l_full_api_name||' : BLANK PERIOD TABLE EXCEPTION = '||sqlerrm(sqlcode));
1463: ROLLBACK TO create_old_fact_product_spread;
1464: FND_MESSAGE.set_name('OZF', 'OZF_TP_BLANK_PERIOD_TBL_TXT');
1465: FND_MSG_PUB.add;
1466: x_return_status := FND_API.g_ret_sts_error ;
1467: FND_MSG_PUB.count_and_get (p_count => x_error_number,
1468: p_data => x_error_message);
1469: OZF_UTILITY_PVT.debug_message(l_full_api_name||' : BLANK PERIOD TABLE EXCEPTION = '||sqlerrm(sqlcode));
1470: OZF_UTILITY_PVT.debug_message(fnd_message.get_string('OZF', 'OZF_TP_BLANK_PERIOD_TBL_TXT'));
1471:
1471:
1472: WHEN FND_API.G_EXC_ERROR THEN
1473: ROLLBACK TO create_old_fact_product_spread;
1474: x_return_status := FND_API.g_ret_sts_error ;
1475: FND_MSG_PUB.count_and_get (p_count => x_error_number,
1476: p_data => x_error_message);
1477:
1478: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1479: ROLLBACK TO create_old_fact_product_spread;
1477:
1478: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1479: ROLLBACK TO create_old_fact_product_spread;
1480: x_return_status := FND_API.g_ret_sts_unexp_error ;
1481: FND_MSG_PUB.Count_And_Get (p_count => x_error_number,
1482: p_data => x_error_message);
1483:
1484: WHEN OTHERS THEN
1485: ROLLBACK TO create_old_fact_product_spread;
1483:
1484: WHEN OTHERS THEN
1485: ROLLBACK TO create_old_fact_product_spread;
1486: x_return_status := FND_API.g_ret_sts_unexp_error ;
1487: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1488: FND_MSG_PUB.Add_Exc_Msg (g_pkg_name, l_api_name);
1489: END IF;
1490: FND_MSG_PUB.Count_And_Get (p_count => x_error_number,
1491: p_data => x_error_message);
1484: WHEN OTHERS THEN
1485: ROLLBACK TO create_old_fact_product_spread;
1486: x_return_status := FND_API.g_ret_sts_unexp_error ;
1487: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1488: FND_MSG_PUB.Add_Exc_Msg (g_pkg_name, l_api_name);
1489: END IF;
1490: FND_MSG_PUB.Count_And_Get (p_count => x_error_number,
1491: p_data => x_error_message);
1492: OZF_UTILITY_PVT.debug_message(l_full_api_name||' : OTHERS EXCEPTION = '||sqlerrm(sqlcode));
1486: x_return_status := FND_API.g_ret_sts_unexp_error ;
1487: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1488: FND_MSG_PUB.Add_Exc_Msg (g_pkg_name, l_api_name);
1489: END IF;
1490: FND_MSG_PUB.Count_And_Get (p_count => x_error_number,
1491: p_data => x_error_message);
1492: OZF_UTILITY_PVT.debug_message(l_full_api_name||' : OTHERS EXCEPTION = '||sqlerrm(sqlcode));
1493:
1494: END create_old_fact_product_spread;
1785: END IF;
1786:
1787: -- Initialize message list if p_init_msg_list is set to TRUE.
1788: IF FND_API.to_Boolean( p_init_msg_list ) THEN
1789: FND_MSG_PUB.initialize;
1790: END IF;
1791:
1792: -- Initialize API return status to SUCCESS
1793: x_return_status := FND_API.g_ret_sts_success;
2114: WHERE p.allocation_for = 'FACT'
2115: AND p.allocation_for_id = l_fact_id );
2116:
2117: IF (SQL%NOTFOUND) THEN
2118: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_error) THEN
2119: fnd_message.set_name ('OZF', 'OZF_TP_TIMEALLOC_NOT_FOUND_TXT');
2120: fnd_msg_pub.ADD;
2121: END IF;
2122:
2116:
2117: IF (SQL%NOTFOUND) THEN
2118: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_error) THEN
2119: fnd_message.set_name ('OZF', 'OZF_TP_TIMEALLOC_NOT_FOUND_TXT');
2120: fnd_msg_pub.ADD;
2121: END IF;
2122:
2123: RAISE fnd_api.g_exc_unexpected_error;
2124: END IF;
2135: WHERE p.allocation_for = 'FACT'
2136: AND p.allocation_for_id = l_fact_id;
2137:
2138: IF (SQL%NOTFOUND) THEN
2139: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_error) THEN
2140: fnd_message.set_name ('OZF', 'OZF_TP_PRODALLOC_NOT_FOUND_TXT');
2141: fnd_msg_pub.ADD;
2142: END IF;
2143:
2137:
2138: IF (SQL%NOTFOUND) THEN
2139: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_error) THEN
2140: fnd_message.set_name ('OZF', 'OZF_TP_PRODALLOC_NOT_FOUND_TXT');
2141: fnd_msg_pub.ADD;
2142: END IF;
2143:
2144: RAISE fnd_api.g_exc_unexpected_error;
2145: END IF;
2165: AND p.allocation_for_id = l_fact_id
2166: AND p.item_id = -9999;
2167:
2168: IF (SQL%NOTFOUND) THEN
2169: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_error) THEN
2170: fnd_message.set_name ('OZF', 'OZF_TP_PRODALLOC_NOT_FOUND_TXT');
2171: fnd_msg_pub.ADD;
2172: END IF;
2173:
2167:
2168: IF (SQL%NOTFOUND) THEN
2169: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_error) THEN
2170: fnd_message.set_name ('OZF', 'OZF_TP_PRODALLOC_NOT_FOUND_TXT');
2171: fnd_msg_pub.ADD;
2172: END IF;
2173:
2174: RAISE fnd_api.g_exc_unexpected_error;
2175: END IF;
2187: AND p.allocation_for_id = l_fact_id
2188: AND p.item_id = -9999 );
2189:
2190: IF (SQL%NOTFOUND) THEN
2191: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_error) THEN
2192: fnd_message.set_name ('OZF', 'OZF_TP_TIMEALLOC_NOT_FOUND_TXT');
2193: fnd_msg_pub.ADD;
2194: END IF;
2195: RAISE fnd_api.g_exc_unexpected_error;
2189:
2190: IF (SQL%NOTFOUND) THEN
2191: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_error) THEN
2192: fnd_message.set_name ('OZF', 'OZF_TP_TIMEALLOC_NOT_FOUND_TXT');
2193: fnd_msg_pub.ADD;
2194: END IF;
2195: RAISE fnd_api.g_exc_unexpected_error;
2196: END IF;
2197:
2208: AND p.allocation_for_id = l_fact_id
2209: AND p.item_id = -9999;
2210:
2211: IF (SQL%NOTFOUND) THEN
2212: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_error) THEN
2213: fnd_message.set_name ('OZF', 'OZF_TP_PRODALLOC_NOT_FOUND_TXT');
2214: fnd_msg_pub.ADD;
2215: END IF;
2216:
2210:
2211: IF (SQL%NOTFOUND) THEN
2212: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_error) THEN
2213: fnd_message.set_name ('OZF', 'OZF_TP_PRODALLOC_NOT_FOUND_TXT');
2214: fnd_msg_pub.ADD;
2215: END IF;
2216:
2217: RAISE fnd_api.g_exc_unexpected_error;
2218: END IF;
2268: );
2269:
2270:
2271: IF (SQL%NOTFOUND) THEN
2272: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_error) THEN
2273: fnd_message.set_name ('OZF', 'OZF_TP_TIMEALLOC_NOT_FOUND_TXT');
2274: fnd_msg_pub.ADD;
2275: END IF;
2276: RAISE fnd_api.g_exc_unexpected_error;
2270:
2271: IF (SQL%NOTFOUND) THEN
2272: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_error) THEN
2273: fnd_message.set_name ('OZF', 'OZF_TP_TIMEALLOC_NOT_FOUND_TXT');
2274: fnd_msg_pub.ADD;
2275: END IF;
2276: RAISE fnd_api.g_exc_unexpected_error;
2277: END IF;
2278:
2286: AND p.allocation_for_id = l_fact_id
2287: AND p.item_id = -9999;
2288:
2289: IF (SQL%NOTFOUND) THEN
2290: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_error) THEN
2291: fnd_message.set_name ('OZF', 'OZF_TP_PRODALLOC_NOT_FOUND_TXT');
2292: fnd_msg_pub.ADD;
2293: END IF;
2294: RAISE fnd_api.g_exc_unexpected_error;
2288:
2289: IF (SQL%NOTFOUND) THEN
2290: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_error) THEN
2291: fnd_message.set_name ('OZF', 'OZF_TP_PRODALLOC_NOT_FOUND_TXT');
2292: fnd_msg_pub.ADD;
2293: END IF;
2294: RAISE fnd_api.g_exc_unexpected_error;
2295: END IF;
2296: */
2310: EXCEPTION
2311: WHEN OZF_TP_DIFF_TIME_SPREAD THEN
2312: ROLLBACK TO create_fact_product_spread;
2313: FND_MESSAGE.set_name('OZF', 'OZF_TP_DIFF_TIME_SPREAD_TXT');
2314: FND_MSG_PUB.add;
2315: x_return_status := FND_API.g_ret_sts_error ;
2316: FND_MSG_PUB.count_and_get (p_count => x_error_number,
2317: p_data => x_error_message);
2318: OZF_UTILITY_PVT.debug_message(l_full_api_name||' : TIME SPREAD MISMATCH EXCEPTION = '||sqlerrm(sqlcode));
2312: ROLLBACK TO create_fact_product_spread;
2313: FND_MESSAGE.set_name('OZF', 'OZF_TP_DIFF_TIME_SPREAD_TXT');
2314: FND_MSG_PUB.add;
2315: x_return_status := FND_API.g_ret_sts_error ;
2316: FND_MSG_PUB.count_and_get (p_count => x_error_number,
2317: p_data => x_error_message);
2318: OZF_UTILITY_PVT.debug_message(l_full_api_name||' : TIME SPREAD MISMATCH EXCEPTION = '||sqlerrm(sqlcode));
2319: OZF_UTILITY_PVT.debug_message(fnd_message.get_string('OZF', 'OZF_TP_DIFF_TIME_SPREAD_TXT'));
2320:
2320:
2321: WHEN OZF_TP_BLANK_PERIOD_TBL THEN
2322: ROLLBACK TO create_fact_product_spread;
2323: FND_MESSAGE.set_name('OZF', 'OZF_TP_BLANK_PERIOD_TBL_TXT');
2324: FND_MSG_PUB.add;
2325: x_return_status := FND_API.g_ret_sts_error ;
2326: FND_MSG_PUB.count_and_get (p_count => x_error_number,
2327: p_data => x_error_message);
2328: OZF_UTILITY_PVT.debug_message(l_full_api_name||' : BLANK PERIOD TABLE EXCEPTION = '||sqlerrm(sqlcode));
2322: ROLLBACK TO create_fact_product_spread;
2323: FND_MESSAGE.set_name('OZF', 'OZF_TP_BLANK_PERIOD_TBL_TXT');
2324: FND_MSG_PUB.add;
2325: x_return_status := FND_API.g_ret_sts_error ;
2326: FND_MSG_PUB.count_and_get (p_count => x_error_number,
2327: p_data => x_error_message);
2328: OZF_UTILITY_PVT.debug_message(l_full_api_name||' : BLANK PERIOD TABLE EXCEPTION = '||sqlerrm(sqlcode));
2329: OZF_UTILITY_PVT.debug_message(fnd_message.get_string('OZF', 'OZF_TP_BLANK_PERIOD_TBL_TXT'));
2330:
2330:
2331: WHEN FND_API.G_EXC_ERROR THEN
2332: ROLLBACK TO create_fact_product_spread;
2333: x_return_status := FND_API.g_ret_sts_error ;
2334: FND_MSG_PUB.count_and_get (p_count => x_error_number,
2335: p_data => x_error_message);
2336:
2337: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2338: ROLLBACK TO create_fact_product_spread;
2336:
2337: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2338: ROLLBACK TO create_fact_product_spread;
2339: x_return_status := FND_API.g_ret_sts_unexp_error ;
2340: FND_MSG_PUB.Count_And_Get (p_count => x_error_number,
2341: p_data => x_error_message);
2342:
2343: WHEN OTHERS THEN
2344: ROLLBACK TO create_fact_product_spread;
2342:
2343: WHEN OTHERS THEN
2344: ROLLBACK TO create_fact_product_spread;
2345: x_return_status := FND_API.g_ret_sts_unexp_error ;
2346: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
2347: FND_MSG_PUB.Add_Exc_Msg (g_pkg_name, l_api_name);
2348: END IF;
2349: FND_MSG_PUB.Count_And_Get (p_count => x_error_number,
2350: p_data => x_error_message);
2343: WHEN OTHERS THEN
2344: ROLLBACK TO create_fact_product_spread;
2345: x_return_status := FND_API.g_ret_sts_unexp_error ;
2346: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
2347: FND_MSG_PUB.Add_Exc_Msg (g_pkg_name, l_api_name);
2348: END IF;
2349: FND_MSG_PUB.Count_And_Get (p_count => x_error_number,
2350: p_data => x_error_message);
2351: OZF_UTILITY_PVT.debug_message(l_full_api_name||' : OTHERS EXCEPTION = '||sqlerrm(sqlcode));
2345: x_return_status := FND_API.g_ret_sts_unexp_error ;
2346: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
2347: FND_MSG_PUB.Add_Exc_Msg (g_pkg_name, l_api_name);
2348: END IF;
2349: FND_MSG_PUB.Count_And_Get (p_count => x_error_number,
2350: p_data => x_error_message);
2351: OZF_UTILITY_PVT.debug_message(l_full_api_name||' : OTHERS EXCEPTION = '||sqlerrm(sqlcode));
2352:
2353: END create_fact_product_spread;
2604: END IF;
2605:
2606: -- Initialize message list if p_init_msg_list is set to TRUE.
2607: IF FND_API.to_Boolean( p_init_msg_list ) THEN
2608: FND_MSG_PUB.initialize;
2609: END IF;
2610:
2611: -- Initialize API return status to SUCCESS
2612: x_return_status := FND_API.g_ret_sts_success;
3126: WHERE p.allocation_for = 'FUND'
3127: AND p.allocation_for_id = l_fund_id;
3128:
3129: IF (SQL%NOTFOUND) THEN
3130: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_error) THEN
3131: fnd_message.set_name ('OZF', 'OZF_TP_PRODALLOC_NOT_FOUND_TXT');
3132: fnd_msg_pub.ADD;
3133: END IF;
3134:
3128:
3129: IF (SQL%NOTFOUND) THEN
3130: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_error) THEN
3131: fnd_message.set_name ('OZF', 'OZF_TP_PRODALLOC_NOT_FOUND_TXT');
3132: fnd_msg_pub.ADD;
3133: END IF;
3134:
3135: RAISE fnd_api.g_exc_unexpected_error;
3136: END IF;
3148: WHERE p.allocation_for = 'FUND'
3149: AND p.allocation_for_id = l_fund_id );
3150:
3151: IF (SQL%NOTFOUND) THEN
3152: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_error) THEN
3153: fnd_message.set_name ('OZF', 'OZF_TP_TIMEALLOC_NOT_FOUND_TXT');
3154: fnd_msg_pub.ADD;
3155: END IF;
3156:
3150:
3151: IF (SQL%NOTFOUND) THEN
3152: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_error) THEN
3153: fnd_message.set_name ('OZF', 'OZF_TP_TIMEALLOC_NOT_FOUND_TXT');
3154: fnd_msg_pub.ADD;
3155: END IF;
3156:
3157: RAISE fnd_api.g_exc_unexpected_error;
3158: END IF;
3170: WHERE p.allocation_for = 'FUND'
3171: AND p.allocation_for_id = l_fund_id;
3172:
3173: IF (SQL%NOTFOUND) THEN
3174: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_error) THEN
3175: fnd_message.set_name ('OZF', 'OZF_TP_PRODALLOC_NOT_FOUND_TXT');
3176: fnd_msg_pub.ADD;
3177: END IF;
3178:
3172:
3173: IF (SQL%NOTFOUND) THEN
3174: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_error) THEN
3175: fnd_message.set_name ('OZF', 'OZF_TP_PRODALLOC_NOT_FOUND_TXT');
3176: fnd_msg_pub.ADD;
3177: END IF;
3178:
3179: RAISE fnd_api.g_exc_unexpected_error;
3180: END IF;
3201: AND p.allocation_for_id = l_fund_id
3202: AND p.item_id = -9999;
3203:
3204: IF (SQL%NOTFOUND) THEN
3205: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_error) THEN
3206: fnd_message.set_name ('OZF', 'OZF_TP_PRODALLOC_NOT_FOUND_TXT');
3207: fnd_msg_pub.ADD;
3208: END IF;
3209:
3203:
3204: IF (SQL%NOTFOUND) THEN
3205: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_error) THEN
3206: fnd_message.set_name ('OZF', 'OZF_TP_PRODALLOC_NOT_FOUND_TXT');
3207: fnd_msg_pub.ADD;
3208: END IF;
3209:
3210: RAISE fnd_api.g_exc_unexpected_error;
3211: END IF;
3223: AND p.allocation_for_id = l_fund_id
3224: AND p.item_id = -9999 );
3225:
3226: IF (SQL%NOTFOUND) THEN
3227: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_error) THEN
3228: fnd_message.set_name ('OZF', 'OZF_TP_TIMEALLOC_NOT_FOUND_TXT');
3229: fnd_msg_pub.ADD;
3230: END IF;
3231: RAISE fnd_api.g_exc_unexpected_error;
3225:
3226: IF (SQL%NOTFOUND) THEN
3227: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_error) THEN
3228: fnd_message.set_name ('OZF', 'OZF_TP_TIMEALLOC_NOT_FOUND_TXT');
3229: fnd_msg_pub.ADD;
3230: END IF;
3231: RAISE fnd_api.g_exc_unexpected_error;
3232: END IF;
3233:
3245: AND p.allocation_for_id = l_fund_id
3246: AND p.item_id = -9999;
3247:
3248: IF (SQL%NOTFOUND) THEN
3249: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_error) THEN
3250: fnd_message.set_name ('OZF', 'OZF_TP_PRODALLOC_NOT_FOUND_TXT');
3251: fnd_msg_pub.ADD;
3252: END IF;
3253:
3247:
3248: IF (SQL%NOTFOUND) THEN
3249: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_error) THEN
3250: fnd_message.set_name ('OZF', 'OZF_TP_PRODALLOC_NOT_FOUND_TXT');
3251: fnd_msg_pub.ADD;
3252: END IF;
3253:
3254: RAISE fnd_api.g_exc_unexpected_error;
3255: END IF;
3405: AND p.item_id = -9999 )
3406: );
3407:
3408: IF (SQL%NOTFOUND) THEN
3409: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_error) THEN
3410: fnd_message.set_name ('OZF', 'OZF_TP_TIMEALLOC_NOT_FOUND_TXT');
3411: fnd_msg_pub.ADD;
3412: END IF;
3413: RAISE fnd_api.g_exc_unexpected_error;
3407:
3408: IF (SQL%NOTFOUND) THEN
3409: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_error) THEN
3410: fnd_message.set_name ('OZF', 'OZF_TP_TIMEALLOC_NOT_FOUND_TXT');
3411: fnd_msg_pub.ADD;
3412: END IF;
3413: RAISE fnd_api.g_exc_unexpected_error;
3414: END IF;
3415: END IF;
3424: EXCEPTION
3425: WHEN OZF_TP_BLANK_PERIOD_TBL THEN
3426: ROLLBACK TO create_root_product_spread;
3427: FND_MESSAGE.set_name('OZF', 'OZF_TP_BLANK_PERIOD_TBL_TXT');
3428: FND_MSG_PUB.add;
3429: x_return_status := FND_API.g_ret_sts_error ;
3430: FND_MSG_PUB.count_and_get (p_count => x_error_number,
3431: p_data => x_error_message);
3432: OZF_UTILITY_PVT.debug_message(l_full_api_name||' : BLANK PERIOD TABLE EXCEPTION = '||sqlerrm(sqlcode));
3426: ROLLBACK TO create_root_product_spread;
3427: FND_MESSAGE.set_name('OZF', 'OZF_TP_BLANK_PERIOD_TBL_TXT');
3428: FND_MSG_PUB.add;
3429: x_return_status := FND_API.g_ret_sts_error ;
3430: FND_MSG_PUB.count_and_get (p_count => x_error_number,
3431: p_data => x_error_message);
3432: OZF_UTILITY_PVT.debug_message(l_full_api_name||' : BLANK PERIOD TABLE EXCEPTION = '||sqlerrm(sqlcode));
3433: OZF_UTILITY_PVT.debug_message(fnd_message.get_string('OZF', 'OZF_TP_BLANK_PERIOD_TBL_TXT'));
3434:
3434:
3435: WHEN FND_API.G_EXC_ERROR THEN
3436: ROLLBACK TO create_root_product_spread;
3437: x_return_status := FND_API.g_ret_sts_error ;
3438: FND_MSG_PUB.count_and_get (p_count => x_error_number,
3439: p_data => x_error_message);
3440:
3441: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3442: ROLLBACK TO create_root_product_spread;
3440:
3441: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3442: ROLLBACK TO create_root_product_spread;
3443: x_return_status := FND_API.g_ret_sts_unexp_error ;
3444: FND_MSG_PUB.Count_And_Get (p_count => x_error_number,
3445: p_data => x_error_message);
3446:
3447: WHEN OTHERS THEN
3448: ROLLBACK TO create_root_product_spread;
3446:
3447: WHEN OTHERS THEN
3448: ROLLBACK TO create_root_product_spread;
3449: x_return_status := FND_API.g_ret_sts_unexp_error ;
3450: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
3451: FND_MSG_PUB.Add_Exc_Msg (g_pkg_name, l_api_name);
3452: END IF;
3453: FND_MSG_PUB.Count_And_Get (p_count => x_error_number,
3454: p_data => x_error_message);
3447: WHEN OTHERS THEN
3448: ROLLBACK TO create_root_product_spread;
3449: x_return_status := FND_API.g_ret_sts_unexp_error ;
3450: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
3451: FND_MSG_PUB.Add_Exc_Msg (g_pkg_name, l_api_name);
3452: END IF;
3453: FND_MSG_PUB.Count_And_Get (p_count => x_error_number,
3454: p_data => x_error_message);
3455: OZF_UTILITY_PVT.debug_message(l_full_api_name||' : OTHERS EXCEPTION = '||sqlerrm(sqlcode));
3449: x_return_status := FND_API.g_ret_sts_unexp_error ;
3450: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
3451: FND_MSG_PUB.Add_Exc_Msg (g_pkg_name, l_api_name);
3452: END IF;
3453: FND_MSG_PUB.Count_And_Get (p_count => x_error_number,
3454: p_data => x_error_message);
3455: OZF_UTILITY_PVT.debug_message(l_full_api_name||' : OTHERS EXCEPTION = '||sqlerrm(sqlcode));
3456:
3457: END create_root_product_spread;
3531: END IF;
3532:
3533: -- Initialize message list if p_init_msg_list is set to TRUE.
3534: IF FND_API.to_Boolean( p_init_msg_list ) THEN
3535: FND_MSG_PUB.initialize;
3536: END IF;
3537:
3538: -- Initialize API return status to SUCCESS
3539: x_return_status := FND_API.g_ret_sts_success;
3591: EXCEPTION
3592: WHEN OZF_TP_OPER_NOT_ALLOWED THEN
3593: ROLLBACK TO publish_fact_product_spread;
3594: FND_MESSAGE.set_name('OZF', 'OZF_TP_OPER_NOT_ALLOWED_TXT');
3595: FND_MSG_PUB.add;
3596: x_return_status := FND_API.g_ret_sts_error ;
3597: FND_MSG_PUB.count_and_get (p_count => x_error_number,
3598: p_data => x_error_message);
3599: OZF_UTILITY_PVT.debug_message(fnd_message.get_string('OZF', 'OZF_TP_OPER_NOT_ALLOWED_TXT'));
3593: ROLLBACK TO publish_fact_product_spread;
3594: FND_MESSAGE.set_name('OZF', 'OZF_TP_OPER_NOT_ALLOWED_TXT');
3595: FND_MSG_PUB.add;
3596: x_return_status := FND_API.g_ret_sts_error ;
3597: FND_MSG_PUB.count_and_get (p_count => x_error_number,
3598: p_data => x_error_message);
3599: OZF_UTILITY_PVT.debug_message(fnd_message.get_string('OZF', 'OZF_TP_OPER_NOT_ALLOWED_TXT'));
3600:
3601: WHEN FND_API.G_EXC_ERROR THEN
3600:
3601: WHEN FND_API.G_EXC_ERROR THEN
3602: ROLLBACK TO publish_fact_product_spread;
3603: x_return_status := FND_API.g_ret_sts_error ;
3604: FND_MSG_PUB.count_and_get (p_count => x_error_number,
3605: p_data => x_error_message);
3606:
3607: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3608: ROLLBACK TO publish_fact_product_spread;
3606:
3607: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3608: ROLLBACK TO publish_fact_product_spread;
3609: x_return_status := FND_API.g_ret_sts_unexp_error ;
3610: FND_MSG_PUB.Count_And_Get (p_count => x_error_number,
3611: p_data => x_error_message);
3612:
3613: WHEN OTHERS THEN
3614: ROLLBACK TO publish_fact_product_spread;
3612:
3613: WHEN OTHERS THEN
3614: ROLLBACK TO publish_fact_product_spread;
3615: x_return_status := FND_API.g_ret_sts_unexp_error ;
3616: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
3617: FND_MSG_PUB.Add_Exc_Msg (g_pkg_name, l_api_name);
3618: END IF;
3619: FND_MSG_PUB.Count_And_Get (p_count => x_error_number,
3620: p_data => x_error_message);
3613: WHEN OTHERS THEN
3614: ROLLBACK TO publish_fact_product_spread;
3615: x_return_status := FND_API.g_ret_sts_unexp_error ;
3616: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
3617: FND_MSG_PUB.Add_Exc_Msg (g_pkg_name, l_api_name);
3618: END IF;
3619: FND_MSG_PUB.Count_And_Get (p_count => x_error_number,
3620: p_data => x_error_message);
3621: OZF_UTILITY_PVT.debug_message(l_full_api_name||' : OTHERS EXCEPTION = '||sqlerrm(sqlcode));
3615: x_return_status := FND_API.g_ret_sts_unexp_error ;
3616: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
3617: FND_MSG_PUB.Add_Exc_Msg (g_pkg_name, l_api_name);
3618: END IF;
3619: FND_MSG_PUB.Count_And_Get (p_count => x_error_number,
3620: p_data => x_error_message);
3621: OZF_UTILITY_PVT.debug_message(l_full_api_name||' : OTHERS EXCEPTION = '||sqlerrm(sqlcode));
3622:
3623: END publish_fact_product_spread;
3676: END IF;
3677:
3678: -- Initialize message list if p_init_msg_list is set to TRUE.
3679: IF FND_API.to_Boolean( p_init_msg_list ) THEN
3680: FND_MSG_PUB.initialize;
3681: END IF;
3682:
3683: -- Initialize API return status to SUCCESS
3684: x_return_status := FND_API.g_ret_sts_success;
3709: EXCEPTION
3710: WHEN FND_API.G_EXC_ERROR THEN
3711: ROLLBACK TO delete_fact_product_spread;
3712: x_return_status := FND_API.g_ret_sts_error ;
3713: FND_MSG_PUB.count_and_get (p_count => x_error_number,
3714: p_data => x_error_message);
3715:
3716: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3717: ROLLBACK TO delete_fact_product_spread;
3715:
3716: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3717: ROLLBACK TO delete_fact_product_spread;
3718: x_return_status := FND_API.g_ret_sts_unexp_error ;
3719: FND_MSG_PUB.Count_And_Get (p_count => x_error_number,
3720: p_data => x_error_message);
3721:
3722: WHEN OTHERS THEN
3723: ROLLBACK TO delete_fact_product_spread;
3721:
3722: WHEN OTHERS THEN
3723: ROLLBACK TO delete_fact_product_spread;
3724: x_return_status := FND_API.g_ret_sts_unexp_error ;
3725: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
3726: FND_MSG_PUB.Add_Exc_Msg (g_pkg_name, l_api_name);
3727: END IF;
3728: FND_MSG_PUB.Count_And_Get (p_count => x_error_number,
3729: p_data => x_error_message);
3722: WHEN OTHERS THEN
3723: ROLLBACK TO delete_fact_product_spread;
3724: x_return_status := FND_API.g_ret_sts_unexp_error ;
3725: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
3726: FND_MSG_PUB.Add_Exc_Msg (g_pkg_name, l_api_name);
3727: END IF;
3728: FND_MSG_PUB.Count_And_Get (p_count => x_error_number,
3729: p_data => x_error_message);
3730: OZF_UTILITY_PVT.debug_message(l_full_api_name||' : OTHERS EXCEPTION = '||sqlerrm(sqlcode));
3724: x_return_status := FND_API.g_ret_sts_unexp_error ;
3725: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
3726: FND_MSG_PUB.Add_Exc_Msg (g_pkg_name, l_api_name);
3727: END IF;
3728: FND_MSG_PUB.Count_And_Get (p_count => x_error_number,
3729: p_data => x_error_message);
3730: OZF_UTILITY_PVT.debug_message(l_full_api_name||' : OTHERS EXCEPTION = '||sqlerrm(sqlcode));
3731:
3732: END delete_fact_product_spread;
3850: END IF;
3851:
3852: -- Initialize message list if p_init_msg_list is set to TRUE.
3853: IF FND_API.to_Boolean( p_init_msg_list ) THEN
3854: FND_MSG_PUB.initialize;
3855: END IF;
3856:
3857: -- Initialize API return status to SUCCESS
3858: x_return_status := FND_API.g_ret_sts_success;
3925: EXCEPTION
3926: WHEN OZF_TP_CHG_PS_NOT_ALLOWED THEN
3927: ROLLBACK TO delete_cascade_product_spread;
3928: FND_MESSAGE.set_name('OZF', 'OZF_TP_CHG_PS_NOT_ALLOWED_TXT');
3929: FND_MSG_PUB.add;
3930: x_return_status := FND_API.g_ret_sts_error ;
3931: FND_MSG_PUB.count_and_get (p_count => x_error_number,
3932: p_data => x_error_message);
3933: OZF_UTILITY_PVT.debug_message(fnd_message.get_string('OZF', 'OZF_TP_CHG_PS_NOT_ALLOWED_TXT'));
3927: ROLLBACK TO delete_cascade_product_spread;
3928: FND_MESSAGE.set_name('OZF', 'OZF_TP_CHG_PS_NOT_ALLOWED_TXT');
3929: FND_MSG_PUB.add;
3930: x_return_status := FND_API.g_ret_sts_error ;
3931: FND_MSG_PUB.count_and_get (p_count => x_error_number,
3932: p_data => x_error_message);
3933: OZF_UTILITY_PVT.debug_message(fnd_message.get_string('OZF', 'OZF_TP_CHG_PS_NOT_ALLOWED_TXT'));
3934:
3935: WHEN FND_API.G_EXC_ERROR THEN
3934:
3935: WHEN FND_API.G_EXC_ERROR THEN
3936: ROLLBACK TO delete_cascade_product_spread;
3937: x_return_status := FND_API.g_ret_sts_error ;
3938: FND_MSG_PUB.count_and_get (p_count => x_error_number,
3939: p_data => x_error_message);
3940:
3941: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3942: ROLLBACK TO delete_cascade_product_spread;
3940:
3941: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3942: ROLLBACK TO delete_cascade_product_spread;
3943: x_return_status := FND_API.g_ret_sts_unexp_error ;
3944: FND_MSG_PUB.Count_And_Get (p_count => x_error_number,
3945: p_data => x_error_message);
3946:
3947: WHEN OTHERS THEN
3948: ROLLBACK TO delete_cascade_product_spread;
3946:
3947: WHEN OTHERS THEN
3948: ROLLBACK TO delete_cascade_product_spread;
3949: x_return_status := FND_API.g_ret_sts_unexp_error ;
3950: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
3951: FND_MSG_PUB.Add_Exc_Msg (g_pkg_name, l_api_name);
3952: END IF;
3953: FND_MSG_PUB.Count_And_Get (p_count => x_error_number,
3954: p_data => x_error_message);
3947: WHEN OTHERS THEN
3948: ROLLBACK TO delete_cascade_product_spread;
3949: x_return_status := FND_API.g_ret_sts_unexp_error ;
3950: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
3951: FND_MSG_PUB.Add_Exc_Msg (g_pkg_name, l_api_name);
3952: END IF;
3953: FND_MSG_PUB.Count_And_Get (p_count => x_error_number,
3954: p_data => x_error_message);
3955: OZF_UTILITY_PVT.debug_message(l_full_api_name||' : OTHERS EXCEPTION = '||sqlerrm(sqlcode));
3949: x_return_status := FND_API.g_ret_sts_unexp_error ;
3950: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
3951: FND_MSG_PUB.Add_Exc_Msg (g_pkg_name, l_api_name);
3952: END IF;
3953: FND_MSG_PUB.Count_And_Get (p_count => x_error_number,
3954: p_data => x_error_message);
3955: OZF_UTILITY_PVT.debug_message(l_full_api_name||' : OTHERS EXCEPTION = '||sqlerrm(sqlcode));
3956:
3957: END delete_cascade_product_spread;
4160: END IF;
4161:
4162: -- Initialize message list if p_init_msg_list is set to TRUE.
4163: IF FND_API.to_Boolean( p_init_msg_list ) THEN
4164: FND_MSG_PUB.initialize;
4165: END IF;
4166:
4167: -- Initialize API return status to SUCCESS
4168: x_return_status := FND_API.g_ret_sts_success;
4359: EXCEPTION
4360: WHEN OZF_TP_ADDITEM_NOT_ALLOWED THEN
4361: ROLLBACK TO add_cascade_product_spread;
4362: FND_MESSAGE.set_name('OZF', 'OZF_TP_ADDITEM_NOT_ALLOWED_TXT');
4363: FND_MSG_PUB.add;
4364: x_return_status := FND_API.g_ret_sts_error ;
4365: FND_MSG_PUB.count_and_get (p_count => x_error_number,
4366: p_data => x_error_message);
4367: OZF_UTILITY_PVT.debug_message(fnd_message.get_string('OZF', 'OZF_TP_ADDITEM_NOT_ALLOWED_TXT'));
4361: ROLLBACK TO add_cascade_product_spread;
4362: FND_MESSAGE.set_name('OZF', 'OZF_TP_ADDITEM_NOT_ALLOWED_TXT');
4363: FND_MSG_PUB.add;
4364: x_return_status := FND_API.g_ret_sts_error ;
4365: FND_MSG_PUB.count_and_get (p_count => x_error_number,
4366: p_data => x_error_message);
4367: OZF_UTILITY_PVT.debug_message(fnd_message.get_string('OZF', 'OZF_TP_ADDITEM_NOT_ALLOWED_TXT'));
4368:
4369: WHEN FND_API.G_EXC_ERROR THEN
4368:
4369: WHEN FND_API.G_EXC_ERROR THEN
4370: ROLLBACK TO add_cascade_product_spread;
4371: x_return_status := FND_API.g_ret_sts_error ;
4372: FND_MSG_PUB.count_and_get (p_count => x_error_number,
4373: p_data => x_error_message);
4374:
4375: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4376: ROLLBACK TO add_cascade_product_spread;
4374:
4375: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4376: ROLLBACK TO add_cascade_product_spread;
4377: x_return_status := FND_API.g_ret_sts_unexp_error ;
4378: FND_MSG_PUB.Count_And_Get (p_count => x_error_number,
4379: p_data => x_error_message);
4380:
4381: WHEN OTHERS THEN
4382: ROLLBACK TO add_cascade_product_spread;
4380:
4381: WHEN OTHERS THEN
4382: ROLLBACK TO add_cascade_product_spread;
4383: x_return_status := FND_API.g_ret_sts_unexp_error ;
4384: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
4385: FND_MSG_PUB.Add_Exc_Msg (g_pkg_name, l_api_name);
4386: END IF;
4387: FND_MSG_PUB.Count_And_Get (p_count => x_error_number,
4388: p_data => x_error_message);
4381: WHEN OTHERS THEN
4382: ROLLBACK TO add_cascade_product_spread;
4383: x_return_status := FND_API.g_ret_sts_unexp_error ;
4384: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
4385: FND_MSG_PUB.Add_Exc_Msg (g_pkg_name, l_api_name);
4386: END IF;
4387: FND_MSG_PUB.Count_And_Get (p_count => x_error_number,
4388: p_data => x_error_message);
4389: OZF_UTILITY_PVT.debug_message(l_full_api_name||' : OTHERS EXCEPTION = '||sqlerrm(sqlcode));
4383: x_return_status := FND_API.g_ret_sts_unexp_error ;
4384: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
4385: FND_MSG_PUB.Add_Exc_Msg (g_pkg_name, l_api_name);
4386: END IF;
4387: FND_MSG_PUB.Count_And_Get (p_count => x_error_number,
4388: p_data => x_error_message);
4389: OZF_UTILITY_PVT.debug_message(l_full_api_name||' : OTHERS EXCEPTION = '||sqlerrm(sqlcode));
4390:
4391: END add_cascade_product_spread;
4600: END IF;
4601:
4602: -- Initialize message list if p_init_msg_list is set to TRUE.
4603: IF FND_API.to_Boolean( p_init_msg_list ) THEN
4604: FND_MSG_PUB.initialize;
4605: END IF;
4606:
4607: -- Initialize API return status to SUCCESS
4608: x_return_status := FND_API.g_ret_sts_success;
4714: EXCEPTION
4715: WHEN OZF_TP_DELITEM_NOT_ALLOWED THEN
4716: ROLLBACK TO delete_single_product;
4717: FND_MESSAGE.set_name('OZF', 'OZF_TP_DELITEM_NOT_ALLOWED_TXT');
4718: FND_MSG_PUB.add;
4719: x_return_status := FND_API.g_ret_sts_error ;
4720: FND_MSG_PUB.count_and_get (p_count => x_error_number,
4721: p_data => x_error_message);
4722: OZF_UTILITY_PVT.debug_message(fnd_message.get_string('OZF', 'OZF_TP_DELITEM_NOT_ALLOWED_TXT'));
4716: ROLLBACK TO delete_single_product;
4717: FND_MESSAGE.set_name('OZF', 'OZF_TP_DELITEM_NOT_ALLOWED_TXT');
4718: FND_MSG_PUB.add;
4719: x_return_status := FND_API.g_ret_sts_error ;
4720: FND_MSG_PUB.count_and_get (p_count => x_error_number,
4721: p_data => x_error_message);
4722: OZF_UTILITY_PVT.debug_message(fnd_message.get_string('OZF', 'OZF_TP_DELITEM_NOT_ALLOWED_TXT'));
4723:
4724: WHEN FND_API.G_EXC_ERROR THEN
4723:
4724: WHEN FND_API.G_EXC_ERROR THEN
4725: ROLLBACK TO delete_single_product;
4726: x_return_status := FND_API.g_ret_sts_error ;
4727: FND_MSG_PUB.count_and_get (p_count => x_error_number,
4728: p_data => x_error_message);
4729:
4730: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4731: ROLLBACK TO delete_single_product;
4729:
4730: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4731: ROLLBACK TO delete_single_product;
4732: x_return_status := FND_API.g_ret_sts_unexp_error ;
4733: FND_MSG_PUB.Count_And_Get (p_count => x_error_number,
4734: p_data => x_error_message);
4735:
4736: WHEN OTHERS THEN
4737: ROLLBACK TO delete_single_product;
4735:
4736: WHEN OTHERS THEN
4737: ROLLBACK TO delete_single_product;
4738: x_return_status := FND_API.g_ret_sts_unexp_error ;
4739: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
4740: FND_MSG_PUB.Add_Exc_Msg (g_pkg_name, l_api_name);
4741: END IF;
4742: FND_MSG_PUB.Count_And_Get (p_count => x_error_number,
4743: p_data => x_error_message);
4736: WHEN OTHERS THEN
4737: ROLLBACK TO delete_single_product;
4738: x_return_status := FND_API.g_ret_sts_unexp_error ;
4739: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
4740: FND_MSG_PUB.Add_Exc_Msg (g_pkg_name, l_api_name);
4741: END IF;
4742: FND_MSG_PUB.Count_And_Get (p_count => x_error_number,
4743: p_data => x_error_message);
4744: OZF_UTILITY_PVT.debug_message(l_full_api_name||' : OTHERS EXCEPTION = '||sqlerrm(sqlcode));
4738: x_return_status := FND_API.g_ret_sts_unexp_error ;
4739: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
4740: FND_MSG_PUB.Add_Exc_Msg (g_pkg_name, l_api_name);
4741: END IF;
4742: FND_MSG_PUB.Count_And_Get (p_count => x_error_number,
4743: p_data => x_error_message);
4744: OZF_UTILITY_PVT.debug_message(l_full_api_name||' : OTHERS EXCEPTION = '||sqlerrm(sqlcode));
4745:
4746: END delete_single_product;
4810: END IF;
4811:
4812: -- Initialize message list if p_init_msg_list is set to TRUE.
4813: IF FND_API.to_Boolean( p_init_msg_list ) THEN
4814: FND_MSG_PUB.initialize;
4815: END IF;
4816:
4817: -- Initialize API return status to SUCCESS
4818: x_return_status := FND_API.g_ret_sts_success;
4858: EXCEPTION
4859: WHEN FND_API.G_EXC_ERROR THEN
4860: ROLLBACK TO delete_target_allocation;
4861: x_return_status := FND_API.g_ret_sts_error ;
4862: FND_MSG_PUB.count_and_get (p_count => x_error_number,
4863: p_data => x_error_message);
4864:
4865: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4866: ROLLBACK TO delete_target_allocation;
4864:
4865: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4866: ROLLBACK TO delete_target_allocation;
4867: x_return_status := FND_API.g_ret_sts_unexp_error ;
4868: FND_MSG_PUB.Count_And_Get (p_count => x_error_number,
4869: p_data => x_error_message);
4870:
4871: WHEN OTHERS THEN
4872: ROLLBACK TO delete_target_allocation;
4870:
4871: WHEN OTHERS THEN
4872: ROLLBACK TO delete_target_allocation;
4873: x_return_status := FND_API.g_ret_sts_unexp_error ;
4874: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
4875: FND_MSG_PUB.Add_Exc_Msg (g_pkg_name, l_api_name);
4876: END IF;
4877: FND_MSG_PUB.Count_And_Get (p_count => x_error_number,
4878: p_data => x_error_message);
4871: WHEN OTHERS THEN
4872: ROLLBACK TO delete_target_allocation;
4873: x_return_status := FND_API.g_ret_sts_unexp_error ;
4874: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
4875: FND_MSG_PUB.Add_Exc_Msg (g_pkg_name, l_api_name);
4876: END IF;
4877: FND_MSG_PUB.Count_And_Get (p_count => x_error_number,
4878: p_data => x_error_message);
4879: OZF_UTILITY_PVT.debug_message(l_full_api_name||' : OTHERS EXCEPTION = '||sqlerrm(sqlcode));
4873: x_return_status := FND_API.g_ret_sts_unexp_error ;
4874: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
4875: FND_MSG_PUB.Add_Exc_Msg (g_pkg_name, l_api_name);
4876: END IF;
4877: FND_MSG_PUB.Count_And_Get (p_count => x_error_number,
4878: p_data => x_error_message);
4879: OZF_UTILITY_PVT.debug_message(l_full_api_name||' : OTHERS EXCEPTION = '||sqlerrm(sqlcode));
4880:
4881: END delete_target_allocation;
5273: END IF;
5274:
5275: -- Initialize message list if p_init_msg_list is set to TRUE.
5276: IF FND_API.to_Boolean( p_init_msg_list ) THEN
5277: FND_MSG_PUB.initialize;
5278: END IF;
5279:
5280: -- Initialize API return status to SUCCESS
5281: x_return_status := FND_API.g_ret_sts_success;
5918: AND a.parent_party_id = -9999 )
5919: );
5920:
5921: IF (SQL%NOTFOUND) THEN
5922: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_error) THEN
5923: fnd_message.set_name ('OZF', 'OZF_TP_ROUNDING_TIME_ERR');
5924: fnd_message.set_token('OZF_TP_OBJECT_TYPE_TOKEN','UNALLOCATED FUND');
5925: fnd_message.set_token('OZF_TP_OBJECT_ID_TOKEN',l_fund_id);
5926: fnd_msg_pub.ADD;
5922: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_error) THEN
5923: fnd_message.set_name ('OZF', 'OZF_TP_ROUNDING_TIME_ERR');
5924: fnd_message.set_token('OZF_TP_OBJECT_TYPE_TOKEN','UNALLOCATED FUND');
5925: fnd_message.set_token('OZF_TP_OBJECT_ID_TOKEN',l_fund_id);
5926: fnd_msg_pub.ADD;
5927: END IF;
5928: RAISE fnd_api.g_exc_unexpected_error;
5929: END IF;
5930:
5946:
5947: WHEN OZF_TP_INVALID_PARAM THEN
5948: ROLLBACK TO old_allocate_target_first_time;
5949: FND_MESSAGE.set_name('OZF', 'OZF_TP_INVALID_PARAM_TXT');
5950: FND_MSG_PUB.add;
5951: x_return_status := FND_API.g_ret_sts_error ;
5952: FND_MSG_PUB.count_and_get (p_count => x_error_number,
5953: p_data => x_error_message);
5954: OZF_UTILITY_PVT.debug_message(l_full_api_name||' : INVALID PARAMETER EXCEPTION = '||sqlerrm(sqlcode));
5948: ROLLBACK TO old_allocate_target_first_time;
5949: FND_MESSAGE.set_name('OZF', 'OZF_TP_INVALID_PARAM_TXT');
5950: FND_MSG_PUB.add;
5951: x_return_status := FND_API.g_ret_sts_error ;
5952: FND_MSG_PUB.count_and_get (p_count => x_error_number,
5953: p_data => x_error_message);
5954: OZF_UTILITY_PVT.debug_message(l_full_api_name||' : INVALID PARAMETER EXCEPTION = '||sqlerrm(sqlcode));
5955: OZF_UTILITY_PVT.debug_message(fnd_message.get_string('OZF', 'OZF_TP_INVALID_PARAM_TXT'));
5956:
5956:
5957: WHEN FND_API.G_EXC_ERROR THEN
5958: ROLLBACK TO old_allocate_target_first_time;
5959: x_return_status := FND_API.g_ret_sts_error ;
5960: FND_MSG_PUB.count_and_get (p_count => x_error_number,
5961: p_data => x_error_message);
5962:
5963: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
5964: ROLLBACK TO old_allocate_target_first_time;
5962:
5963: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
5964: ROLLBACK TO old_allocate_target_first_time;
5965: x_return_status := FND_API.g_ret_sts_unexp_error ;
5966: FND_MSG_PUB.Count_And_Get (p_count => x_error_number,
5967: p_data => x_error_message);
5968:
5969: WHEN OTHERS THEN
5970: ROLLBACK TO old_allocate_target_first_time;
5971:
5972: FND_MESSAGE.set_name('OZF', 'OZF_TP_OTHERS_ERROR_TXT');
5973: FND_MESSAGE.set_token('OZF_TP_SQLERRM_TOKEN',SQLERRM);
5974: FND_MESSAGE.set_token('OZF_TP_SQLCODE_TOKEN',SQLCODE);
5975: FND_MSG_PUB.add;
5976:
5977: x_return_status := FND_API.g_ret_sts_unexp_error ;
5978: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
5979: FND_MSG_PUB.Add_Exc_Msg (g_pkg_name, l_api_name);
5974: FND_MESSAGE.set_token('OZF_TP_SQLCODE_TOKEN',SQLCODE);
5975: FND_MSG_PUB.add;
5976:
5977: x_return_status := FND_API.g_ret_sts_unexp_error ;
5978: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
5979: FND_MSG_PUB.Add_Exc_Msg (g_pkg_name, l_api_name);
5980: END IF;
5981: FND_MSG_PUB.Count_And_Get (p_count => x_error_number,
5982: p_data => x_error_message);
5975: FND_MSG_PUB.add;
5976:
5977: x_return_status := FND_API.g_ret_sts_unexp_error ;
5978: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
5979: FND_MSG_PUB.Add_Exc_Msg (g_pkg_name, l_api_name);
5980: END IF;
5981: FND_MSG_PUB.Count_And_Get (p_count => x_error_number,
5982: p_data => x_error_message);
5983: OZF_UTILITY_PVT.debug_message(l_full_api_name||' : OTHERS EXCEPTION = '||sqlerrm(sqlcode));
5977: x_return_status := FND_API.g_ret_sts_unexp_error ;
5978: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
5979: FND_MSG_PUB.Add_Exc_Msg (g_pkg_name, l_api_name);
5980: END IF;
5981: FND_MSG_PUB.Count_And_Get (p_count => x_error_number,
5982: p_data => x_error_message);
5983: OZF_UTILITY_PVT.debug_message(l_full_api_name||' : OTHERS EXCEPTION = '||sqlerrm(sqlcode));
5984:
5985: END old_allocate_target_first_time;
6383: END IF;
6384:
6385: -- Initialize message list if p_init_msg_list is set to TRUE.
6386: IF FND_API.to_Boolean( p_init_msg_list ) THEN
6387: FND_MSG_PUB.initialize;
6388: END IF;
6389:
6390: -- Initialize API return status to SUCCESS
6391: x_return_status := FND_API.g_ret_sts_success;
6681: a.last_update_login = FND_GLOBAL.CONC_LOGIN_ID
6682: WHERE a.account_allocation_id = l_account_allocation_id;
6683:
6684: IF (SQL%NOTFOUND) THEN
6685: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_error) THEN
6686: fnd_message.set_name ('OZF', 'OZF_TP_TIMEALLOC_NOT_FOUND_TXT');
6687: fnd_msg_pub.ADD;
6688: END IF;
6689:
6683:
6684: IF (SQL%NOTFOUND) THEN
6685: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_error) THEN
6686: fnd_message.set_name ('OZF', 'OZF_TP_TIMEALLOC_NOT_FOUND_TXT');
6687: fnd_msg_pub.ADD;
6688: END IF;
6689:
6690: RAISE fnd_api.g_exc_unexpected_error;
6691: END IF;
6912: WHERE p.allocation_for = 'CUST'
6913: AND p.allocation_for_id = l_account_allocation_id);
6914:
6915: IF (SQL%NOTFOUND) THEN
6916: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_error) THEN
6917: fnd_message.set_name ('OZF', 'OZF_TP_TIMEALLOC_NOT_FOUND_TXT');
6918: fnd_msg_pub.ADD;
6919: END IF;
6920:
6914:
6915: IF (SQL%NOTFOUND) THEN
6916: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_error) THEN
6917: fnd_message.set_name ('OZF', 'OZF_TP_TIMEALLOC_NOT_FOUND_TXT');
6918: fnd_msg_pub.ADD;
6919: END IF;
6920:
6921: RAISE fnd_api.g_exc_unexpected_error;
6922: END IF;
6933: WHERE p.allocation_for = 'CUST'
6934: AND p.allocation_for_id = l_account_allocation_id;
6935:
6936: IF (SQL%NOTFOUND) THEN
6937: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_error) THEN
6938: fnd_message.set_name ('OZF', 'OZF_TP_PRODALLOC_NOT_FOUND_TXT');
6939: fnd_msg_pub.ADD;
6940: END IF;
6941:
6935:
6936: IF (SQL%NOTFOUND) THEN
6937: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_error) THEN
6938: fnd_message.set_name ('OZF', 'OZF_TP_PRODALLOC_NOT_FOUND_TXT');
6939: fnd_msg_pub.ADD;
6940: END IF;
6941:
6942: RAISE fnd_api.g_exc_unexpected_error;
6943: END IF;
6963: AND p.allocation_for_id = l_account_allocation_id
6964: AND p.item_id = -9999;
6965:
6966: IF (SQL%NOTFOUND) THEN
6967: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_error) THEN
6968: fnd_message.set_name ('OZF', 'OZF_TP_PRODALLOC_NOT_FOUND_TXT');
6969: fnd_msg_pub.ADD;
6970: END IF;
6971:
6965:
6966: IF (SQL%NOTFOUND) THEN
6967: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_error) THEN
6968: fnd_message.set_name ('OZF', 'OZF_TP_PRODALLOC_NOT_FOUND_TXT');
6969: fnd_msg_pub.ADD;
6970: END IF;
6971:
6972: RAISE fnd_api.g_exc_unexpected_error;
6973: END IF;
6986: AND p.allocation_for_id = l_account_allocation_id
6987: AND p.item_id = -9999 );
6988:
6989: IF (SQL%NOTFOUND) THEN
6990: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_error) THEN
6991: fnd_message.set_name ('OZF', 'OZF_TP_TIMEALLOC_NOT_FOUND_TXT');
6992: fnd_msg_pub.ADD;
6993: END IF;
6994: RAISE fnd_api.g_exc_unexpected_error;
6988:
6989: IF (SQL%NOTFOUND) THEN
6990: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_error) THEN
6991: fnd_message.set_name ('OZF', 'OZF_TP_TIMEALLOC_NOT_FOUND_TXT');
6992: fnd_msg_pub.ADD;
6993: END IF;
6994: RAISE fnd_api.g_exc_unexpected_error;
6995: END IF;
6996:
7007: AND p.allocation_for_id = l_account_allocation_id
7008: AND p.item_id = -9999;
7009:
7010: IF (SQL%NOTFOUND) THEN
7011: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_error) THEN
7012: fnd_message.set_name ('OZF', 'OZF_TP_PRODALLOC_NOT_FOUND_TXT');
7013: fnd_msg_pub.ADD;
7014: END IF;
7015:
7009:
7010: IF (SQL%NOTFOUND) THEN
7011: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_error) THEN
7012: fnd_message.set_name ('OZF', 'OZF_TP_PRODALLOC_NOT_FOUND_TXT');
7013: fnd_msg_pub.ADD;
7014: END IF;
7015:
7016: RAISE fnd_api.g_exc_unexpected_error;
7017: END IF;
7099: RETURNING t.allocation_for_id INTO l_temp_product_allocation_id;
7100:
7101:
7102: IF (SQL%NOTFOUND) THEN
7103: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_error) THEN
7104: fnd_message.set_name ('OZF', 'OZF_TP_TIMEALLOC_NOT_FOUND_TXT');
7105: fnd_msg_pub.ADD;
7106: END IF;
7107: RAISE fnd_api.g_exc_unexpected_error;
7101:
7102: IF (SQL%NOTFOUND) THEN
7103: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_error) THEN
7104: fnd_message.set_name ('OZF', 'OZF_TP_TIMEALLOC_NOT_FOUND_TXT');
7105: fnd_msg_pub.ADD;
7106: END IF;
7107: RAISE fnd_api.g_exc_unexpected_error;
7108: END IF;
7109:
7115: p.last_update_login = FND_GLOBAL.CONC_LOGIN_ID
7116: WHERE p.product_allocation_id = l_temp_product_allocation_id;
7117:
7118: IF (SQL%NOTFOUND) THEN
7119: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_error) THEN
7120: fnd_message.set_name ('OZF', 'OZF_TP_PRODALLOC_NOT_FOUND_TXT');
7121: fnd_msg_pub.ADD;
7122: END IF;
7123: RAISE fnd_api.g_exc_unexpected_error;
7117:
7118: IF (SQL%NOTFOUND) THEN
7119: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_error) THEN
7120: fnd_message.set_name ('OZF', 'OZF_TP_PRODALLOC_NOT_FOUND_TXT');
7121: fnd_msg_pub.ADD;
7122: END IF;
7123: RAISE fnd_api.g_exc_unexpected_error;
7124: END IF;
7125: */
7142: );
7143:
7144:
7145: IF (SQL%NOTFOUND) THEN
7146: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_error) THEN
7147: fnd_message.set_name ('OZF', 'OZF_TP_TIMEALLOC_NOT_FOUND_TXT');
7148: fnd_msg_pub.ADD;
7149: END IF;
7150: RAISE fnd_api.g_exc_unexpected_error;
7144:
7145: IF (SQL%NOTFOUND) THEN
7146: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_error) THEN
7147: fnd_message.set_name ('OZF', 'OZF_TP_TIMEALLOC_NOT_FOUND_TXT');
7148: fnd_msg_pub.ADD;
7149: END IF;
7150: RAISE fnd_api.g_exc_unexpected_error;
7151: END IF;
7152:
7160: AND p.allocation_for_id = l_account_allocation_id
7161: AND p.item_id = -9999;
7162:
7163: IF (SQL%NOTFOUND) THEN
7164: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_error) THEN
7165: fnd_message.set_name ('OZF', 'OZF_TP_PRODALLOC_NOT_FOUND_TXT');
7166: fnd_msg_pub.ADD;
7167: END IF;
7168: RAISE fnd_api.g_exc_unexpected_error;
7162:
7163: IF (SQL%NOTFOUND) THEN
7164: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_error) THEN
7165: fnd_message.set_name ('OZF', 'OZF_TP_PRODALLOC_NOT_FOUND_TXT');
7166: fnd_msg_pub.ADD;
7167: END IF;
7168: RAISE fnd_api.g_exc_unexpected_error;
7169: END IF;
7170: ---------------------------------------------------------------------------------------------------
7351: AND a.parent_party_id = -9999 )
7352: );
7353:
7354: IF (SQL%NOTFOUND) THEN
7355: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_error) THEN
7356: fnd_message.set_name ('OZF', 'OZF_TP_ROUNDING_TIME_ERR');
7357: fnd_message.set_token('OZF_TP_OBJECT_TYPE_TOKEN','UNALLOCATED FUND');
7358: fnd_message.set_token('OZF_TP_OBJECT_ID_TOKEN',l_fund_id);
7359: fnd_msg_pub.ADD;
7355: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_error) THEN
7356: fnd_message.set_name ('OZF', 'OZF_TP_ROUNDING_TIME_ERR');
7357: fnd_message.set_token('OZF_TP_OBJECT_TYPE_TOKEN','UNALLOCATED FUND');
7358: fnd_message.set_token('OZF_TP_OBJECT_ID_TOKEN',l_fund_id);
7359: fnd_msg_pub.ADD;
7360: END IF;
7361: RAISE fnd_api.g_exc_unexpected_error;
7362: END IF;
7363:
7413: AND a.parent_party_id = -9999)
7414: );
7415:
7416: IF (SQL%NOTFOUND) THEN
7417: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_error) THEN
7418: fnd_message.set_name ('OZF', 'OZF_TP_TIMEALLOC_NOT_FOUND_TXT');
7419: fnd_msg_pub.ADD;
7420: END IF;
7421: RAISE fnd_api.g_exc_unexpected_error;
7415:
7416: IF (SQL%NOTFOUND) THEN
7417: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_error) THEN
7418: fnd_message.set_name ('OZF', 'OZF_TP_TIMEALLOC_NOT_FOUND_TXT');
7419: fnd_msg_pub.ADD;
7420: END IF;
7421: RAISE fnd_api.g_exc_unexpected_error;
7422: END IF;
7423:
7432: AND a.allocation_for_id = l_fund_id
7433: AND a.parent_party_id = -9999;
7434:
7435: IF (SQL%NOTFOUND) THEN
7436: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_error) THEN
7437: fnd_message.set_name ('OZF', 'OZF_TP_TIMEALLOC_NOT_FOUND_TXT');
7438: fnd_msg_pub.ADD;
7439: END IF;
7440:
7434:
7435: IF (SQL%NOTFOUND) THEN
7436: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_error) THEN
7437: fnd_message.set_name ('OZF', 'OZF_TP_TIMEALLOC_NOT_FOUND_TXT');
7438: fnd_msg_pub.ADD;
7439: END IF;
7440:
7441: RAISE fnd_api.g_exc_unexpected_error;
7442: END IF;
7492: )
7493: RETURNING t.allocation_for_id INTO l_temp_account_allocation_id;
7494:
7495: IF (SQL%NOTFOUND) THEN
7496: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_error) THEN
7497: fnd_message.set_name ('OZF', 'OZF_TP_ROUNDING_TIME_ERR');
7498: fnd_message.set_token('OZF_TP_OBJECT_TYPE_TOKEN','QUOTA');
7499: fnd_message.set_token('OZF_TP_OBJECT_ID_TOKEN',l_fund_id);
7500: fnd_msg_pub.ADD;
7496: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_error) THEN
7497: fnd_message.set_name ('OZF', 'OZF_TP_ROUNDING_TIME_ERR');
7498: fnd_message.set_token('OZF_TP_OBJECT_TYPE_TOKEN','QUOTA');
7499: fnd_message.set_token('OZF_TP_OBJECT_ID_TOKEN',l_fund_id);
7500: fnd_msg_pub.ADD;
7501: END IF;
7502: RAISE fnd_api.g_exc_unexpected_error;
7503: END IF;
7504:
7513: a.last_update_login = FND_GLOBAL.CONC_LOGIN_ID
7514: WHERE a.account_allocation_id = l_temp_account_allocation_id;
7515:
7516: IF (SQL%NOTFOUND) THEN
7517: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_error) THEN
7518: fnd_message.set_name ('OZF', 'OZF_TP_ROUNDING_ACCT_ERR');
7519: fnd_message.set_token('OZF_TP_OBJECT_TYPE_TOKEN', 'ACCOUNT ALLOCATION');
7520: fnd_message.set_token('OZF_TP_OBJECT_ID_TOKEN', l_temp_account_allocation_id);
7521: fnd_msg_pub.ADD;
7517: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_error) THEN
7518: fnd_message.set_name ('OZF', 'OZF_TP_ROUNDING_ACCT_ERR');
7519: fnd_message.set_token('OZF_TP_OBJECT_TYPE_TOKEN', 'ACCOUNT ALLOCATION');
7520: fnd_message.set_token('OZF_TP_OBJECT_ID_TOKEN', l_temp_account_allocation_id);
7521: fnd_msg_pub.ADD;
7522: END IF;
7523: RAISE fnd_api.g_exc_unexpected_error;
7524: END IF;
7525:
7575: RETURNING t.allocation_for_id INTO l_temp_product_allocation_id;
7576:
7577:
7578: IF (SQL%NOTFOUND) THEN
7579: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_error) THEN
7580: fnd_message.set_name ('OZF', 'OZF_TP_TIMEALLOC_NOT_FOUND_TXT');
7581: fnd_msg_pub.ADD;
7582: END IF;
7583: RAISE fnd_api.g_exc_unexpected_error;
7577:
7578: IF (SQL%NOTFOUND) THEN
7579: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_error) THEN
7580: fnd_message.set_name ('OZF', 'OZF_TP_TIMEALLOC_NOT_FOUND_TXT');
7581: fnd_msg_pub.ADD;
7582: END IF;
7583: RAISE fnd_api.g_exc_unexpected_error;
7584: END IF;
7585:
7591: p.last_update_login = FND_GLOBAL.CONC_LOGIN_ID
7592: WHERE p.product_allocation_id = l_temp_product_allocation_id;
7593:
7594: IF (SQL%NOTFOUND) THEN
7595: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_error) THEN
7596: fnd_message.set_name ('OZF', 'OZF_TP_PRODALLOC_NOT_FOUND_TXT');
7597: fnd_msg_pub.ADD;
7598: END IF;
7599: RAISE fnd_api.g_exc_unexpected_error;
7593:
7594: IF (SQL%NOTFOUND) THEN
7595: IF fnd_msg_pub.check_msg_level (fnd_msg_pub.g_msg_lvl_error) THEN
7596: fnd_message.set_name ('OZF', 'OZF_TP_PRODALLOC_NOT_FOUND_TXT');
7597: fnd_msg_pub.ADD;
7598: END IF;
7599: RAISE fnd_api.g_exc_unexpected_error;
7600: END IF;
7601:
7613:
7614: WHEN OZF_TP_INVALID_PARAM THEN
7615: ROLLBACK TO allocate_target_first_time;
7616: FND_MESSAGE.set_name('OZF', 'OZF_TP_INVALID_PARAM_TXT');
7617: FND_MSG_PUB.add;
7618: x_return_status := FND_API.g_ret_sts_error ;
7619: FND_MSG_PUB.count_and_get (p_count => x_error_number,
7620: p_data => x_error_message);
7621: OZF_UTILITY_PVT.debug_message(l_full_api_name||' : INVALID PARAMETER EXCEPTION = '||sqlerrm(sqlcode));
7615: ROLLBACK TO allocate_target_first_time;
7616: FND_MESSAGE.set_name('OZF', 'OZF_TP_INVALID_PARAM_TXT');
7617: FND_MSG_PUB.add;
7618: x_return_status := FND_API.g_ret_sts_error ;
7619: FND_MSG_PUB.count_and_get (p_count => x_error_number,
7620: p_data => x_error_message);
7621: OZF_UTILITY_PVT.debug_message(l_full_api_name||' : INVALID PARAMETER EXCEPTION = '||sqlerrm(sqlcode));
7622: OZF_UTILITY_PVT.debug_message(fnd_message.get_string('OZF', 'OZF_TP_INVALID_PARAM_TXT'));
7623:
7623:
7624: WHEN FND_API.G_EXC_ERROR THEN
7625: ROLLBACK TO allocate_target_first_time;
7626: x_return_status := FND_API.g_ret_sts_error ;
7627: FND_MSG_PUB.count_and_get (p_count => x_error_number,
7628: p_data => x_error_message);
7629:
7630: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
7631: ROLLBACK TO allocate_target_first_time;
7629:
7630: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
7631: ROLLBACK TO allocate_target_first_time;
7632: x_return_status := FND_API.g_ret_sts_unexp_error ;
7633: FND_MSG_PUB.Count_And_Get (p_count => x_error_number,
7634: p_data => x_error_message);
7635:
7636: WHEN OTHERS THEN
7637: ROLLBACK TO allocate_target_first_time;
7638:
7639: FND_MESSAGE.set_name('OZF', 'OZF_TP_OTHERS_ERROR_TXT');
7640: FND_MESSAGE.set_token('OZF_TP_SQLERRM_TOKEN',SQLERRM);
7641: FND_MESSAGE.set_token('OZF_TP_SQLCODE_TOKEN',SQLCODE);
7642: FND_MSG_PUB.add;
7643:
7644: x_return_status := FND_API.g_ret_sts_unexp_error ;
7645: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
7646: FND_MSG_PUB.Add_Exc_Msg (g_pkg_name, l_api_name);
7641: FND_MESSAGE.set_token('OZF_TP_SQLCODE_TOKEN',SQLCODE);
7642: FND_MSG_PUB.add;
7643:
7644: x_return_status := FND_API.g_ret_sts_unexp_error ;
7645: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
7646: FND_MSG_PUB.Add_Exc_Msg (g_pkg_name, l_api_name);
7647: END IF;
7648: FND_MSG_PUB.Count_And_Get (p_count => x_error_number,
7649: p_data => x_error_message);
7642: FND_MSG_PUB.add;
7643:
7644: x_return_status := FND_API.g_ret_sts_unexp_error ;
7645: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
7646: FND_MSG_PUB.Add_Exc_Msg (g_pkg_name, l_api_name);
7647: END IF;
7648: FND_MSG_PUB.Count_And_Get (p_count => x_error_number,
7649: p_data => x_error_message);
7650: OZF_UTILITY_PVT.debug_message(l_full_api_name||' : OTHERS EXCEPTION = '||sqlerrm(sqlcode));
7644: x_return_status := FND_API.g_ret_sts_unexp_error ;
7645: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
7646: FND_MSG_PUB.Add_Exc_Msg (g_pkg_name, l_api_name);
7647: END IF;
7648: FND_MSG_PUB.Count_And_Get (p_count => x_error_number,
7649: p_data => x_error_message);
7650: OZF_UTILITY_PVT.debug_message(l_full_api_name||' : OTHERS EXCEPTION = '||sqlerrm(sqlcode));
7651:
7652: END allocate_target_first_time;
8048: END IF;
8049:
8050: -- Initialize message list if p_init_msg_list is set to TRUE.
8051: IF FND_API.to_Boolean( p_init_msg_list ) THEN
8052: FND_MSG_PUB.initialize;
8053: END IF;
8054:
8055: -- Initialize API return status to SUCCESS
8056: x_return_status := FND_API.g_ret_sts_success;
8112: EXCEPTION
8113: WHEN OTHERS THEN
8114: ROLLBACK TO allocate_target_addon;
8115: x_return_status := FND_API.g_ret_sts_unexp_error ;
8116: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
8117: FND_MSG_PUB.Add_Exc_Msg (g_pkg_name, l_api_name);
8118: END IF;
8119: FND_MSG_PUB.Count_And_Get (p_count => x_error_number,
8120: p_data => x_error_message);
8113: WHEN OTHERS THEN
8114: ROLLBACK TO allocate_target_addon;
8115: x_return_status := FND_API.g_ret_sts_unexp_error ;
8116: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
8117: FND_MSG_PUB.Add_Exc_Msg (g_pkg_name, l_api_name);
8118: END IF;
8119: FND_MSG_PUB.Count_And_Get (p_count => x_error_number,
8120: p_data => x_error_message);
8121: OZF_UTILITY_PVT.debug_message(l_full_api_name||' : COLLECTION UNNESTING: OTHERS EXCEPTION = '||sqlerrm(sqlcode));
8115: x_return_status := FND_API.g_ret_sts_unexp_error ;
8116: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
8117: FND_MSG_PUB.Add_Exc_Msg (g_pkg_name, l_api_name);
8118: END IF;
8119: FND_MSG_PUB.Count_And_Get (p_count => x_error_number,
8120: p_data => x_error_message);
8121: OZF_UTILITY_PVT.debug_message(l_full_api_name||' : COLLECTION UNNESTING: OTHERS EXCEPTION = '||sqlerrm(sqlcode));
8122:
8123: IF l_period_tbl IS NULL OR l_period_tbl.COUNT <= 0 THEN
8531:
8532: WHEN OZF_TP_INVALID_PARAM THEN
8533: ROLLBACK TO allocate_target_addon;
8534: FND_MESSAGE.set_name('OZF', 'OZF_TP_INVALID_PARAM_TXT');
8535: FND_MSG_PUB.add;
8536: x_return_status := FND_API.g_ret_sts_error ;
8537: FND_MSG_PUB.count_and_get (p_count => x_error_number,
8538: p_data => x_error_message);
8539: OZF_UTILITY_PVT.debug_message(l_full_api_name||' : INVALID PARAMETER EXCEPTION = '||sqlerrm(sqlcode));
8533: ROLLBACK TO allocate_target_addon;
8534: FND_MESSAGE.set_name('OZF', 'OZF_TP_INVALID_PARAM_TXT');
8535: FND_MSG_PUB.add;
8536: x_return_status := FND_API.g_ret_sts_error ;
8537: FND_MSG_PUB.count_and_get (p_count => x_error_number,
8538: p_data => x_error_message);
8539: OZF_UTILITY_PVT.debug_message(l_full_api_name||' : INVALID PARAMETER EXCEPTION = '||sqlerrm(sqlcode));
8540: OZF_UTILITY_PVT.debug_message(fnd_message.get_string('OZF', 'OZF_TP_INVALID_PARAM_TXT'));
8541:
8541:
8542: WHEN FND_API.G_EXC_ERROR THEN
8543: ROLLBACK TO allocate_target_addon;
8544: x_return_status := FND_API.g_ret_sts_error ;
8545: FND_MSG_PUB.count_and_get (p_count => x_error_number,
8546: p_data => x_error_message);
8547:
8548: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
8549: ROLLBACK TO allocate_target_addon;
8547:
8548: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
8549: ROLLBACK TO allocate_target_addon;
8550: x_return_status := FND_API.g_ret_sts_unexp_error ;
8551: FND_MSG_PUB.Count_And_Get (p_count => x_error_number,
8552: p_data => x_error_message);
8553:
8554: WHEN OTHERS THEN
8555: ROLLBACK TO allocate_target_addon;
8556:
8557: FND_MESSAGE.set_name('OZF', 'OZF_TP_OTHERS_ERROR_TXT');
8558: FND_MESSAGE.set_token('OZF_TP_SQLERRM_TOKEN',SQLERRM);
8559: FND_MESSAGE.set_token('OZF_TP_SQLCODE_TOKEN',SQLCODE);
8560: FND_MSG_PUB.add;
8561:
8562: x_return_status := FND_API.g_ret_sts_unexp_error ;
8563: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
8564: FND_MSG_PUB.Add_Exc_Msg (g_pkg_name, l_api_name);
8559: FND_MESSAGE.set_token('OZF_TP_SQLCODE_TOKEN',SQLCODE);
8560: FND_MSG_PUB.add;
8561:
8562: x_return_status := FND_API.g_ret_sts_unexp_error ;
8563: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
8564: FND_MSG_PUB.Add_Exc_Msg (g_pkg_name, l_api_name);
8565: END IF;
8566: FND_MSG_PUB.Count_And_Get (p_count => x_error_number,
8567: p_data => x_error_message);
8560: FND_MSG_PUB.add;
8561:
8562: x_return_status := FND_API.g_ret_sts_unexp_error ;
8563: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
8564: FND_MSG_PUB.Add_Exc_Msg (g_pkg_name, l_api_name);
8565: END IF;
8566: FND_MSG_PUB.Count_And_Get (p_count => x_error_number,
8567: p_data => x_error_message);
8568: OZF_UTILITY_PVT.debug_message(l_full_api_name||' : OTHERS EXCEPTION = '||sqlerrm(sqlcode));
8562: x_return_status := FND_API.g_ret_sts_unexp_error ;
8563: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
8564: FND_MSG_PUB.Add_Exc_Msg (g_pkg_name, l_api_name);
8565: END IF;
8566: FND_MSG_PUB.Count_And_Get (p_count => x_error_number,
8567: p_data => x_error_message);
8568: OZF_UTILITY_PVT.debug_message(l_full_api_name||' : OTHERS EXCEPTION = '||sqlerrm(sqlcode));
8569:
8570: END allocate_target_addon;
8664: END IF;
8665:
8666: -- Initialize message list if p_init_msg_list is set to TRUE.
8667: IF FND_API.to_Boolean( p_init_msg_list ) THEN
8668: FND_MSG_PUB.initialize;
8669: END IF;
8670:
8671: -- Initialize API return status to SUCCESS
8672: x_return_status := FND_API.g_ret_sts_success;
8760:
8761: WHEN OZF_TP_INVALID_PARAM THEN
8762: ROLLBACK TO setup_product_spread;
8763: FND_MESSAGE.set_name('OZF', 'OZF_TP_INVALID_PARAM_TXT');
8764: FND_MSG_PUB.add;
8765: x_return_status := FND_API.g_ret_sts_error ;
8766: FND_MSG_PUB.count_and_get (p_count => x_error_number,
8767: p_data => x_error_message);
8768: OZF_UTILITY_PVT.debug_message(l_full_api_name||' : INVALID PARAMETER EXCEPTION = '||sqlerrm(sqlcode));
8762: ROLLBACK TO setup_product_spread;
8763: FND_MESSAGE.set_name('OZF', 'OZF_TP_INVALID_PARAM_TXT');
8764: FND_MSG_PUB.add;
8765: x_return_status := FND_API.g_ret_sts_error ;
8766: FND_MSG_PUB.count_and_get (p_count => x_error_number,
8767: p_data => x_error_message);
8768: OZF_UTILITY_PVT.debug_message(l_full_api_name||' : INVALID PARAMETER EXCEPTION = '||sqlerrm(sqlcode));
8769: OZF_UTILITY_PVT.debug_message(fnd_message.get_string('OZF', 'OZF_TP_INVALID_PARAM_TXT'));
8770:
8770:
8771: WHEN FND_API.G_EXC_ERROR THEN
8772: ROLLBACK TO setup_product_spread;
8773: x_return_status := FND_API.g_ret_sts_error ;
8774: FND_MSG_PUB.count_and_get (p_count => x_error_number,
8775: p_data => x_error_message);
8776:
8777: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
8778: ROLLBACK TO setup_product_spread;
8776:
8777: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
8778: ROLLBACK TO setup_product_spread;
8779: x_return_status := FND_API.g_ret_sts_unexp_error ;
8780: FND_MSG_PUB.Count_And_Get (p_count => x_error_number,
8781: p_data => x_error_message);
8782:
8783: WHEN OTHERS THEN
8784: ROLLBACK TO setup_product_spread;
8785:
8786: FND_MESSAGE.set_name('OZF', 'OZF_TP_OTHERS_ERROR_TXT');
8787: FND_MESSAGE.set_token('OZF_TP_SQLERRM_TOKEN',SQLERRM);
8788: FND_MESSAGE.set_token('OZF_TP_SQLCODE_TOKEN',SQLCODE);
8789: FND_MSG_PUB.add;
8790:
8791: x_return_status := FND_API.g_ret_sts_unexp_error ;
8792: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
8793: FND_MSG_PUB.Add_Exc_Msg (g_pkg_name, l_api_name);
8788: FND_MESSAGE.set_token('OZF_TP_SQLCODE_TOKEN',SQLCODE);
8789: FND_MSG_PUB.add;
8790:
8791: x_return_status := FND_API.g_ret_sts_unexp_error ;
8792: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
8793: FND_MSG_PUB.Add_Exc_Msg (g_pkg_name, l_api_name);
8794: END IF;
8795: FND_MSG_PUB.Count_And_Get (p_count => x_error_number,
8796: p_data => x_error_message);
8789: FND_MSG_PUB.add;
8790:
8791: x_return_status := FND_API.g_ret_sts_unexp_error ;
8792: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
8793: FND_MSG_PUB.Add_Exc_Msg (g_pkg_name, l_api_name);
8794: END IF;
8795: FND_MSG_PUB.Count_And_Get (p_count => x_error_number,
8796: p_data => x_error_message);
8797: OZF_UTILITY_PVT.debug_message(l_full_api_name||' : OTHERS EXCEPTION = '||sqlerrm(sqlcode));
8791: x_return_status := FND_API.g_ret_sts_unexp_error ;
8792: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
8793: FND_MSG_PUB.Add_Exc_Msg (g_pkg_name, l_api_name);
8794: END IF;
8795: FND_MSG_PUB.Count_And_Get (p_count => x_error_number,
8796: p_data => x_error_message);
8797: OZF_UTILITY_PVT.debug_message(l_full_api_name||' : OTHERS EXCEPTION = '||sqlerrm(sqlcode));
8798:
8799: END setup_product_spread;
8854: END IF;
8855:
8856: -- Initialize message list if p_init_msg_list is set to TRUE.
8857: IF FND_API.to_Boolean( p_init_msg_list ) THEN
8858: FND_MSG_PUB.initialize;
8859: END IF;
8860:
8861: -- Initialize API return status to SUCCESS
8862: x_return_status := FND_API.g_ret_sts_success;
8925:
8926: WHEN OZF_TP_INVALID_PARAM THEN
8927: ROLLBACK TO cascade_product_spread;
8928: FND_MESSAGE.set_name('OZF', 'OZF_TP_INVALID_PARAM_TXT');
8929: FND_MSG_PUB.add;
8930: x_return_status := FND_API.g_ret_sts_error ;
8931: FND_MSG_PUB.count_and_get (p_count => x_error_number,
8932: p_data => x_error_message);
8933: OZF_UTILITY_PVT.debug_message(l_full_api_name||' : INVALID PARAMETER EXCEPTION = '||sqlerrm(sqlcode));
8927: ROLLBACK TO cascade_product_spread;
8928: FND_MESSAGE.set_name('OZF', 'OZF_TP_INVALID_PARAM_TXT');
8929: FND_MSG_PUB.add;
8930: x_return_status := FND_API.g_ret_sts_error ;
8931: FND_MSG_PUB.count_and_get (p_count => x_error_number,
8932: p_data => x_error_message);
8933: OZF_UTILITY_PVT.debug_message(l_full_api_name||' : INVALID PARAMETER EXCEPTION = '||sqlerrm(sqlcode));
8934: OZF_UTILITY_PVT.debug_message(fnd_message.get_string('OZF', 'OZF_TP_INVALID_PARAM_TXT'));
8935:
8935:
8936: WHEN FND_API.G_EXC_ERROR THEN
8937: ROLLBACK TO cascade_product_spread;
8938: x_return_status := FND_API.g_ret_sts_error ;
8939: FND_MSG_PUB.count_and_get (p_count => x_error_number,
8940: p_data => x_error_message);
8941:
8942: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
8943: ROLLBACK TO cascade_product_spread;
8941:
8942: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
8943: ROLLBACK TO cascade_product_spread;
8944: x_return_status := FND_API.g_ret_sts_unexp_error ;
8945: FND_MSG_PUB.Count_And_Get (p_count => x_error_number,
8946: p_data => x_error_message);
8947:
8948: WHEN OTHERS THEN
8949: ROLLBACK TO cascade_product_spread;
8950:
8951: FND_MESSAGE.set_name('OZF', 'OZF_TP_OTHERS_ERROR_TXT');
8952: FND_MESSAGE.set_token('OZF_TP_SQLERRM_TOKEN',SQLERRM);
8953: FND_MESSAGE.set_token('OZF_TP_SQLCODE_TOKEN',SQLCODE);
8954: FND_MSG_PUB.add;
8955:
8956: x_return_status := FND_API.g_ret_sts_unexp_error ;
8957: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
8958: FND_MSG_PUB.Add_Exc_Msg (g_pkg_name, l_api_name);
8953: FND_MESSAGE.set_token('OZF_TP_SQLCODE_TOKEN',SQLCODE);
8954: FND_MSG_PUB.add;
8955:
8956: x_return_status := FND_API.g_ret_sts_unexp_error ;
8957: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
8958: FND_MSG_PUB.Add_Exc_Msg (g_pkg_name, l_api_name);
8959: END IF;
8960: FND_MSG_PUB.Count_And_Get (p_count => x_error_number,
8961: p_data => x_error_message);
8954: FND_MSG_PUB.add;
8955:
8956: x_return_status := FND_API.g_ret_sts_unexp_error ;
8957: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
8958: FND_MSG_PUB.Add_Exc_Msg (g_pkg_name, l_api_name);
8959: END IF;
8960: FND_MSG_PUB.Count_And_Get (p_count => x_error_number,
8961: p_data => x_error_message);
8962: OZF_UTILITY_PVT.debug_message(l_full_api_name||' : OTHERS EXCEPTION = '||sqlerrm(sqlcode));
8956: x_return_status := FND_API.g_ret_sts_unexp_error ;
8957: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
8958: FND_MSG_PUB.Add_Exc_Msg (g_pkg_name, l_api_name);
8959: END IF;
8960: FND_MSG_PUB.Count_And_Get (p_count => x_error_number,
8961: p_data => x_error_message);
8962: OZF_UTILITY_PVT.debug_message(l_full_api_name||' : OTHERS EXCEPTION = '||sqlerrm(sqlcode));
8963:
8964: END cascade_product_spread;
9026: END IF;
9027:
9028: -- Initialize message list if p_init_msg_list is set to TRUE.
9029: IF FND_API.to_Boolean( p_init_msg_list ) THEN
9030: FND_MSG_PUB.initialize;
9031: END IF;
9032:
9033: -- Initialize API return status to SUCCESS
9034: x_return_status := FND_API.g_ret_sts_success;
9122:
9123: WHEN OZF_TP_INVALID_PARAM THEN
9124: ROLLBACK TO allocate_target;
9125: FND_MESSAGE.set_name('OZF', 'OZF_TP_INVALID_PARAM_TXT');
9126: FND_MSG_PUB.add;
9127: x_return_status := FND_API.g_ret_sts_error ;
9128: FND_MSG_PUB.count_and_get (p_count => x_error_number,
9129: p_data => x_error_message);
9130: OZF_UTILITY_PVT.debug_message(l_full_api_name||' : INVALID PARAMETER EXCEPTION = '||sqlerrm(sqlcode));
9124: ROLLBACK TO allocate_target;
9125: FND_MESSAGE.set_name('OZF', 'OZF_TP_INVALID_PARAM_TXT');
9126: FND_MSG_PUB.add;
9127: x_return_status := FND_API.g_ret_sts_error ;
9128: FND_MSG_PUB.count_and_get (p_count => x_error_number,
9129: p_data => x_error_message);
9130: OZF_UTILITY_PVT.debug_message(l_full_api_name||' : INVALID PARAMETER EXCEPTION = '||sqlerrm(sqlcode));
9131: OZF_UTILITY_PVT.debug_message(fnd_message.get_string('OZF', 'OZF_TP_INVALID_PARAM_TXT'));
9132:
9132:
9133: WHEN FND_API.G_EXC_ERROR THEN
9134: ROLLBACK TO allocate_target;
9135: x_return_status := FND_API.g_ret_sts_error ;
9136: FND_MSG_PUB.count_and_get (p_count => x_error_number,
9137: p_data => x_error_message);
9138:
9139: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
9140: ROLLBACK TO allocate_target;
9138:
9139: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
9140: ROLLBACK TO allocate_target;
9141: x_return_status := FND_API.g_ret_sts_unexp_error ;
9142: FND_MSG_PUB.Count_And_Get (p_count => x_error_number,
9143: p_data => x_error_message);
9144:
9145: WHEN OTHERS THEN
9146: ROLLBACK TO allocate_target;
9147:
9148: FND_MESSAGE.set_name('OZF', 'OZF_TP_OTHERS_ERROR_TXT');
9149: FND_MESSAGE.set_token('OZF_TP_SQLERRM_TOKEN',SQLERRM);
9150: FND_MESSAGE.set_token('OZF_TP_SQLCODE_TOKEN',SQLCODE);
9151: FND_MSG_PUB.add;
9152:
9153: x_return_status := FND_API.g_ret_sts_unexp_error ;
9154: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
9155: FND_MSG_PUB.Add_Exc_Msg (g_pkg_name, l_api_name);
9150: FND_MESSAGE.set_token('OZF_TP_SQLCODE_TOKEN',SQLCODE);
9151: FND_MSG_PUB.add;
9152:
9153: x_return_status := FND_API.g_ret_sts_unexp_error ;
9154: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
9155: FND_MSG_PUB.Add_Exc_Msg (g_pkg_name, l_api_name);
9156: END IF;
9157: FND_MSG_PUB.Count_And_Get (p_count => x_error_number,
9158: p_data => x_error_message);
9151: FND_MSG_PUB.add;
9152:
9153: x_return_status := FND_API.g_ret_sts_unexp_error ;
9154: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
9155: FND_MSG_PUB.Add_Exc_Msg (g_pkg_name, l_api_name);
9156: END IF;
9157: FND_MSG_PUB.Count_And_Get (p_count => x_error_number,
9158: p_data => x_error_message);
9159: OZF_UTILITY_PVT.debug_message(l_full_api_name||' : OTHERS EXCEPTION = '||sqlerrm(sqlcode));
9153: x_return_status := FND_API.g_ret_sts_unexp_error ;
9154: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
9155: FND_MSG_PUB.Add_Exc_Msg (g_pkg_name, l_api_name);
9156: END IF;
9157: FND_MSG_PUB.Count_And_Get (p_count => x_error_number,
9158: p_data => x_error_message);
9159: OZF_UTILITY_PVT.debug_message(l_full_api_name||' : OTHERS EXCEPTION = '||sqlerrm(sqlcode));
9160:
9161: END allocate_target;
9522: END IF;
9523:
9524: -- Initialize message list if p_init_msg_list is set to TRUE.
9525: IF FND_API.to_Boolean( p_init_msg_list ) THEN
9526: FND_MSG_PUB.initialize;
9527: END IF;
9528:
9529: -- Initialize API return status to SUCCESS
9530: x_return_status := FND_API.g_ret_sts_success;
10190:
10191: WHEN OZF_TP_INVALID_PARAM THEN
10192: ROLLBACK TO adjust_target_for_acct_added;
10193: FND_MESSAGE.set_name('OZF', 'OZF_TP_INVALID_PARAM_TXT');
10194: FND_MSG_PUB.add;
10195: x_return_status := FND_API.g_ret_sts_error ;
10196: FND_MSG_PUB.count_and_get (p_count => x_error_number,
10197: p_data => x_error_message);
10198: Ozf_Utility_pvt.write_conc_log(l_full_api_name||' : INVALID PARAMETER EXCEPTION = '||sqlerrm(sqlcode));
10192: ROLLBACK TO adjust_target_for_acct_added;
10193: FND_MESSAGE.set_name('OZF', 'OZF_TP_INVALID_PARAM_TXT');
10194: FND_MSG_PUB.add;
10195: x_return_status := FND_API.g_ret_sts_error ;
10196: FND_MSG_PUB.count_and_get (p_count => x_error_number,
10197: p_data => x_error_message);
10198: Ozf_Utility_pvt.write_conc_log(l_full_api_name||' : INVALID PARAMETER EXCEPTION = '||sqlerrm(sqlcode));
10199: Ozf_Utility_pvt.write_conc_log(fnd_message.get_string('OZF', 'OZF_TP_INVALID_PARAM_TXT'));
10200:
10200:
10201: WHEN FND_API.G_EXC_ERROR THEN
10202: ROLLBACK TO adjust_target_for_acct_added;
10203: x_return_status := FND_API.g_ret_sts_error ;
10204: FND_MSG_PUB.count_and_get (p_count => x_error_number,
10205: p_data => x_error_message);
10206:
10207: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
10208: ROLLBACK TO adjust_target_for_acct_added;
10206:
10207: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
10208: ROLLBACK TO adjust_target_for_acct_added;
10209: x_return_status := FND_API.g_ret_sts_unexp_error ;
10210: FND_MSG_PUB.Count_And_Get (p_count => x_error_number,
10211: p_data => x_error_message);
10212:
10213: WHEN OTHERS THEN
10214: ROLLBACK TO adjust_target_for_acct_added;
10215:
10216: FND_MESSAGE.set_name('OZF', 'OZF_TP_OTHERS_ERROR_TXT');
10217: FND_MESSAGE.set_token('OZF_TP_SQLERRM_TOKEN',SQLERRM);
10218: FND_MESSAGE.set_token('OZF_TP_SQLCODE_TOKEN',SQLCODE);
10219: FND_MSG_PUB.add;
10220:
10221: x_return_status := FND_API.g_ret_sts_unexp_error ;
10222: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
10223: FND_MSG_PUB.Add_Exc_Msg (g_pkg_name, l_api_name);
10218: FND_MESSAGE.set_token('OZF_TP_SQLCODE_TOKEN',SQLCODE);
10219: FND_MSG_PUB.add;
10220:
10221: x_return_status := FND_API.g_ret_sts_unexp_error ;
10222: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
10223: FND_MSG_PUB.Add_Exc_Msg (g_pkg_name, l_api_name);
10224: END IF;
10225: FND_MSG_PUB.Count_And_Get (p_count => x_error_number,
10226: p_data => x_error_message);
10219: FND_MSG_PUB.add;
10220:
10221: x_return_status := FND_API.g_ret_sts_unexp_error ;
10222: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
10223: FND_MSG_PUB.Add_Exc_Msg (g_pkg_name, l_api_name);
10224: END IF;
10225: FND_MSG_PUB.Count_And_Get (p_count => x_error_number,
10226: p_data => x_error_message);
10227: Ozf_Utility_pvt.write_conc_log(l_full_api_name||' : OTHERS EXCEPTION = '||sqlerrm(sqlcode));
10221: x_return_status := FND_API.g_ret_sts_unexp_error ;
10222: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
10223: FND_MSG_PUB.Add_Exc_Msg (g_pkg_name, l_api_name);
10224: END IF;
10225: FND_MSG_PUB.Count_And_Get (p_count => x_error_number,
10226: p_data => x_error_message);
10227: Ozf_Utility_pvt.write_conc_log(l_full_api_name||' : OTHERS EXCEPTION = '||sqlerrm(sqlcode));
10228:
10229: END adjust_target_for_acct_added;
10275: END IF;
10276:
10277: -- Initialize message list if p_init_msg_list is set to TRUE.
10278: IF FND_API.to_Boolean( p_init_msg_list ) THEN
10279: FND_MSG_PUB.initialize;
10280: END IF;
10281:
10282: -- Initialize API return status to SUCCESS
10283: x_return_status := FND_API.g_ret_sts_success;
10481:
10482: WHEN OZF_TP_INVALID_PARAM THEN
10483: ROLLBACK TO adjust_target_for_acct_deleted;
10484: FND_MESSAGE.set_name('OZF', 'OZF_TP_INVALID_PARAM_TXT');
10485: FND_MSG_PUB.add;
10486: x_return_status := FND_API.g_ret_sts_error ;
10487: FND_MSG_PUB.count_and_get (p_count => x_error_number,
10488: p_data => x_error_message);
10489: Ozf_Utility_pvt.write_conc_log(l_full_api_name||' : INVALID PARAMETER EXCEPTION = '||sqlerrm(sqlcode));
10483: ROLLBACK TO adjust_target_for_acct_deleted;
10484: FND_MESSAGE.set_name('OZF', 'OZF_TP_INVALID_PARAM_TXT');
10485: FND_MSG_PUB.add;
10486: x_return_status := FND_API.g_ret_sts_error ;
10487: FND_MSG_PUB.count_and_get (p_count => x_error_number,
10488: p_data => x_error_message);
10489: Ozf_Utility_pvt.write_conc_log(l_full_api_name||' : INVALID PARAMETER EXCEPTION = '||sqlerrm(sqlcode));
10490: Ozf_Utility_pvt.write_conc_log(fnd_message.get_string('OZF', 'OZF_TP_INVALID_PARAM_TXT'));
10491:
10491:
10492: WHEN FND_API.G_EXC_ERROR THEN
10493: ROLLBACK TO adjust_target_for_acct_deleted;
10494: x_return_status := FND_API.g_ret_sts_error ;
10495: FND_MSG_PUB.count_and_get (p_count => x_error_number,
10496: p_data => x_error_message);
10497:
10498: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
10499: ROLLBACK TO adjust_target_for_acct_deleted;
10497:
10498: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
10499: ROLLBACK TO adjust_target_for_acct_deleted;
10500: x_return_status := FND_API.g_ret_sts_unexp_error ;
10501: FND_MSG_PUB.Count_And_Get (p_count => x_error_number,
10502: p_data => x_error_message);
10503:
10504: WHEN OTHERS THEN
10505: ROLLBACK TO adjust_target_for_acct_deleted;
10506:
10507: FND_MESSAGE.set_name('OZF', 'OZF_TP_OTHERS_ERROR_TXT');
10508: FND_MESSAGE.set_token('OZF_TP_SQLERRM_TOKEN',SQLERRM);
10509: FND_MESSAGE.set_token('OZF_TP_SQLCODE_TOKEN',SQLCODE);
10510: FND_MSG_PUB.add;
10511:
10512: x_return_status := FND_API.g_ret_sts_unexp_error ;
10513: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
10514: FND_MSG_PUB.Add_Exc_Msg (g_pkg_name, l_api_name);
10509: FND_MESSAGE.set_token('OZF_TP_SQLCODE_TOKEN',SQLCODE);
10510: FND_MSG_PUB.add;
10511:
10512: x_return_status := FND_API.g_ret_sts_unexp_error ;
10513: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
10514: FND_MSG_PUB.Add_Exc_Msg (g_pkg_name, l_api_name);
10515: END IF;
10516: FND_MSG_PUB.Count_And_Get (p_count => x_error_number,
10517: p_data => x_error_message);
10510: FND_MSG_PUB.add;
10511:
10512: x_return_status := FND_API.g_ret_sts_unexp_error ;
10513: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
10514: FND_MSG_PUB.Add_Exc_Msg (g_pkg_name, l_api_name);
10515: END IF;
10516: FND_MSG_PUB.Count_And_Get (p_count => x_error_number,
10517: p_data => x_error_message);
10518: Ozf_Utility_pvt.write_conc_log(l_full_api_name||' : OTHERS EXCEPTION = '||sqlerrm(sqlcode));
10512: x_return_status := FND_API.g_ret_sts_unexp_error ;
10513: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
10514: FND_MSG_PUB.Add_Exc_Msg (g_pkg_name, l_api_name);
10515: END IF;
10516: FND_MSG_PUB.Count_And_Get (p_count => x_error_number,
10517: p_data => x_error_message);
10518: Ozf_Utility_pvt.write_conc_log(l_full_api_name||' : OTHERS EXCEPTION = '||sqlerrm(sqlcode));
10519:
10520: END adjust_target_for_acct_deleted;
10833: END IF;
10834:
10835: -- Initialize message list if l_init_msg_list is set to TRUE.
10836: IF FND_API.to_Boolean( l_init_msg_list ) THEN
10837: FND_MSG_PUB.initialize;
10838: END IF;
10839:
10840: -- Initialize API return status to SUCCESS
10841: x_return_status := FND_API.g_ret_sts_success;
10989:
10990: WHEN FND_API.G_EXC_ERROR THEN
10991: ROLLBACK TO adjust_account_targets;
10992: x_return_status := FND_API.g_ret_sts_error ;
10993: FND_MSG_PUB.count_and_get (p_count => x_error_number,
10994: p_data => x_error_message);
10995:
10996: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
10997: ROLLBACK TO adjust_account_targets;
10995:
10996: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
10997: ROLLBACK TO adjust_account_targets;
10998: x_return_status := FND_API.g_ret_sts_unexp_error ;
10999: FND_MSG_PUB.Count_And_Get (p_count => x_error_number,
11000: p_data => x_error_message);
11001:
11002: WHEN OTHERS THEN
11003: ROLLBACK TO adjust_account_targets;
11004:
11005: FND_MESSAGE.set_name('OZF', 'OZF_TP_OTHERS_ERROR_TXT');
11006: FND_MESSAGE.set_token('OZF_TP_SQLERRM_TOKEN',SQLERRM);
11007: FND_MESSAGE.set_token('OZF_TP_SQLCODE_TOKEN',SQLCODE);
11008: FND_MSG_PUB.add;
11009:
11010: x_return_status := FND_API.g_ret_sts_unexp_error ;
11011: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
11012: FND_MSG_PUB.Add_Exc_Msg (g_pkg_name, l_api_name);
11007: FND_MESSAGE.set_token('OZF_TP_SQLCODE_TOKEN',SQLCODE);
11008: FND_MSG_PUB.add;
11009:
11010: x_return_status := FND_API.g_ret_sts_unexp_error ;
11011: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
11012: FND_MSG_PUB.Add_Exc_Msg (g_pkg_name, l_api_name);
11013: END IF;
11014: FND_MSG_PUB.Count_And_Get (p_count => x_error_number,
11015: p_data => x_error_message);
11008: FND_MSG_PUB.add;
11009:
11010: x_return_status := FND_API.g_ret_sts_unexp_error ;
11011: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
11012: FND_MSG_PUB.Add_Exc_Msg (g_pkg_name, l_api_name);
11013: END IF;
11014: FND_MSG_PUB.Count_And_Get (p_count => x_error_number,
11015: p_data => x_error_message);
11016: Ozf_Utility_pvt.write_conc_log(l_full_api_name||' : OTHERS EXCEPTION = '||sqlerrm(sqlcode));
11010: x_return_status := FND_API.g_ret_sts_unexp_error ;
11011: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
11012: FND_MSG_PUB.Add_Exc_Msg (g_pkg_name, l_api_name);
11013: END IF;
11014: FND_MSG_PUB.Count_And_Get (p_count => x_error_number,
11015: p_data => x_error_message);
11016: Ozf_Utility_pvt.write_conc_log(l_full_api_name||' : OTHERS EXCEPTION = '||sqlerrm(sqlcode));
11017:
11018: END adjust_account_targets;