998: EXCEPTION
999:
1000: WHEN OTHERS THEN
1001:
1002: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1003: THEN
1004: OE_MSG_PUB.Add_Exc_Msg
1005: ( G_PKG_NAME
1006: , 'Update_Row'
1000: WHEN OTHERS THEN
1001:
1002: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1003: THEN
1004: OE_MSG_PUB.Add_Exc_Msg
1005: ( G_PKG_NAME
1006: , 'Update_Row'
1007: );
1008: END IF;
1306: EXCEPTION
1307:
1308: WHEN OTHERS THEN
1309:
1310: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1311: THEN
1312: OE_MSG_PUB.Add_Exc_Msg
1313: ( G_PKG_NAME
1314: , 'Insert_Row'
1308: WHEN OTHERS THEN
1309:
1310: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1311: THEN
1312: OE_MSG_PUB.Add_Exc_Msg
1313: ( G_PKG_NAME
1314: , 'Insert_Row'
1315: );
1316: END IF;
1353: EXCEPTION
1354:
1355: WHEN OTHERS THEN
1356:
1357: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1358: THEN
1359: OE_MSG_PUB.Add_Exc_Msg
1360: ( G_PKG_NAME
1361: , 'Delete_Row'
1355: WHEN OTHERS THEN
1356:
1357: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1358: THEN
1359: OE_MSG_PUB.Add_Exc_Msg
1360: ( G_PKG_NAME
1361: , 'Delete_Row'
1362: );
1363: END IF;
1460: EXCEPTION
1461:
1462: WHEN OTHERS THEN
1463:
1464: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1465: THEN
1466: OE_MSG_PUB.Add_Exc_Msg
1467: ( G_PKG_NAME
1468: , 'Query_Row'
1462: WHEN OTHERS THEN
1463:
1464: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1465: THEN
1466: OE_MSG_PUB.Add_Exc_Msg
1467: ( G_PKG_NAME
1468: , 'Query_Row'
1469: );
1470: END IF;
1524:
1525: x_return_status := FND_API.G_RET_STS_ERROR;
1526: x_PRICE_LIST_rec.return_status := FND_API.G_RET_STS_ERROR;
1527:
1528: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_ERROR)
1529: THEN
1530:
1531: FND_MESSAGE.SET_NAME('OE','OE_LOCK_ROW_DELETED');
1532: OE_MSG_PUB.Add;
1528: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_ERROR)
1529: THEN
1530:
1531: FND_MESSAGE.SET_NAME('OE','OE_LOCK_ROW_DELETED');
1532: OE_MSG_PUB.Add;
1533:
1534: END IF;
1535: WHEN APP_EXCEPTIONS.RECORD_LOCK_EXCEPTION THEN
1536:
1536:
1537: x_return_status := FND_API.G_RET_STS_ERROR;
1538: x_PRICE_LIST_rec.return_status := FND_API.G_RET_STS_ERROR;
1539:
1540: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_ERROR)
1541: THEN
1542:
1543: FND_MESSAGE.SET_NAME('OE','OE_LOCK_ROW_ALREADY_LOCKED');
1544: OE_MSG_PUB.Add;
1540: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_ERROR)
1541: THEN
1542:
1543: FND_MESSAGE.SET_NAME('OE','OE_LOCK_ROW_ALREADY_LOCKED');
1544: OE_MSG_PUB.Add;
1545:
1546: END IF;
1547: WHEN OTHERS THEN
1548:
1548:
1549: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1550: x_PRICE_LIST_rec.return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1551:
1552: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1553: THEN
1554: OE_MSG_PUB.Add_Exc_Msg
1555: ( G_PKG_NAME
1556: , 'Lock_Row'
1550: x_PRICE_LIST_rec.return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1551:
1552: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1553: THEN
1554: OE_MSG_PUB.Add_Exc_Msg
1555: ( G_PKG_NAME
1556: , 'Lock_Row'
1557: );
1558: END IF;
1664: IF p_PRICE_LIST_rec.currency_code <> FND_API.G_MISS_CHAR THEN
1665:
1666: l_PRICE_LIST_rec.currency_code := p_PRICE_LIST_rec.currency_code;
1667:
1668: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_SUCCESS)
1669: THEN
1670:
1671: FND_MESSAGE.SET_NAME('OE','FND_BOTH_VAL_AND_ID_EXIST');
1672: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','currency');
1669: THEN
1670:
1671: FND_MESSAGE.SET_NAME('OE','FND_BOTH_VAL_AND_ID_EXIST');
1672: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','currency');
1673: OE_MSG_PUB.Add;
1674:
1675: END IF;
1676:
1677: ELSE
1694: IF p_PRICE_LIST_rec.freight_terms_code <> FND_API.G_MISS_CHAR THEN
1695:
1696: l_PRICE_LIST_rec.freight_terms_code := p_PRICE_LIST_rec.freight_terms_code;
1697:
1698: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_SUCCESS)
1699: THEN
1700:
1701: FND_MESSAGE.SET_NAME('OE','FND_BOTH_VAL_AND_ID_EXIST');
1702: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','freight_terms');
1699: THEN
1700:
1701: FND_MESSAGE.SET_NAME('OE','FND_BOTH_VAL_AND_ID_EXIST');
1702: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','freight_terms');
1703: OE_MSG_PUB.Add;
1704:
1705: END IF;
1706:
1707: ELSE
1724: IF p_PRICE_LIST_rec.price_list_id <> FND_API.G_MISS_NUM THEN
1725:
1726: l_PRICE_LIST_rec.price_list_id := p_PRICE_LIST_rec.price_list_id;
1727:
1728: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_SUCCESS)
1729: THEN
1730:
1731: FND_MESSAGE.SET_NAME('OE','FND_BOTH_VAL_AND_ID_EXIST');
1732: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','price_list');
1729: THEN
1730:
1731: FND_MESSAGE.SET_NAME('OE','FND_BOTH_VAL_AND_ID_EXIST');
1732: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','price_list');
1733: OE_MSG_PUB.Add;
1734:
1735: END IF;
1736:
1737: ELSE
1754: IF p_PRICE_LIST_rec.secondary_price_list_id <> FND_API.G_MISS_NUM THEN
1755:
1756: l_PRICE_LIST_rec.secondary_price_list_id := p_PRICE_LIST_rec.secondary_price_list_id;
1757:
1758: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_SUCCESS)
1759: THEN
1760:
1761: FND_MESSAGE.SET_NAME('OE','FND_BOTH_VAL_AND_ID_EXIST');
1762: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','secondary_price_list');
1759: THEN
1760:
1761: FND_MESSAGE.SET_NAME('OE','FND_BOTH_VAL_AND_ID_EXIST');
1762: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','secondary_price_list');
1763: OE_MSG_PUB.Add;
1764:
1765: END IF;
1766:
1767: ELSE
1784: IF p_PRICE_LIST_rec.ship_method_code <> FND_API.G_MISS_CHAR THEN
1785:
1786: l_PRICE_LIST_rec.ship_method_code := p_PRICE_LIST_rec.ship_method_code;
1787:
1788: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_SUCCESS)
1789: THEN
1790:
1791: FND_MESSAGE.SET_NAME('OE','FND_BOTH_VAL_AND_ID_EXIST');
1792: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','ship_method');
1789: THEN
1790:
1791: FND_MESSAGE.SET_NAME('OE','FND_BOTH_VAL_AND_ID_EXIST');
1792: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','ship_method');
1793: OE_MSG_PUB.Add;
1794:
1795: END IF;
1796:
1797: ELSE
1814: IF p_PRICE_LIST_rec.terms_id <> FND_API.G_MISS_NUM THEN
1815:
1816: l_PRICE_LIST_rec.terms_id := p_PRICE_LIST_rec.terms_id;
1817:
1818: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_SUCCESS)
1819: THEN
1820:
1821: FND_MESSAGE.SET_NAME('OE','FND_BOTH_VAL_AND_ID_EXIST');
1822: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','terms');
1819: THEN
1820:
1821: FND_MESSAGE.SET_NAME('OE','FND_BOTH_VAL_AND_ID_EXIST');
1822: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','terms');
1823: OE_MSG_PUB.Add;
1824:
1825: END IF;
1826:
1827: ELSE