1256: EXCEPTION
1257:
1258: WHEN OTHERS THEN
1259:
1260: IF oe_msg_pub.Check_Msg_Level(oe_msg_pub.G_MSG_LVL_UNEXP_ERROR)
1261: THEN
1262: oe_msg_pub.Add_Exc_Msg
1263: ( G_PKG_NAME
1264: , 'Update_Row'
1258: WHEN OTHERS THEN
1259:
1260: IF oe_msg_pub.Check_Msg_Level(oe_msg_pub.G_MSG_LVL_UNEXP_ERROR)
1261: THEN
1262: oe_msg_pub.Add_Exc_Msg
1263: ( G_PKG_NAME
1264: , 'Update_Row'
1265: );
1266: END IF;
1462: EXCEPTION
1463:
1464: WHEN OTHERS THEN
1465:
1466: IF oe_msg_pub.Check_Msg_Level(oe_msg_pub.G_MSG_LVL_UNEXP_ERROR)
1467: THEN
1468: oe_msg_pub.Add_Exc_Msg
1469: ( G_PKG_NAME
1470: , 'Insert_Row'
1464: WHEN OTHERS THEN
1465:
1466: IF oe_msg_pub.Check_Msg_Level(oe_msg_pub.G_MSG_LVL_UNEXP_ERROR)
1467: THEN
1468: oe_msg_pub.Add_Exc_Msg
1469: ( G_PKG_NAME
1470: , 'Insert_Row'
1471: );
1472: END IF;
1493: EXCEPTION
1494:
1495: WHEN OTHERS THEN
1496:
1497: IF oe_msg_pub.Check_Msg_Level(oe_msg_pub.G_MSG_LVL_UNEXP_ERROR)
1498: THEN
1499: oe_msg_pub.Add_Exc_Msg
1500: ( G_PKG_NAME
1501: , 'Delete_Row'
1495: WHEN OTHERS THEN
1496:
1497: IF oe_msg_pub.Check_Msg_Level(oe_msg_pub.G_MSG_LVL_UNEXP_ERROR)
1498: THEN
1499: oe_msg_pub.Add_Exc_Msg
1500: ( G_PKG_NAME
1501: , 'Delete_Row'
1502: );
1503: END IF;
1597: (p_list_line_id IS NOT NULL
1598: AND
1599: p_list_line_id <> FND_API.G_MISS_NUM)
1600: THEN
1601: IF oe_msg_pub.Check_Msg_Level(oe_msg_pub.G_MSG_LVL_UNEXP_ERROR)
1602: THEN
1603: oe_msg_pub.Add_Exc_Msg
1604: ( G_PKG_NAME
1605: , 'Query Rows'
1599: p_list_line_id <> FND_API.G_MISS_NUM)
1600: THEN
1601: IF oe_msg_pub.Check_Msg_Level(oe_msg_pub.G_MSG_LVL_UNEXP_ERROR)
1602: THEN
1603: oe_msg_pub.Add_Exc_Msg
1604: ( G_PKG_NAME
1605: , 'Query Rows'
1606: , 'Keys are mutually exclusive: pricing_attribute_id = '|| p_pricing_attribute_id || ', list_line_id = '|| p_list_line_id
1607: );
1693: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1694:
1695: WHEN OTHERS THEN
1696:
1697: IF oe_msg_pub.Check_Msg_Level(oe_msg_pub.G_MSG_LVL_UNEXP_ERROR)
1698: THEN
1699: oe_msg_pub.Add_Exc_Msg
1700: ( G_PKG_NAME
1701: , 'Query_Rows'
1695: WHEN OTHERS THEN
1696:
1697: IF oe_msg_pub.Check_Msg_Level(oe_msg_pub.G_MSG_LVL_UNEXP_ERROR)
1698: THEN
1699: oe_msg_pub.Add_Exc_Msg
1700: ( G_PKG_NAME
1701: , 'Query_Rows'
1702: );
1703: END IF;
1913:
1914: x_return_status := FND_API.G_RET_STS_ERROR;
1915: x_PRICING_ATTR_rec.return_status := FND_API.G_RET_STS_ERROR;
1916:
1917: IF oe_msg_pub.Check_Msg_Level(oe_msg_pub.G_MSG_LVL_ERROR)
1918: THEN
1919:
1920: FND_MESSAGE.SET_NAME('QP','OE_LOCK_ROW_CHANGED');
1921: oe_msg_pub.Add;
1917: IF oe_msg_pub.Check_Msg_Level(oe_msg_pub.G_MSG_LVL_ERROR)
1918: THEN
1919:
1920: FND_MESSAGE.SET_NAME('QP','OE_LOCK_ROW_CHANGED');
1921: oe_msg_pub.Add;
1922:
1923: END IF;
1924:
1925: END IF;
1930:
1931: x_return_status := FND_API.G_RET_STS_ERROR;
1932: x_PRICING_ATTR_rec.return_status := FND_API.G_RET_STS_ERROR;
1933:
1934: IF oe_msg_pub.Check_Msg_Level(oe_msg_pub.G_MSG_LVL_ERROR)
1935: THEN
1936:
1937: FND_MESSAGE.SET_NAME('QP','OE_LOCK_ROW_DELETED');
1938: oe_msg_pub.Add;
1934: IF oe_msg_pub.Check_Msg_Level(oe_msg_pub.G_MSG_LVL_ERROR)
1935: THEN
1936:
1937: FND_MESSAGE.SET_NAME('QP','OE_LOCK_ROW_DELETED');
1938: oe_msg_pub.Add;
1939:
1940: END IF;
1941: WHEN APP_EXCEPTIONS.RECORD_LOCK_EXCEPTION THEN
1942:
1942:
1943: x_return_status := FND_API.G_RET_STS_ERROR;
1944: x_PRICING_ATTR_rec.return_status := FND_API.G_RET_STS_ERROR;
1945:
1946: IF oe_msg_pub.Check_Msg_Level(oe_msg_pub.G_MSG_LVL_ERROR)
1947: THEN
1948:
1949: FND_MESSAGE.SET_NAME('QP','OE_LOCK_ROW_ALREADY_LOCKED');
1950: oe_msg_pub.Add;
1946: IF oe_msg_pub.Check_Msg_Level(oe_msg_pub.G_MSG_LVL_ERROR)
1947: THEN
1948:
1949: FND_MESSAGE.SET_NAME('QP','OE_LOCK_ROW_ALREADY_LOCKED');
1950: oe_msg_pub.Add;
1951:
1952: END IF;
1953: WHEN OTHERS THEN
1954:
1954:
1955: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1956: x_PRICING_ATTR_rec.return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1957:
1958: IF oe_msg_pub.Check_Msg_Level(oe_msg_pub.G_MSG_LVL_UNEXP_ERROR)
1959: THEN
1960: oe_msg_pub.Add_Exc_Msg
1961: ( G_PKG_NAME
1962: , 'Lock_Row'
1956: x_PRICING_ATTR_rec.return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1957:
1958: IF oe_msg_pub.Check_Msg_Level(oe_msg_pub.G_MSG_LVL_UNEXP_ERROR)
1959: THEN
1960: oe_msg_pub.Add_Exc_Msg
1961: ( G_PKG_NAME
1962: , 'Lock_Row'
1963: );
1964: END IF;
2054: IF p_PRICING_ATTR_rec.accumulate_flag <> FND_API.G_MISS_CHAR THEN
2055:
2056: l_PRICING_ATTR_rec.accumulate_flag := p_PRICING_ATTR_rec.accumulate_flag;
2057:
2058: IF oe_msg_pub.Check_Msg_Level(oe_msg_pub.G_MSG_LVL_SUCCESS)
2059: THEN
2060:
2061: FND_MESSAGE.SET_NAME('QP','FND_BOTH_VAL_AND_ID_EXIST');
2062: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','accumulate');
2059: THEN
2060:
2061: FND_MESSAGE.SET_NAME('QP','FND_BOTH_VAL_AND_ID_EXIST');
2062: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','accumulate');
2063: oe_msg_pub.Add;
2064:
2065: END IF;
2066:
2067: ELSE
2084: IF p_PRICING_ATTR_rec.excluder_flag <> FND_API.G_MISS_CHAR THEN
2085:
2086: l_PRICING_ATTR_rec.excluder_flag := p_PRICING_ATTR_rec.excluder_flag;
2087:
2088: IF oe_msg_pub.Check_Msg_Level(oe_msg_pub.G_MSG_LVL_SUCCESS)
2089: THEN
2090:
2091: FND_MESSAGE.SET_NAME('QP','FND_BOTH_VAL_AND_ID_EXIST');
2092: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','excluder');
2089: THEN
2090:
2091: FND_MESSAGE.SET_NAME('QP','FND_BOTH_VAL_AND_ID_EXIST');
2092: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','excluder');
2093: oe_msg_pub.Add;
2094:
2095: END IF;
2096:
2097: ELSE
2114: IF p_PRICING_ATTR_rec.list_line_id <> FND_API.G_MISS_NUM THEN
2115:
2116: l_PRICING_ATTR_rec.list_line_id := p_PRICING_ATTR_rec.list_line_id;
2117:
2118: IF oe_msg_pub.Check_Msg_Level(oe_msg_pub.G_MSG_LVL_SUCCESS)
2119: THEN
2120:
2121: FND_MESSAGE.SET_NAME('QP','FND_BOTH_VAL_AND_ID_EXIST');
2122: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','list_line');
2119: THEN
2120:
2121: FND_MESSAGE.SET_NAME('QP','FND_BOTH_VAL_AND_ID_EXIST');
2122: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','list_line');
2123: oe_msg_pub.Add;
2124:
2125: END IF;
2126:
2127: ELSE
2149: IF p_PRICING_ATTR_rec.pricing_attribute <> FND_API.G_MISS_CHAR THEN
2150:
2151: l_PRICING_ATTR_rec.pricing_attribute := p_PRICING_ATTR_rec.pricing_attribute;
2152:
2153: IF oe_msg_pub.Check_Msg_Level(oe_msg_pub.G_MSG_LVL_SUCCESS)
2154: THEN
2155:
2156: FND_MESSAGE.SET_NAME('QP','FND_BOTH_VAL_AND_ID_EXIST');
2157: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','pricing_attribute');
2154: THEN
2155:
2156: FND_MESSAGE.SET_NAME('QP','FND_BOTH_VAL_AND_ID_EXIST');
2157: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','pricing_attribute');
2158: oe_msg_pub.Add;
2159:
2160: END IF;
2161:
2162: ELSE
2180: IF p_PRICING_ATTR_rec.pricing_attr_value_from <> FND_API.G_MISS_CHAR THEN
2181:
2182: l_PRICING_ATTR_rec.pricing_attr_value_from := p_PRICING_ATTR_rec.pricing_attr_value_from;
2183:
2184: IF oe_msg_pub.Check_Msg_Level(oe_msg_pub.G_MSG_LVL_SUCCESS)
2185: THEN
2186:
2187: FND_MESSAGE.SET_NAME('QP','FND_BOTH_VAL_AND_ID_EXIST');
2188: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','pricing_attr_value_from');
2185: THEN
2186:
2187: FND_MESSAGE.SET_NAME('QP','FND_BOTH_VAL_AND_ID_EXIST');
2188: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','pricing_attr_value_from');
2189: oe_msg_pub.Add;
2190:
2191: END IF;
2192:
2193: ELSE
2212: IF p_PRICING_ATTR_rec.pricing_attr_value_to <> FND_API.G_MISS_CHAR THEN
2213:
2214: l_PRICING_ATTR_rec.pricing_attr_value_to := p_PRICING_ATTR_rec.pricing_attr_value_to;
2215:
2216: IF oe_msg_pub.Check_Msg_Level(oe_msg_pub.G_MSG_LVL_SUCCESS)
2217: THEN
2218:
2219: FND_MESSAGE.SET_NAME('QP','FND_BOTH_VAL_AND_ID_EXIST');
2220: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','pricing_attr_value_to');
2217: THEN
2218:
2219: FND_MESSAGE.SET_NAME('QP','FND_BOTH_VAL_AND_ID_EXIST');
2220: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','pricing_attr_value_to');
2221: oe_msg_pub.Add;
2222:
2223: END IF;
2224:
2225: ELSE
2244: IF p_PRICING_ATTR_rec.product_uom_code <> FND_API.G_MISS_CHAR THEN
2245:
2246: l_PRICING_ATTR_rec.product_uom_code := p_PRICING_ATTR_rec.product_uom_code;
2247:
2248: IF oe_msg_pub.Check_Msg_Level(oe_msg_pub.G_MSG_LVL_SUCCESS)
2249: THEN
2250:
2251: FND_MESSAGE.SET_NAME('QP','FND_BOTH_VAL_AND_ID_EXIST');
2252: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','product_uom');
2249: THEN
2250:
2251: FND_MESSAGE.SET_NAME('QP','FND_BOTH_VAL_AND_ID_EXIST');
2252: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','product_uom');
2253: oe_msg_pub.Add;
2254:
2255: END IF;
2256:
2257: ELSE
2370: RAISE;
2371: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2372: RAISE;
2373: WHEN OTHERS THEN
2374: IF oe_msg_pub.Check_Msg_Level(oe_msg_pub.G_MSG_LVL_UNEXP_ERROR)
2375: THEN
2376: oe_msg_pub.Add_Exc_Msg
2377: ( G_PKG_NAME
2378: , 'Pre_Write_Process'
2372: RAISE;
2373: WHEN OTHERS THEN
2374: IF oe_msg_pub.Check_Msg_Level(oe_msg_pub.G_MSG_LVL_UNEXP_ERROR)
2375: THEN
2376: oe_msg_pub.Add_Exc_Msg
2377: ( G_PKG_NAME
2378: , 'Pre_Write_Process'
2379: );
2380: END IF;