1122: EXCEPTION
1123:
1124: WHEN OTHERS THEN
1125:
1126: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1127: THEN
1128: OE_MSG_PUB.Add_Exc_Msg
1129: ( G_PKG_NAME
1130: , 'Update_Row'
1124: WHEN OTHERS THEN
1125:
1126: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1127: THEN
1128: OE_MSG_PUB.Add_Exc_Msg
1129: ( G_PKG_NAME
1130: , 'Update_Row'
1131: );
1132: END IF;
1273: EXCEPTION
1274:
1275: WHEN OTHERS THEN
1276:
1277: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1278: THEN
1279: OE_MSG_PUB.Add_Exc_Msg
1280: ( G_PKG_NAME
1281: , 'Insert_Row'
1275: WHEN OTHERS THEN
1276:
1277: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1278: THEN
1279: OE_MSG_PUB.Add_Exc_Msg
1280: ( G_PKG_NAME
1281: , 'Insert_Row'
1282: );
1283: END IF;
1303: EXCEPTION
1304:
1305: WHEN OTHERS THEN
1306:
1307: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1308: THEN
1309: OE_MSG_PUB.Add_Exc_Msg
1310: ( G_PKG_NAME
1311: , 'Delete_Row'
1305: WHEN OTHERS THEN
1306:
1307: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1308: THEN
1309: OE_MSG_PUB.Add_Exc_Msg
1310: ( G_PKG_NAME
1311: , 'Delete_Row'
1312: );
1313: END IF;
1404: (p_limit_id IS NOT NULL
1405: AND
1406: p_limit_id <> FND_API.G_MISS_NUM)
1407: THEN
1408: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1409: THEN
1410: OE_MSG_PUB.Add_Exc_Msg
1411: ( G_PKG_NAME
1412: , 'Query Rows'
1406: p_limit_id <> FND_API.G_MISS_NUM)
1407: THEN
1408: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1409: THEN
1410: OE_MSG_PUB.Add_Exc_Msg
1411: ( G_PKG_NAME
1412: , 'Query Rows'
1413: , 'Keys are mutually exclusive: limit_balance_id = '|| p_limit_balance_id || ', limit_id = '|| p_limit_id
1414: );
1496: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1497:
1498: WHEN OTHERS THEN
1499:
1500: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1501: THEN
1502: OE_MSG_PUB.Add_Exc_Msg
1503: ( G_PKG_NAME
1504: , 'Query_Rows'
1498: WHEN OTHERS THEN
1499:
1500: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1501: THEN
1502: OE_MSG_PUB.Add_Exc_Msg
1503: ( G_PKG_NAME
1504: , 'Query_Rows'
1505: );
1506: END IF;
1716:
1717: x_return_status := FND_API.G_RET_STS_ERROR;
1718: x_LIMIT_BALANCES_rec.return_status := FND_API.G_RET_STS_ERROR;
1719:
1720: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_ERROR)
1721: THEN
1722:
1723: FND_MESSAGE.SET_NAME('QP','OE_LOCK_ROW_CHANGED');
1724: OE_MSG_PUB.Add;
1720: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_ERROR)
1721: THEN
1722:
1723: FND_MESSAGE.SET_NAME('QP','OE_LOCK_ROW_CHANGED');
1724: OE_MSG_PUB.Add;
1725:
1726: END IF;
1727:
1728: END IF;
1733:
1734: x_return_status := FND_API.G_RET_STS_ERROR;
1735: x_LIMIT_BALANCES_rec.return_status := FND_API.G_RET_STS_ERROR;
1736:
1737: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_ERROR)
1738: THEN
1739:
1740: FND_MESSAGE.SET_NAME('QP','OE_LOCK_ROW_DELETED');
1741: OE_MSG_PUB.Add;
1737: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_ERROR)
1738: THEN
1739:
1740: FND_MESSAGE.SET_NAME('QP','OE_LOCK_ROW_DELETED');
1741: OE_MSG_PUB.Add;
1742:
1743: END IF;
1744: WHEN APP_EXCEPTIONS.RECORD_LOCK_EXCEPTION THEN
1745:
1745:
1746: x_return_status := FND_API.G_RET_STS_ERROR;
1747: x_LIMIT_BALANCES_rec.return_status := FND_API.G_RET_STS_ERROR;
1748:
1749: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_ERROR)
1750: THEN
1751:
1752: FND_MESSAGE.SET_NAME('QP','OE_LOCK_ROW_ALREADY_LOCKED');
1753: OE_MSG_PUB.Add;
1749: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_ERROR)
1750: THEN
1751:
1752: FND_MESSAGE.SET_NAME('QP','OE_LOCK_ROW_ALREADY_LOCKED');
1753: OE_MSG_PUB.Add;
1754:
1755: END IF;
1756: WHEN OTHERS THEN
1757:
1757:
1758: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1759: x_LIMIT_BALANCES_rec.return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1760:
1761: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1762: THEN
1763: OE_MSG_PUB.Add_Exc_Msg
1764: ( G_PKG_NAME
1765: , 'Lock_Row'
1759: x_LIMIT_BALANCES_rec.return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1760:
1761: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1762: THEN
1763: OE_MSG_PUB.Add_Exc_Msg
1764: ( G_PKG_NAME
1765: , 'Lock_Row'
1766: );
1767: END IF;
1827: IF p_LIMIT_BALANCES_rec.limit_balance_id <> FND_API.G_MISS_NUM THEN
1828:
1829: l_LIMIT_BALANCES_rec.limit_balance_id := p_LIMIT_BALANCES_rec.limit_balance_id;
1830:
1831: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_SUCCESS)
1832: THEN
1833:
1834: FND_MESSAGE.SET_NAME('QP','FND_BOTH_VAL_AND_ID_EXIST');
1835: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','limit_balance');
1832: THEN
1833:
1834: FND_MESSAGE.SET_NAME('QP','FND_BOTH_VAL_AND_ID_EXIST');
1835: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','limit_balance');
1836: OE_MSG_PUB.Add;
1837:
1838: END IF;
1839:
1840: ELSE
1857: IF p_LIMIT_BALANCES_rec.limit_id <> FND_API.G_MISS_NUM THEN
1858:
1859: l_LIMIT_BALANCES_rec.limit_id := p_LIMIT_BALANCES_rec.limit_id;
1860:
1861: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_SUCCESS)
1862: THEN
1863:
1864: FND_MESSAGE.SET_NAME('QP','FND_BOTH_VAL_AND_ID_EXIST');
1865: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','limit');
1862: THEN
1863:
1864: FND_MESSAGE.SET_NAME('QP','FND_BOTH_VAL_AND_ID_EXIST');
1865: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','limit');
1866: OE_MSG_PUB.Add;
1867:
1868: END IF;
1869:
1870: ELSE