[Home] [Help]
63: x_return_status := FND_API.G_RET_STS_ERROR;
64: FND_MESSAGE.SET_NAME('ONT','OE_BOOK_REQD_LINE_ATTRIBUTE');
65: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',
66: OE_Order_UTIL.Get_Attribute_Name('SOLD_TO_ORG_ID'));
67: OE_BULK_MSG_PUB.ADD;
68: END IF;
69:
70: IF p_line_rec.invoice_to_org_id(p_index) IS NULL THEN
71: x_return_status := FND_API.G_RET_STS_ERROR;
71: x_return_status := FND_API.G_RET_STS_ERROR;
72: FND_MESSAGE.SET_NAME('ONT','OE_BOOK_REQD_LINE_ATTRIBUTE');
73: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',
74: OE_Order_UTIL.Get_Attribute_Name('INVOICE_TO_ORG_ID'));
75: OE_BULK_MSG_PUB.ADD;
76: END IF;
77:
78: IF p_line_rec.tax_exempt_flag(p_index) IS NULL THEN
79: x_return_status := FND_API.G_RET_STS_ERROR;
79: x_return_status := FND_API.G_RET_STS_ERROR;
80: FND_MESSAGE.SET_NAME('ONT','OE_BOOK_REQD_LINE_ATTRIBUTE');
81: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',
82: OE_Order_UTIL.Get_Attribute_Name('TAX_EXEMPT_FLAG'));
83: OE_BULK_MSG_PUB.ADD;
84: END IF;
85:
86: -- Quantity and UOM Required
87:
89: x_return_status := FND_API.G_RET_STS_ERROR;
90: FND_MESSAGE.SET_NAME('ONT','OE_BOOK_REQD_LINE_ATTRIBUTE');
91: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',
92: OE_Order_UTIL.Get_Attribute_Name('ORDER_QUANTITY_UOM'));
93: OE_BULK_MSG_PUB.ADD;
94: END IF;
95:
96: -- Fix bug 1277092: ordered quantity should not be = 0 on a booked line
97: IF p_line_rec.ordered_quantity(p_index) IS NULL
99: x_return_status := FND_API.G_RET_STS_ERROR;
100: FND_MESSAGE.SET_NAME('ONT','OE_BOOK_REQD_LINE_ATTRIBUTE');
101: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',
102: OE_Order_UTIL.Get_Attribute_Name('ORDERED_QUANTITY'));
103: OE_BULK_MSG_PUB.ADD;
104: END IF;
105:
106: -- Fix bug 1262790
107: -- Ship To and Payment Term required on ORDER lines,
114: x_return_status := FND_API.G_RET_STS_ERROR;
115: FND_MESSAGE.SET_NAME('ONT','OE_BOOK_REQD_LINE_ATTRIBUTE');
116: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',
117: OE_Order_UTIL.Get_Attribute_Name('SHIP_TO_ORG_ID'));
118: OE_BULK_MSG_PUB.ADD;
119: END IF;
120:
121: IF p_line_rec.payment_term_id(p_index) IS NULL THEN
122: x_return_status := FND_API.G_RET_STS_ERROR;
122: x_return_status := FND_API.G_RET_STS_ERROR;
123: FND_MESSAGE.SET_NAME('ONT','OE_BOOK_REQD_LINE_ATTRIBUTE');
124: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',
125: OE_Order_UTIL.Get_Attribute_Name('PAYMENT_TERM_ID'));
126: OE_BULK_MSG_PUB.ADD;
127: END IF;
128: --serla
129: IF OE_CODE_CONTROL.Get_Code_Release_Level >= '110509' THEN
130: IF p_line_rec.item_type_code(p_index) <> 'SERVICE' THEN
145: x_return_status := FND_API.G_RET_STS_ERROR;
146: FND_MESSAGE.SET_NAME('ONT','OE_BOOK_REQD_LINE_ATTRIBUTE');
147: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',
148: OE_Order_UTIL.Get_Attribute_Name('ACCOUNTING_RULE_DURATION'));
149: OE_BULK_MSG_PUB.ADD;
150: END IF; -- end of accounting_rule_duration null
151: END IF; -- end of variable accounting rule type
152: END IF; -- end of accounting_rule_id not null
153: END IF; -- end of non-service line
164: x_return_status := FND_API.G_RET_STS_ERROR;
165: FND_MESSAGE.SET_NAME('ONT','OE_BOOK_REQD_LINE_ATTRIBUTE');
166: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',
167: OE_Order_UTIL.Get_Attribute_Name('TAX_DATE'));
168: OE_BULK_MSG_PUB.ADD;
169: END IF;
170: */
171: -- Tax field checks not required, as checks would prevent orders from
172: -- being entered where transaction is taxable and tax calculation
183: x_return_status := FND_API.G_RET_STS_ERROR;
184: FND_MESSAGE.SET_NAME('ONT','OE_BOOK_REQD_LINE_ATTRIBUTE');
185: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',
186: OE_Order_UTIL.Get_Attribute_Name('PRICE_LIST_ID'));
187: OE_BULK_MSG_PUB.ADD;
188: END IF;
189:
190: END IF;
191:
200: WHEN OTHERS THEN
201: oe_debug_pub.add('Others Error, Line.Check_Book_Reqd_Attributes');
202: oe_debug_pub.add(substr(sqlerrm,1,240));
203: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
204: IF OE_BULK_MSG_PUB.Check_Msg_Level(OE_BULK_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
205: THEN
206: OE_BULK_MSG_PUB.Add_Exc_Msg
207: ( G_PKG_NAME
208: , 'Check_Book_Reqd_Attributes'
202: oe_debug_pub.add(substr(sqlerrm,1,240));
203: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
204: IF OE_BULK_MSG_PUB.Check_Msg_Level(OE_BULK_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
205: THEN
206: OE_BULK_MSG_PUB.Add_Exc_Msg
207: ( G_PKG_NAME
208: , 'Check_Book_Reqd_Attributes'
209: );
210: END IF;
231: -- Check for Required Scheduling Attributes
232:
233: IF p_line_rec.ordered_quantity(p_index) IS NULL THEN
234: FND_MESSAGE.SET_NAME('ONT','OE_SCH_MISSING_QUANTITY');
235: OE_BULK_MSG_PUB.Add;
236: x_return_status := FND_API.G_RET_STS_ERROR;
237: END IF;
238:
239: -- If the quantity on the line is zero(which is different from
241: -- it is an error
242:
243: IF p_line_rec.ordered_quantity(p_index) = 0 THEN
244: FND_MESSAGE.SET_NAME('ONT','OE_SCH_ZERO_QTY');
245: OE_BULK_MSG_PUB.Add;
246: x_return_status := FND_API.G_RET_STS_ERROR;
247: END IF;
248:
249: -- No need to check for following statuses: cancelled, shipped, reserved
254: -- it is an error
255:
256: IF p_line_rec.order_quantity_uom(p_index) IS NULL THEN
257: FND_MESSAGE.SET_NAME('ONT','OE_SCH_MISSING_UOM');
258: OE_BULK_MSG_PUB.Add;
259: x_return_status := FND_API.G_RET_STS_ERROR;
260: END IF;
261:
262: -- Item check not required as it is already validated for creation.
266: -- it is an error
267:
268: IF p_line_rec.request_date(p_index) IS NULL THEN
269: FND_MESSAGE.SET_NAME('ONT','OE_SCH_MISSING_REQUEST_DATE');
270: OE_BULK_MSG_PUB.Add;
271: x_return_status := FND_API.G_RET_STS_ERROR;
272: END IF;
273:
274: -- No need to check if line belongs to a set: SETs not supported in BULK mode
293:
294: FND_MESSAGE.SET_NAME('ONT', 'OE_SCH_INACTIVE_STD_ONLY');
295: FND_MESSAGE.SET_TOKEN('LTYPE',
296: nvl(Oe_Schedule_Util.sch_cached_line_type ,'0'));
297: OE_BULK_MSG_PUB.Add;
298:
299: IF l_debug_level > 0 THEN
300: oe_debug_pub.add( 'OE_SCH_INACTIVE_STD_ONLY' , 1 ) ;
301: END IF;
313: IF MSC_ATP_GLOBAL.GET_APS_VERSION <> 10 AND
314: p_line_rec.ship_from_org_id(p_index) is NULL
315: THEN
316: FND_MESSAGE.SET_NAME('ONT','OE_SCH_ATO_WHSE_REQD');
317: OE_BULK_MSG_PUB.Add;
318: IF l_debug_level > 0 THEN
319: oe_debug_pub.add( 'OE_SCH_ATO_WHSE_REQD' , 1 ) ;
320: END IF;
321: x_return_status := FND_API.G_RET_STS_ERROR;
553: IF l_debug_level > 0 THEN
554: oe_debug_pub.add( 'ERROR IN GETTING CCID' ) ;
555: END IF;
556: failure_message := fnd_flex_ext.get_message;
557: OE_BULK_MSG_PUB.Add_TEXT(failure_message);
558: RAISE FND_API.G_EXC_ERROR;
559: IF l_debug_level > 0 THEN
560: oe_debug_pub.add( 'FAILURE MESSAGE = ' || SUBSTR ( FAILURE_MESSAGE , 1 , 50 ) ) ;
561: END IF;
614: IF l_debug_level > 0 THEN
615: oe_debug_pub.add( 'SOLD TO ORG ID IS MISSING , CAN NOT GET CUST ITEM' ) ;
616: END IF;
617: FND_MESSAGE.SET_NAME('ONT','OE_INVALID_CUSTOMER_ID');
618: OE_BULK_MSG_PUB.Add;
619: RAISE FND_API.G_EXC_ERROR;
620: END IF;
621:
622: INV_CUSTOMER_ITEM_GRP.CI_Attribute_Value(
639: END IF;
640: FND_MESSAGE.SET_NAME('ONT','OE_INV_CUS_ITEM');
641: FND_MESSAGE.SET_TOKEN('ERROR_CODE', l_error_code);
642: FND_MESSAGE.SET_TOKEN('ERROR_MESSAGE', l_error_message);
643: OE_BULK_MSG_PUB.Add;
644: END IF;
645:
646: INV_CUSTOMER_ITEM_GRP.CI_Attribute_Value(
647: Z_Customer_Item_Id => p_line_rec.ordered_item_id(p_index)
663: END IF;
664: FND_MESSAGE.SET_NAME('ONT','OE_INV_CUS_ITEM');
665: FND_MESSAGE.SET_TOKEN('ERROR_CODE', l_error_code);
666: FND_MESSAGE.SET_TOKEN('ERROR_MESSAGE', l_error_message);
667: OE_BULK_MSG_PUB.Add;
668: END IF;
669:
670: IF l_inventory_item_id_int <> l_inventory_item_id_cust THEN
671: IF l_debug_level > 0 THEN
673: END IF;
674: FND_MESSAGE.SET_NAME('ONT','OE_INV_INT_CUS_ITEM_ID');
675: FND_MESSAGE.SET_TOKEN('INVENTORY_ITEM_ID',l_inventory_item_id_int);
676: FND_MESSAGE.SET_TOKEN('CUST_ITEM_ID',l_inventory_item_id_cust);
677: OE_BULK_MSG_PUB.Add;
678: ELSIF l_inventory_item_id_int IS NOT NULL
679: THEN
680: p_line_rec.inventory_item_id(p_index):= l_inventory_item_id_int;
681: ELSIF l_inventory_item_id_cust IS NOT NULL
711: oe_debug_pub.add( 'TOO MANY ROWS ERROR: '||SQLERRM ) ;
712: END IF;
713: FND_MESSAGE.SET_NAME('ONT','OE_NOT_UNIQUE_ITEM');
714: FND_MESSAGE.SET_TOKEN('GENERIC_ITEM', p_line_rec.ordered_item(p_index));
715: OE_BULK_MSG_PUB.Add;
716: END;
717:
718: IF l_inventory_item_Id_int <> l_inventory_item_id_gen
719: THEN
722: END IF;
723: FND_MESSAGE.SET_NAME('ONT','OE_INV_INT_CUS_ITEM_ID');
724: FND_MESSAGE.SET_TOKEN('INVENTORY_ITEM_ID', l_inventory_item_id_int);
725: FND_MESSAGE.SET_TOKEN('CUST_ITEM_ID', l_inventory_item_id_gen);
726: OE_BULK_MSG_PUB.Add;
727: p_line_rec.inventory_item_id(p_index):= l_inventory_item_id_gen;
728: ELSIF l_inventory_item_id_int IS NOT NULL
729: THEN
730: p_line_rec.inventory_item_id(p_index):= l_inventory_item_id_int;
747: END IF;
748: IF l_debug_level > 0 THEN
749: oe_debug_pub.add( SUBSTR ( SQLERRM , 1 , 240 ) ) ;
750: END IF;
751: IF OE_BULK_MSG_PUB.Check_Msg_Level(OE_BULK_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
752: THEN
753: OE_BULK_MSG_PUB.Add_Exc_Msg
754: ( G_PKG_NAME
755: , 'Get_Item_Info'
749: oe_debug_pub.add( SUBSTR ( SQLERRM , 1 , 240 ) ) ;
750: END IF;
751: IF OE_BULK_MSG_PUB.Check_Msg_Level(OE_BULK_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
752: THEN
753: OE_BULK_MSG_PUB.Add_Exc_Msg
754: ( G_PKG_NAME
755: , 'Get_Item_Info'
756: );
757: END IF;
783: AND secondary_inventory_name = p_subinventory;
784: EXCEPTION
785: WHEN OTHERS THEN
786: fnd_message.set_name('ONT','OE_SUBINV_INVALID');
787: OE_BULK_MSG_PUB.Add;
788: RETURN FALSE;
789: END;
790:
791: END IF;
796:
797: fnd_message.set_name('ONT', 'OE_ATTRIBUTE_REQUIRED');
798: fnd_message.set_token('ATTRIBUTE'
799: ,OE_Order_UTIL.Get_Attribute_Name('SHIP_FROM_ORG_ID'));
800: OE_BULK_MSG_PUB.Add;
801: RETURN FALSE;
802:
803: ELSE
804:
842: );
843: EXCEPTION
844: WHEN OTHERS THEN
845: fnd_message.set_name('ONT', 'OE_SUBINV_NON_ASSET');
846: OE_BULK_MSG_PUB.ADD;
847: RETURN FALSE;
848: END;
849:
850: END IF; -- end if ship from is null
1002: IF nvl(p_input_quantity, 0) < 0 -- Process HVOP added check for negative as was missing -NB take out when support for RMAs needed
1003:
1004: THEN
1005: FND_MESSAGE.SET_NAME('ONT', 'SO_PR_NEGATIVE_AMOUNT');
1006: OE_BULK_MSG_PUB.Add('Y','ERROR');
1007: x_return_status := -99;
1008: IF l_debug_level > 0 THEN
1009: oe_debug_pub.add ('Validate decimal quantity - quantity negative so error ', 3);
1010: END IF;
1023: IF l_debug_level > 0 THEN
1024: oe_debug_pub.add( 'ITEM IS CONFIG RELATED WITH DECIMAL QTY' , 2 ) ;
1025: END IF;
1026: FND_MESSAGE.SET_NAME('ONT', 'OE_CONFIG_NO_DECIMALS');
1027: OE_BULK_MSG_PUB.Add('Y','ERROR');
1028: x_return_status := -99;
1029:
1030: ELSE
1031:
1051: IF l_qty_return_status = 'W' THEN
1052: fnd_message.set_name('ONT', 'OE_DECIMAL_MAX_PRECISION');
1053: END IF;
1054: --move INV error message to OE message stack
1055: OE_BULK_MSG_PUB.Add('Y','ERROR');
1056: x_return_status := -99;
1057: END IF;
1058:
1059: END IF; -- config related item type
1240: --
1241: BEGIN
1242: IF LENGTHB(p_user_item_description) > 240 THEN
1243: fnd_message.set_name('ONT','ONT_USER_ITEM_DESC_TOO_LONG');
1244: OE_BULK_MSG_PUB.ADD;
1245: IF l_debug_level > 0 THEN
1246: oe_debug_pub.add( 'THE LENGTH OF USER_ITEM_DESCRIPTION SHOULD NOT EXCEED 240 CHARA CTERS FOR DROP SHIP LINES.' , 3 ) ;
1247: END IF;
1248: RETURN FALSE;
1316: IF l_debug_level > 0 THEN
1317: oe_debug_pub.add( 'OTHERS ERROR , LINE.UNBOOK_ORDER' ) ;
1318: oe_debug_pub.add( SUBSTR ( SQLERRM , 1 , 240 ) ) ;
1319: END IF;
1320: IF OE_BULK_MSG_PUB.Check_Msg_Level(OE_BULK_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1321: THEN
1322: OE_BULK_MSG_PUB.Add_Exc_Msg
1323: ( G_PKG_NAME
1324: , 'Unbook_Order'
1318: oe_debug_pub.add( SUBSTR ( SQLERRM , 1 , 240 ) ) ;
1319: END IF;
1320: IF OE_BULK_MSG_PUB.Check_Msg_Level(OE_BULK_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1321: THEN
1322: OE_BULK_MSG_PUB.Add_Exc_Msg
1323: ( G_PKG_NAME
1324: , 'Unbook_Order'
1325: );
1326: END IF;
1560: IF l_debug_level > 0 THEN
1561: oe_debug_pub.add( 'OTHERS ERROR , LINE.DEFAULT_RECORD' ) ;
1562: oe_debug_pub.add( SUBSTR ( SQLERRM , 1 , 240 ) ) ;
1563: END IF;
1564: IF OE_BULK_MSG_PUB.Check_Msg_Level(OE_BULK_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1565: THEN
1566: OE_BULK_MSG_PUB.Add_Exc_Msg
1567: ( G_PKG_NAME
1568: , 'Default_Record'
1562: oe_debug_pub.add( SUBSTR ( SQLERRM , 1 , 240 ) ) ;
1563: END IF;
1564: IF OE_BULK_MSG_PUB.Check_Msg_Level(OE_BULK_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1565: THEN
1566: OE_BULK_MSG_PUB.Add_Exc_Msg
1567: ( G_PKG_NAME
1568: , 'Default_Record'
1569: );
1570: END IF;
1625: ELSIF p_line_rec.invoice_to_org_id(p_index) <>
1626: OE_Bulk_Order_PVT.g_header_rec.invoice_to_org_id(p_header_index)
1627: THEN
1628: FND_MESSAGE.SET_NAME('ONT','OE_BULK_DIFF_INVOICE_TO');
1629: OE_BULK_MSG_PUB.Add('Y', 'ERROR');
1630: x_return_status := FND_API.G_RET_STS_ERROR;
1631: END IF;
1632:
1633:
1748: AND OE_BULK_CACHE.G_ITEM_TBL(l_c_index).service_item_flag = 'Y')
1749: THEN -- Service item type
1750: oe_debug_pub.add( 'Populate_Internal_Fields ab' ) ;
1751: FND_MESSAGE.SET_NAME('ONT','OE_BULK_NOT_SUPP_ITEM_TYPE');
1752: OE_BULK_MSG_PUB.Add('Y', 'ERROR');
1753: x_return_status := FND_API.G_RET_STS_ERROR;
1754: x_unsupported_feature := 'Y';
1755: p_line_rec.lock_control(p_index) := -98;
1756: ELSE
1883: OR (OE_BULK_CACHE.G_ITEM_TBL(l_c_index).replenish_to_order_flag = 'Y')
1884: THEN
1885: oe_debug_pub.add( 'Populate_Internal_Fields 4a' ) ;
1886: FND_MESSAGE.SET_NAME('ONT','OE_BULK_NOT_SUPP_ITEM_TYPE');
1887: OE_BULK_MSG_PUB.Add('Y', 'ERROR');
1888: x_return_status := FND_API.G_RET_STS_ERROR;
1889: x_unsupported_feature := 'Y';
1890: p_line_rec.lock_control(p_index) := -98;
1891:
1960: oe_debug_pub.add( 'error in calculate_dual_quantity 2 ' ) ;
1961: END IF;
1962:
1963: FND_MESSAGE.SET_NAME('ONT','OE_BULK_OPM_DUAL_QTY_ERROR'); -- HVOP define better OM or GMI error code
1964: OE_BULK_MSG_PUB.Add('Y', 'ERROR');
1965: x_return_status := FND_API.G_RET_STS_ERROR;
1966: END IF;
1967: oe_debug_pub.add( 'Populate_Internal_Fields 6' ) ;
1968: IF l_debug_level > 0 THEN
1992: IF OE_BULK_CACHE.G_LINE_TYPE_TBL(l_c_index).order_category_code
1993: <> 'ORDER'
1994: THEN
1995: FND_MESSAGE.SET_NAME('ONT','OE_BULK_NOT_SUPP_RETURN');
1996: OE_BULK_MSG_PUB.Add('Y', 'ERROR');
1997: x_return_status := FND_API.G_RET_STS_ERROR;
1998: ELSE
1999: p_line_rec.line_category_code(p_index) := 'ORDER';
2000: END IF;
2017: OR (OE_BULK_CACHE.G_ORDER_TYPE_TBL(l_d_index).tax_calculation_event IS NULL))
2018: AND NVL(p_process_tax,'N') <> 'Y'
2019: THEN
2020: FND_MESSAGE.SET_NAME('ONT','OE_BULK_NOT_SUPP_TAX_CAL');
2021: OE_BULK_MSG_PUB.Add('Y', 'ERROR');
2022: x_return_status := FND_API.G_RET_STS_ERROR;
2023: END IF;
2024: */
2025:
2034: p_line_rec.lock_control(p_index) := -99 ;
2035: fnd_message.set_name('ONT','OE_INVALID_ATTRIBUTE');
2036: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',
2037: OE_Order_UTIL.Get_Attribute_Name('LINE_TYPE_ID'));
2038: OE_BULK_MSG_PUB.Add('Y','ERROR');
2039: -- fix bug 5109227
2040:
2041: IF l_debug_level > 0 THEN
2042: oe_debug_pub.add( 'NO_DATA_FOUND in LOAD_LINE_TYPE' ) ;
2099: oe_debug_pub.add( 'OTHERS ERROR , LINE.POPULATE_INTERNAL_FIELDS' ) ;
2100: oe_debug_pub.add( SUBSTR ( SQLERRM , 1 , 240 ) ) ;
2101: END IF;
2102: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2103: IF OE_BULK_MSG_PUB.Check_Msg_Level(OE_BULK_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2104: THEN
2105: OE_BULK_MSG_PUB.Add_Exc_Msg
2106: ( G_PKG_NAME
2107: , 'Populate_Internal_Fields'
2101: END IF;
2102: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2103: IF OE_BULK_MSG_PUB.Check_Msg_Level(OE_BULK_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2104: THEN
2105: OE_BULK_MSG_PUB.Add_Exc_Msg
2106: ( G_PKG_NAME
2107: , 'Populate_Internal_Fields'
2108: );
2109: END IF;
2159: FND_MESSAGE.SET_NAME('ONT','OE_OI_PRICE_WARNING');
2160: FND_MESSAGE.SET_TOKEN('CUST_PRICE'
2161: ,p_line_rec.customer_item_net_price(p_line_index));
2162: FND_MESSAGE.SET_TOKEN('SPLR_PRICE',l_unit_selling_price);
2163: OE_BULK_MSG_PUB.Add;
2164:
2165: END IF;
2166:
2167: IF nvl(p_line_rec.customer_payment_term_id(p_line_index)
2172: FND_MESSAGE.SET_NAME('ONT','OE_OI_PAYMENT_TERM_WARNING');
2173: FND_MESSAGE.SET_TOKEN('CUST_TERM'
2174: ,p_line_rec.customer_payment_term_id(p_line_index));
2175: FND_MESSAGE.SET_TOKEN('SPLR_TERM',l_payment_term_id);
2176: OE_BULK_MSG_PUB.Add;
2177:
2178: END IF;
2179:
2180: END IF;
2189: IF l_debug_level > 0 THEN
2190: oe_debug_pub.add( 'OTHERS ERROR , LINE.POST_PROCESS' ) ;
2191: oe_debug_pub.add( SUBSTR ( SQLERRM , 1 , 240 ) ) ;
2192: END IF;
2193: IF OE_BULK_MSG_PUB.Check_Msg_Level(OE_BULK_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2194: THEN
2195: OE_BULK_MSG_PUB.Add_Exc_Msg
2196: ( G_PKG_NAME
2197: , 'Post_Process'
2191: oe_debug_pub.add( SUBSTR ( SQLERRM , 1 , 240 ) ) ;
2192: END IF;
2193: IF OE_BULK_MSG_PUB.Check_Msg_Level(OE_BULK_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2194: THEN
2195: OE_BULK_MSG_PUB.Add_Exc_Msg
2196: ( G_PKG_NAME
2197: , 'Post_Process'
2198: );
2199: END IF;
2304: END IF;
2305: FOR l_index IN 1..l_line_count LOOP
2306:
2307: -- Set the message context for errors.
2308: oe_bulk_msg_pub.set_msg_context
2309: ( p_entity_code => 'LINE'
2310: ,p_entity_id => p_line_rec.line_id(l_index)
2311: ,p_header_id => p_line_rec.header_id(l_index)
2312: ,p_line_id => p_line_rec.line_id(l_index)
2376: FND_MESSAGE.SET_NAME('ONT','OE_OI_DUPLICATE_REF');
2377: FND_MESSAGE.SET_TOKEN('DUPLICATE_REF'
2378: ,'orig_sys_line_ref');
2379: p_line_rec.lock_control(l_index) := -99;
2380: OE_BULK_MSG_PUB.Add;
2381: END IF;
2382: ELSIF OE_Bulk_Order_PVT.G_IMPORT_SHIPMENTS = 'YES' THEN
2383: IF (p_line_rec.orig_sys_line_ref(l_last_line_index)
2384: = p_line_rec.orig_sys_line_ref(l_index))
2388: FND_MESSAGE.SET_NAME('ONT','OE_OI_DUPLICATE_REF');
2389: FND_MESSAGE.SET_TOKEN('DUPLICATE_REF'
2390: ,'orig_sys_line_ref and orig_sys_shipment_ref');
2391: p_line_rec.lock_control(l_index) := -99;
2392: OE_BULK_MSG_PUB.Add;
2393: END IF;
2394: END IF;
2395:
2396: END IF;
2491:
2492: fnd_message.set_name('ONT','OE_ATTRIBUTE_REQUIRED');
2493: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',
2494: OE_Order_UTIL.Get_Attribute_Name('INVENTORY_ITEM_ID'));
2495: OE_BULK_MSG_PUB.Add('Y','ERROR');
2496: p_line_rec.lock_control(l_index) := -99;
2497:
2498: -- To avoid Insert failure, populate not null column.
2499: -- This record will be deleted later.
2509:
2510: fnd_message.set_name('ONT','OE_ATTRIBUTE_REQUIRED');
2511: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',
2512: OE_Order_UTIL.Get_Attribute_Name('LINE_TYPE_ID'));
2513: OE_BULK_MSG_PUB.Add('Y','ERROR');
2514: p_line_rec.lock_control(l_index) := -99;
2515: IF l_debug_level > 0 THEN
2516: oe_debug_pub.add( 'IN ERROR 2 ' ) ;
2517: END IF;
2535: p_line_rec.lock_control(l_index) := -99 ;
2536: fnd_message.set_name('ONT','OE_INVALID_ATTRIBUTE');
2537: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',
2538: OE_Order_UTIL.Get_Attribute_Name('LINE_TYPE_ID'));
2539: OE_BULK_MSG_PUB.Add('Y','ERROR');
2540:
2541: ELSE
2542:
2543: -- Validate that Order/Line Type has valid WF assignment
2559: p_line_rec.lock_control(l_index) := -99 ;
2560: fnd_message.set_name('ONT','OE_INVALID_ATTRIBUTE');
2561: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',
2562: OE_Order_UTIL.Get_Attribute_Name('LINE_TYPE_ID'));
2563: OE_BULK_MSG_PUB.Add('Y','ERROR');
2564: ELSE
2565: p_line_rec.wf_process_name(l_index) := l_process_name;
2566: END IF;
2567:
2580: IF (p_line_rec.tax_exempt_reason_code(l_index) IS NULL) THEN
2581: p_line_rec.lock_control(l_index) := -99;
2582: fnd_message.set_name('ONT','OE_ATTRIBUTE_REQUIRED');
2583: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','Tax Exempt Reason');
2584: OE_BULK_MSG_PUB.Add('Y','ERROR');
2585:
2586: ELSIF NOT OE_BULK_PROCESS_HEADER.Valid_Tax_Exempt_Reason
2587: (p_line_rec.tax_exempt_reason_code(l_index)) THEN
2588:
2589: p_line_rec.lock_control(l_index) := -99;
2590: FND_MESSAGE.SET_NAME('ONT','OE_INVALID_ATTRIBUTE');
2591: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',
2592: OE_Order_UTIL.Get_Attribute_Name('TAX_EXEMPT_REASON_CODE'));
2593: OE_BULK_MSG_PUB.Add('Y','ERROR');
2594:
2595: END IF;
2596:
2597: END IF;
2605: IF l_debug_level > 0 THEN
2606: oe_debug_pub.add( 'IN ERROR 6 ' ) ;
2607: END IF;
2608: fnd_message.set_name('ONT','OE_TAX_EXEMPTION_NOT_ALLOWED');
2609: OE_BULK_MSG_PUB.Add('Y','ERROR');
2610: END IF;
2611:
2612: END IF;
2613:
2656: IF l_debug_level > 0 THEN
2657: oe_debug_pub.add( 'IN ERROR 7 ' ) ;
2658: END IF;
2659: FND_MESSAGE.SET_NAME('ONT', 'OE_INVALID_ITEM_WHSE');
2660: OE_BULK_MSG_PUB.add('Y','ERROR');
2661: END IF;
2662:
2663: END IF;
2664:
2688:
2689: IF l_count = 0 THEN
2690: p_line_rec.shipping_method_code(l_index) := NULL;
2691:
2692: OE_BULK_MSG_PUB.Update_Msg_Context(p_attribute_code => 'SHIPPING_METHOD');
2693: fnd_message.set_name('ONT','OE_INVALID_ATTRIBUTE');
2694: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',
2695: OE_Order_UTIL.Get_Attribute_Name('SHIPPING_METHOD_CODE'));
2696: OE_BULK_MSG_PUB.Add;
2692: OE_BULK_MSG_PUB.Update_Msg_Context(p_attribute_code => 'SHIPPING_METHOD');
2693: fnd_message.set_name('ONT','OE_INVALID_ATTRIBUTE');
2694: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',
2695: OE_Order_UTIL.Get_Attribute_Name('SHIPPING_METHOD_CODE'));
2696: OE_BULK_MSG_PUB.Add;
2697: OE_BULK_MSG_PUB.Update_Msg_Context(p_attribute_code => null);
2698: END IF;
2699:
2700: END IF;
2693: fnd_message.set_name('ONT','OE_INVALID_ATTRIBUTE');
2694: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',
2695: OE_Order_UTIL.Get_Attribute_Name('SHIPPING_METHOD_CODE'));
2696: OE_BULK_MSG_PUB.Add;
2697: OE_BULK_MSG_PUB.Update_Msg_Context(p_attribute_code => null);
2698: END IF;
2699:
2700: END IF;
2701:
2719: IF l_debug_level > 0 THEN
2720: oe_debug_pub.add( 'error 1 ' ) ;
2721: END IF;
2722: fnd_message.set_name('ONT','OE_BULK_OPM_NOT_PROCESS');
2723: OE_BULK_MSG_PUB.Add('Y','ERROR');
2724: END IF;
2725:
2726: END IF; */
2727:
2748: IF l_debug_level > 0 THEN
2749: oe_debug_pub.add( 'error 2 ' ) ;
2750: END IF;
2751: fnd_message.set_name('ONT','OE_BULK_OPM_NOT_PROCESS');
2752: OE_BULK_MSG_PUB.Add('Y','ERROR');
2753: END IF;
2754: END IF; -- OE_BULK_CACHE.G_ITEM_TBL(l_c_index).opm_item_id IS NULL THEN
2755:
2756: END IF; -- p_line_rec.inventory_item_id(p_index) IS NOT NULL THEN
2802:
2803: fnd_message.set_name('ONT','OE_INVALID_ORDER_QUANTITY_UOM');
2804: fnd_message.set_token('ITEM',p_line_rec.ordered_item(l_index) );
2805: fnd_message.set_token('UOM', l_uom);
2806: OE_BULK_MSG_PUB.Add('Y','ERROR');
2807: --RAISE FND_API.G_EXC_ERROR;
2808: END IF;
2809: EXCEPTION
2810: when no_data_found then
2814: p_line_rec.lock_control(l_index) := -99;
2815: fnd_message.set_name('ONT','OE_INVALID_ORDER_QUANTITY_UOM');
2816: fnd_message.set_token('ITEM',p_line_rec.ordered_item(l_index) );
2817: fnd_message.set_token('UOM', l_uom);
2818: OE_BULK_MSG_PUB.Add('Y','ERROR');
2819: END;
2820:
2821: ELSE
2822:
2835: oe_debug_pub.add( 'ITEM ID :'||P_LINE_REC.INVENTORY_ITEM_ID ( L_INDEX ) ) ;
2836: END IF;
2837: p_line_rec.lock_control(l_index) := -99;
2838: fnd_message.set_name('ONT', 'OE_INVALID_ITEM_UOM');
2839: OE_BULK_MSG_PUB.Add('Y','ERROR');
2840: END IF;
2841:
2842: END IF; -- uom validation based on item type
2843:
2859: IF (p_line_rec.project_id(l_index) IS NOT NULL AND
2860: p_line_rec.ship_from_org_id(l_index) IS NULL)
2861: THEN
2862: FND_MESSAGE.SET_NAME('ONT', 'OE_SHIP_FROM_REQD');
2863: OE_BULK_MSG_PUB.Add('Y','ERROR');
2864: p_line_rec.lock_control(l_index) := -99;
2865: IF l_debug_level > 0 THEN
2866: oe_debug_pub.add( 'IN ERROR 11 ' ) ;
2867: END IF;
2874: IF pjm_project.val_proj_idtonum(p_line_rec.project_id(l_index),
2875: p_line_rec.ship_from_org_id(l_index)) IS NULL
2876: THEN
2877: FND_MESSAGE.SET_NAME('ONT', 'OE_INVALID_SHIP_FROM_PROJ');
2878: OE_BULK_MSG_PUB.Add('Y','ERROR');
2879: p_line_rec.lock_control(l_index) := -99;
2880: IF l_debug_level > 0 THEN
2881: oe_debug_pub.add( 'IN ERROR 12 ' ) ;
2882: END IF;
2885:
2886: IF (p_line_rec.task_id(l_index) IS NOT NULL
2887: AND p_line_rec.project_id(l_index) IS NULL) THEN
2888: FND_MESSAGE.SET_NAME('ONT', 'OE_VAL_PROJECT_REQD');
2889: OE_BULK_MSG_PUB.Add('Y','ERROR');
2890: p_line_rec.lock_control(l_index) := -99;
2891: IF l_debug_level > 0 THEN
2892: oe_debug_pub.add( 'IN ERROR 13 ' ) ;
2893: END IF;
2899: p_line_rec.task_id(l_index)) THEN
2900: fnd_message.set_name('ONT','OE_INVALID_ATTRIBUTE');
2901: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',
2902: OE_Order_Util.Get_Attribute_Name('task_id'));
2903: OE_BULK_MSG_PUB.Add('Y','ERROR');
2904: p_line_rec.lock_control(l_index) := -99;
2905: IF l_debug_level > 0 THEN
2906: oe_debug_pub.add( 'IN ERROR 14 ' ) ;
2907: END IF;
2913:
2914: IF Validate_task_reqd(p_line_rec.project_id(l_index),
2915: p_line_rec.ship_from_org_id(l_index)) THEN
2916: FND_MESSAGE.SET_NAME('ONT', 'OE_VAL_TASK_REQD');
2917: OE_BULK_MSG_PUB.Add('Y','ERROR');
2918: p_line_rec.lock_control(l_index) := -99;
2919: IF l_debug_level > 0 THEN
2920: oe_debug_pub.add( 'IN ERROR 15 ' ) ;
2921: END IF;
2930: (p_line_rec.inventory_item_id(l_index),
2931: p_line_rec.ship_from_org_id(l_index)) = 'Y'
2932: THEN
2933: fnd_message.set_name('ONT', 'OE_UEFF_NUMBER_REQD');
2934: OE_BULK_MSG_PUB.Add('Y','ERROR');
2935: p_line_rec.lock_control(l_index) := -99;
2936: IF l_debug_level > 0 THEN
2937: oe_debug_pub.add( 'IN ERROR 16 ' ) ;
2938: END IF;
2944: p_line_rec.task_id(l_index) IS NOT NULL OR
2945: p_line_rec.end_item_unit_number(l_index) IS NOT NULL)
2946: THEN
2947: fnd_message.set_name('ONT', 'OE_PJM_NOT_INSTALLED');
2948: OE_BULK_MSG_PUB.Add('Y','ERROR');
2949: p_line_rec.lock_control(l_index) := -99;
2950: IF l_debug_level > 0 THEN
2951: oe_debug_pub.add( 'IN ERROR 17 ' ) ;
2952: END IF;
2974: )
2975: THEN
2976: p_line_rec.lock_control(l_index) := -99;
2977: fnd_message.set_name('ONT', 'OE_ITEM_VALIDATION_FAILED');
2978: OE_BULK_MSG_PUB.Add('Y','ERROR');
2979: IF l_debug_level > 0 THEN
2980: oe_debug_pub.add( 'IN ERROR 18 ' ) ;
2981: END IF;
2982: END IF;
3008: p_line_rec.lock_control(l_index) := -99;
3009: fnd_message.set_name('ONT', 'OE_ITORD_VALIDATION_FAILED');
3010: fnd_message.set_token('ITEM',OE_ITORD_UTIL.get_item_name(p_line_rec.inventory_item_id(l_index)));
3011: fnd_message.set_token('CATEGORY',OE_ITORD_UTIL.get_item_category_name(p_line_rec.inventory_item_id(l_index)));
3012: OE_BULK_MSG_PUB.Add('Y','ERROR');
3013: IF l_debug_level > 0 THEN
3014: oe_debug_pub.add( 'IN ERROR 19 ' ) ;
3015: END IF;
3016: END IF;
3029: ( p_line_rec.user_item_description(l_index))
3030: THEN
3031: p_line_rec.lock_control(l_index) := -99;
3032: fnd_message.set_name('ONT', 'ONT_USER_ITEM_DESC_TOO_LONG');
3033: OE_BULK_MSG_PUB.Add('Y','ERROR');
3034: IF l_debug_level > 0 THEN
3035: oe_debug_pub.add( 'LENGTH OF USER ITEM DESC EXCEEDS LIMIT FOR EXTERNAL ORDERS. ' ) ;
3036: END IF;
3037: END IF;
3107: END IF;
3108: fnd_message.set_name('ONT','OE_INVALID_ATTRIBUTE');
3109: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',
3110: OE_Order_Util.Get_Attribute_Name('INVOICE_TO_ORG_ID'));
3111: OE_BULK_MSG_PUB.Add('Y','ERROR');
3112: END IF;
3113:
3114: END IF; -- Invoice to is not null
3115:
3130: END IF;
3131: fnd_message.set_name('ONT','OE_INVALID_ATTRIBUTE');
3132: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',
3133: OE_Order_Util.Get_Attribute_Name('ship_to_org_id'));
3134: OE_BULK_MSG_PUB.Add('Y','ERROR');
3135: END IF;
3136:
3137: END IF; -- ship to is not null
3138:
3152: END IF;
3153: fnd_message.set_name('ONT','OE_INVALID_ATTRIBUTE');
3154: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',
3155: OE_Order_Util.Get_Attribute_Name('DELIVER_TO_ORG_ID'));
3156: OE_BULK_MSG_PUB.Add('Y','ERROR');
3157: END IF;
3158:
3159: END IF; -- deliver to is not null
3160:
3183: THEN
3184: p_line_rec.lock_control(l_index) := -99;
3185: fnd_message.set_name('ONT','OE_INVALID_ATTRIBUTE');
3186: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','Entity: Bill To Contact ');
3187: OE_BULK_MSG_PUB.Add('Y','ERROR');
3188: END IF;
3189:
3190: END IF;
3191:
3210: THEN
3211: p_line_rec.lock_control(l_index) := -99;
3212: fnd_message.set_name('ONT','OE_INVALID_ATTRIBUTE');
3213: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','Entity: SHIP To Contact ');
3214: OE_BULK_MSG_PUB.Add('Y','ERROR');
3215: END IF;
3216:
3217: END IF;
3218:
3237: THEN
3238: p_line_rec.lock_control(l_index) := -99;
3239: fnd_message.set_name('ONT','OE_INVALID_ATTRIBUTE');
3240: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','Entity: DeliverToContact');
3241: OE_BULK_MSG_PUB.Add('Y','ERROR');
3242: END IF;
3243:
3244: END IF;
3245:
3252: IF NOT OE_BULK_PROCESS_HEADER.Validate_End_Customer(p_line_rec.end_customer_id(l_index)) THEN
3253: p_line_rec.lock_control(l_index) := -99;
3254: fnd_message.set_name('ONT','OE_INVALID_ATTRIBUTE');
3255: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',OE_Order_Util.Get_Attribute_Name('end_customer_id'));
3256: OE_BULK_MSG_PUB.Add('Y','ERROR');
3257: END IF;
3258: END IF;
3259:
3260: IF p_line_rec.end_Customer_Contact_id(l_index) IS NOT NULL AND
3262: IF NOT OE_BULK_PROCESS_HEADER.Validate_End_Customer_Contact(p_line_rec.end_customer_contact_id(l_index)) THEN
3263: p_line_rec.lock_control(l_index) := -99;
3264: fnd_message.set_name('ONT','OE_INVALID_ATTRIBUTE');
3265: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',OE_Order_Util.Get_Attribute_Name('end_customer_contact_id'));
3266: OE_BULK_MSG_PUB.Add('Y','ERROR');
3267: END IF;
3268: END IF;
3269:
3270:
3274: p_line_rec.end_customer_id(l_index)) THEN
3275: p_line_rec.lock_control(l_index) := -99;
3276: fnd_message.set_name('ONT','OE_INVALID_ATTRIBUTE');
3277: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',OE_Order_Util.Get_Attribute_Name('end_customer_site_use_id'));
3278: OE_BULK_MSG_PUB.Add('Y','ERROR');
3279: END IF;
3280: END IF;
3281:
3282: IF p_line_rec.IB_owner(l_index) IS NOT NULL AND NOT
3284: IF NOT OE_BULK_PROCESS_HEADER.Validate_IB_Owner(p_line_rec.IB_owner(l_index)) THEN
3285: p_line_rec.lock_control(l_index) := -99;
3286: fnd_message.set_name('ONT','OE_INVALID_ATTRIBUTE');
3287: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',OE_Order_Util.Get_Attribute_Name('IB_owner'));
3288: OE_BULK_MSG_PUB.Add('Y','ERROR');
3289: END IF;
3290: END IF;
3291:
3292: IF p_line_rec.IB_current_location(l_index) IS NOT NULL AND NOT
3294: IF NOT OE_BULK_PROCESS_HEADER.Validate_IB_current_Location (p_line_rec.IB_current_location(l_index)) THEN
3295: p_line_rec.lock_control(l_index) := -99;
3296: fnd_message.set_name('ONT','OE_INVALID_ATTRIBUTE');
3297: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',OE_Order_Util.Get_Attribute_Name('IB_location'));
3298: OE_BULK_MSG_PUB.Add('Y','ERROR');
3299: END IF;
3300: END IF;
3301:
3302: IF p_line_rec.IB_Installed_at_location(l_index) IS NOT NULL AND NOT
3304: IF NOT OE_BULK_PROCESS_HEADER.Validate_IB_Inst_loc(p_line_rec.IB_Installed_at_location(l_index)) THEN
3305: p_line_rec.lock_control(l_index) := -99;
3306: fnd_message.set_name('ONT','OE_INVALID_ATTRIBUTE');
3307: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',OE_Order_Util.Get_Attribute_Name('Installed_at_location'));
3308: OE_BULK_MSG_PUB.Add('Y','ERROR');
3309: END IF;
3310: END IF;
3311: --Bug 5054618}
3312:
3331: IF l_rule_type = 'PP_DR_ALL' OR l_rule_type = 'PP_DR_PP' THEN
3332: p_line_rec.lock_control(l_index) := -99 ;
3333: fnd_message.set_name('ONT','OE_INVALID_ATTRIBUTE');
3334: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',OE_Order_UTIL.Get_Attribute_Name('ACCOUNTING_RULE_ID'));
3335: OE_BULK_MSG_PUB.Add('Y','ERROR');
3336: END IF; -- end of accounting rule type
3337: END IF; -- end of accounting_rule_id not null
3338: END IF; -- end of non-service line
3339:
3423: WHEN NO_DATA_FOUND THEN
3424: p_line_rec.lock_control(l_index) := -99;
3425: fnd_message.set_name('ONT','OE_INVALID_ATTRIBUTE');
3426: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','Entity: Tax Exemptions');
3427: OE_BULK_MSG_PUB.Add('Y','ERROR');
3428:
3429:
3430: END;
3431: END IF;
3494: oe_debug_pub.add( 'IN ERROR 29 ' ) ;
3495: END IF;
3496: fnd_message.set_name('ONT','OE_INVALID_ATTRIBUTE');
3497: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','Entity: Tax Code');
3498: OE_BULK_MSG_PUB.Add('Y','ERROR');
3499: END; -- BEGIN
3500: END IF;
3501:
3502:
3511: AND p_line_rec.ordered_quantity(l_index) > 1 THEN
3512:
3513: p_line_rec.lock_control(l_index) := -99;
3514: FND_Message.Set_Name('ONT', 'OE_OTA_INVALID_QTY');
3515: OE_BULK_MSG_PUB.Add('Y','ERROR');
3516:
3517: END IF;
3518:
3519: -- issue a warning message if the PO number
3527: ,p_line_rec.sold_to_org_id(l_index)
3528: ,p_line_rec.header_id(l_index) )
3529: THEN
3530: FND_MESSAGE.SET_NAME('ONT','OE_VAL_DUP_PO_NUMBER');
3531: OE_BULK_MSG_PUB.Add('Y','ERROR');
3532: END IF;
3533: END IF;
3534: IF p_line_rec.service_end_date(l_index) IS NOT NULL
3535: AND p_line_rec.service_start_date(l_index) IS NOT NULL
3537: IF p_line_rec.service_start_date(l_index) >=
3538: p_line_rec.service_end_date(l_index)
3539: THEN
3540: fnd_message.set_name('ONT','OE_SERV_END_DATE');
3541: OE_BULK_MSG_PUB.Add('Y','ERROR');
3542: p_line_rec.lock_control(l_index) := -99;
3543: END IF;
3544: END IF;
3545:
3574: p_line_rec.lock_control(l_index) := -99;
3575: FND_MESSAGE.SET_NAME('ONT','OE_INVALID_ATTRIBUTE');
3576: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',
3577: 'Entity:Flexfield:Line_Desc_Flex');
3578: OE_BULK_MSG_PUB.Add('Y', 'ERROR');
3579:
3580: ELSE -- if the flex validation is successfull
3581: -- For bug 2511313
3582: IF p_line_rec.context(l_index) IS NULL
3725: p_line_rec.lock_control(l_index) := -99;
3726: FND_MESSAGE.SET_NAME('ONT','OE_INVALID_ATTRIBUTE');
3727: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',
3728: 'Entity:Flexfield:Industry Line_Desc_Flex');
3729: OE_BULK_MSG_PUB.Add('Y', 'ERROR');
3730:
3731: ELSE -- for bug 2511313
3732:
3733: IF p_line_rec.industry_context(l_index) IS NULL
3912: p_line_rec.lock_control(l_index) := -99;
3913: FND_MESSAGE.SET_NAME('ONT','OE_INVALID_ATTRIBUTE');
3914: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',
3915: 'Entity:Flexfield:TP Line_Desc_Flex');
3916: OE_BULK_MSG_PUB.Add('Y', 'ERROR');
3917:
3918: ELSE -- if the flex validation is successfull
3919: -- For bug 2511313
3920: IF p_line_rec.tp_context(l_index) IS NULL
4018: oe_debug_pub.add( 'LIST PRICE OR SELLING PRICE IS NULL... ' ) ;
4019: END IF;
4020: p_line_rec.lock_control(l_index) := -99;
4021: FND_MESSAGE.SET_NAME('ONT','OE_OI_PRICE');
4022: OE_BULK_MSG_PUB.Add;
4023: ELSIF p_line_rec.pricing_quantity(l_index) IS NULL
4024: THEN
4025: IF l_debug_level > 0 THEN
4026: oe_debug_pub.add( 'PRICING QUANTITY IS NULL...RESETTING' ) ;
4190: AND l_on_generic_hold )
4191: THEN
4192: -- Add scheduling on hold message
4193: FND_MESSAGE.SET_NAME('ONT','OE_SCH_LINE_ON_HOLD');
4194: OE_BULK_MSG_PUB.Add;
4195: ELSE
4196: IF OE_BULK_CACHE.G_LINE_TYPE_TBL(l_d_index).scheduling_level_code = 'ONE'
4197: OR (OE_BULK_CACHE.G_LINE_TYPE_TBL(l_d_index).scheduling_level_code IS NULL
4198: AND OE_BULK_CACHE.G_ORDER_TYPE_TBL(l_c_index).scheduling_level_code = 'ONE')
4198: AND OE_BULK_CACHE.G_ORDER_TYPE_TBL(l_c_index).scheduling_level_code = 'ONE')
4199: THEN
4200: -- Add ATP Only message
4201: FND_MESSAGE.SET_NAME('ONT','OE_ATP_ONLY');
4202: OE_BULK_MSG_PUB.Add;
4203: ELSE
4204: Check_Scheduling_Attributes(p_line_rec => p_line_rec
4205: ,p_index =>l_index
4206: ,x_return_status => l_return_status);
4228: p_line_rec.schedule_status_code(l_index) := 'SCHEDULED';
4229: p_line_rec.visible_demand_flag(l_index) := 'N';
4230: ELSE
4231: FND_MESSAGE.SET_NAME('ONT','OE_INV_NO_WAREHOUSE');
4232: OE_BULK_MSG_PUB.Add;
4233: IF p_line_rec.schedule_ship_date(l_index) IS NOT NULL
4234: OR p_line_rec.schedule_arrival_date(l_index) IS NOT NULL THEN
4235: p_line_rec.lock_control(l_index) := -99;
4236: END IF;
4260: IF l_debug_level > 0 THEN
4261: oe_debug_pub.add( 'Request date exceeds Latest Acceptable Date ',1 ) ;
4262: END IF;
4263: FND_MESSAGE.SET_NAME('ONT','ONT_SCH_REQUEST_EXCEED_LAD');
4264: OE_BULK_MSG_PUB.Add;
4265: ELSIF ((l_order_date_type_code = 'SHIP'
4266: AND trunc(NVL(p_line_rec.schedule_ship_date(l_index),p_line_rec.request_date(l_index)))
4267: > trunc(NVL(p_line_rec.latest_acceptable_date(l_index),p_line_rec.request_date(l_index))))
4268: OR (l_order_date_type_code = 'ARRIVAL'
4268: OR (l_order_date_type_code = 'ARRIVAL'
4269: AND trunc(NVL(p_line_rec.schedule_arrival_date(l_index),p_line_rec.request_date(l_index)))
4270: > trunc(NVL(p_line_rec.latest_acceptable_date(l_index),p_line_rec.request_date(l_index))))) THEN
4271: FND_MESSAGE.SET_NAME('ONT','ONT_SCH_LAD_SCH_FAILED');
4272: OE_BULK_MSG_PUB.Add;
4273: IF l_debug_level > 0 THEN
4274: oe_debug_pub.add( 'SCHEDULE DATE EXCEEDS LAD ',1 ) ;
4275: END IF;
4276:
4423: IF l_debug_level > 0 THEN
4424: oe_debug_pub.add( 'OTHERS ERROR , LINE.ENTITY' ) ;
4425: oe_debug_pub.add( SUBSTR ( SQLERRM , 1 , 240 ) ) ;
4426: END IF;
4427: IF OE_BULK_MSG_PUB.Check_Msg_Level(OE_BULK_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
4428: THEN
4429: OE_BULK_MSG_PUB.Add_Exc_Msg
4430: ( G_PKG_NAME
4431: , 'Entity'
4425: oe_debug_pub.add( SUBSTR ( SQLERRM , 1 , 240 ) ) ;
4426: END IF;
4427: IF OE_BULK_MSG_PUB.Check_Msg_Level(OE_BULK_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
4428: THEN
4429: OE_BULK_MSG_PUB.Add_Exc_Msg
4430: ( G_PKG_NAME
4431: , 'Entity'
4432: );
4433: END IF;
4484:
4485: IF nvl(p_line_rec.ordered_quantity2(p_index), 0) < 0
4486: THEN
4487: FND_MESSAGE.SET_NAME('ONT','SO_PR_NEGATIVE_AMOUNT'); -- HVOP define better OM or GMI error code
4488: OE_BULK_MSG_PUB.Add('Y', 'ERROR');
4489: p_x_return_status := -1;
4490: IF l_debug_level > 0 THEN
4491: oe_debug_pub.add ('calculate_dual_qty- quantity2 negative so error ', 3);
4492: END IF;
4510: oe_debug_pub.add( 'calculate_dual_qty - invalid warehouse/item combo' ) ;
4511: END IF;
4512: p_x_return_status := -1;
4513: FND_MESSAGE.SET_NAME('ONT', 'OE_INVALID_ITEM_WHSE');
4514: OE_BULK_MSG_PUB.add('Y','ERROR');
4515: RETURN;
4516: END IF;
4517:
4518: END IF;
4631: p_encoded => 'F');
4632: p_x_return_status := -1;
4633: oe_msg_pub.add_text(p_message_text => l_buffer);
4634: --fnd_message.set_name('ONT',l_buffer); -- PAL
4635: OE_BULK_MSG_PUB.Add('Y', 'ERROR');
4636: /*IF l_debug_level > 0 THEN
4637: oe_debug_pub.add(l_buffer,1);
4638: END IF; */
4639: RAISE TOLERANCE_ERROR;
4653: ,0);
4654: IF (l_return = -68 ) THEN
4655: p_x_return_status := -1;
4656: FND_MESSAGE.set_name('GMI','IC_DEVIATION_HI_ERR');
4657: OE_BULK_MSG_PUB.Add('Y', 'ERROR');
4658: ELSIF(l_return = -69 ) THEN
4659: p_x_return_status := -1;
4660: FND_MESSAGE.set_name('GMI','IC_DEVIATION_HI_ERR');
4661: OE_BULK_MSG_PUB.Add('Y', 'ERROR');
4657: OE_BULK_MSG_PUB.Add('Y', 'ERROR');
4658: ELSIF(l_return = -69 ) THEN
4659: p_x_return_status := -1;
4660: FND_MESSAGE.set_name('GMI','IC_DEVIATION_HI_ERR');
4661: OE_BULK_MSG_PUB.Add('Y', 'ERROR');
4662: END IF; */
4663:
4664: END IF; -- (NVL(p_line_rec.ordered_quantity2(p_index),0) <> 0 )
4665:
4758: ,0);
4759: IF (l_return = -68 ) THEN
4760: p_x_return_status := -1;
4761: FND_MESSAGE.set_name('GMI','IC_DEVIATION_HI_ERR');
4762: OE_BULK_MSG_PUB.Add('Y', 'ERROR');
4763: ELSIF(l_return = -69 ) THEN
4764: p_x_return_status := -1;
4765: FND_MESSAGE.set_name('GMI','IC_DEVIATION_HI_ERR');
4766: OE_BULK_MSG_PUB.Add('Y', 'ERROR');
4762: OE_BULK_MSG_PUB.Add('Y', 'ERROR');
4763: ELSIF(l_return = -69 ) THEN
4764: p_x_return_status := -1;
4765: FND_MESSAGE.set_name('GMI','IC_DEVIATION_HI_ERR');
4766: OE_BULK_MSG_PUB.Add('Y', 'ERROR');
4767: END IF; */
4768:
4769: IF l_debug_level > 0 THEN
4770: oe_debug_pub.add('Calculate_dual_quantity : check the deviation 2 and error out if necc ', 3);
4792: p_encoded => 'F');
4793: p_x_return_status := -1;
4794: oe_msg_pub.add_text(p_message_text => l_buffer);
4795: --fnd_message.set_name('ONT',l_buffer);
4796: OE_BULK_MSG_PUB.Add('Y', 'ERROR');
4797:
4798: IF l_debug_level > 0 THEN
4799: oe_debug_pub.add(l_buffer,1);
4800: END IF;
4811: IF (NVL(p_line_rec.ordered_quantity2(p_index),0) = 0 )
4812: OR (NVL(p_line_rec.ordered_quantity(p_index),0) = 0 ) THEN
4813: p_x_return_status := -1;
4814: FND_MESSAGE.set_name('ONT','OE_BULK_OPM_NULL_QTY'); --PROCESS HVOP
4815: OE_BULK_MSG_PUB.Add;
4816:
4817: END IF;
4818:
4819:
4828:
4829: WHEN UOM_CONVERSION_FAILED THEN
4830: oe_debug_pub.add('Exception handling: UOM_CONVERSION_FAILED in calculate_dual_qauntity', 1);
4831: FND_MESSAGE.SET_NAME('INV','INV_NO_CONVERSION_ERR'); -- INVCONV
4832: OE_BULK_MSG_PUB.Add('Y', 'ERROR');
4833:
4834: RAISE FND_API.G_EXC_ERROR;
4835:
4836: WHEN TOLERANCE_ERROR THEN -- INVCONV