880:
881:
882: EXCEPTION
883: WHEN FND_API.G_EXC_ERROR THEN
884: ASO_UTILITY_PVT.HANDLE_EXCEPTIONS(
885: P_API_NAME => L_API_NAME
886: ,P_PKG_NAME => G_PKG_NAME
887: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR
888: ,P_PACKAGE_TYPE => ASO_UTILITY_PVT.G_PVT
884: ASO_UTILITY_PVT.HANDLE_EXCEPTIONS(
885: P_API_NAME => L_API_NAME
886: ,P_PKG_NAME => G_PKG_NAME
887: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR
888: ,P_PACKAGE_TYPE => ASO_UTILITY_PVT.G_PVT
889: ,P_SQLCODE => SQLCODE
890: ,P_SQLERRM => SQLERRM
891: ,X_MSG_COUNT => X_MSG_COUNT
892: ,X_MSG_DATA => X_MSG_DATA
892: ,X_MSG_DATA => X_MSG_DATA
893: ,X_RETURN_STATUS => X_RETURN_STATUS);
894:
895: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
896: ASO_UTILITY_PVT.HANDLE_EXCEPTIONS(
897: P_API_NAME => L_API_NAME
898: ,P_PKG_NAME => G_PKG_NAME
899: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR
900: ,P_PACKAGE_TYPE => ASO_UTILITY_PVT.G_PVT
896: ASO_UTILITY_PVT.HANDLE_EXCEPTIONS(
897: P_API_NAME => L_API_NAME
898: ,P_PKG_NAME => G_PKG_NAME
899: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR
900: ,P_PACKAGE_TYPE => ASO_UTILITY_PVT.G_PVT
901: ,P_SQLCODE => SQLCODE
902: ,P_SQLERRM => SQLERRM
903: ,X_MSG_COUNT => X_MSG_COUNT
904: ,X_MSG_DATA => X_MSG_DATA
904: ,X_MSG_DATA => X_MSG_DATA
905: ,X_RETURN_STATUS => X_RETURN_STATUS);
906:
907: WHEN OTHERS THEN
908: ASO_UTILITY_PVT.HANDLE_EXCEPTIONS(
909: P_API_NAME => L_API_NAME
910: ,P_PKG_NAME => G_PKG_NAME
911: ,P_EXCEPTION_LEVEL => ASO_UTILITY_PVT.G_EXC_OTHERS
912: ,P_PACKAGE_TYPE => ASO_UTILITY_PVT.G_PVT
907: WHEN OTHERS THEN
908: ASO_UTILITY_PVT.HANDLE_EXCEPTIONS(
909: P_API_NAME => L_API_NAME
910: ,P_PKG_NAME => G_PKG_NAME
911: ,P_EXCEPTION_LEVEL => ASO_UTILITY_PVT.G_EXC_OTHERS
912: ,P_PACKAGE_TYPE => ASO_UTILITY_PVT.G_PVT
913: ,P_SQLCODE => SQLCODE
914: ,P_SQLERRM => SQLERRM
915: ,X_MSG_COUNT => X_MSG_COUNT
908: ASO_UTILITY_PVT.HANDLE_EXCEPTIONS(
909: P_API_NAME => L_API_NAME
910: ,P_PKG_NAME => G_PKG_NAME
911: ,P_EXCEPTION_LEVEL => ASO_UTILITY_PVT.G_EXC_OTHERS
912: ,P_PACKAGE_TYPE => ASO_UTILITY_PVT.G_PVT
913: ,P_SQLCODE => SQLCODE
914: ,P_SQLERRM => SQLERRM
915: ,X_MSG_COUNT => X_MSG_COUNT
916: ,X_MSG_DATA => X_MSG_DATA
1155: WHEN FND_API.G_EXC_ERROR THEN
1156: IF ASO_DEBUG_PUB.G_Debug_Flag = 'Y' THEN
1157: aso_debug_pub.add('ASO_PRICING_INT:after inside EXCEPTION return status'||x_return_status, 1, 'Y');
1158: END IF;
1159: ASO_UTILITY_PVT.HANDLE_EXCEPTIONS(
1160: P_API_NAME => L_API_NAME
1161: ,P_PKG_NAME => G_PKG_NAME
1162: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR
1163: ,P_PACKAGE_TYPE => ASO_UTILITY_PVT.G_PVT
1159: ASO_UTILITY_PVT.HANDLE_EXCEPTIONS(
1160: P_API_NAME => L_API_NAME
1161: ,P_PKG_NAME => G_PKG_NAME
1162: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR
1163: ,P_PACKAGE_TYPE => ASO_UTILITY_PVT.G_PVT
1164: ,P_SQLCODE => SQLCODE
1165: ,P_SQLERRM => SQLERRM
1166: ,X_MSG_COUNT => X_MSG_COUNT
1167: ,X_MSG_DATA => X_MSG_DATA
1167: ,X_MSG_DATA => X_MSG_DATA
1168: ,X_RETURN_STATUS => X_RETURN_STATUS);
1169:
1170: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1171: ASO_UTILITY_PVT.HANDLE_EXCEPTIONS(
1172: P_API_NAME => L_API_NAME
1173: ,P_PKG_NAME => G_PKG_NAME
1174: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR
1175: ,P_PACKAGE_TYPE => ASO_UTILITY_PVT.G_PVT
1171: ASO_UTILITY_PVT.HANDLE_EXCEPTIONS(
1172: P_API_NAME => L_API_NAME
1173: ,P_PKG_NAME => G_PKG_NAME
1174: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR
1175: ,P_PACKAGE_TYPE => ASO_UTILITY_PVT.G_PVT
1176: ,P_SQLCODE => SQLCODE
1177: ,P_SQLERRM => SQLERRM
1178: ,X_MSG_COUNT => X_MSG_COUNT
1179: ,X_MSG_DATA => X_MSG_DATA
1179: ,X_MSG_DATA => X_MSG_DATA
1180: ,X_RETURN_STATUS => X_RETURN_STATUS);
1181:
1182: WHEN OTHERS THEN
1183: ASO_UTILITY_PVT.HANDLE_EXCEPTIONS(
1184: P_API_NAME => L_API_NAME
1185: ,P_PKG_NAME => G_PKG_NAME
1186: ,P_EXCEPTION_LEVEL => ASO_UTILITY_PVT.G_EXC_OTHERS
1187: ,P_PACKAGE_TYPE => ASO_UTILITY_PVT.G_PVT
1182: WHEN OTHERS THEN
1183: ASO_UTILITY_PVT.HANDLE_EXCEPTIONS(
1184: P_API_NAME => L_API_NAME
1185: ,P_PKG_NAME => G_PKG_NAME
1186: ,P_EXCEPTION_LEVEL => ASO_UTILITY_PVT.G_EXC_OTHERS
1187: ,P_PACKAGE_TYPE => ASO_UTILITY_PVT.G_PVT
1188: ,P_SQLCODE => SQLCODE
1189: ,P_SQLERRM => SQLERRM
1190: ,X_MSG_COUNT => X_MSG_COUNT
1183: ASO_UTILITY_PVT.HANDLE_EXCEPTIONS(
1184: P_API_NAME => L_API_NAME
1185: ,P_PKG_NAME => G_PKG_NAME
1186: ,P_EXCEPTION_LEVEL => ASO_UTILITY_PVT.G_EXC_OTHERS
1187: ,P_PACKAGE_TYPE => ASO_UTILITY_PVT.G_PVT
1188: ,P_SQLCODE => SQLCODE
1189: ,P_SQLERRM => SQLERRM
1190: ,X_MSG_COUNT => X_MSG_COUNT
1191: ,X_MSG_DATA => X_MSG_DATA
1261:
1262: aso_debug_pub.g_debug_flag := nvl(fnd_profile.value('ASO_ENABLE_DEBUG'),'N');
1263:
1264: x_return_status := FND_API.G_RET_STS_SUCCESS;
1265: l_qte_line_rec := ASO_UTILITY_PVT.Query_Qte_Line_Row(p_qte_line_id);
1266: l_qte_header_id := l_qte_line_rec.QUOTE_HEADER_ID;
1267: l_qte_header_rec := ASO_UTILITY_PVT.Query_Header_Row(l_qte_header_id);
1268: l_hd_shipment_tbl := ASO_UTILITY_PVT.Query_Shipment_Rows(l_qte_header_id, NULL);
1269:
1263:
1264: x_return_status := FND_API.G_RET_STS_SUCCESS;
1265: l_qte_line_rec := ASO_UTILITY_PVT.Query_Qte_Line_Row(p_qte_line_id);
1266: l_qte_header_id := l_qte_line_rec.QUOTE_HEADER_ID;
1267: l_qte_header_rec := ASO_UTILITY_PVT.Query_Header_Row(l_qte_header_id);
1268: l_hd_shipment_tbl := ASO_UTILITY_PVT.Query_Shipment_Rows(l_qte_header_id, NULL);
1269:
1270: IF l_hd_shipment_tbl.count = 1 THEN
1271: l_hd_shipment_rec := l_hd_shipment_tbl(1);
1264: x_return_status := FND_API.G_RET_STS_SUCCESS;
1265: l_qte_line_rec := ASO_UTILITY_PVT.Query_Qte_Line_Row(p_qte_line_id);
1266: l_qte_header_id := l_qte_line_rec.QUOTE_HEADER_ID;
1267: l_qte_header_rec := ASO_UTILITY_PVT.Query_Header_Row(l_qte_header_id);
1268: l_hd_shipment_tbl := ASO_UTILITY_PVT.Query_Shipment_Rows(l_qte_header_id, NULL);
1269:
1270: IF l_hd_shipment_tbl.count = 1 THEN
1271: l_hd_shipment_rec := l_hd_shipment_tbl(1);
1272: END IF;
1269:
1270: IF l_hd_shipment_tbl.count = 1 THEN
1271: l_hd_shipment_rec := l_hd_shipment_tbl(1);
1272: END IF;
1273: l_hd_price_attr_tbl := ASO_UTILITY_PVT.Query_Price_Attr_Rows(l_qte_header_id, null);
1274: l_qte_line_dtl_tbl := ASO_UTILITY_PVT.Query_Line_Dtl_Rows(p_qte_line_id);
1275:
1276: IF l_qte_line_dtl_tbl.count = 1 THEN
1277: l_qte_line_dtl_rec := l_qte_line_dtl_tbl(1);
1270: IF l_hd_shipment_tbl.count = 1 THEN
1271: l_hd_shipment_rec := l_hd_shipment_tbl(1);
1272: END IF;
1273: l_hd_price_attr_tbl := ASO_UTILITY_PVT.Query_Price_Attr_Rows(l_qte_header_id, null);
1274: l_qte_line_dtl_tbl := ASO_UTILITY_PVT.Query_Line_Dtl_Rows(p_qte_line_id);
1275:
1276: IF l_qte_line_dtl_tbl.count = 1 THEN
1277: l_qte_line_dtl_rec := l_qte_line_dtl_tbl(1);
1278: END IF;
1275:
1276: IF l_qte_line_dtl_tbl.count = 1 THEN
1277: l_qte_line_dtl_rec := l_qte_line_dtl_tbl(1);
1278: END IF;
1279: l_ln_shipment_tbl := ASO_UTILITY_PVT.Query_Shipment_Rows(l_qte_header_id, p_QTE_LINE_ID);
1280:
1281: IF l_ln_shipment_tbl.count = 1 THEN
1282: l_ln_shipment_rec := l_ln_shipment_tbl(1);
1283: END IF;
1280:
1281: IF l_ln_shipment_tbl.count = 1 THEN
1282: l_ln_shipment_rec := l_ln_shipment_tbl(1);
1283: END IF;
1284: l_ln_price_attr_tbl := ASO_UTILITY_PVT.Query_Price_Attr_Rows(l_qte_header_id, p_qte_line_id);
1285: --Code changed on 04/18/2000
1286:
1287: OPEN c_header_id;
1288: FETCH c_header_id INTO l_qte_header_id;
1342: aso_debug_pub.add('ASO_PRICING_INT:ADJ Lines deleted '||sql%ROWCOUNT,1,'Y');
1343: END IF;
1344:
1345: FOR i IN 1..lx_qte_line_tbl.count LOOP
1346: l_qte_line_rec := ASO_UTILITY_PVT.Query_Qte_Line_Row(lx_qte_line_tbl(i).quote_line_id);
1347: lx_qte_line_tbl(i).price_list_id := l_qte_line_rec.price_list_id;
1348: END LOOP;
1349:
1350: ASO_PRICING_CALLBACK_PVT.Update_Quote_Rows (
1365: END IF;
1366:
1367: EXCEPTION
1368: WHEN FND_API.G_EXC_ERROR THEN
1369: ASO_UTILITY_PVT.HANDLE_EXCEPTIONS(
1370: P_API_NAME => L_API_NAME
1371: ,P_PKG_NAME => G_PKG_NAME
1372: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR
1373: ,P_PACKAGE_TYPE => ASO_UTILITY_PVT.G_PVT
1369: ASO_UTILITY_PVT.HANDLE_EXCEPTIONS(
1370: P_API_NAME => L_API_NAME
1371: ,P_PKG_NAME => G_PKG_NAME
1372: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR
1373: ,P_PACKAGE_TYPE => ASO_UTILITY_PVT.G_PVT
1374: ,P_SQLCODE => SQLCODE
1375: ,P_SQLERRM => SQLERRM
1376: ,X_MSG_COUNT => X_MSG_COUNT
1377: ,X_MSG_DATA => X_MSG_DATA
1377: ,X_MSG_DATA => X_MSG_DATA
1378: ,X_RETURN_STATUS => X_RETURN_STATUS);
1379:
1380: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1381: ASO_UTILITY_PVT.HANDLE_EXCEPTIONS(
1382: P_API_NAME => L_API_NAME
1383: ,P_PKG_NAME => G_PKG_NAME
1384: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR
1385: ,P_PACKAGE_TYPE => ASO_UTILITY_PVT.G_PVT
1381: ASO_UTILITY_PVT.HANDLE_EXCEPTIONS(
1382: P_API_NAME => L_API_NAME
1383: ,P_PKG_NAME => G_PKG_NAME
1384: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR
1385: ,P_PACKAGE_TYPE => ASO_UTILITY_PVT.G_PVT
1386: ,P_SQLCODE => SQLCODE
1387: ,P_SQLERRM => SQLERRM
1388: ,X_MSG_COUNT => X_MSG_COUNT
1389: ,X_MSG_DATA => X_MSG_DATA
1389: ,X_MSG_DATA => X_MSG_DATA
1390: ,X_RETURN_STATUS => X_RETURN_STATUS);
1391:
1392: WHEN OTHERS THEN
1393: ASO_UTILITY_PVT.HANDLE_EXCEPTIONS(
1394: P_API_NAME => L_API_NAME
1395: ,P_PKG_NAME => G_PKG_NAME
1396: ,P_EXCEPTION_LEVEL => ASO_UTILITY_PVT.G_EXC_OTHERS
1397: ,P_PACKAGE_TYPE => ASO_UTILITY_PVT.G_PVT
1392: WHEN OTHERS THEN
1393: ASO_UTILITY_PVT.HANDLE_EXCEPTIONS(
1394: P_API_NAME => L_API_NAME
1395: ,P_PKG_NAME => G_PKG_NAME
1396: ,P_EXCEPTION_LEVEL => ASO_UTILITY_PVT.G_EXC_OTHERS
1397: ,P_PACKAGE_TYPE => ASO_UTILITY_PVT.G_PVT
1398: ,P_SQLCODE => SQLCODE
1399: ,P_SQLERRM => SQLERRM
1400: ,X_MSG_COUNT => X_MSG_COUNT
1393: ASO_UTILITY_PVT.HANDLE_EXCEPTIONS(
1394: P_API_NAME => L_API_NAME
1395: ,P_PKG_NAME => G_PKG_NAME
1396: ,P_EXCEPTION_LEVEL => ASO_UTILITY_PVT.G_EXC_OTHERS
1397: ,P_PACKAGE_TYPE => ASO_UTILITY_PVT.G_PVT
1398: ,P_SQLCODE => SQLCODE
1399: ,P_SQLERRM => SQLERRM
1400: ,X_MSG_COUNT => X_MSG_COUNT
1401: ,X_MSG_DATA => X_MSG_DATA
1495: x_return_status := FND_API.G_RET_STS_SUCCESS;
1496: l_request_type := p_control_rec.request_type;
1497: l_pricing_event := p_control_rec.pricing_event;
1498:
1499: l_qte_header_rec := ASO_UTILITY_PVT.Query_Header_Row(p_qte_header_id);
1500: l_shipment_tbl := ASO_UTILITY_PVT.Query_Shipment_Rows(p_qte_header_id,NULL);
1501: IF l_shipment_tbl.count = 1 THEN
1502: l_shipment_rec := l_shipment_tbl(1);
1503: END IF;
1496: l_request_type := p_control_rec.request_type;
1497: l_pricing_event := p_control_rec.pricing_event;
1498:
1499: l_qte_header_rec := ASO_UTILITY_PVT.Query_Header_Row(p_qte_header_id);
1500: l_shipment_tbl := ASO_UTILITY_PVT.Query_Shipment_Rows(p_qte_header_id,NULL);
1501: IF l_shipment_tbl.count = 1 THEN
1502: l_shipment_rec := l_shipment_tbl(1);
1503: END IF;
1504: l_price_attr_tbl := ASO_UTILITY_PVT.Query_Price_Attr_Rows(p_qte_header_id, null);
1500: l_shipment_tbl := ASO_UTILITY_PVT.Query_Shipment_Rows(p_qte_header_id,NULL);
1501: IF l_shipment_tbl.count = 1 THEN
1502: l_shipment_rec := l_shipment_tbl(1);
1503: END IF;
1504: l_price_attr_tbl := ASO_UTILITY_PVT.Query_Price_Attr_Rows(p_qte_header_id, null);
1505: ASO_PRICING_INT.Pricing_Order(
1506: P_Api_Version_Number => 1.0,
1507: P_Init_Msg_List => FND_API.G_FALSE,
1508: P_Commit => FND_API.G_FALSE,
1537: );
1538:
1539: EXCEPTION
1540: WHEN FND_API.G_EXC_ERROR THEN
1541: ASO_UTILITY_PVT.HANDLE_EXCEPTIONS(
1542: P_API_NAME => L_API_NAME
1543: ,P_PKG_NAME => G_PKG_NAME
1544: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR
1545: ,P_PACKAGE_TYPE => ASO_UTILITY_PVT.G_PVT
1541: ASO_UTILITY_PVT.HANDLE_EXCEPTIONS(
1542: P_API_NAME => L_API_NAME
1543: ,P_PKG_NAME => G_PKG_NAME
1544: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR
1545: ,P_PACKAGE_TYPE => ASO_UTILITY_PVT.G_PVT
1546: ,P_SQLCODE => SQLCODE
1547: ,P_SQLERRM => SQLERRM
1548: ,X_MSG_COUNT => X_MSG_COUNT
1549: ,X_MSG_DATA => X_MSG_DATA
1549: ,X_MSG_DATA => X_MSG_DATA
1550: ,X_RETURN_STATUS => X_RETURN_STATUS);
1551:
1552: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1553: ASO_UTILITY_PVT.HANDLE_EXCEPTIONS(
1554: P_API_NAME => L_API_NAME
1555: ,P_PKG_NAME => G_PKG_NAME
1556: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR
1557: ,P_PACKAGE_TYPE => ASO_UTILITY_PVT.G_PVT
1553: ASO_UTILITY_PVT.HANDLE_EXCEPTIONS(
1554: P_API_NAME => L_API_NAME
1555: ,P_PKG_NAME => G_PKG_NAME
1556: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR
1557: ,P_PACKAGE_TYPE => ASO_UTILITY_PVT.G_PVT
1558: ,P_SQLCODE => SQLCODE
1559: ,P_SQLERRM => SQLERRM
1560: ,X_MSG_COUNT => X_MSG_COUNT
1561: ,X_MSG_DATA => X_MSG_DATA
1561: ,X_MSG_DATA => X_MSG_DATA
1562: ,X_RETURN_STATUS => X_RETURN_STATUS);
1563:
1564: WHEN OTHERS THEN
1565: ASO_UTILITY_PVT.HANDLE_EXCEPTIONS(
1566: P_API_NAME => L_API_NAME
1567: ,P_PKG_NAME => G_PKG_NAME
1568: ,P_EXCEPTION_LEVEL => ASO_UTILITY_PVT.G_EXC_OTHERS
1569: ,P_PACKAGE_TYPE => ASO_UTILITY_PVT.G_PVT
1564: WHEN OTHERS THEN
1565: ASO_UTILITY_PVT.HANDLE_EXCEPTIONS(
1566: P_API_NAME => L_API_NAME
1567: ,P_PKG_NAME => G_PKG_NAME
1568: ,P_EXCEPTION_LEVEL => ASO_UTILITY_PVT.G_EXC_OTHERS
1569: ,P_PACKAGE_TYPE => ASO_UTILITY_PVT.G_PVT
1570: ,P_SQLCODE => SQLCODE
1571: ,P_SQLERRM => SQLERRM
1572: ,X_MSG_COUNT => X_MSG_COUNT
1565: ASO_UTILITY_PVT.HANDLE_EXCEPTIONS(
1566: P_API_NAME => L_API_NAME
1567: ,P_PKG_NAME => G_PKG_NAME
1568: ,P_EXCEPTION_LEVEL => ASO_UTILITY_PVT.G_EXC_OTHERS
1569: ,P_PACKAGE_TYPE => ASO_UTILITY_PVT.G_PVT
1570: ,P_SQLCODE => SQLCODE
1571: ,P_SQLERRM => SQLERRM
1572: ,X_MSG_COUNT => X_MSG_COUNT
1573: ,X_MSG_DATA => X_MSG_DATA