[Home] [Help]
88: x_return_status := FND_API.G_RET_STS_ERROR;
89: FND_MESSAGE.SET_NAME('ONT','OE_BOOK_REQD_LINE_ATTRIBUTE');
90: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',
91: OE_Order_UTIL.Get_Attribute_Name('SOLD_TO_ORG_ID'));
92: OE_BULK_MSG_PUB.ADD;
93: END IF;
94:
95: IF p_line_rec.invoice_to_org_id(p_index) IS NULL THEN
96: x_return_status := FND_API.G_RET_STS_ERROR;
96: x_return_status := FND_API.G_RET_STS_ERROR;
97: FND_MESSAGE.SET_NAME('ONT','OE_BOOK_REQD_LINE_ATTRIBUTE');
98: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',
99: OE_Order_UTIL.Get_Attribute_Name('INVOICE_TO_ORG_ID'));
100: OE_BULK_MSG_PUB.ADD;
101: END IF;
102:
103: IF p_line_rec.tax_exempt_flag(p_index) IS NULL THEN
104: x_return_status := FND_API.G_RET_STS_ERROR;
104: x_return_status := FND_API.G_RET_STS_ERROR;
105: FND_MESSAGE.SET_NAME('ONT','OE_BOOK_REQD_LINE_ATTRIBUTE');
106: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',
107: OE_Order_UTIL.Get_Attribute_Name('TAX_EXEMPT_FLAG'));
108: OE_BULK_MSG_PUB.ADD;
109: END IF;
110:
111: -- Quantity and UOM Required
112:
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('ORDER_QUANTITY_UOM'));
118: OE_BULK_MSG_PUB.ADD;
119: END IF;
120:
121: -- Fix bug 1277092: ordered quantity should not be = 0 on a booked line
122: IF p_line_rec.ordered_quantity(p_index) IS NULL
124: x_return_status := FND_API.G_RET_STS_ERROR;
125: FND_MESSAGE.SET_NAME('ONT','OE_BOOK_REQD_LINE_ATTRIBUTE');
126: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',
127: OE_Order_UTIL.Get_Attribute_Name('ORDERED_QUANTITY'));
128: OE_BULK_MSG_PUB.ADD;
129: END IF;
130:
131: -- Fix bug 1262790
132: -- Ship To and Payment Term required on ORDER lines,
139: x_return_status := FND_API.G_RET_STS_ERROR;
140: FND_MESSAGE.SET_NAME('ONT','OE_BOOK_REQD_LINE_ATTRIBUTE');
141: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',
142: OE_Order_UTIL.Get_Attribute_Name('SHIP_TO_ORG_ID'));
143: OE_BULK_MSG_PUB.ADD;
144: END IF;
145:
146: IF p_line_rec.payment_term_id(p_index) IS NULL THEN
147: x_return_status := FND_API.G_RET_STS_ERROR;
147: x_return_status := FND_API.G_RET_STS_ERROR;
148: FND_MESSAGE.SET_NAME('ONT','OE_BOOK_REQD_LINE_ATTRIBUTE');
149: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',
150: OE_Order_UTIL.Get_Attribute_Name('PAYMENT_TERM_ID'));
151: OE_BULK_MSG_PUB.ADD;
152: END IF;
153: --serla
154: IF OE_CODE_CONTROL.Get_Code_Release_Level >= '110509' THEN
155: IF p_line_rec.item_type_code(p_index) <> 'SERVICE' THEN
170: x_return_status := FND_API.G_RET_STS_ERROR;
171: FND_MESSAGE.SET_NAME('ONT','OE_BOOK_REQD_LINE_ATTRIBUTE');
172: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',
173: OE_Order_UTIL.Get_Attribute_Name('ACCOUNTING_RULE_DURATION'));
174: OE_BULK_MSG_PUB.ADD;
175: END IF; -- end of accounting_rule_duration null
176: END IF; -- end of variable accounting rule type
177: END IF; -- end of accounting_rule_id not null
178: END IF; -- end of non-service line
189: x_return_status := FND_API.G_RET_STS_ERROR;
190: FND_MESSAGE.SET_NAME('ONT','OE_BOOK_REQD_LINE_ATTRIBUTE');
191: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',
192: OE_Order_UTIL.Get_Attribute_Name('TAX_DATE'));
193: OE_BULK_MSG_PUB.ADD;
194: END IF;
195: */
196: -- Tax field checks not required, as checks would prevent orders from
197: -- being entered where transaction is taxable and tax calculation
208: x_return_status := FND_API.G_RET_STS_ERROR;
209: FND_MESSAGE.SET_NAME('ONT','OE_BOOK_REQD_LINE_ATTRIBUTE');
210: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',
211: OE_Order_UTIL.Get_Attribute_Name('PRICE_LIST_ID'));
212: OE_BULK_MSG_PUB.ADD;
213: END IF;
214:
215: END IF;
216:
225: WHEN OTHERS THEN
226: oe_debug_pub.add('Others Error, Line.Check_Book_Reqd_Attributes');
227: oe_debug_pub.add(substr(sqlerrm,1,240));
228: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
229: IF OE_BULK_MSG_PUB.Check_Msg_Level(OE_BULK_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
230: THEN
231: OE_BULK_MSG_PUB.Add_Exc_Msg
232: ( G_PKG_NAME
233: , 'Check_Book_Reqd_Attributes'
227: oe_debug_pub.add(substr(sqlerrm,1,240));
228: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
229: IF OE_BULK_MSG_PUB.Check_Msg_Level(OE_BULK_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
230: THEN
231: OE_BULK_MSG_PUB.Add_Exc_Msg
232: ( G_PKG_NAME
233: , 'Check_Book_Reqd_Attributes'
234: );
235: END IF;
256: -- Check for Required Scheduling Attributes
257:
258: IF p_line_rec.ordered_quantity(p_index) IS NULL THEN
259: FND_MESSAGE.SET_NAME('ONT','OE_SCH_MISSING_QUANTITY');
260: OE_BULK_MSG_PUB.Add;
261: x_return_status := FND_API.G_RET_STS_ERROR;
262: END IF;
263:
264: -- If the quantity on the line is zero(which is different from
266: -- it is an error
267:
268: IF p_line_rec.ordered_quantity(p_index) = 0 THEN
269: FND_MESSAGE.SET_NAME('ONT','OE_SCH_ZERO_QTY');
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 for following statuses: cancelled, shipped, reserved
279: -- it is an error
280:
281: IF p_line_rec.order_quantity_uom(p_index) IS NULL THEN
282: FND_MESSAGE.SET_NAME('ONT','OE_SCH_MISSING_UOM');
283: OE_BULK_MSG_PUB.Add;
284: x_return_status := FND_API.G_RET_STS_ERROR;
285: END IF;
286:
287: -- Item check not required as it is already validated for creation.
291: -- it is an error
292:
293: IF p_line_rec.request_date(p_index) IS NULL THEN
294: FND_MESSAGE.SET_NAME('ONT','OE_SCH_MISSING_REQUEST_DATE');
295: OE_BULK_MSG_PUB.Add;
296: x_return_status := FND_API.G_RET_STS_ERROR;
297: END IF;
298:
299: -- No need to check if line belongs to a set: SETs not supported in BULK mode
318:
319: FND_MESSAGE.SET_NAME('ONT', 'OE_SCH_INACTIVE_STD_ONLY');
320: FND_MESSAGE.SET_TOKEN('LTYPE',
321: nvl(Oe_Schedule_Util.sch_cached_line_type ,'0'));
322: OE_BULK_MSG_PUB.Add;
323:
324: IF l_debug_level > 0 THEN
325: oe_debug_pub.add( 'OE_SCH_INACTIVE_STD_ONLY' , 1 ) ;
326: END IF;
339: IF MSC_ATP_GLOBAL.GET_APS_VERSION <> 10 AND
340: p_line_rec.ship_from_org_id(p_index) is NULL
341: THEN
342: FND_MESSAGE.SET_NAME('ONT','OE_SCH_ATO_WHSE_REQD');
343: OE_BULK_MSG_PUB.Add;
344: IF l_debug_level > 0 THEN
345: oe_debug_pub.add( 'OE_SCH_ATO_WHSE_REQD' , 1 ) ;
346: END IF;
347: x_return_status := FND_API.G_RET_STS_ERROR;
579: IF l_debug_level > 0 THEN
580: oe_debug_pub.add( 'ERROR IN GETTING CCID' ) ;
581: END IF;
582: failure_message := fnd_flex_ext.get_message;
583: OE_BULK_MSG_PUB.Add_TEXT(failure_message);
584: RAISE FND_API.G_EXC_ERROR;
585: IF l_debug_level > 0 THEN
586: oe_debug_pub.add( 'FAILURE MESSAGE = ' || SUBSTR ( FAILURE_MESSAGE , 1 , 50 ) ) ;
587: END IF;
640: IF l_debug_level > 0 THEN
641: oe_debug_pub.add( 'SOLD TO ORG ID IS MISSING , CAN NOT GET CUST ITEM' ) ;
642: END IF;
643: FND_MESSAGE.SET_NAME('ONT','OE_INVALID_CUSTOMER_ID');
644: OE_BULK_MSG_PUB.Add;
645: RAISE FND_API.G_EXC_ERROR;
646: END IF;
647:
648: INV_CUSTOMER_ITEM_GRP.CI_Attribute_Value(
665: END IF;
666: FND_MESSAGE.SET_NAME('ONT','OE_INV_CUS_ITEM');
667: FND_MESSAGE.SET_TOKEN('ERROR_CODE', l_error_code);
668: FND_MESSAGE.SET_TOKEN('ERROR_MESSAGE', l_error_message);
669: OE_BULK_MSG_PUB.Add;
670: END IF;
671:
672: INV_CUSTOMER_ITEM_GRP.CI_Attribute_Value(
673: Z_Customer_Item_Id => p_line_rec.ordered_item_id(p_index)
689: END IF;
690: FND_MESSAGE.SET_NAME('ONT','OE_INV_CUS_ITEM');
691: FND_MESSAGE.SET_TOKEN('ERROR_CODE', l_error_code);
692: FND_MESSAGE.SET_TOKEN('ERROR_MESSAGE', l_error_message);
693: OE_BULK_MSG_PUB.Add;
694: END IF;
695:
696: IF l_inventory_item_id_int <> l_inventory_item_id_cust THEN
697: IF l_debug_level > 0 THEN
699: END IF;
700: FND_MESSAGE.SET_NAME('ONT','OE_INV_INT_CUS_ITEM_ID');
701: FND_MESSAGE.SET_TOKEN('INVENTORY_ITEM_ID',l_inventory_item_id_int);
702: FND_MESSAGE.SET_TOKEN('CUST_ITEM_ID',l_inventory_item_id_cust);
703: OE_BULK_MSG_PUB.Add;
704: ELSIF l_inventory_item_id_int IS NOT NULL
705: THEN
706: p_line_rec.inventory_item_id(p_index):= l_inventory_item_id_int;
707: ELSIF l_inventory_item_id_cust IS NOT NULL
737: oe_debug_pub.add( 'TOO MANY ROWS ERROR: '||SQLERRM ) ;
738: END IF;
739: FND_MESSAGE.SET_NAME('ONT','OE_NOT_UNIQUE_ITEM');
740: FND_MESSAGE.SET_TOKEN('GENERIC_ITEM', p_line_rec.ordered_item(p_index));
741: OE_BULK_MSG_PUB.Add;
742: END;
743:
744: IF l_inventory_item_Id_int <> l_inventory_item_id_gen
745: THEN
748: END IF;
749: FND_MESSAGE.SET_NAME('ONT','OE_INV_INT_CUS_ITEM_ID');
750: FND_MESSAGE.SET_TOKEN('INVENTORY_ITEM_ID', l_inventory_item_id_int);
751: FND_MESSAGE.SET_TOKEN('CUST_ITEM_ID', l_inventory_item_id_gen);
752: OE_BULK_MSG_PUB.Add;
753: p_line_rec.inventory_item_id(p_index):= l_inventory_item_id_gen;
754: ELSIF l_inventory_item_id_int IS NOT NULL
755: THEN
756: p_line_rec.inventory_item_id(p_index):= l_inventory_item_id_int;
773: END IF;
774: IF l_debug_level > 0 THEN
775: oe_debug_pub.add( SUBSTR ( SQLERRM , 1 , 240 ) ) ;
776: END IF;
777: IF OE_BULK_MSG_PUB.Check_Msg_Level(OE_BULK_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
778: THEN
779: OE_BULK_MSG_PUB.Add_Exc_Msg
780: ( G_PKG_NAME
781: , 'Get_Item_Info'
775: oe_debug_pub.add( SUBSTR ( SQLERRM , 1 , 240 ) ) ;
776: END IF;
777: IF OE_BULK_MSG_PUB.Check_Msg_Level(OE_BULK_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
778: THEN
779: OE_BULK_MSG_PUB.Add_Exc_Msg
780: ( G_PKG_NAME
781: , 'Get_Item_Info'
782: );
783: END IF;
809: AND secondary_inventory_name = p_subinventory;
810: EXCEPTION
811: WHEN OTHERS THEN
812: fnd_message.set_name('ONT','OE_SUBINV_INVALID');
813: OE_BULK_MSG_PUB.Add;
814: RETURN FALSE;
815: END;
816:
817: END IF;
822:
823: fnd_message.set_name('ONT', 'OE_ATTRIBUTE_REQUIRED');
824: fnd_message.set_token('ATTRIBUTE'
825: ,OE_Order_UTIL.Get_Attribute_Name('SHIP_FROM_ORG_ID'));
826: OE_BULK_MSG_PUB.Add;
827: RETURN FALSE;
828:
829: ELSE
830:
868: );
869: EXCEPTION
870: WHEN OTHERS THEN
871: fnd_message.set_name('ONT', 'OE_SUBINV_NON_ASSET');
872: OE_BULK_MSG_PUB.ADD;
873: RETURN FALSE;
874: END;
875:
876: END IF; -- end if ship from is null
1028: IF nvl(p_input_quantity, 0) < 0 -- Process HVOP added check for negative as was missing -NB take out when support for RMAs needed
1029:
1030: THEN
1031: FND_MESSAGE.SET_NAME('ONT', 'SO_PR_NEGATIVE_AMOUNT');
1032: OE_BULK_MSG_PUB.Add('Y','ERROR');
1033: x_return_status := -99;
1034: IF l_debug_level > 0 THEN
1035: oe_debug_pub.add ('Validate decimal quantity - quantity negative so error ', 3);
1036: END IF;
1049: IF l_debug_level > 0 THEN
1050: oe_debug_pub.add( 'ITEM IS CONFIG RELATED WITH DECIMAL QTY' , 2 ) ;
1051: END IF;
1052: FND_MESSAGE.SET_NAME('ONT', 'OE_CONFIG_NO_DECIMALS');
1053: OE_BULK_MSG_PUB.Add('Y','ERROR');
1054: x_return_status := -99;
1055:
1056: ELSE
1057:
1077: IF l_qty_return_status = 'W' THEN
1078: fnd_message.set_name('ONT', 'OE_DECIMAL_MAX_PRECISION');
1079: END IF;
1080: --move INV error message to OE message stack
1081: OE_BULK_MSG_PUB.Add('Y','ERROR');
1082: x_return_status := -99;
1083: END IF;
1084:
1085: END IF; -- config related item type
1266: --
1267: BEGIN
1268: IF LENGTHB(p_user_item_description) > 240 THEN
1269: fnd_message.set_name('ONT','ONT_USER_ITEM_DESC_TOO_LONG');
1270: OE_BULK_MSG_PUB.ADD;
1271: IF l_debug_level > 0 THEN
1272: oe_debug_pub.add( 'THE LENGTH OF USER_ITEM_DESCRIPTION SHOULD NOT EXCEED 240 CHARA CTERS FOR DROP SHIP LINES.' , 3 ) ;
1273: END IF;
1274: RETURN FALSE;
1342: IF l_debug_level > 0 THEN
1343: oe_debug_pub.add( 'OTHERS ERROR , LINE.UNBOOK_ORDER' ) ;
1344: oe_debug_pub.add( SUBSTR ( SQLERRM , 1 , 240 ) ) ;
1345: END IF;
1346: IF OE_BULK_MSG_PUB.Check_Msg_Level(OE_BULK_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1347: THEN
1348: OE_BULK_MSG_PUB.Add_Exc_Msg
1349: ( G_PKG_NAME
1350: , 'Unbook_Order'
1344: oe_debug_pub.add( SUBSTR ( SQLERRM , 1 , 240 ) ) ;
1345: END IF;
1346: IF OE_BULK_MSG_PUB.Check_Msg_Level(OE_BULK_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1347: THEN
1348: OE_BULK_MSG_PUB.Add_Exc_Msg
1349: ( G_PKG_NAME
1350: , 'Unbook_Order'
1351: );
1352: END IF;
1586: IF l_debug_level > 0 THEN
1587: oe_debug_pub.add( 'OTHERS ERROR , LINE.DEFAULT_RECORD' ) ;
1588: oe_debug_pub.add( SUBSTR ( SQLERRM , 1 , 240 ) ) ;
1589: END IF;
1590: IF OE_BULK_MSG_PUB.Check_Msg_Level(OE_BULK_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1591: THEN
1592: OE_BULK_MSG_PUB.Add_Exc_Msg
1593: ( G_PKG_NAME
1594: , 'Default_Record'
1588: oe_debug_pub.add( SUBSTR ( SQLERRM , 1 , 240 ) ) ;
1589: END IF;
1590: IF OE_BULK_MSG_PUB.Check_Msg_Level(OE_BULK_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1591: THEN
1592: OE_BULK_MSG_PUB.Add_Exc_Msg
1593: ( G_PKG_NAME
1594: , 'Default_Record'
1595: );
1596: END IF;
1653: ELSIF p_line_rec.invoice_to_org_id(p_index) <>
1654: OE_Bulk_Order_PVT.g_header_rec.invoice_to_org_id(p_header_index)
1655: THEN
1656: FND_MESSAGE.SET_NAME('ONT','OE_BULK_DIFF_INVOICE_TO');
1657: OE_BULK_MSG_PUB.Add('Y', 'ERROR');
1658: x_return_status := FND_API.G_RET_STS_ERROR;
1659: END IF;
1660:
1661:
1776: AND OE_BULK_CACHE.G_ITEM_TBL(l_c_index).service_item_flag = 'Y')
1777: THEN -- Service item type
1778: oe_debug_pub.add( 'Populate_Internal_Fields ab' ) ;
1779: FND_MESSAGE.SET_NAME('ONT','OE_BULK_NOT_SUPP_ITEM_TYPE');
1780: OE_BULK_MSG_PUB.Add('Y', 'ERROR');
1781: x_return_status := FND_API.G_RET_STS_ERROR;
1782: x_unsupported_feature := 'Y';
1783: p_line_rec.lock_control(p_index) := -98;
1784: ELSE
1911: OR (OE_BULK_CACHE.G_ITEM_TBL(l_c_index).replenish_to_order_flag = 'Y')
1912: THEN
1913: oe_debug_pub.add( 'Populate_Internal_Fields 4a' ) ;
1914: FND_MESSAGE.SET_NAME('ONT','OE_BULK_NOT_SUPP_ITEM_TYPE');
1915: OE_BULK_MSG_PUB.Add('Y', 'ERROR');
1916: x_return_status := FND_API.G_RET_STS_ERROR;
1917: x_unsupported_feature := 'Y';
1918: p_line_rec.lock_control(p_index) := -98;
1919:
1988: oe_debug_pub.add( 'error in calculate_dual_quantity 2 ' ) ;
1989: END IF;
1990:
1991: FND_MESSAGE.SET_NAME('ONT','OE_BULK_OPM_DUAL_QTY_ERROR'); -- HVOP define better OM or GMI error code
1992: OE_BULK_MSG_PUB.Add('Y', 'ERROR');
1993: x_return_status := FND_API.G_RET_STS_ERROR;
1994: END IF;
1995: oe_debug_pub.add( 'Populate_Internal_Fields 6' ) ;
1996: IF l_debug_level > 0 THEN
2047: IF OE_BULK_CACHE.G_LINE_TYPE_TBL(l_c_index).order_category_code
2048: <> 'ORDER'
2049: THEN
2050: FND_MESSAGE.SET_NAME('ONT','OE_BULK_NOT_SUPP_RETURN');
2051: OE_BULK_MSG_PUB.Add('Y', 'ERROR');
2052: x_return_status := FND_API.G_RET_STS_ERROR;
2053: ELSE
2054: p_line_rec.line_category_code(p_index) := 'ORDER';
2055: END IF;
2072: OR (OE_BULK_CACHE.G_ORDER_TYPE_TBL(l_d_index).tax_calculation_event IS NULL))
2073: AND NVL(p_process_tax,'N') <> 'Y'
2074: THEN
2075: FND_MESSAGE.SET_NAME('ONT','OE_BULK_NOT_SUPP_TAX_CAL');
2076: OE_BULK_MSG_PUB.Add('Y', 'ERROR');
2077: x_return_status := FND_API.G_RET_STS_ERROR;
2078: END IF;
2079: */
2080:
2089: p_line_rec.lock_control(p_index) := -99 ;
2090: fnd_message.set_name('ONT','OE_INVALID_ATTRIBUTE');
2091: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',
2092: OE_Order_UTIL.Get_Attribute_Name('LINE_TYPE_ID'));
2093: OE_BULK_MSG_PUB.Add('Y','ERROR');
2094: -- fix bug 5109227
2095:
2096: IF l_debug_level > 0 THEN
2097: oe_debug_pub.add( 'NO_DATA_FOUND in LOAD_LINE_TYPE' ) ;
2154: oe_debug_pub.add( 'OTHERS ERROR , LINE.POPULATE_INTERNAL_FIELDS' ) ;
2155: oe_debug_pub.add( SUBSTR ( SQLERRM , 1 , 240 ) ) ;
2156: END IF;
2157: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2158: IF OE_BULK_MSG_PUB.Check_Msg_Level(OE_BULK_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2159: THEN
2160: OE_BULK_MSG_PUB.Add_Exc_Msg
2161: ( G_PKG_NAME
2162: , 'Populate_Internal_Fields'
2156: END IF;
2157: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2158: IF OE_BULK_MSG_PUB.Check_Msg_Level(OE_BULK_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2159: THEN
2160: OE_BULK_MSG_PUB.Add_Exc_Msg
2161: ( G_PKG_NAME
2162: , 'Populate_Internal_Fields'
2163: );
2164: END IF;
2214: FND_MESSAGE.SET_NAME('ONT','OE_OI_PRICE_WARNING');
2215: FND_MESSAGE.SET_TOKEN('CUST_PRICE'
2216: ,p_line_rec.customer_item_net_price(p_line_index));
2217: FND_MESSAGE.SET_TOKEN('SPLR_PRICE',l_unit_selling_price);
2218: OE_BULK_MSG_PUB.Add;
2219:
2220: END IF;
2221:
2222: IF nvl(p_line_rec.customer_payment_term_id(p_line_index)
2227: FND_MESSAGE.SET_NAME('ONT','OE_OI_PAYMENT_TERM_WARNING');
2228: FND_MESSAGE.SET_TOKEN('CUST_TERM'
2229: ,p_line_rec.customer_payment_term_id(p_line_index));
2230: FND_MESSAGE.SET_TOKEN('SPLR_TERM',l_payment_term_id);
2231: OE_BULK_MSG_PUB.Add;
2232:
2233: END IF;
2234:
2235: END IF;
2244: IF l_debug_level > 0 THEN
2245: oe_debug_pub.add( 'OTHERS ERROR , LINE.POST_PROCESS' ) ;
2246: oe_debug_pub.add( SUBSTR ( SQLERRM , 1 , 240 ) ) ;
2247: END IF;
2248: IF OE_BULK_MSG_PUB.Check_Msg_Level(OE_BULK_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2249: THEN
2250: OE_BULK_MSG_PUB.Add_Exc_Msg
2251: ( G_PKG_NAME
2252: , 'Post_Process'
2246: oe_debug_pub.add( SUBSTR ( SQLERRM , 1 , 240 ) ) ;
2247: END IF;
2248: IF OE_BULK_MSG_PUB.Check_Msg_Level(OE_BULK_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2249: THEN
2250: OE_BULK_MSG_PUB.Add_Exc_Msg
2251: ( G_PKG_NAME
2252: , 'Post_Process'
2253: );
2254: END IF;
2359: END IF;
2360: FOR l_index IN 1..l_line_count LOOP
2361:
2362: -- Set the message context for errors.
2363: oe_bulk_msg_pub.set_msg_context
2364: ( p_entity_code => 'LINE'
2365: ,p_entity_id => p_line_rec.line_id(l_index)
2366: ,p_header_id => p_line_rec.header_id(l_index)
2367: ,p_line_id => p_line_rec.line_id(l_index)
2431: FND_MESSAGE.SET_NAME('ONT','OE_OI_DUPLICATE_REF');
2432: FND_MESSAGE.SET_TOKEN('DUPLICATE_REF'
2433: ,'orig_sys_line_ref');
2434: p_line_rec.lock_control(l_index) := -99;
2435: OE_BULK_MSG_PUB.Add;
2436: END IF;
2437: ELSIF OE_Bulk_Order_PVT.G_IMPORT_SHIPMENTS = 'YES' THEN
2438: IF (p_line_rec.orig_sys_line_ref(l_last_line_index)
2439: = p_line_rec.orig_sys_line_ref(l_index))
2443: FND_MESSAGE.SET_NAME('ONT','OE_OI_DUPLICATE_REF');
2444: FND_MESSAGE.SET_TOKEN('DUPLICATE_REF'
2445: ,'orig_sys_line_ref and orig_sys_shipment_ref');
2446: p_line_rec.lock_control(l_index) := -99;
2447: OE_BULK_MSG_PUB.Add;
2448: END IF;
2449: END IF;
2450:
2451: END IF;
2546:
2547: fnd_message.set_name('ONT','OE_ATTRIBUTE_REQUIRED');
2548: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',
2549: OE_Order_UTIL.Get_Attribute_Name('INVENTORY_ITEM_ID'));
2550: OE_BULK_MSG_PUB.Add('Y','ERROR');
2551: p_line_rec.lock_control(l_index) := -99;
2552:
2553: -- To avoid Insert failure, populate not null column.
2554: -- This record will be deleted later.
2564:
2565: fnd_message.set_name('ONT','OE_ATTRIBUTE_REQUIRED');
2566: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',
2567: OE_Order_UTIL.Get_Attribute_Name('LINE_TYPE_ID'));
2568: OE_BULK_MSG_PUB.Add('Y','ERROR');
2569: p_line_rec.lock_control(l_index) := -99;
2570: IF l_debug_level > 0 THEN
2571: oe_debug_pub.add( 'IN ERROR 2 ' ) ;
2572: END IF;
2590: p_line_rec.lock_control(l_index) := -99 ;
2591: fnd_message.set_name('ONT','OE_INVALID_ATTRIBUTE');
2592: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',
2593: OE_Order_UTIL.Get_Attribute_Name('LINE_TYPE_ID'));
2594: OE_BULK_MSG_PUB.Add('Y','ERROR');
2595:
2596: ELSE
2597:
2598: -- Validate that Order/Line Type has valid WF assignment
2614: p_line_rec.lock_control(l_index) := -99 ;
2615: fnd_message.set_name('ONT','OE_INVALID_ATTRIBUTE');
2616: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',
2617: OE_Order_UTIL.Get_Attribute_Name('LINE_TYPE_ID'));
2618: OE_BULK_MSG_PUB.Add('Y','ERROR');
2619: ELSE
2620: p_line_rec.wf_process_name(l_index) := l_process_name;
2621: END IF;
2622:
2635: IF (p_line_rec.tax_exempt_reason_code(l_index) IS NULL) THEN
2636: p_line_rec.lock_control(l_index) := -99;
2637: fnd_message.set_name('ONT','OE_ATTRIBUTE_REQUIRED');
2638: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','Tax Exempt Reason');
2639: OE_BULK_MSG_PUB.Add('Y','ERROR');
2640:
2641: ELSIF NOT OE_BULK_PROCESS_HEADER.Valid_Tax_Exempt_Reason
2642: (p_line_rec.tax_exempt_reason_code(l_index)) THEN
2643:
2644: p_line_rec.lock_control(l_index) := -99;
2645: FND_MESSAGE.SET_NAME('ONT','OE_INVALID_ATTRIBUTE');
2646: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',
2647: OE_Order_UTIL.Get_Attribute_Name('TAX_EXEMPT_REASON_CODE'));
2648: OE_BULK_MSG_PUB.Add('Y','ERROR');
2649:
2650: END IF;
2651:
2652: END IF;
2660: IF l_debug_level > 0 THEN
2661: oe_debug_pub.add( 'IN ERROR 6 ' ) ;
2662: END IF;
2663: fnd_message.set_name('ONT','OE_TAX_EXEMPTION_NOT_ALLOWED');
2664: OE_BULK_MSG_PUB.Add('Y','ERROR');
2665: END IF;
2666:
2667: END IF;
2668:
2711: IF l_debug_level > 0 THEN
2712: oe_debug_pub.add( 'IN ERROR 7 ' ) ;
2713: END IF;
2714: FND_MESSAGE.SET_NAME('ONT', 'OE_INVALID_ITEM_WHSE');
2715: OE_BULK_MSG_PUB.add('Y','ERROR');
2716: END IF;
2717:
2718: END IF;
2719:
2743:
2744: IF l_count = 0 THEN
2745: p_line_rec.shipping_method_code(l_index) := NULL;
2746:
2747: OE_BULK_MSG_PUB.Update_Msg_Context(p_attribute_code => 'SHIPPING_METHOD');
2748: fnd_message.set_name('ONT','OE_INVALID_ATTRIBUTE');
2749: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',
2750: OE_Order_UTIL.Get_Attribute_Name('SHIPPING_METHOD_CODE'));
2751: OE_BULK_MSG_PUB.Add;
2747: OE_BULK_MSG_PUB.Update_Msg_Context(p_attribute_code => 'SHIPPING_METHOD');
2748: fnd_message.set_name('ONT','OE_INVALID_ATTRIBUTE');
2749: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',
2750: OE_Order_UTIL.Get_Attribute_Name('SHIPPING_METHOD_CODE'));
2751: OE_BULK_MSG_PUB.Add;
2752: OE_BULK_MSG_PUB.Update_Msg_Context(p_attribute_code => null);
2753: END IF;
2754:
2755: END IF;
2748: fnd_message.set_name('ONT','OE_INVALID_ATTRIBUTE');
2749: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',
2750: OE_Order_UTIL.Get_Attribute_Name('SHIPPING_METHOD_CODE'));
2751: OE_BULK_MSG_PUB.Add;
2752: OE_BULK_MSG_PUB.Update_Msg_Context(p_attribute_code => null);
2753: END IF;
2754:
2755: END IF;
2756:
2774: IF l_debug_level > 0 THEN
2775: oe_debug_pub.add( 'error 1 ' ) ;
2776: END IF;
2777: fnd_message.set_name('ONT','OE_BULK_OPM_NOT_PROCESS');
2778: OE_BULK_MSG_PUB.Add('Y','ERROR');
2779: END IF;
2780:
2781: END IF; */
2782:
2803: IF l_debug_level > 0 THEN
2804: oe_debug_pub.add( 'error 2 ' ) ;
2805: END IF;
2806: fnd_message.set_name('ONT','OE_BULK_OPM_NOT_PROCESS');
2807: OE_BULK_MSG_PUB.Add('Y','ERROR');
2808: END IF;
2809: END IF; -- OE_BULK_CACHE.G_ITEM_TBL(l_c_index).opm_item_id IS NULL THEN
2810:
2811: END IF; -- p_line_rec.inventory_item_id(p_index) IS NOT NULL THEN
2857:
2858: fnd_message.set_name('ONT','OE_INVALID_ORDER_QUANTITY_UOM');
2859: fnd_message.set_token('ITEM',p_line_rec.ordered_item(l_index) );
2860: fnd_message.set_token('UOM', l_uom);
2861: OE_BULK_MSG_PUB.Add('Y','ERROR');
2862: --RAISE FND_API.G_EXC_ERROR;
2863: END IF;
2864: EXCEPTION
2865: when no_data_found then
2869: p_line_rec.lock_control(l_index) := -99;
2870: fnd_message.set_name('ONT','OE_INVALID_ORDER_QUANTITY_UOM');
2871: fnd_message.set_token('ITEM',p_line_rec.ordered_item(l_index) );
2872: fnd_message.set_token('UOM', l_uom);
2873: OE_BULK_MSG_PUB.Add('Y','ERROR');
2874: END;
2875:
2876: ELSE
2877:
2890: oe_debug_pub.add( 'ITEM ID :'||P_LINE_REC.INVENTORY_ITEM_ID ( L_INDEX ) ) ;
2891: END IF;
2892: p_line_rec.lock_control(l_index) := -99;
2893: fnd_message.set_name('ONT', 'OE_INVALID_ITEM_UOM');
2894: OE_BULK_MSG_PUB.Add('Y','ERROR');
2895: END IF;
2896:
2897: END IF; -- uom validation based on item type
2898:
2914: IF (p_line_rec.project_id(l_index) IS NOT NULL AND
2915: p_line_rec.ship_from_org_id(l_index) IS NULL)
2916: THEN
2917: FND_MESSAGE.SET_NAME('ONT', 'OE_SHIP_FROM_REQD');
2918: OE_BULK_MSG_PUB.Add('Y','ERROR');
2919: p_line_rec.lock_control(l_index) := -99;
2920: IF l_debug_level > 0 THEN
2921: oe_debug_pub.add( 'IN ERROR 11 ' ) ;
2922: END IF;
2929: IF pjm_project.val_proj_idtonum(p_line_rec.project_id(l_index),
2930: p_line_rec.ship_from_org_id(l_index)) IS NULL
2931: THEN
2932: FND_MESSAGE.SET_NAME('ONT', 'OE_INVALID_SHIP_FROM_PROJ');
2933: OE_BULK_MSG_PUB.Add('Y','ERROR');
2934: p_line_rec.lock_control(l_index) := -99;
2935: IF l_debug_level > 0 THEN
2936: oe_debug_pub.add( 'IN ERROR 12 ' ) ;
2937: END IF;
2940:
2941: IF (p_line_rec.task_id(l_index) IS NOT NULL
2942: AND p_line_rec.project_id(l_index) IS NULL) THEN
2943: FND_MESSAGE.SET_NAME('ONT', 'OE_VAL_PROJECT_REQD');
2944: OE_BULK_MSG_PUB.Add('Y','ERROR');
2945: p_line_rec.lock_control(l_index) := -99;
2946: IF l_debug_level > 0 THEN
2947: oe_debug_pub.add( 'IN ERROR 13 ' ) ;
2948: END IF;
2954: p_line_rec.task_id(l_index)) THEN
2955: fnd_message.set_name('ONT','OE_INVALID_ATTRIBUTE');
2956: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',
2957: OE_Order_Util.Get_Attribute_Name('task_id'));
2958: OE_BULK_MSG_PUB.Add('Y','ERROR');
2959: p_line_rec.lock_control(l_index) := -99;
2960: IF l_debug_level > 0 THEN
2961: oe_debug_pub.add( 'IN ERROR 14 ' ) ;
2962: END IF;
2968:
2969: IF Validate_task_reqd(p_line_rec.project_id(l_index),
2970: p_line_rec.ship_from_org_id(l_index)) THEN
2971: FND_MESSAGE.SET_NAME('ONT', 'OE_VAL_TASK_REQD');
2972: OE_BULK_MSG_PUB.Add('Y','ERROR');
2973: p_line_rec.lock_control(l_index) := -99;
2974: IF l_debug_level > 0 THEN
2975: oe_debug_pub.add( 'IN ERROR 15 ' ) ;
2976: END IF;
2985: (p_line_rec.inventory_item_id(l_index),
2986: p_line_rec.ship_from_org_id(l_index)) = 'Y'
2987: THEN
2988: fnd_message.set_name('ONT', 'OE_UEFF_NUMBER_REQD');
2989: OE_BULK_MSG_PUB.Add('Y','ERROR');
2990: p_line_rec.lock_control(l_index) := -99;
2991: IF l_debug_level > 0 THEN
2992: oe_debug_pub.add( 'IN ERROR 16 ' ) ;
2993: END IF;
2999: p_line_rec.task_id(l_index) IS NOT NULL OR
3000: p_line_rec.end_item_unit_number(l_index) IS NOT NULL)
3001: THEN
3002: fnd_message.set_name('ONT', 'OE_PJM_NOT_INSTALLED');
3003: OE_BULK_MSG_PUB.Add('Y','ERROR');
3004: p_line_rec.lock_control(l_index) := -99;
3005: IF l_debug_level > 0 THEN
3006: oe_debug_pub.add( 'IN ERROR 17 ' ) ;
3007: END IF;
3029: )
3030: THEN
3031: p_line_rec.lock_control(l_index) := -99;
3032: fnd_message.set_name('ONT', 'OE_ITEM_VALIDATION_FAILED');
3033: OE_BULK_MSG_PUB.Add('Y','ERROR');
3034: IF l_debug_level > 0 THEN
3035: oe_debug_pub.add( 'IN ERROR 18 ' ) ;
3036: END IF;
3037: END IF;
3063: p_line_rec.lock_control(l_index) := -99;
3064: fnd_message.set_name('ONT', 'OE_ITORD_VALIDATION_FAILED');
3065: fnd_message.set_token('ITEM',OE_ITORD_UTIL.get_item_name(p_line_rec.inventory_item_id(l_index)));
3066: fnd_message.set_token('CATEGORY',OE_ITORD_UTIL.get_item_category_name(p_line_rec.inventory_item_id(l_index)));
3067: OE_BULK_MSG_PUB.Add('Y','ERROR');
3068: IF l_debug_level > 0 THEN
3069: oe_debug_pub.add( 'IN ERROR 19 ' ) ;
3070: END IF;
3071: END IF;
3084: ( p_line_rec.user_item_description(l_index))
3085: THEN
3086: p_line_rec.lock_control(l_index) := -99;
3087: fnd_message.set_name('ONT', 'ONT_USER_ITEM_DESC_TOO_LONG');
3088: OE_BULK_MSG_PUB.Add('Y','ERROR');
3089: IF l_debug_level > 0 THEN
3090: oe_debug_pub.add( 'LENGTH OF USER ITEM DESC EXCEEDS LIMIT FOR EXTERNAL ORDERS. ' ) ;
3091: END IF;
3092: END IF;
3162: END IF;
3163: fnd_message.set_name('ONT','OE_INVALID_ATTRIBUTE');
3164: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',
3165: OE_Order_Util.Get_Attribute_Name('INVOICE_TO_ORG_ID'));
3166: OE_BULK_MSG_PUB.Add('Y','ERROR');
3167: END IF;
3168:
3169: END IF; -- Invoice to is not null
3170:
3185: END IF;
3186: fnd_message.set_name('ONT','OE_INVALID_ATTRIBUTE');
3187: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',
3188: OE_Order_Util.Get_Attribute_Name('ship_to_org_id'));
3189: OE_BULK_MSG_PUB.Add('Y','ERROR');
3190: END IF;
3191:
3192: END IF; -- ship to is not null
3193:
3207: END IF;
3208: fnd_message.set_name('ONT','OE_INVALID_ATTRIBUTE');
3209: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',
3210: OE_Order_Util.Get_Attribute_Name('DELIVER_TO_ORG_ID'));
3211: OE_BULK_MSG_PUB.Add('Y','ERROR');
3212: END IF;
3213:
3214: END IF; -- deliver to is not null
3215:
3238: THEN
3239: p_line_rec.lock_control(l_index) := -99;
3240: fnd_message.set_name('ONT','OE_INVALID_ATTRIBUTE');
3241: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','Entity: Bill To Contact ');
3242: OE_BULK_MSG_PUB.Add('Y','ERROR');
3243: END IF;
3244:
3245: END IF;
3246:
3265: THEN
3266: p_line_rec.lock_control(l_index) := -99;
3267: fnd_message.set_name('ONT','OE_INVALID_ATTRIBUTE');
3268: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','Entity: SHIP To Contact ');
3269: OE_BULK_MSG_PUB.Add('Y','ERROR');
3270: END IF;
3271:
3272: END IF;
3273:
3292: THEN
3293: p_line_rec.lock_control(l_index) := -99;
3294: fnd_message.set_name('ONT','OE_INVALID_ATTRIBUTE');
3295: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','Entity: DeliverToContact');
3296: OE_BULK_MSG_PUB.Add('Y','ERROR');
3297: END IF;
3298:
3299: END IF;
3300:
3307: IF NOT OE_BULK_PROCESS_HEADER.Validate_End_Customer(p_line_rec.end_customer_id(l_index)) THEN
3308: p_line_rec.lock_control(l_index) := -99;
3309: fnd_message.set_name('ONT','OE_INVALID_ATTRIBUTE');
3310: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',OE_Order_Util.Get_Attribute_Name('end_customer_id'));
3311: OE_BULK_MSG_PUB.Add('Y','ERROR');
3312: END IF;
3313: END IF;
3314:
3315: IF p_line_rec.end_Customer_Contact_id(l_index) IS NOT NULL AND
3317: IF NOT OE_BULK_PROCESS_HEADER.Validate_End_Customer_Contact(p_line_rec.end_customer_contact_id(l_index)) THEN
3318: p_line_rec.lock_control(l_index) := -99;
3319: fnd_message.set_name('ONT','OE_INVALID_ATTRIBUTE');
3320: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',OE_Order_Util.Get_Attribute_Name('end_customer_contact_id'));
3321: OE_BULK_MSG_PUB.Add('Y','ERROR');
3322: END IF;
3323: END IF;
3324:
3325:
3329: p_line_rec.end_customer_id(l_index)) THEN
3330: p_line_rec.lock_control(l_index) := -99;
3331: fnd_message.set_name('ONT','OE_INVALID_ATTRIBUTE');
3332: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',OE_Order_Util.Get_Attribute_Name('end_customer_site_use_id'));
3333: OE_BULK_MSG_PUB.Add('Y','ERROR');
3334: END IF;
3335: END IF;
3336:
3337: IF p_line_rec.IB_owner(l_index) IS NOT NULL AND NOT
3339: IF NOT OE_BULK_PROCESS_HEADER.Validate_IB_Owner(p_line_rec.IB_owner(l_index)) THEN
3340: p_line_rec.lock_control(l_index) := -99;
3341: fnd_message.set_name('ONT','OE_INVALID_ATTRIBUTE');
3342: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',OE_Order_Util.Get_Attribute_Name('IB_owner'));
3343: OE_BULK_MSG_PUB.Add('Y','ERROR');
3344: END IF;
3345: END IF;
3346:
3347: IF p_line_rec.IB_current_location(l_index) IS NOT NULL AND NOT
3349: IF NOT OE_BULK_PROCESS_HEADER.Validate_IB_current_Location (p_line_rec.IB_current_location(l_index)) THEN
3350: p_line_rec.lock_control(l_index) := -99;
3351: fnd_message.set_name('ONT','OE_INVALID_ATTRIBUTE');
3352: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',OE_Order_Util.Get_Attribute_Name('IB_location'));
3353: OE_BULK_MSG_PUB.Add('Y','ERROR');
3354: END IF;
3355: END IF;
3356:
3357: IF p_line_rec.IB_Installed_at_location(l_index) IS NOT NULL AND NOT
3359: IF NOT OE_BULK_PROCESS_HEADER.Validate_IB_Inst_loc(p_line_rec.IB_Installed_at_location(l_index)) THEN
3360: p_line_rec.lock_control(l_index) := -99;
3361: fnd_message.set_name('ONT','OE_INVALID_ATTRIBUTE');
3362: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',OE_Order_Util.Get_Attribute_Name('Installed_at_location'));
3363: OE_BULK_MSG_PUB.Add('Y','ERROR');
3364: END IF;
3365: END IF;
3366: --Bug 5054618}
3367:
3386: IF l_rule_type = 'PP_DR_ALL' OR l_rule_type = 'PP_DR_PP' THEN
3387: p_line_rec.lock_control(l_index) := -99 ;
3388: fnd_message.set_name('ONT','OE_INVALID_ATTRIBUTE');
3389: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',OE_Order_UTIL.Get_Attribute_Name('ACCOUNTING_RULE_ID'));
3390: OE_BULK_MSG_PUB.Add('Y','ERROR');
3391: END IF; -- end of accounting rule type
3392: END IF; -- end of accounting_rule_id not null
3393: END IF; -- end of non-service line
3394:
3478: WHEN NO_DATA_FOUND THEN
3479: p_line_rec.lock_control(l_index) := -99;
3480: fnd_message.set_name('ONT','OE_INVALID_ATTRIBUTE');
3481: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','Entity: Tax Exemptions');
3482: OE_BULK_MSG_PUB.Add('Y','ERROR');
3483:
3484:
3485: END;
3486: END IF;
3549: oe_debug_pub.add( 'IN ERROR 29 ' ) ;
3550: END IF;
3551: fnd_message.set_name('ONT','OE_INVALID_ATTRIBUTE');
3552: FND_MESSAGE.SET_TOKEN('ATTRIBUTE','Entity: Tax Code');
3553: OE_BULK_MSG_PUB.Add('Y','ERROR');
3554: END; -- BEGIN
3555: END IF;
3556:
3557:
3566: AND p_line_rec.ordered_quantity(l_index) > 1 THEN
3567:
3568: p_line_rec.lock_control(l_index) := -99;
3569: FND_Message.Set_Name('ONT', 'OE_OTA_INVALID_QTY');
3570: OE_BULK_MSG_PUB.Add('Y','ERROR');
3571:
3572: END IF;
3573:
3574: -- issue a warning message if the PO number
3582: ,p_line_rec.sold_to_org_id(l_index)
3583: ,p_line_rec.header_id(l_index) )
3584: THEN
3585: FND_MESSAGE.SET_NAME('ONT','OE_VAL_DUP_PO_NUMBER');
3586: OE_BULK_MSG_PUB.Add('Y','ERROR');
3587: END IF;
3588: END IF;
3589: IF p_line_rec.service_end_date(l_index) IS NOT NULL
3590: AND p_line_rec.service_start_date(l_index) IS NOT NULL
3592: IF p_line_rec.service_start_date(l_index) >=
3593: p_line_rec.service_end_date(l_index)
3594: THEN
3595: fnd_message.set_name('ONT','OE_SERV_END_DATE');
3596: OE_BULK_MSG_PUB.Add('Y','ERROR');
3597: p_line_rec.lock_control(l_index) := -99;
3598: END IF;
3599: END IF;
3600:
3629: p_line_rec.lock_control(l_index) := -99;
3630: FND_MESSAGE.SET_NAME('ONT','OE_INVALID_ATTRIBUTE');
3631: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',
3632: 'Entity:Flexfield:Line_Desc_Flex');
3633: OE_BULK_MSG_PUB.Add('Y', 'ERROR');
3634:
3635: ELSE -- if the flex validation is successfull
3636: -- For bug 2511313
3637: IF p_line_rec.context(l_index) IS NULL
3780: p_line_rec.lock_control(l_index) := -99;
3781: FND_MESSAGE.SET_NAME('ONT','OE_INVALID_ATTRIBUTE');
3782: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',
3783: 'Entity:Flexfield:Industry Line_Desc_Flex');
3784: OE_BULK_MSG_PUB.Add('Y', 'ERROR');
3785:
3786: ELSE -- for bug 2511313
3787:
3788: IF p_line_rec.industry_context(l_index) IS NULL
3967: p_line_rec.lock_control(l_index) := -99;
3968: FND_MESSAGE.SET_NAME('ONT','OE_INVALID_ATTRIBUTE');
3969: FND_MESSAGE.SET_TOKEN('ATTRIBUTE',
3970: 'Entity:Flexfield:TP Line_Desc_Flex');
3971: OE_BULK_MSG_PUB.Add('Y', 'ERROR');
3972:
3973: ELSE -- if the flex validation is successfull
3974: -- For bug 2511313
3975: IF p_line_rec.tp_context(l_index) IS NULL
4073: oe_debug_pub.add( 'LIST PRICE OR SELLING PRICE IS NULL... ' ) ;
4074: END IF;
4075: p_line_rec.lock_control(l_index) := -99;
4076: FND_MESSAGE.SET_NAME('ONT','OE_OI_PRICE');
4077: OE_BULK_MSG_PUB.Add;
4078: ELSIF p_line_rec.pricing_quantity(l_index) IS NULL
4079: THEN
4080: IF l_debug_level > 0 THEN
4081: oe_debug_pub.add( 'PRICING QUANTITY IS NULL...RESETTING' ) ;
4253: AND l_on_generic_hold )
4254: THEN
4255: -- Add scheduling on hold message
4256: FND_MESSAGE.SET_NAME('ONT','OE_SCH_LINE_ON_HOLD');
4257: OE_BULK_MSG_PUB.Add;
4258: ELSE
4259: IF OE_BULK_CACHE.G_LINE_TYPE_TBL(l_d_index).scheduling_level_code = 'ONE'
4260: OR (OE_BULK_CACHE.G_LINE_TYPE_TBL(l_d_index).scheduling_level_code IS NULL
4261: AND OE_BULK_CACHE.G_ORDER_TYPE_TBL(l_c_index).scheduling_level_code = 'ONE')
4261: AND OE_BULK_CACHE.G_ORDER_TYPE_TBL(l_c_index).scheduling_level_code = 'ONE')
4262: THEN
4263: -- Add ATP Only message
4264: FND_MESSAGE.SET_NAME('ONT','OE_ATP_ONLY');
4265: OE_BULK_MSG_PUB.Add;
4266: ELSE
4267: Check_Scheduling_Attributes(p_line_rec => p_line_rec
4268: ,p_index =>l_index
4269: ,x_return_status => l_return_status);
4291: p_line_rec.schedule_status_code(l_index) := 'SCHEDULED';
4292: p_line_rec.visible_demand_flag(l_index) := 'N';
4293: ELSE
4294: FND_MESSAGE.SET_NAME('ONT','OE_INV_NO_WAREHOUSE');
4295: OE_BULK_MSG_PUB.Add;
4296: IF p_line_rec.schedule_ship_date(l_index) IS NOT NULL
4297: OR p_line_rec.schedule_arrival_date(l_index) IS NOT NULL THEN
4298: p_line_rec.lock_control(l_index) := -99;
4299: END IF;
4323: IF l_debug_level > 0 THEN
4324: oe_debug_pub.add( 'Request date exceeds Latest Acceptable Date ',1 ) ;
4325: END IF;
4326: FND_MESSAGE.SET_NAME('ONT','ONT_SCH_REQUEST_EXCEED_LAD');
4327: OE_BULK_MSG_PUB.Add;
4328: ELSIF ((l_order_date_type_code = 'SHIP'
4329: AND trunc(NVL(p_line_rec.schedule_ship_date(l_index),p_line_rec.request_date(l_index)))
4330: > trunc(NVL(p_line_rec.latest_acceptable_date(l_index),p_line_rec.request_date(l_index))))
4331: OR (l_order_date_type_code = 'ARRIVAL'
4331: OR (l_order_date_type_code = 'ARRIVAL'
4332: AND trunc(NVL(p_line_rec.schedule_arrival_date(l_index),p_line_rec.request_date(l_index)))
4333: > trunc(NVL(p_line_rec.latest_acceptable_date(l_index),p_line_rec.request_date(l_index))))) THEN
4334: FND_MESSAGE.SET_NAME('ONT','ONT_SCH_LAD_SCH_FAILED');
4335: OE_BULK_MSG_PUB.Add;
4336: IF l_debug_level > 0 THEN
4337: oe_debug_pub.add( 'SCHEDULE DATE EXCEEDS LAD ',1 ) ;
4338: END IF;
4339:
4528: IF l_debug_level > 0 THEN
4529: oe_debug_pub.add( 'OTHERS ERROR , LINE.ENTITY' ) ;
4530: oe_debug_pub.add( SUBSTR ( SQLERRM , 1 , 240 ) ) ;
4531: END IF;
4532: IF OE_BULK_MSG_PUB.Check_Msg_Level(OE_BULK_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
4533: THEN
4534: OE_BULK_MSG_PUB.Add_Exc_Msg
4535: ( G_PKG_NAME
4536: , 'Entity'
4530: oe_debug_pub.add( SUBSTR ( SQLERRM , 1 , 240 ) ) ;
4531: END IF;
4532: IF OE_BULK_MSG_PUB.Check_Msg_Level(OE_BULK_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
4533: THEN
4534: OE_BULK_MSG_PUB.Add_Exc_Msg
4535: ( G_PKG_NAME
4536: , 'Entity'
4537: );
4538: END IF;
4589:
4590: IF nvl(p_line_rec.ordered_quantity2(p_index), 0) < 0
4591: THEN
4592: FND_MESSAGE.SET_NAME('ONT','SO_PR_NEGATIVE_AMOUNT'); -- HVOP define better OM or GMI error code
4593: OE_BULK_MSG_PUB.Add('Y', 'ERROR');
4594: p_x_return_status := -1;
4595: IF l_debug_level > 0 THEN
4596: oe_debug_pub.add ('calculate_dual_qty- quantity2 negative so error ', 3);
4597: END IF;
4615: oe_debug_pub.add( 'calculate_dual_qty - invalid warehouse/item combo' ) ;
4616: END IF;
4617: p_x_return_status := -1;
4618: FND_MESSAGE.SET_NAME('ONT', 'OE_INVALID_ITEM_WHSE');
4619: OE_BULK_MSG_PUB.add('Y','ERROR');
4620: RETURN;
4621: END IF;
4622:
4623: END IF;
4736: p_encoded => 'F');
4737: p_x_return_status := -1;
4738: oe_msg_pub.add_text(p_message_text => l_buffer);
4739: --fnd_message.set_name('ONT',l_buffer); -- PAL
4740: OE_BULK_MSG_PUB.Add('Y', 'ERROR');
4741: /*IF l_debug_level > 0 THEN
4742: oe_debug_pub.add(l_buffer,1);
4743: END IF; */
4744: RAISE TOLERANCE_ERROR;
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: END IF; -- (NVL(p_line_rec.ordered_quantity2(p_index),0) <> 0 )
4770:
4863: ,0);
4864: IF (l_return = -68 ) THEN
4865: p_x_return_status := -1;
4866: FND_MESSAGE.set_name('GMI','IC_DEVIATION_HI_ERR');
4867: OE_BULK_MSG_PUB.Add('Y', 'ERROR');
4868: ELSIF(l_return = -69 ) THEN
4869: p_x_return_status := -1;
4870: FND_MESSAGE.set_name('GMI','IC_DEVIATION_HI_ERR');
4871: OE_BULK_MSG_PUB.Add('Y', 'ERROR');
4867: OE_BULK_MSG_PUB.Add('Y', 'ERROR');
4868: ELSIF(l_return = -69 ) THEN
4869: p_x_return_status := -1;
4870: FND_MESSAGE.set_name('GMI','IC_DEVIATION_HI_ERR');
4871: OE_BULK_MSG_PUB.Add('Y', 'ERROR');
4872: END IF; */
4873:
4874: IF l_debug_level > 0 THEN
4875: oe_debug_pub.add('Calculate_dual_quantity : check the deviation 2 and error out if necc ', 3);
4897: p_encoded => 'F');
4898: p_x_return_status := -1;
4899: oe_msg_pub.add_text(p_message_text => l_buffer);
4900: --fnd_message.set_name('ONT',l_buffer);
4901: OE_BULK_MSG_PUB.Add('Y', 'ERROR');
4902:
4903: IF l_debug_level > 0 THEN
4904: oe_debug_pub.add(l_buffer,1);
4905: END IF;
4916: IF (NVL(p_line_rec.ordered_quantity2(p_index),0) = 0 )
4917: OR (NVL(p_line_rec.ordered_quantity(p_index),0) = 0 ) THEN
4918: p_x_return_status := -1;
4919: FND_MESSAGE.set_name('ONT','OE_BULK_OPM_NULL_QTY'); --PROCESS HVOP
4920: OE_BULK_MSG_PUB.Add;
4921:
4922: END IF;
4923:
4924:
4933:
4934: WHEN UOM_CONVERSION_FAILED THEN
4935: oe_debug_pub.add('Exception handling: UOM_CONVERSION_FAILED in calculate_dual_qauntity', 1);
4936: FND_MESSAGE.SET_NAME('INV','INV_NO_CONVERSION_ERR'); -- INVCONV
4937: OE_BULK_MSG_PUB.Add('Y', 'ERROR');
4938:
4939: RAISE FND_API.G_EXC_ERROR;
4940:
4941: WHEN TOLERANCE_ERROR THEN -- INVCONV