699: PO_DEBUG.debug_var(l_log_head,l_progress,'l_return_status_text',l_return_status_text);
700: END IF;
701:
702: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
703: FND_MESSAGE.SET_NAME('PO','PO_QP_PRICE_API_ERROR');
704: FND_MESSAGE.SET_TOKEN('ERROR_TEXT',l_return_status_text);
705: FND_MSG_PUB.Add;
706: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
707: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
700: END IF;
701:
702: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
703: FND_MESSAGE.SET_NAME('PO','PO_QP_PRICE_API_ERROR');
704: FND_MESSAGE.SET_TOKEN('ERROR_TEXT',l_return_status_text);
705: FND_MSG_PUB.Add;
706: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
707: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
708: FND_MESSAGE.SET_NAME('PO','PO_QP_PRICE_API_ERROR');
704: FND_MESSAGE.SET_TOKEN('ERROR_TEXT',l_return_status_text);
705: FND_MSG_PUB.Add;
706: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
707: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
708: FND_MESSAGE.SET_NAME('PO','PO_QP_PRICE_API_ERROR');
709: FND_MESSAGE.SET_TOKEN('ERROR_TEXT',l_return_status_text);
710: FND_MSG_PUB.Add;
711: RAISE FND_API.G_EXC_ERROR;
712: END IF;
705: FND_MSG_PUB.Add;
706: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
707: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
708: FND_MESSAGE.SET_NAME('PO','PO_QP_PRICE_API_ERROR');
709: FND_MESSAGE.SET_TOKEN('ERROR_TEXT',l_return_status_text);
710: FND_MSG_PUB.Add;
711: RAISE FND_API.G_EXC_ERROR;
712: END IF;
713:
751: PO_DEBUG.debug_var(l_log_head,l_progress,'l_return_status_text',l_return_status_text);
752: END IF;
753:
754: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
755: FND_MESSAGE.SET_NAME('PO','PO_QP_PRICE_API_ERROR');
756: FND_MESSAGE.SET_TOKEN('ERROR_TEXT',l_return_status_text);
757: FND_MSG_PUB.Add;
758: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
759: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
752: END IF;
753:
754: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
755: FND_MESSAGE.SET_NAME('PO','PO_QP_PRICE_API_ERROR');
756: FND_MESSAGE.SET_TOKEN('ERROR_TEXT',l_return_status_text);
757: FND_MSG_PUB.Add;
758: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
759: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
760: FND_MESSAGE.SET_NAME('PO','PO_QP_PRICE_API_ERROR');
756: FND_MESSAGE.SET_TOKEN('ERROR_TEXT',l_return_status_text);
757: FND_MSG_PUB.Add;
758: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
759: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
760: FND_MESSAGE.SET_NAME('PO','PO_QP_PRICE_API_ERROR');
761: FND_MESSAGE.SET_TOKEN('ERROR_TEXT',l_return_status_text);
762: FND_MSG_PUB.Add;
763: RAISE FND_API.G_EXC_ERROR;
764: END IF;
757: FND_MSG_PUB.Add;
758: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
759: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
760: FND_MESSAGE.SET_NAME('PO','PO_QP_PRICE_API_ERROR');
761: FND_MESSAGE.SET_TOKEN('ERROR_TEXT',l_return_status_text);
762: FND_MSG_PUB.Add;
763: RAISE FND_API.G_EXC_ERROR;
764: END IF;
765:
777: l_progress := '230';
778: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
779: PO_DEBUG.debug_var(l_log_head,l_progress,'l_return_status',l_return_status);
780: PO_DEBUG.debug_unexp(l_log_head,l_progress,'audit_qp_price_adjustment errors out');
781: FND_MESSAGE.SET_NAME('PO','PO_QP_PRICE_API_ERROR');
782: FND_MESSAGE.SET_TOKEN('ERROR_TEXT',l_msg_data);
783: FND_MSG_PUB.Add;
784: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
785: END IF;
778: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
779: PO_DEBUG.debug_var(l_log_head,l_progress,'l_return_status',l_return_status);
780: PO_DEBUG.debug_unexp(l_log_head,l_progress,'audit_qp_price_adjustment errors out');
781: FND_MESSAGE.SET_NAME('PO','PO_QP_PRICE_API_ERROR');
782: FND_MESSAGE.SET_TOKEN('ERROR_TEXT',l_msg_data);
783: FND_MSG_PUB.Add;
784: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
785: END IF;
786: --
829:
830: x_unit_price := NVL(x_unit_price, x_base_unit_price);
831:
832: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
833: FND_MESSAGE.SET_NAME('PO','PO_QP_PRICE_API_ERROR');
834: FND_MESSAGE.SET_TOKEN('ERROR_TEXT',l_price_status_text);
835: x_return_status := FND_API.g_ret_sts_error;
836: END IF;
837:
830: x_unit_price := NVL(x_unit_price, x_base_unit_price);
831:
832: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
833: FND_MESSAGE.SET_NAME('PO','PO_QP_PRICE_API_ERROR');
834: FND_MESSAGE.SET_TOKEN('ERROR_TEXT',l_price_status_text);
835: x_return_status := FND_API.g_ret_sts_error;
836: END IF;
837:
838: l_progress := '300';
858: l_exception_msg);
859: END IF;
860: x_return_status := FND_API.g_ret_sts_error;
861: -- Push the po_return_msg onto msg list and message stack
862: FND_MESSAGE.set_name('PO', 'PO_QP_PRICE_API_ERROR');
863: FND_MESSAGE.SET_TOKEN('ERROR_TEXT',l_exception_msg);
864:
865: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
866: --raised unexpected error: assume raiser already pushed onto the stack
859: END IF;
860: x_return_status := FND_API.g_ret_sts_error;
861: -- Push the po_return_msg onto msg list and message stack
862: FND_MESSAGE.set_name('PO', 'PO_QP_PRICE_API_ERROR');
863: FND_MESSAGE.SET_TOKEN('ERROR_TEXT',l_exception_msg);
864:
865: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
866: --raised unexpected error: assume raiser already pushed onto the stack
867: l_exception_msg := FND_MSG_PUB.get(
873: l_exception_msg);
874: END IF;
875: x_return_status := FND_API.g_ret_sts_unexp_error;
876: -- Push the po_return_msg onto msg list and message stack
877: FND_MESSAGE.set_name('PO', 'PO_QP_PRICE_API_ERROR');
878: FND_MESSAGE.SET_TOKEN('ERROR_TEXT',l_exception_msg);
879:
880: WHEN OTHERS THEN
881: IF g_debug_unexp THEN
874: END IF;
875: x_return_status := FND_API.g_ret_sts_unexp_error;
876: -- Push the po_return_msg onto msg list and message stack
877: FND_MESSAGE.set_name('PO', 'PO_QP_PRICE_API_ERROR');
878: FND_MESSAGE.SET_TOKEN('ERROR_TEXT',l_exception_msg);
879:
880: WHEN OTHERS THEN
881: IF g_debug_unexp THEN
882: PO_DEBUG.debug_exc(l_log_head,l_progress);
882: PO_DEBUG.debug_exc(l_log_head,l_progress);
883: END IF;
884: --unexpected error from this procedure: get SQLERRM
885: po_message_s.sql_error(g_pkg_name, l_api_name, l_progress, SQLCODE, SQLERRM);
886: l_exception_msg := FND_MESSAGE.get;
887: IF g_debug_unexp THEN
888: PO_DEBUG.debug_var(l_log_head,l_progress,'l_exception_msg',
889: l_exception_msg);
890: END IF;
889: l_exception_msg);
890: END IF;
891: x_return_status := FND_API.g_ret_sts_unexp_error;
892: -- Push the po_return_msg onto msg list and message stack
893: FND_MESSAGE.set_name('PO', 'PO_QP_PRICE_API_ERROR');
894: FND_MESSAGE.SET_TOKEN('ERROR_TEXT',l_exception_msg);
895: END get_advanced_price;
896:
897:
890: END IF;
891: x_return_status := FND_API.g_ret_sts_unexp_error;
892: -- Push the po_return_msg onto msg list and message stack
893: FND_MESSAGE.set_name('PO', 'PO_QP_PRICE_API_ERROR');
894: FND_MESSAGE.SET_TOKEN('ERROR_TEXT',l_exception_msg);
895: END get_advanced_price;
896:
897:
898: --------------------------------------------------------------------------------
1422: PO_LOG.stmt(l_log_head,d_pos,'l_return_status_text',l_return_status_text);
1423: END IF;
1424:
1425: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1426: FND_MESSAGE.SET_NAME('PO','PO_QP_PRICE_API_ERROR');
1427: FND_MESSAGE.SET_TOKEN('ERROR_TEXT',l_return_status_text);
1428: FND_MSG_PUB.Add;
1429: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1430: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
1423: END IF;
1424:
1425: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1426: FND_MESSAGE.SET_NAME('PO','PO_QP_PRICE_API_ERROR');
1427: FND_MESSAGE.SET_TOKEN('ERROR_TEXT',l_return_status_text);
1428: FND_MSG_PUB.Add;
1429: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1430: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
1431: FND_MESSAGE.SET_NAME('PO','PO_QP_PRICE_API_ERROR');
1427: FND_MESSAGE.SET_TOKEN('ERROR_TEXT',l_return_status_text);
1428: FND_MSG_PUB.Add;
1429: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1430: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
1431: FND_MESSAGE.SET_NAME('PO','PO_QP_PRICE_API_ERROR');
1432: FND_MESSAGE.SET_TOKEN('ERROR_TEXT',l_return_status_text);
1433: FND_MSG_PUB.Add;
1434: RAISE FND_API.G_EXC_ERROR;
1435: END IF;
1428: FND_MSG_PUB.Add;
1429: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1430: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
1431: FND_MESSAGE.SET_NAME('PO','PO_QP_PRICE_API_ERROR');
1432: FND_MESSAGE.SET_TOKEN('ERROR_TEXT',l_return_status_text);
1433: FND_MSG_PUB.Add;
1434: RAISE FND_API.G_EXC_ERROR;
1435: END IF;
1436:
1473: PO_LOG.stmt(l_log_head,d_pos,'l_return_status_text',l_return_status_text);
1474: END IF;
1475:
1476: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1477: FND_MESSAGE.SET_NAME('PO','PO_QP_PRICE_API_ERROR');
1478: FND_MESSAGE.SET_TOKEN('ERROR_TEXT',l_return_status_text);
1479: FND_MSG_PUB.Add;
1480: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1481: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
1474: END IF;
1475:
1476: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1477: FND_MESSAGE.SET_NAME('PO','PO_QP_PRICE_API_ERROR');
1478: FND_MESSAGE.SET_TOKEN('ERROR_TEXT',l_return_status_text);
1479: FND_MSG_PUB.Add;
1480: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1481: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
1482: FND_MESSAGE.SET_NAME('PO','PO_QP_PRICE_API_ERROR');
1478: FND_MESSAGE.SET_TOKEN('ERROR_TEXT',l_return_status_text);
1479: FND_MSG_PUB.Add;
1480: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1481: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
1482: FND_MESSAGE.SET_NAME('PO','PO_QP_PRICE_API_ERROR');
1483: FND_MESSAGE.SET_TOKEN('ERROR_TEXT',l_return_status_text);
1484: FND_MSG_PUB.Add;
1485: RAISE FND_API.G_EXC_ERROR;
1486: END IF;
1479: FND_MSG_PUB.Add;
1480: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1481: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
1482: FND_MESSAGE.SET_NAME('PO','PO_QP_PRICE_API_ERROR');
1483: FND_MESSAGE.SET_TOKEN('ERROR_TEXT',l_return_status_text);
1484: FND_MSG_PUB.Add;
1485: RAISE FND_API.G_EXC_ERROR;
1486: END IF;
1487:
1501: l_progress := '230';
1502: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1503: PO_DEBUG.debug_var(l_log_head,l_progress,'l_return_status',l_return_status);
1504: PO_DEBUG.debug_unexp(l_log_head,l_progress,'audit_qp_price_adjustment errors out');
1505: FND_MESSAGE.SET_NAME('PO','PO_QP_PRICE_API_ERROR');
1506: FND_MESSAGE.SET_TOKEN('ERROR_TEXT',l_msg_data);
1507: FND_MSG_PUB.Add;
1508: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1509: END IF;
1502: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1503: PO_DEBUG.debug_var(l_log_head,l_progress,'l_return_status',l_return_status);
1504: PO_DEBUG.debug_unexp(l_log_head,l_progress,'audit_qp_price_adjustment errors out');
1505: FND_MESSAGE.SET_NAME('PO','PO_QP_PRICE_API_ERROR');
1506: FND_MESSAGE.SET_TOKEN('ERROR_TEXT',l_msg_data);
1507: FND_MSG_PUB.Add;
1508: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1509: END IF;
1510: */
1614: PO_LOG.exc(l_log_head,d_pos,l_exception_msg);
1615: END IF;
1616: x_return_status := FND_API.g_ret_sts_error;
1617: -- Push the po_return_msg onto msg list and message stack
1618: FND_MESSAGE.set_name('PO', 'PO_QP_PRICE_API_ERROR');
1619: FND_MESSAGE.SET_TOKEN('ERROR_TEXT',l_exception_msg);
1620:
1621: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1622: --raised unexpected error: assume raiser already pushed onto the stack
1615: END IF;
1616: x_return_status := FND_API.g_ret_sts_error;
1617: -- Push the po_return_msg onto msg list and message stack
1618: FND_MESSAGE.set_name('PO', 'PO_QP_PRICE_API_ERROR');
1619: FND_MESSAGE.SET_TOKEN('ERROR_TEXT',l_exception_msg);
1620:
1621: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1622: --raised unexpected error: assume raiser already pushed onto the stack
1623: l_exception_msg := FND_MSG_PUB.get(
1628: PO_LOG.exc(l_log_head,d_pos,l_exception_msg);
1629: END IF;
1630: x_return_status := FND_API.g_ret_sts_unexp_error;
1631: -- Push the po_return_msg onto msg list and message stack
1632: FND_MESSAGE.set_name('PO', 'PO_QP_PRICE_API_ERROR');
1633: FND_MESSAGE.SET_TOKEN('ERROR_TEXT',l_exception_msg);
1634:
1635: WHEN OTHERS THEN
1636: IF g_debug_unexp THEN
1629: END IF;
1630: x_return_status := FND_API.g_ret_sts_unexp_error;
1631: -- Push the po_return_msg onto msg list and message stack
1632: FND_MESSAGE.set_name('PO', 'PO_QP_PRICE_API_ERROR');
1633: FND_MESSAGE.SET_TOKEN('ERROR_TEXT',l_exception_msg);
1634:
1635: WHEN OTHERS THEN
1636: IF g_debug_unexp THEN
1637: PO_LOG.exc(l_log_head,d_pos);
1637: PO_LOG.exc(l_log_head,d_pos);
1638: END IF;
1639: --unexpected error from this procedure: get SQLERRM
1640: po_message_s.sql_error(g_pkg_name, l_api_name, d_pos, SQLCODE, SQLERRM);
1641: l_exception_msg := FND_MESSAGE.get;
1642: IF g_debug_unexp THEN
1643: PO_LOG.exc(l_log_head,d_pos,l_exception_msg);
1644: END IF;
1645: x_return_status := FND_API.g_ret_sts_unexp_error;
1643: PO_LOG.exc(l_log_head,d_pos,l_exception_msg);
1644: END IF;
1645: x_return_status := FND_API.g_ret_sts_unexp_error;
1646: -- Push the po_return_msg onto msg list and message stack
1647: FND_MESSAGE.set_name('PO', 'PO_QP_PRICE_API_ERROR');
1648: FND_MESSAGE.SET_TOKEN('ERROR_TEXT',l_exception_msg);
1649: END get_advanced_price;
1650: --
1651:
1644: END IF;
1645: x_return_status := FND_API.g_ret_sts_unexp_error;
1646: -- Push the po_return_msg onto msg list and message stack
1647: FND_MESSAGE.set_name('PO', 'PO_QP_PRICE_API_ERROR');
1648: FND_MESSAGE.SET_TOKEN('ERROR_TEXT',l_exception_msg);
1649: END get_advanced_price;
1650: --
1651:
1652: END PO_ADVANCED_PRICE_PVT;