[Home] [Help]
44: RETURN l_list_type;
45:
46: Exception
47: WHEN OTHERS THEN
48: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
49: THEN
50: OE_MSG_PUB.Add_Exc_Msg
51: ( G_PKG_NAME
52: , 'Get_List_Type'
46: Exception
47: WHEN OTHERS THEN
48: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
49: THEN
50: OE_MSG_PUB.Add_Exc_Msg
51: ( G_PKG_NAME
52: , 'Get_List_Type'
53: );
54: END IF;
72: RETURN l_flag;
73:
74: Exception
75: WHEN OTHERS THEN
76: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
77: THEN
78: OE_MSG_PUB.Add_Exc_Msg
79: ( G_PKG_NAME
80: , 'Get_Enforce_Price_List'
74: Exception
75: WHEN OTHERS THEN
76: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
77: THEN
78: OE_MSG_PUB.Add_Exc_Msg
79: ( G_PKG_NAME
80: , 'Get_Enforce_Price_List'
81: );
82: END IF;
348: oe_order_pvt.set_recursion_mode(p_Entity_Code => 3,
349: p_In_out => 1);
350:
351: IF FND_API.to_Boolean(p_init_msg_list) THEN
352: OE_MSG_PUB.initialize;
353: END IF;
354:
355: IF l_control_rec.Process_Partial THEN
356: SAVEPOINT Header_Adjs;
407: l_source_document_id := null;
408: END;
409: END IF;
410:
411: OE_MSG_PUB.set_msg_context(
412: p_entity_code => 'HEADER_ADJ'
413: ,p_entity_id => l_header_adj_rec.price_adjustment_id
414: ,p_header_id => l_header_adj_rec.header_Id
415: ,p_line_id => null
451: l_source_document_id := null;
452: END;
453: END IF;
454:
455: OE_MSG_PUB.set_msg_context(
456: p_entity_code => 'HEADER_ADJ'
457: ,p_entity_id => l_old_header_adj_rec.price_adjustment_id
458: ,p_header_id => l_old_header_adj_rec.header_Id
459: ,p_line_id => null
528: ( p_x_Header_Adj_rec => l_Header_Adj_rec
529: , p_old_Header_Adj_rec => l_old_Header_Adj_rec
530: );
531:
532: OE_MSG_PUB.update_msg_context(
533: p_entity_code => 'HEADER_ADJ'
534: ,p_entity_id => l_header_adj_rec.price_adjustment_id
535: ,p_header_id => l_header_adj_rec.header_Id);
536:
771: RAISE FND_API.G_EXC_ERROR;
772: END IF;
773:
774: OE_Header_Adj_Security.g_check_all_cols_constraint := 'Y';
775: OE_MSG_PUB.reset_msg_context('HEADER_ADJ');
776: -- loop exception handler.
777:
778:
779:
815: l_Header_Adj_rec.return_status := FND_API.G_RET_STS_ERROR;
816: p_x_header_adj_tbl(I) := l_Header_Adj_rec;
817: p_x_old_Header_Adj_tbl(I) := l_old_Header_Adj_rec;
818: OE_Header_Adj_Security.g_check_all_cols_constraint := 'Y';
819: OE_MSG_PUB.reset_msg_context('HEADER_ADJ');
820: oe_delayed_requests_pvt.delete_request(p_entity_code =>OE_GLOBALS.G_ENTITY_HEADER_ADJ,
821: p_entity_id => l_header_adj_rec.Price_adjustment_id,
822: p_request_type => NULL,
823: x_return_status => l_return_status);
833: l_Header_Adj_rec.return_status := FND_API.G_RET_STS_UNEXP_ERROR;
834: p_x_header_adj_tbl(I) := l_Header_Adj_rec;
835: p_x_old_Header_Adj_tbl(I) := l_old_Header_Adj_rec;
836: OE_Header_Adj_Security.g_check_all_cols_constraint := 'Y';
837: OE_MSG_PUB.reset_msg_context('HEADER_ADJ');
838: oe_delayed_requests_pvt.delete_request(p_entity_code =>OE_GLOBALS.G_ENTITY_HEADER_ADJ,
839: p_entity_id => l_header_adj_rec.Price_adjustment_id,
840: p_request_type => NULL,
841: x_return_status => l_return_status);
851: p_entity_id => l_header_adj_rec.Price_adjustment_id,
852: p_request_type => NULL,
853: x_return_status => l_return_status);
854:
855: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
856: THEN
857: OE_MSG_PUB.Add_Exc_Msg
858: ( G_PKG_NAME
859: , 'Header_Adjs'
853: x_return_status => l_return_status);
854:
855: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
856: THEN
857: OE_MSG_PUB.Add_Exc_Msg
858: ( G_PKG_NAME
859: , 'Header_Adjs'
860: );
861: END IF;
859: , 'Header_Adjs'
860: );
861: END IF;
862:
863: OE_MSG_PUB.reset_msg_context('HEADER_ADJ');
864: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
865:
866: END;
867: I := p_x_header_adj_tbl.NEXT(I);
869:
870: -- Load OUT parameters
871:
872: adj_debug('Exiting oe_order_Adj_pvt.HEADER_ADJS', 1);
873: OE_MSG_PUB.reset_msg_context('HEADER_ADJ');
874:
875: oe_order_pvt.set_recursion_mode(p_Entity_Code => 3,
876: p_In_out => 0);
877:
880: WHEN FND_API.G_EXC_ERROR THEN
881: oe_order_pvt.set_recursion_mode(p_Entity_Code => 3,
882: p_In_out => 0);
883:
884: OE_MSG_PUB.reset_msg_context('HEADER_ADJ');
885: RAISE;
886:
887: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
888: oe_order_pvt.set_recursion_mode(p_Entity_Code => 3,
887: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
888: oe_order_pvt.set_recursion_mode(p_Entity_Code => 3,
889: p_In_out => 0);
890:
891: OE_MSG_PUB.reset_msg_context('HEADER_ADJ');
892: RAISE;
893:
894: WHEN OTHERS THEN
895: oe_order_pvt.set_recursion_mode(p_Entity_Code => 3,
894: WHEN OTHERS THEN
895: oe_order_pvt.set_recursion_mode(p_Entity_Code => 3,
896: p_In_out => 0);
897:
898: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
899: THEN
900: OE_MSG_PUB.Add_Exc_Msg
901: ( G_PKG_NAME
902: , 'Header_Adjs'
896: p_In_out => 0);
897:
898: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
899: THEN
900: OE_MSG_PUB.Add_Exc_Msg
901: ( G_PKG_NAME
902: , 'Header_Adjs'
903: );
904: END IF;
903: );
904: END IF;
905:
906:
907: OE_MSG_PUB.reset_msg_context('HEADER_ADJ');
908: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
909:
910: END Header_Adjs;
911:
953: oe_order_pvt.set_recursion_mode(p_Entity_Code => 6,
954: p_In_out => 1);
955:
956: IF FND_API.to_Boolean(p_init_msg_list) THEN
957: OE_MSG_PUB.initialize;
958: END IF;
959:
960: IF l_control_rec.Process_Partial THEN
961: SAVEPOINT Line_Adjs;
1019: l_orig_sys_shipment_ref := null;
1020: END;
1021: END IF;
1022:
1023: OE_MSG_PUB.set_msg_context(
1024: p_entity_code => 'LINE_ADJ'
1025: ,p_entity_id => l_line_adj_rec.price_adjustment_id
1026: ,p_header_id => l_line_adj_rec.header_id
1027: ,p_line_id => l_line_adj_rec.line_id
1071: l_orig_sys_shipment_ref := null;
1072: END;
1073: END IF;
1074:
1075: OE_MSG_PUB.set_msg_context(
1076: p_entity_code => 'LINE_ADJ'
1077: ,p_entity_id => l_old_line_adj_rec.price_adjustment_id
1078: ,p_header_id => l_old_line_adj_rec.header_id
1079: ,p_line_id => l_old_line_adj_rec.line_id
1183: ( p_x_Line_Adj_rec => l_Line_Adj_rec
1184: , p_old_Line_Adj_rec => l_old_Line_Adj_rec
1185: );
1186:
1187: OE_MSG_PUB.update_msg_context(
1188: p_entity_code => 'LINE_ADJ'
1189: ,p_entity_id => l_line_adj_rec.price_adjustment_id
1190: ,p_header_id => l_line_adj_rec.header_id
1191: ,p_line_id => l_line_adj_rec.line_id);
1486: p_x_Line_Adj_tbl(I) := l_Line_Adj_rec;
1487: p_x_old_Line_Adj_tbl(I) := l_old_Line_Adj_rec;
1488:
1489: OE_Line_Adj_Security.g_check_all_cols_constraint := 'Y';
1490: OE_MSG_PUB.reset_msg_context('LINE_ADJ');
1491: -- Check return status and rollaback
1492:
1493: IF l_line_adj_rec.return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
1494: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1542: l_Line_Adj_rec.return_status := FND_API.G_RET_STS_ERROR;
1543: p_x_Line_Adj_tbl(I) := l_Line_Adj_rec;
1544: p_x_old_Line_Adj_tbl(I) := l_old_Line_Adj_rec;
1545: OE_Line_Adj_Security.g_check_all_cols_constraint := 'Y';
1546: OE_MSG_PUB.reset_msg_context('LINE_ADJ');
1547: oe_delayed_requests_pvt.delete_request(p_entity_code =>OE_GLOBALS.G_ENTITY_LINE_ADJ,
1548: p_entity_id => l_line_adj_rec.Price_adjustment_id,
1549: p_request_type => NULL,
1550: x_return_status => l_return_status);
1559: l_Line_Adj_rec.return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1560: p_x_Line_Adj_tbl(I) := l_Line_Adj_rec;
1561: p_x_old_Line_Adj_tbl(I) := l_old_Line_Adj_rec;
1562: OE_Line_Adj_Security.g_check_all_cols_constraint := 'Y';
1563: OE_MSG_PUB.reset_msg_context('LINE_ADJ');
1564: oe_delayed_requests_pvt.delete_request(p_entity_code =>OE_GLOBALS.G_ENTITY_LINE_ADJ,
1565: p_entity_id => l_line_adj_rec.Price_adjustment_id,
1566: p_request_type => NULL,
1567: x_return_status => l_return_status);
1577: p_entity_id => l_line_adj_rec.Price_adjustment_id,
1578: p_request_type => NULL,
1579: x_return_status => l_return_status);
1580:
1581: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1582: THEN
1583: OE_MSG_PUB.Add_Exc_Msg
1584: ( G_PKG_NAME
1585: , 'Line_Adjs'
1579: x_return_status => l_return_status);
1580:
1581: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1582: THEN
1583: OE_MSG_PUB.Add_Exc_Msg
1584: ( G_PKG_NAME
1585: , 'Line_Adjs'
1586: );
1587: END IF;
1585: , 'Line_Adjs'
1586: );
1587: END IF;
1588:
1589: OE_MSG_PUB.reset_msg_context('LINE_ADJ');
1590: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1591:
1592: END;
1593: <
1595: END LOOP;
1596:
1597: -- Load OUT parameters
1598:
1599: OE_MSG_PUB.reset_msg_context('LINE_ADJ');
1600:
1601: oe_order_pvt.set_recursion_mode(p_Entity_Code => 6,
1602: p_In_out => 0);
1603:
1608: oe_order_pvt.set_recursion_mode(p_Entity_Code => 6,
1609: p_In_out => 0);
1610:
1611: adj_debug('Exiting oe_order_Adj_pvt.LINE_ADJS', 1);
1612: OE_MSG_PUB.reset_msg_context('LINE_ADJ');
1613: RAISE;
1614:
1615: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1616: oe_order_pvt.set_recursion_mode(p_Entity_Code => 6,
1616: oe_order_pvt.set_recursion_mode(p_Entity_Code => 6,
1617: p_In_out => 0);
1618:
1619:
1620: OE_MSG_PUB.reset_msg_context('LINE_ADJ');
1621: RAISE;
1622:
1623: WHEN OTHERS THEN
1624: oe_order_pvt.set_recursion_mode(p_Entity_Code => 6,
1623: WHEN OTHERS THEN
1624: oe_order_pvt.set_recursion_mode(p_Entity_Code => 6,
1625: p_In_out => 0);
1626:
1627: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1628: THEN
1629: OE_MSG_PUB.Add_Exc_Msg
1630: ( G_PKG_NAME
1631: , 'Line_Adjs'
1625: p_In_out => 0);
1626:
1627: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1628: THEN
1629: OE_MSG_PUB.Add_Exc_Msg
1630: ( G_PKG_NAME
1631: , 'Line_Adjs'
1632: );
1633: END IF;
1632: );
1633: END IF;
1634:
1635:
1636: OE_MSG_PUB.reset_msg_context('LINE_ADJ');
1637: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1638:
1639: END Line_Adjs;
1640:
1671:
1672: l_control_rec := p_control_rec; -- Added for Bug #5679839
1673:
1674: IF FND_API.to_Boolean(p_init_msg_list) THEN
1675: OE_MSG_PUB.initialize;
1676: END IF;
1677:
1678: IF l_control_rec.Process_Partial THEN
1679: SAVEPOINT Header_Price_Atts;
1728: l_source_document_id := null;
1729: END;
1730: END IF;
1731:
1732: OE_MSG_PUB.set_msg_context(
1733: p_entity_code => 'HEADER_PATTS'
1734: ,p_entity_id => l_header_Price_Att_rec.Order_price_attrib_id
1735: ,p_header_id => l_header_Price_Att_rec.header_Id
1736: ,p_line_id => null
1772: l_source_document_id := null;
1773: END;
1774: END IF;
1775:
1776: OE_MSG_PUB.set_msg_context(
1777: p_entity_code => 'HEADER_PATTS'
1778: ,p_entity_id => l_old_header_Price_Att_rec.Order_price_attrib_id
1779: ,p_header_id => l_old_header_Price_Att_rec.header_Id
1780: ,p_line_id => null
1845: ( p_x_Header_Price_Att_rec => l_Header_Price_Att_rec
1846: , p_old_Header_Price_Att_rec => l_old_Header_Price_Att_rec
1847: );
1848:
1849: OE_MSG_PUB.update_msg_context(
1850: p_entity_code => 'HEADER_ADJ'
1851: ,p_entity_id => l_header_Price_Att_rec.order_price_attrib_id
1852: ,p_header_id => l_header_Price_Att_rec.header_Id);
1853:
2085: /*
2086:
2087: OE_Header_PAttr_Security.g_check_all_cols_constraint := 'Y';
2088: */
2089: OE_MSG_PUB.reset_msg_context('HEADER_ADJ');
2090: -- loop exception handler.
2091:
2092: EXCEPTION
2093:
2097: p_x_Header_Price_Att_tbl(I) := l_Header_Price_Att_rec;
2098: p_x_old_Header_Price_Att_tbl(I) := l_old_Header_Price_Att_rec;
2099: /*
2100: OE_Header_PAttr_Security.g_check_all_cols_constraint := 'Y';
2101: OE_MSG_PUB.reset_msg_context('HEADER_ADJ');
2102: oe_delayed_requests_pvt.delete_request
2103: (p_entity_code =>OE_GLOBALS.G_ENTITY_HEADER_ADJ,
2104: p_entity_id => l_header_Price_Att_rec.order_price_attrib_id,
2105: p_request_type => NULL,
2118: p_x_Header_Price_Att_tbl(I) := l_Header_Price_Att_rec;
2119: p_x_old_Header_Price_Att_tbl(I) := l_old_Header_Price_Att_rec;
2120: /*
2121: OE_Header_PAttr_Security.g_check_all_cols_constraint := 'Y';
2122: OE_MSG_PUB.reset_msg_context('HEADER_ADJ');
2123: oe_delayed_requests_pvt.delete_request
2124: (p_entity_code =>OE_GLOBALS.G_ENTITY_HEADER_ADJ,
2125: p_entity_id => l_header_Price_Att_rec.order_price_attrib_id,
2126: p_request_type => NULL,
2133: l_Header_Price_Att_rec.return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2134: p_x_Header_Price_Att_tbl(I) := l_Header_Price_Att_rec;
2135: p_x_old_Header_Price_Att_tbl(I) := l_old_Header_Price_Att_rec;
2136:
2137: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2138: THEN
2139: OE_MSG_PUB.Add_Exc_Msg
2140: ( G_PKG_NAME
2141: , 'Header_Price_Atts'
2135: p_x_old_Header_Price_Att_tbl(I) := l_old_Header_Price_Att_rec;
2136:
2137: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2138: THEN
2139: OE_MSG_PUB.Add_Exc_Msg
2140: ( G_PKG_NAME
2141: , 'Header_Price_Atts'
2142: );
2143: END IF;
2141: , 'Header_Price_Atts'
2142: );
2143: END IF;
2144:
2145: OE_MSG_PUB.reset_msg_context('HEADER_PATTS');
2146: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2147:
2148: END;
2149: I := p_x_Header_Price_Att_tbl.NEXT(I);
2152: -- Load OUT parameters
2153:
2154:
2155: oe_debug_pub.add('Exiting oe_order_Price_Att_pvt.HEADER_Price_Atts', 1);
2156: OE_MSG_PUB.reset_msg_context('HEADER_PATTS');
2157:
2158: EXCEPTION
2159:
2160: WHEN FND_API.G_EXC_ERROR THEN
2158: EXCEPTION
2159:
2160: WHEN FND_API.G_EXC_ERROR THEN
2161:
2162: OE_MSG_PUB.reset_msg_context('HEADER_PATTS');
2163: RAISE;
2164:
2165: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2166:
2163: RAISE;
2164:
2165: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2166:
2167: OE_MSG_PUB.reset_msg_context('HEADER_PATTS');
2168: RAISE;
2169:
2170: WHEN OTHERS THEN
2171:
2168: RAISE;
2169:
2170: WHEN OTHERS THEN
2171:
2172: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2173: THEN
2174: OE_MSG_PUB.Add_Exc_Msg
2175: ( G_PKG_NAME
2176: , 'Header_Price_Atts'
2170: WHEN OTHERS THEN
2171:
2172: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2173: THEN
2174: OE_MSG_PUB.Add_Exc_Msg
2175: ( G_PKG_NAME
2176: , 'Header_Price_Atts'
2177: );
2178: END IF;
2177: );
2178: END IF;
2179:
2180:
2181: OE_MSG_PUB.reset_msg_context('HEADER_PATTS');
2182: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2183: adj_debug('Exiting oe_order_Adj_pvt.HEader_Price_Atts', 1);
2184:
2185: end HEader_Price_Atts;
2200: I pls_integer; -- Used as index for while loop
2201: BEGIN
2202:
2203: IF FND_API.to_Boolean(p_init_msg_list) THEN
2204: OE_MSG_PUB.initialize;
2205: END IF;
2206:
2207:
2208: IF l_control_rec.Process_Partial THEN
2230: END IF;
2231:
2232: if l_old_Header_Adj_Att_rec.Price_Adj_attrib_id = FND_API.G_MISS_NUM then
2233:
2234: OE_MSG_PUB.set_msg_context(
2235: p_entity_code => 'ADJ_ATTS'
2236: ,p_entity_id => l_Header_Adj_Att_rec.Price_adj_attrib_id);
2237:
2238: else
2236: ,p_entity_id => l_Header_Adj_Att_rec.Price_adj_attrib_id);
2237:
2238: else
2239:
2240: OE_MSG_PUB.set_msg_context(
2241: p_entity_code => 'ADJ_ATTS'
2242: ,p_entity_id => l_old_Header_Adj_Att_rec.Price_adj_attrib_id);
2243:
2244: end if;
2299: ( p_x_Header_Adj_Att_rec => l_Header_Adj_Att_rec
2300: , p_old_Header_Adj_Att_rec => l_old_Header_Adj_Att_rec
2301: );
2302:
2303: OE_MSG_PUB.update_msg_context(
2304: p_entity_code => 'ADJ_ATTS'
2305: ,p_entity_id => l_Header_Adj_Att_rec.Price_adj_attrib_id);
2306:
2307: END IF;
2382: ELSIF l_Header_Adj_Att_rec.return_status = FND_API.G_RET_STS_ERROR THEN
2383: RAISE FND_API.G_EXC_ERROR;
2384: END IF;
2385:
2386: OE_MSG_PUB.reset_msg_context('ADJ_ATTS');
2387: -- loop exception handler.
2388:
2389: EXCEPTION
2390:
2414: l_Header_Adj_Att_rec.return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2415: p_x_Header_Adj_Att_tbl(I) := l_Header_Adj_Att_rec;
2416: p_x_old_Header_Adj_Att_tbl(I) := l_old_Header_Adj_Att_rec;
2417:
2418: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2419: THEN
2420: OE_MSG_PUB.Add_Exc_Msg
2421: ( G_PKG_NAME
2422: , 'Header_price_atts'
2416: p_x_old_Header_Adj_Att_tbl(I) := l_old_Header_Adj_Att_rec;
2417:
2418: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2419: THEN
2420: OE_MSG_PUB.Add_Exc_Msg
2421: ( G_PKG_NAME
2422: , 'Header_price_atts'
2423: );
2424: END IF;
2422: , 'Header_price_atts'
2423: );
2424: END IF;
2425:
2426: OE_MSG_PUB.reset_msg_context('ADJ_ATTS');
2427: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2428:
2429: END;
2430: I := p_x_Header_Adj_Att_tbl.NEXT(I);
2432:
2433: -- Load OUT parameters
2434:
2435: adj_debug('Exiting oe_order_Adj_pvt.Header_Adj_Atts', 1);
2436: OE_MSG_PUB.reset_msg_context('ADJ_ATTS');
2437:
2438: EXCEPTION
2439:
2440: WHEN FND_API.G_EXC_ERROR THEN
2438: EXCEPTION
2439:
2440: WHEN FND_API.G_EXC_ERROR THEN
2441:
2442: OE_MSG_PUB.reset_msg_context('ADJ_ATTS');
2443: RAISE;
2444:
2445: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2446:
2443: RAISE;
2444:
2445: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2446:
2447: OE_MSG_PUB.reset_msg_context('ADJ_ATTS');
2448: RAISE;
2449:
2450: WHEN OTHERS THEN
2451:
2448: RAISE;
2449:
2450: WHEN OTHERS THEN
2451:
2452: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2453: THEN
2454: OE_MSG_PUB.Add_Exc_Msg
2455: ( G_PKG_NAME
2456: , 'Header_Adj_Atts'
2450: WHEN OTHERS THEN
2451:
2452: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2453: THEN
2454: OE_MSG_PUB.Add_Exc_Msg
2455: ( G_PKG_NAME
2456: , 'Header_Adj_Atts'
2457: );
2458: END IF;
2457: );
2458: END IF;
2459:
2460:
2461: OE_MSG_PUB.reset_msg_context('ADJ_ATTS');
2462: adj_debug('Exiting oe_order_Adj_pvt.HEader_Adj_Atts', 1);
2463:
2464: end Header_Adj_Atts;
2465:
2479: I pls_integer; -- Used as index for while loop
2480: BEGIN
2481:
2482: IF FND_API.to_Boolean(p_init_msg_list) THEN
2483: OE_MSG_PUB.initialize;
2484: END IF;
2485:
2486: IF l_control_rec.Process_Partial THEN
2487: SAVEPOINT Header_Adj_Assocs;
2509: END IF;
2510:
2511: if l_old_Header_Adj_Assoc_rec.Price_Adj_assoc_id = FND_API.G_MISS_NUM then
2512:
2513: OE_MSG_PUB.set_msg_context(
2514: p_entity_code => 'ADJ_ATTS'
2515: ,p_entity_id => l_Header_Adj_Assoc_rec.Price_Adj_assoc_id);
2516:
2517: else
2515: ,p_entity_id => l_Header_Adj_Assoc_rec.Price_Adj_assoc_id);
2516:
2517: else
2518:
2519: OE_MSG_PUB.set_msg_context(
2520: p_entity_code => 'ADJ_ATTS'
2521: ,p_entity_id => l_old_Header_Adj_Assoc_rec.Price_Adj_assoc_id);
2522:
2523: end if;
2578: ( p_x_Header_Adj_Assoc_rec => l_Header_Adj_Assoc_rec
2579: , p_old_Header_Adj_Assoc_rec => l_old_Header_Adj_Assoc_rec
2580: );
2581:
2582: OE_MSG_PUB.update_msg_context(
2583: p_entity_code => 'ADJ_ATTS'
2584: ,p_entity_id => l_Header_Adj_Assoc_rec.Price_Adj_assoc_id);
2585:
2586: END IF;
2661: ELSIF l_Header_Adj_Assoc_rec.return_status = FND_API.G_RET_STS_ERROR THEN
2662: RAISE FND_API.G_EXC_ERROR;
2663: END IF;
2664:
2665: OE_MSG_PUB.reset_msg_context('ADJ_ATTS');
2666: -- loop exception handler.
2667:
2668: EXCEPTION
2669:
2693: l_Header_Adj_Assoc_rec.return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2694: p_x_Header_Adj_Assoc_tbl(I) := l_Header_Adj_Assoc_rec;
2695: p_x_old_Header_Adj_Assoc_tbl(I) := l_old_Header_Adj_Assoc_rec;
2696:
2697: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2698: THEN
2699: OE_MSG_PUB.Add_Exc_Msg
2700: ( G_PKG_NAME
2701: , 'Header_price_atts'
2695: p_x_old_Header_Adj_Assoc_tbl(I) := l_old_Header_Adj_Assoc_rec;
2696:
2697: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2698: THEN
2699: OE_MSG_PUB.Add_Exc_Msg
2700: ( G_PKG_NAME
2701: , 'Header_price_atts'
2702: );
2703: END IF;
2701: , 'Header_price_atts'
2702: );
2703: END IF;
2704:
2705: OE_MSG_PUB.reset_msg_context('ADJ_ATTS');
2706: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2707:
2708: END;
2709: I := p_x_Header_Adj_Assoc_tbl.NEXT(I);
2711:
2712: -- Load OUT parameters
2713:
2714: adj_debug('Exiting oe_order_Adj_pvt.Header_Adj_Assocs', 1);
2715: OE_MSG_PUB.reset_msg_context('ADJ_ATTS');
2716:
2717: EXCEPTION
2718:
2719: WHEN FND_API.G_EXC_ERROR THEN
2717: EXCEPTION
2718:
2719: WHEN FND_API.G_EXC_ERROR THEN
2720:
2721: OE_MSG_PUB.reset_msg_context('ADJ_ATTS');
2722: RAISE;
2723:
2724: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2725:
2722: RAISE;
2723:
2724: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2725:
2726: OE_MSG_PUB.reset_msg_context('ADJ_ATTS');
2727: RAISE;
2728:
2729: WHEN OTHERS THEN
2730:
2727: RAISE;
2728:
2729: WHEN OTHERS THEN
2730:
2731: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2732: THEN
2733: OE_MSG_PUB.Add_Exc_Msg
2734: ( G_PKG_NAME
2735: , 'Header_Adj_Assocs'
2729: WHEN OTHERS THEN
2730:
2731: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2732: THEN
2733: OE_MSG_PUB.Add_Exc_Msg
2734: ( G_PKG_NAME
2735: , 'Header_Adj_Assocs'
2736: );
2737: END IF;
2736: );
2737: END IF;
2738:
2739:
2740: OE_MSG_PUB.reset_msg_context('ADJ_ATTS');
2741: adj_debug('Exiting oe_order_Adj_pvt.Header_Adj_Assocs', 1);
2742: end Header_Adj_Assocs;
2743:
2744: PROCEDURE Line_Price_Atts
2775:
2776: BEGIN
2777: l_control_rec := p_control_rec; -- Added for 1433292
2778: IF FND_API.to_Boolean(p_init_msg_list) THEN
2779: OE_MSG_PUB.initialize;
2780: END IF;
2781:
2782: IF l_control_rec.Process_Partial THEN
2783: SAVEPOINT Line_price_atts;
2840: l_orig_sys_shipment_ref := null;
2841: END;
2842: END IF;
2843:
2844: OE_MSG_PUB.set_msg_context(
2845: p_entity_code => 'LINE_PATTS'
2846: ,p_entity_id => l_Line_price_att_rec.Order_price_attrib_id
2847: ,p_header_id => l_Line_price_att_rec.header_Id
2848: ,p_line_id => l_Line_price_att_rec.Line_Id
2892: l_orig_sys_shipment_ref := null;
2893: END;
2894: END IF;
2895:
2896: OE_MSG_PUB.set_msg_context(
2897: p_entity_code => 'LINE_PATTS'
2898: ,p_entity_id => l_old_Line_price_att_rec.Order_price_attrib_id
2899: ,p_header_id => l_old_Line_price_att_rec.header_Id
2900: ,p_line_id => l_old_Line_price_att_rec.Line_Id
2964: ( p_x_Line_price_att_rec => l_Line_Price_Att_rec
2965: , p_old_Line_price_att_rec => l_old_Line_Price_Att_rec
2966: );
2967:
2968: OE_MSG_PUB.update_msg_context(
2969: p_entity_code => 'LINE_PATTS'
2970: ,p_entity_id => l_Line_price_att_rec.order_price_attrib_id
2971: ,p_header_id => l_Line_price_att_rec.header_Id
2972: ,p_line_id => l_Line_price_att_rec.line_id);
3219: ELSIF l_Line_price_att_rec.return_status = FND_API.G_RET_STS_ERROR THEN
3220: RAISE FND_API.G_EXC_ERROR;
3221: END IF;
3222:
3223: OE_MSG_PUB.reset_msg_context('HEADER_ADJ');
3224: -- loop exception handler.
3225:
3226: EXCEPTION
3227:
3251: l_Line_price_att_rec.return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3252: p_x_Line_price_att_tbl(I) := l_Line_Price_Att_rec;
3253: p_x_old_Line_price_att_tbl(I) := l_old_Line_Price_Att_rec;
3254:
3255: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
3256: THEN
3257: OE_MSG_PUB.Add_Exc_Msg
3258: ( G_PKG_NAME
3259: , 'Line_price_atts'
3253: p_x_old_Line_price_att_tbl(I) := l_old_Line_Price_Att_rec;
3254:
3255: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
3256: THEN
3257: OE_MSG_PUB.Add_Exc_Msg
3258: ( G_PKG_NAME
3259: , 'Line_price_atts'
3260: );
3261: END IF;
3259: , 'Line_price_atts'
3260: );
3261: END IF;
3262:
3263: OE_MSG_PUB.reset_msg_context('HEADER_PATTS');
3264: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3265:
3266: END;
3267: I := p_x_Line_price_att_tbl.NEXT(I);
3269:
3270: -- Load OUT parameters
3271:
3272: adj_debug('Exiting oe_order_Adj_pvt.Line_price_atts', 1);
3273: OE_MSG_PUB.reset_msg_context('HEADER_PATTS');
3274:
3275: EXCEPTION
3276:
3277: WHEN FND_API.G_EXC_ERROR THEN
3275: EXCEPTION
3276:
3277: WHEN FND_API.G_EXC_ERROR THEN
3278:
3279: OE_MSG_PUB.reset_msg_context('HEADER_PATTS');
3280: RAISE;
3281:
3282: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3283:
3280: RAISE;
3281:
3282: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3283:
3284: OE_MSG_PUB.reset_msg_context('HEADER_PATTS');
3285: RAISE;
3286:
3287: WHEN OTHERS THEN
3288:
3285: RAISE;
3286:
3287: WHEN OTHERS THEN
3288:
3289: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
3290: THEN
3291: OE_MSG_PUB.Add_Exc_Msg
3292: ( G_PKG_NAME
3293: , 'Line_price_atts'
3287: WHEN OTHERS THEN
3288:
3289: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
3290: THEN
3291: OE_MSG_PUB.Add_Exc_Msg
3292: ( G_PKG_NAME
3293: , 'Line_price_atts'
3294: );
3295: END IF;
3294: );
3295: END IF;
3296:
3297:
3298: OE_MSG_PUB.reset_msg_context('LINE_PATTS');
3299: adj_debug('Exiting oe_order_Adj_pvt.Line_Price_Atts', 1);
3300: end Line_Price_Atts;
3301:
3302:
3356: I pls_integer; -- Used as index for while loop
3357: BEGIN
3358:
3359: IF FND_API.to_Boolean(p_init_msg_list) THEN
3360: OE_MSG_PUB.initialize;
3361: END IF;
3362:
3363: IF l_control_rec.Process_Partial THEN
3364: SAVEPOINT Line_Adj_atts;
3385: END IF;
3386:
3387: if l_old_Line_Adj_Att_rec.Price_Adj_attrib_id = FND_API.G_MISS_NUM then
3388:
3389: OE_MSG_PUB.set_msg_context(
3390: p_entity_code => 'ADJ_ATTS'
3391: ,p_entity_id => l_Line_Adj_Att_rec.Price_adj_attrib_id);
3392:
3393: else
3391: ,p_entity_id => l_Line_Adj_Att_rec.Price_adj_attrib_id);
3392:
3393: else
3394:
3395: OE_MSG_PUB.set_msg_context(
3396: p_entity_code => 'ADJ_ATTS'
3397: ,p_entity_id => l_old_Line_Adj_Att_rec.Price_adj_attrib_id);
3398:
3399: end if;
3454: ( p_x_Line_Adj_Att_rec => l_Line_Adj_Att_rec
3455: , p_old_Line_Adj_Att_rec => l_old_Line_Adj_Att_rec
3456: );
3457:
3458: OE_MSG_PUB.update_msg_context(
3459: p_entity_code => 'ADJ_ATTS'
3460: ,p_entity_id => l_Line_Adj_Att_rec.Price_adj_attrib_id);
3461:
3462: END IF;
3558: ELSIF l_Line_Adj_Att_rec.return_status = FND_API.G_RET_STS_ERROR THEN
3559: RAISE FND_API.G_EXC_ERROR;
3560: END IF;
3561:
3562: OE_MSG_PUB.reset_msg_context('ADJ_ATTS');
3563: -- loop exception handler.
3564:
3565: EXCEPTION
3566:
3590: l_Line_Adj_Att_rec.return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3591: p_x_Line_Adj_Att_tbl(I) := l_Line_Adj_Att_rec;
3592: p_x_old_Line_Adj_Att_tbl(I) := l_old_Line_Adj_Att_rec;
3593:
3594: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
3595: THEN
3596: OE_MSG_PUB.Add_Exc_Msg
3597: ( G_PKG_NAME
3598: , 'Line_Adj_atts'
3592: p_x_old_Line_Adj_Att_tbl(I) := l_old_Line_Adj_Att_rec;
3593:
3594: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
3595: THEN
3596: OE_MSG_PUB.Add_Exc_Msg
3597: ( G_PKG_NAME
3598: , 'Line_Adj_atts'
3599: );
3600: END IF;
3598: , 'Line_Adj_atts'
3599: );
3600: END IF;
3601:
3602: OE_MSG_PUB.reset_msg_context('ADJ_ATTS');
3603: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3604:
3605: END;
3606: I := p_x_Line_Adj_Att_tbl.NEXT(I);
3608:
3609: -- Load OUT parameters
3610:
3611: adj_debug('Exiting oe_order_Adj_pvt.Line_Adj_atts', 1);
3612: OE_MSG_PUB.reset_msg_context('ADJ_ATTS');
3613:
3614: EXCEPTION
3615:
3616: WHEN FND_API.G_EXC_ERROR THEN
3614: EXCEPTION
3615:
3616: WHEN FND_API.G_EXC_ERROR THEN
3617:
3618: OE_MSG_PUB.reset_msg_context('ADJ_ATTS');
3619: RAISE;
3620:
3621: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3622:
3619: RAISE;
3620:
3621: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3622:
3623: OE_MSG_PUB.reset_msg_context('ADJ_ATTS');
3624: RAISE;
3625:
3626: WHEN OTHERS THEN
3627:
3624: RAISE;
3625:
3626: WHEN OTHERS THEN
3627:
3628: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
3629: THEN
3630: OE_MSG_PUB.Add_Exc_Msg
3631: ( G_PKG_NAME
3632: , 'Line_Adj_atts'
3626: WHEN OTHERS THEN
3627:
3628: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
3629: THEN
3630: OE_MSG_PUB.Add_Exc_Msg
3631: ( G_PKG_NAME
3632: , 'Line_Adj_atts'
3633: );
3634: END IF;
3633: );
3634: END IF;
3635:
3636:
3637: OE_MSG_PUB.reset_msg_context('ADJ_ATTS');
3638:
3639: adj_debug('Exiting oe_order_Adj_pvt.Line_Adj_Atts', 1);
3640: end Line_Adj_Atts;
3641:
3693: I pls_integer; -- Used as index for while loop
3694: BEGIN
3695:
3696: IF FND_API.to_Boolean(p_init_msg_list) THEN
3697: OE_MSG_PUB.initialize;
3698: END IF;
3699:
3700: IF l_control_rec.Process_Partial THEN
3701: SAVEPOINT Line_Adj_Assocs;
3725: END IF;
3726:
3727: if l_old_Line_Adj_Assoc_rec.Price_Adj_assoc_id = FND_API.G_MISS_NUM then
3728:
3729: OE_MSG_PUB.set_msg_context(
3730: p_entity_code => 'ADJ_ATTS'
3731: ,p_entity_id => l_Line_Adj_Assoc_rec.Price_Adj_assoc_id);
3732:
3733: else
3731: ,p_entity_id => l_Line_Adj_Assoc_rec.Price_Adj_assoc_id);
3732:
3733: else
3734:
3735: OE_MSG_PUB.set_msg_context(
3736: p_entity_code => 'ADJ_ATTS'
3737: ,p_entity_id => l_old_Line_Adj_Assoc_rec.Price_Adj_assoc_id);
3738:
3739: end if;
3795: ( p_x_Line_Adj_Assoc_rec => l_Line_Adj_Assoc_rec
3796: , p_old_Line_Adj_Assoc_rec => l_old_Line_Adj_Assoc_rec
3797: );
3798:
3799: OE_MSG_PUB.update_msg_context(
3800: p_entity_code => 'ADJ_ATTS'
3801: ,p_entity_id => l_Line_Adj_Assoc_rec.Price_Adj_assoc_id);
3802:
3803: END IF;
3881: ELSIF l_Line_Adj_Assoc_rec.return_status = FND_API.G_RET_STS_ERROR THEN
3882: RAISE FND_API.G_EXC_ERROR;
3883: END IF;
3884:
3885: OE_MSG_PUB.reset_msg_context('ADJ_ATTS');
3886: -- loop exception handler.
3887:
3888: EXCEPTION
3889:
3913: l_Line_Adj_Assoc_rec.return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3914: p_x_Line_Adj_Assoc_tbl(I) := l_Line_Adj_Assoc_rec;
3915: p_x_old_Line_Adj_Assoc_tbl(I) := l_old_Line_Adj_Assoc_rec;
3916:
3917: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
3918: THEN
3919: OE_MSG_PUB.Add_Exc_Msg
3920: ( G_PKG_NAME
3921: , 'Header_price_atts'
3915: p_x_old_Line_Adj_Assoc_tbl(I) := l_old_Line_Adj_Assoc_rec;
3916:
3917: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
3918: THEN
3919: OE_MSG_PUB.Add_Exc_Msg
3920: ( G_PKG_NAME
3921: , 'Header_price_atts'
3922: );
3923: END IF;
3921: , 'Header_price_atts'
3922: );
3923: END IF;
3924:
3925: OE_MSG_PUB.reset_msg_context('ADJ_ATTS');
3926: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3927:
3928: END;
3929: I := p_x_Line_Adj_Assoc_tbl.NEXT(I);
3931:
3932: -- Load OUT parameters
3933:
3934: adj_debug('Exiting oe_order_Adj_pvt.Line_Adj_Assocs', 1);
3935: OE_MSG_PUB.reset_msg_context('ADJ_ATTS');
3936:
3937: EXCEPTION
3938:
3939: WHEN FND_API.G_EXC_ERROR THEN
3937: EXCEPTION
3938:
3939: WHEN FND_API.G_EXC_ERROR THEN
3940:
3941: OE_MSG_PUB.reset_msg_context('ADJ_ATTS');
3942: RAISE;
3943:
3944: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3945:
3942: RAISE;
3943:
3944: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3945:
3946: OE_MSG_PUB.reset_msg_context('ADJ_ATTS');
3947: RAISE;
3948:
3949: WHEN OTHERS THEN
3950:
3947: RAISE;
3948:
3949: WHEN OTHERS THEN
3950:
3951: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
3952: THEN
3953: OE_MSG_PUB.Add_Exc_Msg
3954: ( G_PKG_NAME
3955: , 'Line_Adj_Assocs'
3949: WHEN OTHERS THEN
3950:
3951: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
3952: THEN
3953: OE_MSG_PUB.Add_Exc_Msg
3954: ( G_PKG_NAME
3955: , 'Line_Adj_Assocs'
3956: );
3957: END IF;
3956: );
3957: END IF;
3958:
3959:
3960: OE_MSG_PUB.reset_msg_context('ADJ_ATTS');
3961: adj_debug('Exiting oe_order_Adj_pvt.Line_Adj_Assocs', 1);
3962: end Line_Adj_Assocs;
3963:
3964: Function Enforce_list_Price
5613: and p_use_current_header = FALSE
5614: then
5615: l_return_status := FND_API.G_RET_STS_ERROR;
5616:
5617: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_ERROR)
5618: THEN
5619:
5620: FND_MESSAGE.SET_NAME('ONT','OE_ATTRIBUTE_REQUIRED');
5621: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','line_id or Header Id ');
5618: THEN
5619:
5620: FND_MESSAGE.SET_NAME('ONT','OE_ATTRIBUTE_REQUIRED');
5621: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','line_id or Header Id ');
5622: OE_MSG_PUB.Add;
5623: END IF;
5624: RAISE FND_API.G_EXC_ERROR;
5625: end if;
5626:
5625: end if;
5626:
5627: G_STMT_NO := 'calculate_adjustments#20';
5628: if p_Line_id is not null and p_Header_id is not null then
5629: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
5630: THEN
5631: OE_MSG_PUB.Add_Exc_Msg ( G_PKG_NAME ,
5632: 'oe_line_adj.calulate_adjustments'
5633: ,'Keys are mutually exclusive');
5627: G_STMT_NO := 'calculate_adjustments#20';
5628: if p_Line_id is not null and p_Header_id is not null then
5629: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
5630: THEN
5631: OE_MSG_PUB.Add_Exc_Msg ( G_PKG_NAME ,
5632: 'oe_line_adj.calulate_adjustments'
5633: ,'Keys are mutually exclusive');
5634: END IF;
5635: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
5807: End;
5808: fnd_message.set_name('ONT','ONT_INVALID_AGR_REVISION');
5809: fnd_message.set_TOKEN('AGREEMENT',l_agreement_name||' : '||l_revision);
5810: fnd_message.set_TOKEN('PRICING_DATE',l_line_tbl(line_Tbl_Index).PRICING_DATE);
5811: OE_MSG_PUB.Add;
5812: RAISE OE_AGREEMENT_ERROR;
5813: END;
5814: End If;
5815: --End 2124989
6287: WHEN FND_API.G_EXC_ERROR THEN
6288:
6289: FND_MESSAGE.SET_NAME('ONT','OE_PRICING_ERROR');
6290: FND_MESSAGE.SET_TOKEN('ERR_TEXT',l_return_status_Text);
6291: OE_MSG_PUB.Add;
6292: x_return_status := FND_API.G_RET_STS_ERROR;
6293:
6294: adj_debug('g_exc_error is '||g_stmt_no||' '||sqlerrm,1);
6295: adj_debug('g_exc_error is '||l_return_status_Text);
6305: /* END 2124989 */
6306: WHEN QP_ATTR_MAPPING_ERROR THEN
6307: FND_MESSAGE.SET_NAME('ONT','OE_PRICING_ERROR');
6308: FND_MESSAGE.SET_TOKEN('ERR_TEXT','Please make sure Run QP Build Sourcing Rule has completed sucessfully');
6309: OE_MSG_PUB.Add;
6310: oe_debug_pub.add(' QP Attr Mapping threw exception');
6311: RAISE FND_API.G_EXC_ERROR;
6312: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
6313:
6312: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
6313:
6314: FND_MESSAGE.SET_NAME('ONT','OE_PRICING_ERROR');
6315: FND_MESSAGE.SET_TOKEN('ERR_TEXT',l_return_status_Text);
6316: OE_MSG_PUB.Add;
6317: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6318: adj_debug('G_EXC_UNEXPECTED_ERROR is '||g_stmt_no||' '||sqlerrm,1);
6319: adj_debug('G_EXC_UNEXPECTED_ERROR is '||l_return_status_Text);
6320:
6325: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6326: --dbms_output.put_line('Error is '||sqlerrm);
6327: adj_debug('Error Code is '||g_stmt_no||' '||sqlerrm,1);
6328:
6329: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
6330: THEN
6331: OE_MSG_PUB.Add_Exc_Msg
6332: ( G_PKG_NAME
6333: , 'oe_line_adj.calulate_adjustments',
6327: adj_debug('Error Code is '||g_stmt_no||' '||sqlerrm,1);
6328:
6329: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
6330: THEN
6331: OE_MSG_PUB.Add_Exc_Msg
6332: ( G_PKG_NAME
6333: , 'oe_line_adj.calulate_adjustments',
6334: g_stmt_no||' '||sqlerrm
6335: );
6396: );
6397: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
6398: FND_MESSAGE.SET_NAME('ONT','OE_PRICING_ERROR');
6399: FND_MESSAGE.SET_TOKEN('ERR_TEXT',x_return_status_txt);
6400: OE_MSG_PUB.Add;
6401: RAISE FND_API.G_EXC_ERROR;
6402: END IF;
6403: else
6404: p_Line_Adj_Rec.list_line_no := p_req_line_detail_Rec.list_line_no;
7657: /* 2270949 : delay logging message
7658: FND_MESSAGE.SET_NAME('ONT','ONT_CREATED_NEW_LINE');
7659: FND_MESSAGE.SET_TOKEN('ITEM',l_line_rec.ordered_item);
7660: FND_MESSAGE.SET_TOKEN('QUANTITY',l_line_rec.Ordered_quantity);
7661: OE_MSG_PUB.Add('N');
7662: */
7663: adj_debug('inside price line: setting cascade');
7664:
7665: p_Rltd_lines_prcd(l_Req_Line_Index) := p_line_Tbl.last;
7926: if nvl(p_price_event1,'N') <> 'PRICE' then --bug 2273446
7927: FND_MESSAGE.SET_NAME('ONT','OE_GSA_VIOLATION');
7928: l_msg_text := l_operand||' ( '||l_msg_text||' )';
7929: FND_MESSAGE.SET_TOKEN('GSA_PRICE',l_msg_text);
7930: OE_MSG_PUB.Add;
7931: end if; --bug 2273446
7932:
7933: Else
7934: G_STMT_NO := 'Gsa_Check#20.15';
7940: from oe_hold_definitions where type_code='GSA';
7941: Exception when no_data_found then
7942: FND_MESSAGE.SET_NAME('ONT','OE_PRICING_ERROR');
7943: FND_MESSAGE.SET_TOKEN('ERR_TEXT','Missing hold_definition for type_code GSA');
7944: OE_MSG_PUB.Add;
7945: adj_debug('Missing hold_definition for type_code GSA');
7946: End;*/
7947:
7948: If p_line_id is null or
7948: If p_line_id is null or
7949: p_line_id = fnd_api.g_miss_num then
7950: FND_MESSAGE.SET_NAME('ONT','OE_PRICING_ERROR');
7951: FND_MESSAGE.SET_TOKEN('ERR_TEXT','GSA_INVALID_LINE_ID');
7952: OE_MSG_PUB.Add;
7953: RAISE FND_API.G_EXC_ERROR;
7954: End if;
7955:
7956: G_STMT_NO := 'Gsa_Check#20.20';
8004: If l_return_status = FND_API.g_ret_sts_success then
8005: if nvl(p_price_event1,'N') <> 'PRICE' then --bug 2273446
8006:
8007: FND_MESSAGE.SET_NAME('ONT','OE_GSA_HOLD_APPLIED');
8008: OE_MSG_PUB.Add;
8009: end if; --bug 2273446
8010: Else
8011: FND_MESSAGE.SET_NAME('ONT','OE_PRICING_ERROR');
8012: FND_MESSAGE.SET_TOKEN('ERR_TEXT','APPLY_GSA_HOLD');
8009: end if; --bug 2273446
8010: Else
8011: FND_MESSAGE.SET_NAME('ONT','OE_PRICING_ERROR');
8012: FND_MESSAGE.SET_TOKEN('ERR_TEXT','APPLY_GSA_HOLD');
8013: OE_MSG_PUB.Add;
8014: RAISE FND_API.G_EXC_ERROR;
8015: End If;
8016: End If; /* check hold */
8017: End If; --for bug 2028480 end
8032: from oe_hold_definitions where type_code='GSA';
8033: Exception when no_data_found then
8034: FND_MESSAGE.SET_NAME('ONT','OE_PRICING_ERROR');
8035: FND_MESSAGE.SET_TOKEN('ERR_TEXT','Missing hold_definition for type_code GSA');
8036: OE_MSG_PUB.Add;
8037: adj_debug('Missing hold_definition for type_code GSA');
8038: End;*/
8039:
8040: End if; -- Hold id
8776: FND_MESSAGE.SET_NAME('ONT','ONT_NEGATIVE_PRICE');
8777: FND_MESSAGE.SET_TOKEN('ITEM',p_line_tbl(i).Ordered_Item);
8778: FND_MESSAGE.SET_TOKEN('LIST_PRICE',p_line_tbl(i).unit_List_price_per_pqty);
8779: FND_MESSAGE.SET_TOKEN('SELLING_PRICE',p_line_tbl(i).Unit_Selling_price_per_pqty);
8780: OE_MSG_PUB.Add;
8781: FND_MESSAGE.SET_NAME('ONT','ONT_NEGATIVE_MODIFIERS');
8782: FND_MESSAGE.SET_TOKEN('LIST_LINE_NO',get_list_lines(p_line_tbl(i).line_id));
8783: OE_MSG_PUB.ADD;
8784:
8779: FND_MESSAGE.SET_TOKEN('SELLING_PRICE',p_line_tbl(i).Unit_Selling_price_per_pqty);
8780: OE_MSG_PUB.Add;
8781: FND_MESSAGE.SET_NAME('ONT','ONT_NEGATIVE_MODIFIERS');
8782: FND_MESSAGE.SET_TOKEN('LIST_LINE_NO',get_list_lines(p_line_tbl(i).line_id));
8783: OE_MSG_PUB.ADD;
8784:
8785: RAISE FND_API.G_EXC_ERROR;
8786:
8787: End If; -- Negative Price
9140: QP_PREQ_GRP.G_STATUS_INVALID_UOM_CONV,
9141: QP_PREQ_GRP.G_STATUS_INVALID_INCOMP,
9142: QP_PREQ_GRP.G_STATUS_BEST_PRICE_EVAL_ERROR)
9143: then
9144: OE_MSG_PUB.set_msg_context
9145: ( p_entity_code => 'LINE'
9146: ,p_entity_id => l_line_rec.line_id
9147: ,p_header_id => l_line_rec.header_id
9148: ,p_line_id => l_line_rec.line_id
9175: FND_MESSAGE.SET_NAME('ONT','OE_PRC_NO_LIST_PRICE');
9176: FND_MESSAGE.SET_TOKEN('ITEM',l_line_rec.Ordered_Item);
9177: FND_MESSAGE.SET_TOKEN('UNIT',l_line_rec.Order_Quantity_uom);
9178: FND_MESSAGE.SET_TOKEN('PRICE_LIST',l_Price_List);
9179: OE_MSG_PUB.Add;
9180: End If;
9181:
9182: G_IPL_ERRORS_TBL(l_line_rec.line_id):=l_line_rec.price_list_id;
9183:
9188: oe_debug_pub.add(' Before setting message');
9189: FND_MESSAGE.SET_NAME('ONT','OE_BOOK_REQD_LINE_ATTRIBUTE');
9190: oe_debug_pub.add(' Before setting token');
9191: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','price list');
9192: OE_MSG_PUB.ADD;
9193: oe_debug_pub.add('Process adjustments before raising g_exc_error');
9194: RAISE FND_API.G_EXC_ERROR;
9195: End If;
9196:
9223: adj_debug('Price List Not found');
9224: FND_MESSAGE.SET_NAME('ONT','ONT_NO_PRICE_LIST_FOUND');
9225: FND_MESSAGE.SET_TOKEN('ITEM',l_line_rec.Ordered_Item);
9226: FND_MESSAGE.SET_TOKEN('UOM',l_line_rec.Order_Quantity_uom);
9227: OE_MSG_PUB.Add;
9228: Elsif p_req_line_tbl(i).status_code = QP_PREQ_GRP.G_STATUS_FORMULA_ERROR then
9229: adj_debug('Error in Formula processing');
9230: FND_MESSAGE.SET_NAME('ONT','ONT_PRC_ERROR_IN_FORMULA');
9231: FND_MESSAGE.SET_TOKEN('ERR_TEXT',p_req_line_tbl(i).status_text||SQLERRM);
9228: Elsif p_req_line_tbl(i).status_code = QP_PREQ_GRP.G_STATUS_FORMULA_ERROR then
9229: adj_debug('Error in Formula processing');
9230: FND_MESSAGE.SET_NAME('ONT','ONT_PRC_ERROR_IN_FORMULA');
9231: FND_MESSAGE.SET_TOKEN('ERR_TEXT',p_req_line_tbl(i).status_text||SQLERRM);
9232: OE_MSG_PUB.Add;
9233: Elsif p_req_line_tbl(i).status_code in
9234: ( QP_PREQ_GRP.G_STATUS_OTHER_ERRORS , FND_API.G_RET_STS_UNEXP_ERROR,
9235: FND_API.G_RET_STS_ERROR)
9236: then
9236: then
9237: adj_debug('Other errors processing');
9238: FND_MESSAGE.SET_NAME('ONT','ONT_PRICING_ERRORS'); --bug#7149497
9239: FND_MESSAGE.SET_TOKEN('ERR_TEXT',p_req_line_tbl(i).status_text||SQLERRM);
9240: OE_MSG_PUB.Add;
9241: Elsif p_req_line_tbl(i).status_code = QP_PREQ_GRP.G_STATUS_INVALID_UOM then
9242: adj_debug('Invalid uom');
9243: FND_MESSAGE.SET_NAME('ONT','ONT_PRC_INVALID_UOM');
9244: FND_MESSAGE.SET_TOKEN('ITEM',l_line_rec.Ordered_Item);
9242: adj_debug('Invalid uom');
9243: FND_MESSAGE.SET_NAME('ONT','ONT_PRC_INVALID_UOM');
9244: FND_MESSAGE.SET_TOKEN('ITEM',l_line_rec.Ordered_Item);
9245: FND_MESSAGE.SET_TOKEN('UOM',l_line_rec.Order_Quantity_uom);
9246: OE_MSG_PUB.Add;
9247: Elsif p_req_line_tbl(i).status_code = QP_PREQ_GRP.G_STATUS_DUP_PRICE_LIST then
9248: adj_debug('Duplicate price list');
9249: FND_MESSAGE.SET_NAME('ONT','ONT_PRC_DUPLICATE_PRICE_LIST');
9250:
9280: instr(p_req_line_tbl(i).status_text,',')+1);
9281:
9282: End;
9283: FND_MESSAGE.SET_TOKEN('PRICE_LIST2',l_price_list);
9284: OE_MSG_PUB.Add;
9285: Elsif p_req_line_tbl(i).status_code = QP_PREQ_GRP.G_STATUS_INVALID_UOM_CONV then
9286: adj_debug('Invalid UOM Conversion');
9287: FND_MESSAGE.SET_NAME('ONT','ONT_PRC_INVALID_UOM_CONVERSION');
9288: FND_MESSAGE.SET_TOKEN('UOM_TEXT','( '||l_line_rec.Ordered_Item||' ) '||
9286: adj_debug('Invalid UOM Conversion');
9287: FND_MESSAGE.SET_NAME('ONT','ONT_PRC_INVALID_UOM_CONVERSION');
9288: FND_MESSAGE.SET_TOKEN('UOM_TEXT','( '||l_line_rec.Ordered_Item||' ) '||
9289: p_req_line_tbl(i).status_text);
9290: OE_MSG_PUB.Add;
9291: Elsif p_req_line_tbl(i).status_code = QP_PREQ_GRP.G_STATUS_INVALID_INCOMP then
9292: adj_debug('Unable to resolve incompatibility');
9293: FND_MESSAGE.SET_NAME('ONT','ONT_PRC_INVALID_INCOMP');
9294: FND_MESSAGE.SET_TOKEN('ERR_TEXT','( '||l_line_rec.Ordered_Item||' ) '||
9292: adj_debug('Unable to resolve incompatibility');
9293: FND_MESSAGE.SET_NAME('ONT','ONT_PRC_INVALID_INCOMP');
9294: FND_MESSAGE.SET_TOKEN('ERR_TEXT','( '||l_line_rec.Ordered_Item||' ) '||
9295: p_req_line_tbl(i).status_text);
9296: OE_MSG_PUB.Add;
9297: Elsif p_req_line_tbl(i).status_code = QP_PREQ_GRP.G_STATUS_BEST_PRICE_EVAL_ERROR then
9298: adj_debug('Error while evaluating the best price');
9299: FND_MESSAGE.SET_NAME('ONT','ONT_PRC_BEST_PRICE_ERROR');
9300: FND_MESSAGE.SET_TOKEN('ITEM',l_line_rec.Ordered_Item);
9298: adj_debug('Error while evaluating the best price');
9299: FND_MESSAGE.SET_NAME('ONT','ONT_PRC_BEST_PRICE_ERROR');
9300: FND_MESSAGE.SET_TOKEN('ITEM',l_line_rec.Ordered_Item);
9301: FND_MESSAGE.SET_TOKEN('ERR_TEXT',p_req_line_tbl(i).status_text);
9302: OE_MSG_PUB.Add;
9303: End if;
9304:
9305: --RAISE FND_API.G_EXC_ERROR;
9306: --btea begin if do not write to db, we still need to
9328: FND_MESSAGE.SET_NAME('ONT','ONT_NEGATIVE_PRICE');
9329: FND_MESSAGE.SET_TOKEN('ITEM',l_line_rec.Ordered_Item);
9330: FND_MESSAGE.SET_TOKEN('LIST_PRICE',p_req_line_tbl(i).unit_price);
9331: FND_MESSAGE.SET_TOKEN('SELLING_PRICE',p_req_line_tbl(i).Adjusted_unit_price);
9332: OE_MSG_PUB.Add;
9333: FND_MESSAGE.SET_NAME('ONT','ONT_NEGATIVE_MODIFIERS');
9334: FND_MESSAGE.SET_TOKEN('LIST_LINE_NO',get_list_lines(p_req_line_tbl(i).line_id));
9335: OE_MSG_PUB.Add;
9336:
9331: FND_MESSAGE.SET_TOKEN('SELLING_PRICE',p_req_line_tbl(i).Adjusted_unit_price);
9332: OE_MSG_PUB.Add;
9333: FND_MESSAGE.SET_NAME('ONT','ONT_NEGATIVE_MODIFIERS');
9334: FND_MESSAGE.SET_TOKEN('LIST_LINE_NO',get_list_lines(p_req_line_tbl(i).line_id));
9335: OE_MSG_PUB.Add;
9336:
9337: RAISE FND_API.G_EXC_ERROR;
9338: elsif
9339: p_req_line_tbl(i).line_Type_code ='LINE' and
9342:
9343: FND_MESSAGE.SET_NAME('ONT','OE_PRICING_ERROR');
9344: FND_MESSAGE.SET_TOKEN('ERR_TEXT','( '||l_line_rec.Ordered_Item||' ) '||
9345: p_req_line_tbl(i).STATUS_TEXT);
9346: OE_MSG_PUB.Add;
9347:
9348: elsif
9349: ( p_req_line_tbl(i).line_Type_code ='LINE' and
9350: p_req_line_tbl(i).status_code in
9477:
9478: oe_debug_pub.add('Before Reset_fields');
9479: If l_invalid_line = 'Y' Then
9480: select oe_msg_request_id_s.nextval into l_request_id from dual;
9481: OE_MSG_PUB.INSERT_MESSAGE(OE_MSG_PUB.COUNT_MSG, l_request_id,'U');
9482: Reset_Fields(l_line_rec);
9483: l_invalid_line := 'N';
9484: End If;
9485:
9493: IF (p_req_line_tbl(i).hold_code = QP_PREQ_GRP.G_STATUS_LIMIT_HOLD) or
9494: p_req_line_tbl(i).hold_code = QP_PREQ_GRP.G_STATUS_LIMIT_ADJUSTED THEN
9495: IF (l_limit_hold_action = 'NO_HOLD') THEN
9496: FND_MESSAGE.SET_NAME('ONT','ONT_PROMO_LIMIT_EXCEEDED');
9497: OE_MSG_PUB.ADD;
9498: ELSE
9499: IF ( p_req_line_tbl(i).line_type_code = 'LINE' )
9500: Then
9501: -- adj_debug('PAL PROMOTIONS - putting entity on HOLD - line type code is ' || p_req_line_tbl(i).line_type_code);
9550: l_orig_sys_shipment_ref := null;
9551: END;
9552: END IF;
9553:
9554: OE_MSG_PUB.set_msg_context
9555: ( p_entity_code => 'LINE'
9556: ,p_entity_id => p_req_line_tbl(i).line_id
9557: ,p_header_id => p_req_line_tbl(i).header_id
9558: ,p_line_id => p_req_line_tbl(i).line_id
9764: Elsif to_char(l_line_tbl( p_req_line_detail_Tbl(j).line_index).Inventory_item_id ) <>
9765: p_req_line_detail_Tbl(j).RELATED_ITEM_ID Then
9766:
9767: FND_MESSAGE.SET_NAME('ONT','ONT_ITEM_UPGRADE_NOT_ALLOWED');
9768: OE_MSG_PUB.Add;
9769: adj_debug('Item Upgrade not allowed after booking...');
9770: l_line_adj_Tbl(l_Adj_Index).operation := fnd_api.g_miss_char;
9771:
9772: End If; -- Booked_Flag
9866: or (p_req_line_detail_Tbl(j).limit_code = QP_PREQ_GRP.G_STATUS_LIMIT_ADJUSTED ) )
9867: then
9868: -- adj_debug('PAL PROMOTIONS - G_STATUS_LIMIT_EXCEEDED or G_STATUS_LIMIT_ADJUSTED IN _Adj_pvt.process_adjustments',1);
9869: IF (p_req_line_tbl(p_req_line_detail_tbl(j).line_index).LINE_TYPE_CODE='ORDER') THEN
9870: OE_MSG_PUB.set_msg_context
9871: ( p_entity_code => 'HEADER'
9872: ,p_entity_id => p_header_rec.header_id--p_req_line_tbl(j).line_id
9873: ,p_header_id => p_header_rec.header_id
9874: ,p_line_id => NULL--p_req_line_tbl(j).line_id
9914: l_source_document_line_id := null;
9915: l_orig_sys_shipment_ref := null;
9916: END;
9917: END IF;
9918: OE_MSG_PUB.set_msg_context
9919: ( p_entity_code => 'LINE'
9920: ,p_entity_id => p_req_line_tbl(p_req_line_detail_tbl(j).line_index).LINE_ID
9921: ,p_header_id => p_header_rec.header_id
9922: ,p_line_id => p_req_line_tbl(p_req_line_detail_tbl(j).line_index).line_id
9931: END IF;
9932:
9933: FND_MESSAGE.SET_NAME('ONT','ONT_PROMO_LIMIT_EXCEEDED');
9934: FND_MESSAGE.SET_TOKEN('ERR_TEXT', p_req_line_detail_tbl(j).LIMIT_TEXT);
9935: OE_MSG_PUB.Add;
9936: IF (OE_GLOBALS.G_UI_FLAG ) THEN
9937: IF (G_REQUEST_ID IS NULL) THEN
9938: select oe_msg_request_id_s.nextval into g_request_id from dual;
9939: END IF;
9936: IF (OE_GLOBALS.G_UI_FLAG ) THEN
9937: IF (G_REQUEST_ID IS NULL) THEN
9938: select oe_msg_request_id_s.nextval into g_request_id from dual;
9939: END IF;
9940: OE_MSG_PUB.INSERT_MESSAGE(OE_MSG_PUB.COUNT_MSG, G_REQUEST_ID,'U');
9941: OE_MSG_PUB.DELETE_MSG(OE_MSG_PUB.COUNT_MSG);
9942: END IF;
9943:
9944: end if; --PROMOTIONS SEP/01 end
9937: IF (G_REQUEST_ID IS NULL) THEN
9938: select oe_msg_request_id_s.nextval into g_request_id from dual;
9939: END IF;
9940: OE_MSG_PUB.INSERT_MESSAGE(OE_MSG_PUB.COUNT_MSG, G_REQUEST_ID,'U');
9941: OE_MSG_PUB.DELETE_MSG(OE_MSG_PUB.COUNT_MSG);
9942: END IF;
9943:
9944: end if; --PROMOTIONS SEP/01 end
9945:
10236: else
10237: --bug 2412868 end
10238: FND_MESSAGE.SET_TOKEN('QUANTITY',l_line_tbl_final(l).Ordered_quantity);
10239: end if;
10240: OE_MSG_PUB.Add('N');
10241: OE_GLOBALS.G_CASCADING_REQUEST_LOGGED := TRUE;
10242: end if;
10243: -- end 2270949
10244:
10417: If l_Line_Tbl_Final(j).unit_selling_price IS NULL Then
10418: FND_MESSAGE.SET_NAME('ONT','OE_BOOK_REQD_LINE_ATTRIBUTE');
10419: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',
10420: OE_Order_UTIL.Get_Attribute_Name('UNIT_SELLING_PRICE'));
10421: OE_MSG_PUB.ADD;
10422: End If;
10423:
10424: If l_line_tbl_final(j).unit_list_price IS NULL Then
10425: FND_MESSAGE.SET_NAME('ONT','OE_BOOK_REQD_LINE_ATTRIBUTE');
10424: If l_line_tbl_final(j).unit_list_price IS NULL Then
10425: FND_MESSAGE.SET_NAME('ONT','OE_BOOK_REQD_LINE_ATTRIBUTE');
10426: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',
10427: OE_Order_UTIL.Get_Attribute_Name('UNIT_LIST_PRICE'));
10428: OE_MSG_PUB.ADD;
10429: End If;
10430:
10431: If l_line_tbl_final(j).price_list_id IS NULL Then
10432: FND_MESSAGE.SET_NAME('ONT','OE_BOOK_REQD_LINE_ATTRIBUTE');
10430:
10431: If l_line_tbl_final(j).price_list_id IS NULL Then
10432: FND_MESSAGE.SET_NAME('ONT','OE_BOOK_REQD_LINE_ATTRIBUTE');
10433: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','LIST PRICE');
10434: OE_MSG_PUB.ADD;
10435: End If;
10436:
10437: RAISE FND_API.G_EXC_ERROR;
10438: --
10755: --dbms_output.put_line('Error is '||sqlerrm);
10756: adj_debug('Error in oe_order_Adj_pvt.process_adjustments',1);
10757: adj_debug(' '||g_stmt_no||' '||sqlerrm,1);
10758:
10759: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
10760: THEN
10761: OE_MSG_PUB.Add_Exc_Msg
10762: ( G_PKG_NAME
10763: , 'oe_order_Adj_pvt.process_adjustments',
10757: adj_debug(' '||g_stmt_no||' '||sqlerrm,1);
10758:
10759: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
10760: THEN
10761: OE_MSG_PUB.Add_Exc_Msg
10762: ( G_PKG_NAME
10763: , 'oe_order_Adj_pvt.process_adjustments',
10764: g_stmt_no||' '||sqlerrm
10765: );
10854: l_header_id := p_header_id;
10855: Else
10856: if (px_line_tbl.count = 0 and (p_line_id is Null OR p_line_id = FND_API.G_MISS_NUM)) Then
10857:
10858: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_ERROR)
10859: THEN
10860:
10861: FND_MESSAGE.SET_NAME('ONT','OE_ATTRIBUTE_REQUIRED');
10862: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','line_id or Header Id ');
10859: THEN
10860:
10861: FND_MESSAGE.SET_NAME('ONT','OE_ATTRIBUTE_REQUIRED');
10862: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','line_id or Header Id ');
10863: OE_MSG_PUB.Add;
10864: END IF;
10865: RAISE FND_API.G_EXC_ERROR;
10866: elsif (px_line_Tbl.count = 0) Then
10867: OE_Line_Util.Query_Rows(p_line_id => p_line_id
11080: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
11081: adj_debug('Error in oe_order_Adj_pvt.Price_line',1);
11082: adj_debug(sqlerrm,1);
11083:
11084: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
11085: THEN
11086: OE_MSG_PUB.Add_Exc_Msg
11087: ( G_PKG_NAME
11088: , 'Price_line',
11082: adj_debug(sqlerrm,1);
11083:
11084: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
11085: THEN
11086: OE_MSG_PUB.Add_Exc_Msg
11087: ( G_PKG_NAME
11088: , 'Price_line',
11089: sqlerrm
11090: );
11817: END IF;
11818:
11819: --MOAC PI END
11820:
11821: OE_MSG_PUB.Count_And_Get
11822: ( p_count => x_msg_count
11823: , p_data => x_msg_data
11824: );
11825:
11837: EXCEPTION
11838:
11839: WHEN FND_API.G_EXC_ERROR THEN
11840: x_return_status := FND_API.G_RET_STS_ERROR;
11841: OE_MSG_PUB.Count_And_Get
11842: ( p_count => x_msg_count
11843: ,p_data => x_msg_data
11844: );
11845:
11844: );
11845:
11846: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
11847: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
11848: OE_MSG_PUB.Count_And_Get
11849: ( p_count => x_msg_count
11850: ,p_data => x_msg_data
11851: );
11852:
11852:
11853: WHEN OTHERS THEN
11854: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
11855: adj_debug(' '||sqlerrm,1);
11856: OE_MSG_PUB.Count_And_Get
11857: ( p_count => x_msg_count
11858: , p_data => x_msg_data
11859: );
11860:
12047: end loop; -- Headers
12048:
12049: End If;
12050:
12051: OE_MSG_PUB.Count_And_Get
12052: ( p_count => x_msg_count
12053: , p_data => x_msg_data
12054: );
12055:
12067: EXCEPTION
12068:
12069: WHEN FND_API.G_EXC_ERROR THEN
12070: x_return_status := FND_API.G_RET_STS_ERROR;
12071: OE_MSG_PUB.Count_And_Get
12072: ( p_count => x_msg_count
12073: ,p_data => x_msg_data
12074: );
12075:
12074: );
12075:
12076: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
12077: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
12078: OE_MSG_PUB.Count_And_Get
12079: ( p_count => x_msg_count
12080: ,p_data => x_msg_data
12081: );
12082:
12082:
12083: WHEN OTHERS THEN
12084: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
12085: adj_debug(' '||sqlerrm,1);
12086: OE_MSG_PUB.Count_And_Get
12087: ( p_count => x_msg_count
12088: , p_data => x_msg_data
12089: );
12090:
13156: WHEN FND_API.G_EXC_ERROR THEN
13157:
13158: FND_MESSAGE.SET_NAME('ONT','OE_PRICING_ERROR');
13159: FND_MESSAGE.SET_TOKEN('ERR_TEXT',l_return_status_Text);
13160: OE_MSG_PUB.Add;
13161: x_return_status := FND_API.G_RET_STS_ERROR;
13162:
13163: Oe_Debug_Pub.add('g_exc_error is '||g_stmt_no||' '||sqlerrm,1);
13164: Oe_Debug_Pub.add('g_exc_error is '||l_return_status_Text);
13168: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
13169:
13170: FND_MESSAGE.SET_NAME('ONT','OE_PRICING_ERROR');
13171: FND_MESSAGE.SET_TOKEN('ERR_TEXT',l_return_status_Text);
13172: OE_MSG_PUB.Add;
13173: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
13174: Oe_Debug_Pub.add('G_EXC_UNEXPECTED_ERROR is '||g_stmt_no||' '||sqlerrm,1);
13175: Oe_Debug_Pub.add('G_EXC_UNEXPECTED_ERROR is '||l_return_status_Text);
13176: --DBMS_OUTPUT.PUT_LINE('G_EXC_UNEXPECTED_ERROR is '||l_return_status_Text);
13177: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
13178: WHEN QP_ATTR_MAPPING_ERRORS Then
13179: FND_MESSAGE.SET_NAME('ONT','OE_PRICING_ERROR');
13180: FND_MESSAGE.SET_TOKEN('ERR_TEXT','Errors return from QP_Attr_Mapping_PUB.Build_Context');
13181: OE_MSG_PUB.Add;
13182: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
13183: Oe_Debug_Pub.add('G_EXC_UNEXPECTED_ERROR is: QP_Attr_Mapping_PUB.Build_Context'||sqlerrm,1);
13184: Oe_Debug_Pub.add('G_EXC_UNEXPECTED_ERROR is '||l_return_status_Text);
13185: Oe_Debug_Pub.add('QP_ATTR_MAPPING_ERRORS');
13189: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
13190: Oe_Debug_Pub.add('Error is '||sqlerrm);
13191: Oe_Debug_Pub.add('Error Code is '||g_stmt_no||' '||sqlerrm,1);
13192:
13193: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
13194: THEN
13195: OE_MSG_PUB.Add_Exc_Msg
13196: ( G_PKG_NAME
13197: , 'oe_line_adj.calulate_adjustments',
13191: Oe_Debug_Pub.add('Error Code is '||g_stmt_no||' '||sqlerrm,1);
13192:
13193: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
13194: THEN
13195: OE_MSG_PUB.Add_Exc_Msg
13196: ( G_PKG_NAME
13197: , 'oe_line_adj.calulate_adjustments',
13198: g_stmt_no||' '||sqlerrm
13199: );
13278: FND_MESSAGE.SET_NAME('ONT','ONT_PROMO_HOLD_APPLIED');
13279: ELSE
13280: FND_MESSAGE.SET_NAME('ONT', 'ONT_LINE_PROMO_HOLD_APPLIED');
13281: END IF;
13282: OE_MSG_PUB.Add;
13283: Else
13284: adj_debug('error applying hold',3);
13285: RAISE FND_API.G_EXC_ERROR;
13286: End If;