729: PO_DEBUG.debug_var(l_log_head, l_progress, 'l_return_status_text', l_return_status_text);
730: END IF;
731:
732: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
733: FND_MESSAGE.SET_NAME('PO', 'PO_QP_PRICE_API_ERROR');
734: FND_MESSAGE.SET_TOKEN('ERROR_TEXT', l_return_status_text);
735: FND_MSG_PUB.Add;
736: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
737: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
730: END IF;
731:
732: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
733: FND_MESSAGE.SET_NAME('PO', 'PO_QP_PRICE_API_ERROR');
734: FND_MESSAGE.SET_TOKEN('ERROR_TEXT', l_return_status_text);
735: FND_MSG_PUB.Add;
736: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
737: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
738: FND_MESSAGE.SET_NAME('PO', 'PO_QP_PRICE_API_ERROR');
734: FND_MESSAGE.SET_TOKEN('ERROR_TEXT', l_return_status_text);
735: FND_MSG_PUB.Add;
736: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
737: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
738: FND_MESSAGE.SET_NAME('PO', 'PO_QP_PRICE_API_ERROR');
739: FND_MESSAGE.SET_TOKEN('ERROR_TEXT', l_return_status_text);
740: FND_MSG_PUB.Add;
741: RAISE FND_API.G_EXC_ERROR;
742: END IF;
735: FND_MSG_PUB.Add;
736: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
737: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
738: FND_MESSAGE.SET_NAME('PO', 'PO_QP_PRICE_API_ERROR');
739: FND_MESSAGE.SET_TOKEN('ERROR_TEXT', l_return_status_text);
740: FND_MSG_PUB.Add;
741: RAISE FND_API.G_EXC_ERROR;
742: END IF;
743:
812: PO_DEBUG.debug_var(l_log_head, l_progress, 'l_return_status_text', l_return_status_text);
813: END IF;
814:
815: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
816: FND_MESSAGE.SET_NAME('PO', 'PO_QP_PRICE_API_ERROR');
817: FND_MESSAGE.SET_TOKEN('ERROR_TEXT', l_return_status_text);
818: FND_MSG_PUB.Add;
819: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
820: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
813: END IF;
814:
815: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
816: FND_MESSAGE.SET_NAME('PO', 'PO_QP_PRICE_API_ERROR');
817: FND_MESSAGE.SET_TOKEN('ERROR_TEXT', l_return_status_text);
818: FND_MSG_PUB.Add;
819: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
820: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
821: FND_MESSAGE.SET_NAME('PO', 'PO_QP_PRICE_API_ERROR');
817: FND_MESSAGE.SET_TOKEN('ERROR_TEXT', l_return_status_text);
818: FND_MSG_PUB.Add;
819: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
820: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
821: FND_MESSAGE.SET_NAME('PO', 'PO_QP_PRICE_API_ERROR');
822: FND_MESSAGE.SET_TOKEN('ERROR_TEXT', l_return_status_text);
823: FND_MSG_PUB.Add;
824: RAISE FND_API.G_EXC_ERROR;
825: END IF;
818: FND_MSG_PUB.Add;
819: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
820: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
821: FND_MESSAGE.SET_NAME('PO', 'PO_QP_PRICE_API_ERROR');
822: FND_MESSAGE.SET_TOKEN('ERROR_TEXT', l_return_status_text);
823: FND_MSG_PUB.Add;
824: RAISE FND_API.G_EXC_ERROR;
825: END IF;
826:
862: l_progress := '230';
863: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
864: PO_DEBUG.debug_var(l_log_head, l_progress, 'l_return_status', l_return_status);
865: PO_DEBUG.debug_unexp(l_log_head, l_progress,'audit_qp_price_adjustment errors out');
866: FND_MESSAGE.SET_NAME('PO', 'PO_QP_PRICE_API_ERROR');
867: FND_MESSAGE.SET_TOKEN('ERROR_TEXT', l_msg_data);
868: FND_MSG_PUB.Add;
869: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
870: END IF;
863: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
864: PO_DEBUG.debug_var(l_log_head, l_progress, 'l_return_status', l_return_status);
865: PO_DEBUG.debug_unexp(l_log_head, l_progress,'audit_qp_price_adjustment errors out');
866: FND_MESSAGE.SET_NAME('PO', 'PO_QP_PRICE_API_ERROR');
867: FND_MESSAGE.SET_TOKEN('ERROR_TEXT', l_msg_data);
868: FND_MSG_PUB.Add;
869: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
870: END IF;
871: --
914:
915: x_unit_price := NVL(x_unit_price, x_base_unit_price);
916:
917: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
918: FND_MESSAGE.SET_NAME('PO', 'PO_QP_PRICE_API_ERROR');
919: FND_MESSAGE.SET_TOKEN('ERROR_TEXT', l_price_status_text);
920: x_return_status := FND_API.g_ret_sts_error;
921: END IF;
922:
915: x_unit_price := NVL(x_unit_price, x_base_unit_price);
916:
917: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
918: FND_MESSAGE.SET_NAME('PO', 'PO_QP_PRICE_API_ERROR');
919: FND_MESSAGE.SET_TOKEN('ERROR_TEXT', l_price_status_text);
920: x_return_status := FND_API.g_ret_sts_error;
921: END IF;
922:
923: l_progress := '300';
943: l_exception_msg);
944: END IF;
945: x_return_status := FND_API.g_ret_sts_error;
946: -- Push the po_return_msg onto msg list and message stack
947: FND_MESSAGE.set_name('PO', 'PO_QP_PRICE_API_ERROR');
948: FND_MESSAGE.SET_TOKEN('ERROR_TEXT', l_exception_msg);
949:
950: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
951: --raised unexpected error: assume raiser already pushed onto the stack
944: END IF;
945: x_return_status := FND_API.g_ret_sts_error;
946: -- Push the po_return_msg onto msg list and message stack
947: FND_MESSAGE.set_name('PO', 'PO_QP_PRICE_API_ERROR');
948: FND_MESSAGE.SET_TOKEN('ERROR_TEXT', l_exception_msg);
949:
950: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
951: --raised unexpected error: assume raiser already pushed onto the stack
952: l_exception_msg := FND_MSG_PUB.get(
958: l_exception_msg);
959: END IF;
960: x_return_status := FND_API.g_ret_sts_unexp_error;
961: -- Push the po_return_msg onto msg list and message stack
962: FND_MESSAGE.set_name('PO', 'PO_QP_PRICE_API_ERROR');
963: FND_MESSAGE.SET_TOKEN('ERROR_TEXT', l_exception_msg);
964:
965: WHEN OTHERS THEN
966: IF g_debug_unexp THEN
959: END IF;
960: x_return_status := FND_API.g_ret_sts_unexp_error;
961: -- Push the po_return_msg onto msg list and message stack
962: FND_MESSAGE.set_name('PO', 'PO_QP_PRICE_API_ERROR');
963: FND_MESSAGE.SET_TOKEN('ERROR_TEXT', l_exception_msg);
964:
965: WHEN OTHERS THEN
966: IF g_debug_unexp THEN
967: PO_DEBUG.debug_exc(l_log_head, l_progress);
967: PO_DEBUG.debug_exc(l_log_head, l_progress);
968: END IF;
969: --unexpected error from this procedure: get SQLERRM
970: po_message_s.sql_error(g_pkg_name, l_api_name, l_progress, SQLCODE, SQLERRM);
971: l_exception_msg := FND_MESSAGE.get;
972: IF g_debug_unexp THEN
973: PO_DEBUG.debug_var(l_log_head, l_progress, 'l_exception_msg',
974: l_exception_msg);
975: END IF;
974: l_exception_msg);
975: END IF;
976: x_return_status := FND_API.g_ret_sts_unexp_error;
977: -- Push the po_return_msg onto msg list and message stack
978: FND_MESSAGE.set_name('PO', 'PO_QP_PRICE_API_ERROR');
979: FND_MESSAGE.SET_TOKEN('ERROR_TEXT', l_exception_msg);
980: END get_advanced_price;
981:
982:
975: END IF;
976: x_return_status := FND_API.g_ret_sts_unexp_error;
977: -- Push the po_return_msg onto msg list and message stack
978: FND_MESSAGE.set_name('PO', 'PO_QP_PRICE_API_ERROR');
979: FND_MESSAGE.SET_TOKEN('ERROR_TEXT', l_exception_msg);
980: END get_advanced_price;
981:
982:
983: --------------------------------------------------------------------------------
1509: PO_LOG.stmt(l_log_head, d_pos, 'l_return_status_text', l_return_status_text);
1510: END IF;
1511:
1512: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1513: FND_MESSAGE.SET_NAME('PO', 'PO_QP_PRICE_API_ERROR');
1514: FND_MESSAGE.SET_TOKEN('ERROR_TEXT', l_return_status_text);
1515: FND_MSG_PUB.Add;
1516: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1517: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
1510: END IF;
1511:
1512: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1513: FND_MESSAGE.SET_NAME('PO', 'PO_QP_PRICE_API_ERROR');
1514: FND_MESSAGE.SET_TOKEN('ERROR_TEXT', l_return_status_text);
1515: FND_MSG_PUB.Add;
1516: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1517: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
1518: FND_MESSAGE.SET_NAME('PO', 'PO_QP_PRICE_API_ERROR');
1514: FND_MESSAGE.SET_TOKEN('ERROR_TEXT', l_return_status_text);
1515: FND_MSG_PUB.Add;
1516: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1517: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
1518: FND_MESSAGE.SET_NAME('PO', 'PO_QP_PRICE_API_ERROR');
1519: FND_MESSAGE.SET_TOKEN('ERROR_TEXT', l_return_status_text);
1520: FND_MSG_PUB.Add;
1521: RAISE FND_API.G_EXC_ERROR;
1522: END IF;
1515: FND_MSG_PUB.Add;
1516: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1517: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
1518: FND_MESSAGE.SET_NAME('PO', 'PO_QP_PRICE_API_ERROR');
1519: FND_MESSAGE.SET_TOKEN('ERROR_TEXT', l_return_status_text);
1520: FND_MSG_PUB.Add;
1521: RAISE FND_API.G_EXC_ERROR;
1522: END IF;
1523:
1560: PO_LOG.stmt(l_log_head, d_pos, 'l_return_status_text', l_return_status_text);
1561: END IF;
1562:
1563: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1564: FND_MESSAGE.SET_NAME('PO', 'PO_QP_PRICE_API_ERROR');
1565: FND_MESSAGE.SET_TOKEN('ERROR_TEXT', l_return_status_text);
1566: FND_MSG_PUB.Add;
1567: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1568: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
1561: END IF;
1562:
1563: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1564: FND_MESSAGE.SET_NAME('PO', 'PO_QP_PRICE_API_ERROR');
1565: FND_MESSAGE.SET_TOKEN('ERROR_TEXT', l_return_status_text);
1566: FND_MSG_PUB.Add;
1567: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1568: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
1569: FND_MESSAGE.SET_NAME('PO', 'PO_QP_PRICE_API_ERROR');
1565: FND_MESSAGE.SET_TOKEN('ERROR_TEXT', l_return_status_text);
1566: FND_MSG_PUB.Add;
1567: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1568: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
1569: FND_MESSAGE.SET_NAME('PO', 'PO_QP_PRICE_API_ERROR');
1570: FND_MESSAGE.SET_TOKEN('ERROR_TEXT', l_return_status_text);
1571: FND_MSG_PUB.Add;
1572: RAISE FND_API.G_EXC_ERROR;
1573: END IF;
1566: FND_MSG_PUB.Add;
1567: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1568: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
1569: FND_MESSAGE.SET_NAME('PO', 'PO_QP_PRICE_API_ERROR');
1570: FND_MESSAGE.SET_TOKEN('ERROR_TEXT', l_return_status_text);
1571: FND_MSG_PUB.Add;
1572: RAISE FND_API.G_EXC_ERROR;
1573: END IF;
1574:
1588: l_progress := '230';
1589: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1590: PO_DEBUG.debug_var(l_log_head,l_progress,'l_return_status',l_return_status);
1591: PO_DEBUG.debug_unexp(l_log_head,l_progress,'audit_qp_price_adjustment errors out');
1592: FND_MESSAGE.SET_NAME('PO','PO_QP_PRICE_API_ERROR');
1593: FND_MESSAGE.SET_TOKEN('ERROR_TEXT',l_msg_data);
1594: FND_MSG_PUB.Add;
1595: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1596: END IF;
1589: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1590: PO_DEBUG.debug_var(l_log_head,l_progress,'l_return_status',l_return_status);
1591: PO_DEBUG.debug_unexp(l_log_head,l_progress,'audit_qp_price_adjustment errors out');
1592: FND_MESSAGE.SET_NAME('PO','PO_QP_PRICE_API_ERROR');
1593: FND_MESSAGE.SET_TOKEN('ERROR_TEXT',l_msg_data);
1594: FND_MSG_PUB.Add;
1595: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1596: END IF;
1597: */
1701: PO_LOG.exc(l_log_head, d_pos, l_exception_msg);
1702: END IF;
1703: x_return_status := FND_API.g_ret_sts_error;
1704: -- Push the po_return_msg onto msg list and message stack
1705: FND_MESSAGE.set_name('PO', 'PO_QP_PRICE_API_ERROR');
1706: FND_MESSAGE.SET_TOKEN('ERROR_TEXT', l_exception_msg);
1707:
1708: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1709: --raised unexpected error: assume raiser already pushed onto the stack
1702: END IF;
1703: x_return_status := FND_API.g_ret_sts_error;
1704: -- Push the po_return_msg onto msg list and message stack
1705: FND_MESSAGE.set_name('PO', 'PO_QP_PRICE_API_ERROR');
1706: FND_MESSAGE.SET_TOKEN('ERROR_TEXT', l_exception_msg);
1707:
1708: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1709: --raised unexpected error: assume raiser already pushed onto the stack
1710: l_exception_msg := FND_MSG_PUB.get(
1715: PO_LOG.exc(l_log_head, d_pos, l_exception_msg);
1716: END IF;
1717: x_return_status := FND_API.g_ret_sts_unexp_error;
1718: -- Push the po_return_msg onto msg list and message stack
1719: FND_MESSAGE.set_name('PO', 'PO_QP_PRICE_API_ERROR');
1720: FND_MESSAGE.SET_TOKEN('ERROR_TEXT', l_exception_msg);
1721:
1722: WHEN OTHERS THEN
1723: IF g_debug_unexp THEN
1716: END IF;
1717: x_return_status := FND_API.g_ret_sts_unexp_error;
1718: -- Push the po_return_msg onto msg list and message stack
1719: FND_MESSAGE.set_name('PO', 'PO_QP_PRICE_API_ERROR');
1720: FND_MESSAGE.SET_TOKEN('ERROR_TEXT', l_exception_msg);
1721:
1722: WHEN OTHERS THEN
1723: IF g_debug_unexp THEN
1724: PO_LOG.exc(l_log_head, d_pos);
1724: PO_LOG.exc(l_log_head, d_pos);
1725: END IF;
1726: --unexpected error from this procedure: get SQLERRM
1727: po_message_s.sql_error(g_pkg_name, l_api_name, d_pos, SQLCODE, SQLERRM);
1728: l_exception_msg := FND_MESSAGE.get;
1729: IF g_debug_unexp THEN
1730: PO_LOG.exc(l_log_head, d_pos, l_exception_msg);
1731: END IF;
1732: x_return_status := FND_API.g_ret_sts_unexp_error;
1730: PO_LOG.exc(l_log_head, d_pos, l_exception_msg);
1731: END IF;
1732: x_return_status := FND_API.g_ret_sts_unexp_error;
1733: -- Push the po_return_msg onto msg list and message stack
1734: FND_MESSAGE.set_name('PO', 'PO_QP_PRICE_API_ERROR');
1735: FND_MESSAGE.SET_TOKEN('ERROR_TEXT', l_exception_msg);
1736: END get_advanced_price;
1737: --
1738:
1731: END IF;
1732: x_return_status := FND_API.g_ret_sts_unexp_error;
1733: -- Push the po_return_msg onto msg list and message stack
1734: FND_MESSAGE.set_name('PO', 'PO_QP_PRICE_API_ERROR');
1735: FND_MESSAGE.SET_TOKEN('ERROR_TEXT', l_exception_msg);
1736: END get_advanced_price;
1737: --
1738:
1739: --
2122: PO_DEBUG.debug_var(l_log_head, l_progress, 'l_return_status_text', l_return_status_text);
2123: END IF;
2124:
2125: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2126: FND_MESSAGE.SET_NAME('PO', 'PO_QP_PRICE_API_ERROR');
2127: FND_MESSAGE.SET_TOKEN('ERROR_TEXT', l_return_status_text);
2128: FND_MSG_PUB.Add;
2129: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2130: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
2123: END IF;
2124:
2125: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2126: FND_MESSAGE.SET_NAME('PO', 'PO_QP_PRICE_API_ERROR');
2127: FND_MESSAGE.SET_TOKEN('ERROR_TEXT', l_return_status_text);
2128: FND_MSG_PUB.Add;
2129: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2130: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
2131: FND_MESSAGE.SET_NAME('PO', 'PO_QP_PRICE_API_ERROR');
2127: FND_MESSAGE.SET_TOKEN('ERROR_TEXT', l_return_status_text);
2128: FND_MSG_PUB.Add;
2129: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2130: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
2131: FND_MESSAGE.SET_NAME('PO', 'PO_QP_PRICE_API_ERROR');
2132: FND_MESSAGE.SET_TOKEN('ERROR_TEXT', l_return_status_text);
2133: FND_MSG_PUB.Add;
2134: RAISE FND_API.G_EXC_ERROR;
2135: END IF;
2128: FND_MSG_PUB.Add;
2129: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2130: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
2131: FND_MESSAGE.SET_NAME('PO', 'PO_QP_PRICE_API_ERROR');
2132: FND_MESSAGE.SET_TOKEN('ERROR_TEXT', l_return_status_text);
2133: FND_MSG_PUB.Add;
2134: RAISE FND_API.G_EXC_ERROR;
2135: END IF;
2136:
2175: PO_DEBUG.debug_var(l_log_head, l_progress, 'l_return_status_text', l_return_status_text);
2176: END IF;
2177:
2178: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2179: FND_MESSAGE.SET_NAME('PO', 'PO_QP_PRICE_API_ERROR');
2180: FND_MESSAGE.SET_TOKEN('ERROR_TEXT', l_return_status_text);
2181: FND_MSG_PUB.Add;
2182: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2183: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
2176: END IF;
2177:
2178: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2179: FND_MESSAGE.SET_NAME('PO', 'PO_QP_PRICE_API_ERROR');
2180: FND_MESSAGE.SET_TOKEN('ERROR_TEXT', l_return_status_text);
2181: FND_MSG_PUB.Add;
2182: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2183: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
2184: FND_MESSAGE.SET_NAME('PO', 'PO_QP_PRICE_API_ERROR');
2180: FND_MESSAGE.SET_TOKEN('ERROR_TEXT', l_return_status_text);
2181: FND_MSG_PUB.Add;
2182: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2183: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
2184: FND_MESSAGE.SET_NAME('PO', 'PO_QP_PRICE_API_ERROR');
2185: FND_MESSAGE.SET_TOKEN('ERROR_TEXT', l_return_status_text);
2186: FND_MSG_PUB.Add;
2187: RAISE FND_API.G_EXC_ERROR;
2188: END IF;
2181: FND_MSG_PUB.Add;
2182: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2183: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
2184: FND_MESSAGE.SET_NAME('PO', 'PO_QP_PRICE_API_ERROR');
2185: FND_MESSAGE.SET_TOKEN('ERROR_TEXT', l_return_status_text);
2186: FND_MSG_PUB.Add;
2187: RAISE FND_API.G_EXC_ERROR;
2188: END IF;
2189:
2212: l_exception_msg);
2213: END IF;
2214: x_return_status := FND_API.g_ret_sts_error;
2215: -- Push the po_return_msg onto msg list and message stack
2216: FND_MESSAGE.set_name('PO', 'PO_QP_PRICE_API_ERROR');
2217: FND_MESSAGE.SET_TOKEN('ERROR_TEXT', l_exception_msg);
2218:
2219: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2220: --raised unexpected error: assume raiser already pushed onto the stack
2213: END IF;
2214: x_return_status := FND_API.g_ret_sts_error;
2215: -- Push the po_return_msg onto msg list and message stack
2216: FND_MESSAGE.set_name('PO', 'PO_QP_PRICE_API_ERROR');
2217: FND_MESSAGE.SET_TOKEN('ERROR_TEXT', l_exception_msg);
2218:
2219: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2220: --raised unexpected error: assume raiser already pushed onto the stack
2221: l_exception_msg := FND_MSG_PUB.get(
2227: l_exception_msg);
2228: END IF;
2229: x_return_status := FND_API.g_ret_sts_unexp_error;
2230: -- Push the po_return_msg onto msg list and message stack
2231: FND_MESSAGE.set_name('PO', 'PO_QP_PRICE_API_ERROR');
2232: FND_MESSAGE.SET_TOKEN('ERROR_TEXT', l_exception_msg);
2233:
2234: WHEN OTHERS THEN
2235: IF g_debug_unexp THEN
2228: END IF;
2229: x_return_status := FND_API.g_ret_sts_unexp_error;
2230: -- Push the po_return_msg onto msg list and message stack
2231: FND_MESSAGE.set_name('PO', 'PO_QP_PRICE_API_ERROR');
2232: FND_MESSAGE.SET_TOKEN('ERROR_TEXT', l_exception_msg);
2233:
2234: WHEN OTHERS THEN
2235: IF g_debug_unexp THEN
2236: PO_DEBUG.debug_exc(l_log_head, l_progress);
2236: PO_DEBUG.debug_exc(l_log_head, l_progress);
2237: END IF;
2238: --unexpected error from this procedure: get SQLERRM
2239: po_message_s.sql_error(g_pkg_name, l_api_name, l_progress, SQLCODE, SQLERRM);
2240: l_exception_msg := FND_MESSAGE.get;
2241: IF g_debug_unexp THEN
2242: PO_DEBUG.debug_var(l_log_head, l_progress, 'l_exception_msg',
2243: l_exception_msg);
2244: END IF;
2243: l_exception_msg);
2244: END IF;
2245: x_return_status := FND_API.g_ret_sts_unexp_error;
2246: -- Push the po_return_msg onto msg list and message stack
2247: FND_MESSAGE.set_name('PO', 'PO_QP_PRICE_API_ERROR');
2248: FND_MESSAGE.SET_TOKEN('ERROR_TEXT', l_exception_msg);
2249: END call_pricing_manual_modifier;
2250: --
2251:
2244: END IF;
2245: x_return_status := FND_API.g_ret_sts_unexp_error;
2246: -- Push the po_return_msg onto msg list and message stack
2247: FND_MESSAGE.set_name('PO', 'PO_QP_PRICE_API_ERROR');
2248: FND_MESSAGE.SET_TOKEN('ERROR_TEXT', l_exception_msg);
2249: END call_pricing_manual_modifier;
2250: --
2251:
2252: END PO_ADVANCED_PRICE_PVT;