[Home] [Help]
327: p_line_rec.item_type_code(p_index) in ('STANDARD','OPTION') AND
328: fnd_profile.value('INV_CTP') = '5'
329: THEN
330:
331: l_org_id := nvl(p_line_rec.ship_from_org_id(p_index), OE_BULK_ORDER_PVT.G_ITEM_ORG);
332: l_c_index := OE_BULK_CACHE.Load_Item
333: (p_key1 => p_line_rec.inventory_item_id(p_index)
334: ,p_key2 => l_org_id
335: ,p_default_attributes => 'Y');
537: IF l_debug_level > 0 THEN
538: oe_debug_pub.add( 'SEGMENTS ENABLED = '||L_N_SEGMENTS ) ;
539: END IF;
540: IF l_debug_level > 0 THEN
541: oe_debug_pub.add( 'VALIDATION_ORG_ID = '||OE_BULK_ORDER_PVT.G_ITEM_ORG ) ;
542: END IF;
543: IF l_debug_level > 0 THEN
544: oe_debug_pub.add( 'ARRAY1 = '||L_SEGMENT_ARRAY ( 1 ) ) ;
545: END IF;
542: END IF;
543: IF l_debug_level > 0 THEN
544: oe_debug_pub.add( 'ARRAY1 = '||L_SEGMENT_ARRAY ( 1 ) ) ;
545: END IF;
546: IF FND_FLEX_EXT.GET_COMBINATION_ID('INV', 'MSTK', 101, SYSDATE, l_n_segments, l_segment_array, l_id, OE_BULK_ORDER_PVT.G_ITEM_ORG) THEN
547: p_line_rec.inventory_item_id(p_index) := l_id;
548: IF l_debug_level > 0 THEN
549: oe_debug_pub.add( 'GET CCID = '||P_LINE_REC.INVENTORY_ITEM_ID ( P_INDEX ) ) ;
550: END IF;
580: FROM mtl_system_items_vl
581: WHERE concatenated_segments = l_inventory_item
582: AND customer_order_enabled_flag = 'Y'
583: AND bom_item_type in (1,2,4)
584: AND organization_id = OE_BULK_ORDER_PVT.G_ITEM_ORG;
585: EXCEPTION
586: WHEN NO_DATA_FOUND THEN
587: NULL;
588: END;
623: Z_Customer_Item_Id => p_line_rec.ordered_item_id(p_index)
624: , Z_Customer_Id => p_line_rec.sold_to_org_id(p_index)
625: , Z_Customer_Item_Number => p_line_rec.ordered_item(p_index)
626: , Z_Organization_Id => nvl(p_line_rec.ship_from_org_id(p_index)
627: ,OE_BULK_ORDER_PVT.G_ITEM_ORG)
628: , Z_Inventory_Item_Id => NULL
629: , Attribute_Name => 'INVENTORY_ITEM_ID'
630: , Error_Code => l_error_code
631: , Error_Flag => l_error_flag
647: Z_Customer_Item_Id => p_line_rec.ordered_item_id(p_index)
648: , Z_Customer_Id => p_line_rec.sold_to_org_id(p_index)
649: , Z_Customer_Item_Number => p_line_rec.ordered_item(p_index)
650: , Z_Organization_Id => nvl(p_line_rec.ship_from_org_id(p_index)
651: ,OE_BULK_ORDER_PVT.G_ITEM_ORG)
652: , Z_Inventory_Item_Id => NULL
653: , Attribute_Name => 'CUSTOMER_ITEM_ID'
654: , Error_Code => l_error_code
655: , Error_Flag => l_error_flag
694: SELECT inventory_item_id
695: INTO l_inventory_item_id_gen
696: FROM mtl_cross_references
697: WHERE cross_reference_type = p_line_rec.item_identifier_type(p_index)
698: AND (organization_id = OE_BULK_ORDER_PVT.G_ITEM_ORG
699: OR organization_id IS NULL)
700: AND cross_reference = p_line_rec.ordered_item(p_index)
701: AND (inventory_item_id = l_inventory_item_id_int
702: OR l_inventory_item_id_int IS NULL);
1031:
1032: inv_decimals_pub.validate_quantity(
1033: p_item_id => p_item_id,
1034: p_organization_id =>
1035: OE_Bulk_Order_PVT.G_ITEM_ORG,
1036: p_input_quantity => p_input_quantity,
1037: p_uom_code => p_uom_code,
1038: x_output_quantity => l_validated_quantity,
1039: x_primary_quantity => l_primary_quantity,
1139: WHERE citems.customer_item_id = cxref.customer_item_id
1140: AND cxref.inventory_item_id = sitems.inventory_item_id
1141: AND sitems.inventory_item_id = p_inventory_item_id
1142: AND sitems.organization_id =
1143: OE_Bulk_Order_PVT.G_ITEM_ORG
1144: AND citems.customer_item_id = p_ordered_item_id
1145: AND citems.customer_id = p_sold_to_org_id
1146: AND citems.inactive_flag = 'N'
1147: AND cxref.inactive_flag = 'N';
1153: ,mtl_system_items_vl sitems
1154: WHERE citems.customer_item_id = cxref.customer_item_id
1155: AND cxref.inventory_item_id = sitems.inventory_item_id
1156: AND sitems.inventory_item_id = p_inventory_item_id
1157: AND sitems.organization_id = OE_Bulk_Order_PVT.G_ITEM_ORG
1158: AND citems.customer_item_id = p_ordered_item_id
1159: AND citems.customer_id = p_sold_to_org_id;
1160:
1161: END IF;
1170: , mtl_cross_references items
1171: , mtl_system_items_vl sitems
1172: WHERE types.cross_reference_type = items.cross_reference_type
1173: AND items.inventory_item_id = sitems.inventory_item_id
1174: AND sitems.organization_id = OE_Bulk_Order_PVT.G_ITEM_ORG
1175: AND sitems.inventory_item_id = p_inventory_item_id
1176: AND items.cross_reference_type = p_item_identifier_type
1177: AND items.cross_reference = p_ordered_item
1178: AND (items.organization_id = sitems.organization_id
1272: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
1273: --
1274: BEGIN
1275:
1276: l_header_id := OE_Bulk_Order_PVT.g_header_rec.header_id(p_header_index);
1277:
1278: IF l_debug_level > 0 THEN
1279: oe_debug_pub.add( 'UNBOOK ORDER , HEADER ID:'||L_HEADER_ID ) ;
1280: oe_debug_pub.add( 'HEADER INDEX :'||P_HEADER_INDEX ) ;
1282: END IF;
1283:
1284: -- Unset booking fields on header global
1285:
1286: OE_Bulk_Order_PVT.g_header_rec.booked_flag(p_header_index) := 'N';
1287:
1288: -- Unset booking fields on line global records
1289:
1290: l_index := p_last_line_index;
1350:
1351: -- Populate Ship To first, since it may be used to override Header defaults
1352: IF p_line_rec.org_id(p_index) IS NULL THEN
1353: p_line_rec.org_id(p_index) :=
1354: OE_Bulk_Order_PVT.g_header_rec.org_id(p_header_index);
1355: END IF;
1356:
1357:
1358:
1357:
1358:
1359: IF p_line_rec.ship_to_org_id(p_index) IS NULL THEN
1360: p_line_rec.ship_to_org_id(p_index) :=
1361: OE_Bulk_Order_PVT.g_header_rec.ship_to_org_id(p_header_index);
1362: END IF;
1363:
1364: -- Default attributes that have item as the first source
1365:
1456: -- Default line type from order type
1457:
1458: IF p_line_rec.line_type_id(p_index) IS NULL THEN
1459: l_c_index := OE_Bulk_Cache.Load_Order_Type
1460: (p_key => OE_Bulk_Order_PVT.g_header_rec.order_type_id(p_header_index)
1461: ,p_default_attributes => 'Y'
1462: );
1463: p_line_rec.line_type_id(p_index) :=
1464: OE_BULK_CACHE.G_ORDER_TYPE_TBL(l_c_index).default_outbound_line_type_id;
1467: -- Default remaining attributes from Order Header
1468:
1469: IF p_line_rec.accounting_rule_id(p_index) IS NULL THEN
1470: p_line_rec.accounting_rule_id(p_index) :=
1471: OE_Bulk_Order_PVT.g_header_rec.accounting_rule_id(p_header_index);
1472: END IF;
1473:
1474: IF p_line_rec.demand_class_code(p_index) IS NULL THEN
1475: p_line_rec.demand_class_code(p_index) :=
1472: END IF;
1473:
1474: IF p_line_rec.demand_class_code(p_index) IS NULL THEN
1475: p_line_rec.demand_class_code(p_index) :=
1476: OE_Bulk_Order_PVT.g_header_rec.demand_class_code(p_header_index);
1477: END IF;
1478:
1479: IF p_line_rec.fob_point_code(p_index) IS NULL THEN
1480: p_line_rec.fob_point_code(p_index) :=
1477: END IF;
1478:
1479: IF p_line_rec.fob_point_code(p_index) IS NULL THEN
1480: p_line_rec.fob_point_code(p_index) :=
1481: OE_Bulk_Order_PVT.g_header_rec.fob_point_code(p_header_index);
1482: END IF;
1483:
1484: IF p_line_rec.freight_terms_code(p_index) IS NULL THEN
1485: p_line_rec.freight_terms_code(p_index) :=
1482: END IF;
1483:
1484: IF p_line_rec.freight_terms_code(p_index) IS NULL THEN
1485: p_line_rec.freight_terms_code(p_index) :=
1486: OE_Bulk_Order_PVT.g_header_rec.freight_terms_code(p_header_index);
1487: END IF;
1488:
1489: IF p_line_rec.invoicing_rule_id(p_index) IS NULL THEN
1490: p_line_rec.invoicing_rule_id(p_index) :=
1487: END IF;
1488:
1489: IF p_line_rec.invoicing_rule_id(p_index) IS NULL THEN
1490: p_line_rec.invoicing_rule_id(p_index) :=
1491: OE_Bulk_Order_PVT.g_header_rec.invoicing_rule_id(p_header_index);
1492: END IF;
1493:
1494: IF p_line_rec.payment_term_id(p_index) IS NULL THEN
1495: p_line_rec.payment_term_id(p_index) :=
1492: END IF;
1493:
1494: IF p_line_rec.payment_term_id(p_index) IS NULL THEN
1495: p_line_rec.payment_term_id(p_index) :=
1496: OE_Bulk_Order_PVT.g_header_rec.payment_term_id(p_header_index);
1497: END IF;
1498:
1499: IF p_line_rec.price_list_id(p_index) IS NULL THEN
1500: p_line_rec.price_list_id(p_index) :=
1497: END IF;
1498:
1499: IF p_line_rec.price_list_id(p_index) IS NULL THEN
1500: p_line_rec.price_list_id(p_index) :=
1501: OE_Bulk_Order_PVT.g_header_rec.price_list_id(p_header_index);
1502: END IF;
1503:
1504: IF p_line_rec.salesrep_id(p_index) IS NULL THEN
1505: p_line_rec.salesrep_id(p_index) :=
1502: END IF;
1503:
1504: IF p_line_rec.salesrep_id(p_index) IS NULL THEN
1505: p_line_rec.salesrep_id(p_index) :=
1506: OE_Bulk_Order_PVT.g_header_rec.salesrep_id(p_header_index);
1507: END IF;
1508:
1509: IF p_line_rec.ship_tolerance_above(p_index) IS NULL THEN
1510: p_line_rec.ship_tolerance_above(p_index) :=
1507: END IF;
1508:
1509: IF p_line_rec.ship_tolerance_above(p_index) IS NULL THEN
1510: p_line_rec.ship_tolerance_above(p_index) :=
1511: OE_Bulk_Order_PVT.g_header_rec.ship_tolerance_above(p_header_index);
1512: END IF;
1513:
1514: IF p_line_rec.ship_tolerance_below(p_index) IS NULL THEN
1515: p_line_rec.ship_tolerance_below(p_index) :=
1512: END IF;
1513:
1514: IF p_line_rec.ship_tolerance_below(p_index) IS NULL THEN
1515: p_line_rec.ship_tolerance_below(p_index) :=
1516: OE_Bulk_Order_PVT.g_header_rec.ship_tolerance_below(p_header_index);
1517: END IF;
1518:
1519: IF p_line_rec.shipping_method_code(p_index) IS NULL THEN
1520: p_line_rec.shipping_method_code(p_index) :=
1517: END IF;
1518:
1519: IF p_line_rec.shipping_method_code(p_index) IS NULL THEN
1520: p_line_rec.shipping_method_code(p_index) :=
1521: OE_Bulk_Order_PVT.g_header_rec.shipping_method_code(p_header_index);
1522: END IF;
1523:
1524: IF p_line_rec.shipment_priority_code(p_index) IS NULL THEN
1525: p_line_rec.shipment_priority_code(p_index) :=
1522: END IF;
1523:
1524: IF p_line_rec.shipment_priority_code(p_index) IS NULL THEN
1525: p_line_rec.shipment_priority_code(p_index) :=
1526: OE_Bulk_Order_PVT.g_header_rec.shipment_priority_code(p_header_index);
1527: END IF;
1528:
1529: IF p_line_rec.ship_from_org_id(p_index) IS NULL THEN
1530: p_line_rec.ship_from_org_id(p_index) :=
1527: END IF;
1528:
1529: IF p_line_rec.ship_from_org_id(p_index) IS NULL THEN
1530: p_line_rec.ship_from_org_id(p_index) :=
1531: OE_Bulk_Order_PVT.g_header_rec.ship_from_org_id(p_header_index);
1532: END IF;
1533:
1534: IF p_line_rec.tax_exempt_flag(p_index) IS NULL THEN
1535: p_line_rec.tax_exempt_flag(p_index) :=
1532: END IF;
1533:
1534: IF p_line_rec.tax_exempt_flag(p_index) IS NULL THEN
1535: p_line_rec.tax_exempt_flag(p_index) :=
1536: OE_Bulk_Order_PVT.g_header_rec.tax_exempt_flag(p_header_index);
1537: END IF;
1538:
1539:
1540: -- Constant Value Defaults
1603: -- Populate Fields from Header
1604: -------------------------------------------------------------------
1605: oe_debug_pub.add( 'Populate_Internal_Fields 1' ) ;
1606: p_line_rec.header_id(p_index) :=
1607: OE_Bulk_Order_PVT.g_header_rec.header_id(p_header_index);
1608:
1609: p_line_rec.booked_flag(p_index) :=
1610: OE_Bulk_Order_PVT.g_header_rec.booked_flag(p_header_index);
1611:
1606: p_line_rec.header_id(p_index) :=
1607: OE_Bulk_Order_PVT.g_header_rec.header_id(p_header_index);
1608:
1609: p_line_rec.booked_flag(p_index) :=
1610: OE_Bulk_Order_PVT.g_header_rec.booked_flag(p_header_index);
1611:
1612: IF p_line_rec.sold_to_org_id(p_index) IS NULL THEN
1613: p_line_rec.sold_to_org_id(p_index) :=
1614: OE_Bulk_Order_PVT.g_header_rec.sold_to_org_id(p_header_index);
1610: OE_Bulk_Order_PVT.g_header_rec.booked_flag(p_header_index);
1611:
1612: IF p_line_rec.sold_to_org_id(p_index) IS NULL THEN
1613: p_line_rec.sold_to_org_id(p_index) :=
1614: OE_Bulk_Order_PVT.g_header_rec.sold_to_org_id(p_header_index);
1615: END IF;
1616:
1617: IF p_line_rec.ship_to_org_id(p_index) IS NULL THEN
1618: p_line_rec.ship_to_org_id(p_index) :=
1615: END IF;
1616:
1617: IF p_line_rec.ship_to_org_id(p_index) IS NULL THEN
1618: p_line_rec.ship_to_org_id(p_index) :=
1619: OE_Bulk_Order_PVT.g_header_rec.ship_to_org_id(p_header_index);
1620: END IF;
1621:
1622: IF p_line_rec.invoice_to_org_id(p_index) IS NULL THEN
1623: p_line_rec.invoice_to_org_id(p_index) :=
1620: END IF;
1621:
1622: IF p_line_rec.invoice_to_org_id(p_index) IS NULL THEN
1623: p_line_rec.invoice_to_org_id(p_index) :=
1624: OE_Bulk_Order_PVT.g_header_rec.invoice_to_org_id(p_header_index);
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');
1622: IF p_line_rec.invoice_to_org_id(p_index) IS NULL THEN
1623: p_line_rec.invoice_to_org_id(p_index) :=
1624: OE_Bulk_Order_PVT.g_header_rec.invoice_to_org_id(p_header_index);
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;
1666: END IF;
1667: END IF;
1668:
1669: oe_debug_pub.add( 'Populate_Internal_Fields 2' ) ;
1670: IF OE_Bulk_Order_PVT.G_IMPORT_SHIPMENTS = 'YES'
1671: AND p_line_rec.orig_sys_shipment_ref(p_index) IS NULL
1672: AND nvl(p_line_rec.source_document_id(p_index),0) <> 10
1673: THEN
1674: p_line_rec.orig_sys_shipment_ref(p_index)
1762: OR -- 4282392
1763: (OE_BULK_CACHE.G_ITEM_TBL(l_c_index).tracking_quantity_ind = 'PS' AND
1764: OE_BULK_CACHE.G_ITEM_TBL(l_c_index).ont_pricing_qty_source = 'S')
1765: THEN
1766: OE_BULK_ORDER_PVT.G_CATCHWEIGHT := TRUE;
1767: oe_debug_pub.add( 'Populate_Internal_Fields b' ) ;
1768: END IF;
1769: --bug 3798477
1770: oe_debug_pub.add( 'Populate_Internal_Fields bcc' ) ;
1899: (OE_BULK_CACHE.G_ITEM_TBL(l_c_index).tracking_quantity_ind = 'PS' AND
1900: OE_BULK_CACHE.G_ITEM_TBL(l_c_index).ont_pricing_qty_source = 'S' )
1901:
1902: THEN
1903: OE_BULK_ORDER_PVT.G_CATCHWEIGHT := TRUE;
1904: END IF;
1905: --bug 3798477
1906: -- Item Type can be STANDARD or KIT in BULK mode
1907:
1986:
1987: l_c_index := OE_BULK_CACHE.Load_Line_Type
1988: (p_key => p_line_rec.line_type_id(p_index));
1989:
1990: l_d_index := OE_BULK_CACHE.Load_Order_Type(OE_Bulk_Order_PVT.g_header_rec.order_type_id(p_header_index));
1991:
1992: IF OE_BULK_CACHE.G_LINE_TYPE_TBL(l_c_index).order_category_code
1993: <> 'ORDER'
1994: THEN
2073: p_line_rec.latest_acceptable_date(p_index) IS NULL
2074: THEN
2075: p_line_rec.latest_acceptable_date(p_index) :=
2076: p_line_rec.request_date(p_index) +
2077: OE_Bulk_Order_PVT.g_header_rec.latest_schedule_limit(p_header_index);
2078: END IF;
2079:
2080: -- Bug 2802876
2081: -- Item type code should not be null even for error records.
2119: -- Post_Processing from OEXVIMSB.pls
2120: ---------------------------------------------------------------------
2121: PROCEDURE Post_Process
2122: ( p_line_rec IN OUT NOCOPY OE_WSH_BULK_GRP.LINE_REC_TYPE
2123: , p_header_rec IN OUT NOCOPY OE_BULK_ORDER_PVT.HEADER_REC_TYPE
2124: , p_line_index IN NUMBER
2125: , p_header_index IN NUMBER
2126: )
2127: IS
2212: ---------------------------------------------------------------------
2213:
2214: PROCEDURE Entity
2215: ( p_line_rec IN OUT NOCOPY OE_WSH_BULK_GRP.LINE_REC_TYPE
2216: , p_header_rec IN OUT NOCOPY OE_BULK_ORDER_PVT.HEADER_REC_TYPE
2217: , x_line_scredit_rec IN OUT NOCOPY OE_BULK_ORDER_PVT.SCREDIT_REC_TYPE
2218: , p_defaulting_mode IN VARCHAR2
2219: , p_process_configurations IN VARCHAR2 DEFAULT 'N'
2220: , p_validate_configurations IN VARCHAR2 DEFAULT 'Y'
2213:
2214: PROCEDURE Entity
2215: ( p_line_rec IN OUT NOCOPY OE_WSH_BULK_GRP.LINE_REC_TYPE
2216: , p_header_rec IN OUT NOCOPY OE_BULK_ORDER_PVT.HEADER_REC_TYPE
2217: , x_line_scredit_rec IN OUT NOCOPY OE_BULK_ORDER_PVT.SCREDIT_REC_TYPE
2218: , p_defaulting_mode IN VARCHAR2
2219: , p_process_configurations IN VARCHAR2 DEFAULT 'N'
2220: , p_validate_configurations IN VARCHAR2 DEFAULT 'Y'
2221: , p_schedule_configurations IN VARCHAR2 DEFAULT 'N'
2354: l_nbr_ctr := 1; -- Reset the line number counter
2355:
2356: -- added for HVOP Tax project
2357: -- setting start and end line index for new order bug7685103
2358: OE_BULK_ORDER_PVT.G_HEADER_REC.start_line_index(header_counter) := l_index;
2359: OE_BULK_ORDER_PVT.G_HEADER_REC.end_line_index(header_counter) := l_index;
2360:
2361: oe_debug_pub.add('OE_BULK_ORDER_PVT.G_HEADER_REC.start_line_index(header_counter):'||OE_BULK_ORDER_PVT.G_HEADER_REC.start_line_index(header_counter));
2362: oe_debug_pub.add('OE_BULK_ORDER_PVT.G_HEADER_REC.end_line_index(header_counter):'||OE_BULK_ORDER_PVT.G_HEADER_REC.end_line_index(header_counter));
2355:
2356: -- added for HVOP Tax project
2357: -- setting start and end line index for new order bug7685103
2358: OE_BULK_ORDER_PVT.G_HEADER_REC.start_line_index(header_counter) := l_index;
2359: OE_BULK_ORDER_PVT.G_HEADER_REC.end_line_index(header_counter) := l_index;
2360:
2361: oe_debug_pub.add('OE_BULK_ORDER_PVT.G_HEADER_REC.start_line_index(header_counter):'||OE_BULK_ORDER_PVT.G_HEADER_REC.start_line_index(header_counter));
2362: oe_debug_pub.add('OE_BULK_ORDER_PVT.G_HEADER_REC.end_line_index(header_counter):'||OE_BULK_ORDER_PVT.G_HEADER_REC.end_line_index(header_counter));
2363:
2357: -- setting start and end line index for new order bug7685103
2358: OE_BULK_ORDER_PVT.G_HEADER_REC.start_line_index(header_counter) := l_index;
2359: OE_BULK_ORDER_PVT.G_HEADER_REC.end_line_index(header_counter) := l_index;
2360:
2361: oe_debug_pub.add('OE_BULK_ORDER_PVT.G_HEADER_REC.start_line_index(header_counter):'||OE_BULK_ORDER_PVT.G_HEADER_REC.start_line_index(header_counter));
2362: oe_debug_pub.add('OE_BULK_ORDER_PVT.G_HEADER_REC.end_line_index(header_counter):'||OE_BULK_ORDER_PVT.G_HEADER_REC.end_line_index(header_counter));
2363:
2364:
2365: --------------------------------------------------------------
2358: OE_BULK_ORDER_PVT.G_HEADER_REC.start_line_index(header_counter) := l_index;
2359: OE_BULK_ORDER_PVT.G_HEADER_REC.end_line_index(header_counter) := l_index;
2360:
2361: oe_debug_pub.add('OE_BULK_ORDER_PVT.G_HEADER_REC.start_line_index(header_counter):'||OE_BULK_ORDER_PVT.G_HEADER_REC.start_line_index(header_counter));
2362: oe_debug_pub.add('OE_BULK_ORDER_PVT.G_HEADER_REC.end_line_index(header_counter):'||OE_BULK_ORDER_PVT.G_HEADER_REC.end_line_index(header_counter));
2363:
2364:
2365: --------------------------------------------------------------
2366: -- Same order: check for duplicate reference, from OEXVIMPB.pls
2368: ELSE
2369:
2370: IF l_last_line_index IS NOT NULL THEN
2371:
2372: IF OE_Bulk_Order_PVT.G_IMPORT_SHIPMENTS = 'NO' THEN
2373: IF (p_line_rec.orig_sys_line_ref(l_last_line_index)
2374: = p_line_rec.orig_sys_line_ref(l_index))
2375: THEN
2376: FND_MESSAGE.SET_NAME('ONT','OE_OI_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))
2385: AND (p_line_rec.orig_sys_shipment_ref(l_last_line_index)
2386: = p_line_rec.orig_sys_shipment_ref(l_index))
2398: END IF;
2399:
2400: -- added for HVOP Tax project
2401: -- setting end line index for this order bug7685103
2402: OE_BULK_ORDER_PVT.G_HEADER_REC.end_line_index(header_counter) := l_index;
2403:
2404:
2405: p_line_rec.line_number(l_index) := l_nbr_ctr;
2406:
2700: END IF;
2701:
2702: /* -- checks: Warehouse/Process combinations process HVOP
2703: IF OE_CODE_CONTROL.CODE_RELEASE_LEVEL >= '110510' THEN
2704: IF OE_Bulk_Order_PVT.G_PROCESS_INSTALLED_FLAG = 'Y' THEN
2705:
2706: -- first check if warehouse is NULL, do not supply process attributes INVCONV - NOT NEEDED NOW
2707:
2708: IF (p_line_rec.ship_from_org_id(l_index)IS NULL) THEN
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
2757:
2758: END IF; -- IF OE_Bulk_Order_PVT.G_PROCESS_INSTALLED_FLAG = 'Y' THEN
2759:
2760: END IF; -- IF OE_CODE_CONTROL.CODE_RELEASE_LEVEL >= '110510' THEN */
2761:
2762:
2792: INTO l_uom
2793: FROM mtl_system_items
2794: WHERE inventory_item_id=p_line_rec.inventory_item_id(l_index)
2795: AND organization_id=nvl(p_line_rec.ship_from_org_id(l_index),
2796: OE_Bulk_Order_PVT.G_ITEM_ORG);
2797:
2798: IF l_uom <> p_line_rec.order_quantity_uom(l_index) THEN
2799: IF l_debug_level > 0 THEN
2800: oe_debug_pub.add( 'UOM OTHER THAN PRIMARY UOM IS ENTERED' , 1 ) ;
2825: l_ret_status := inv_convert.validate_item_uom
2826: (p_line_rec.order_quantity_uom(l_index)
2827: ,p_line_rec.inventory_item_id(l_index)
2828: ,nvl(p_line_rec.ship_from_org_id(l_index)
2829: ,OE_Bulk_Order_PVT.G_ITEM_ORG )
2830: );
2831: IF NOT l_ret_status THEN
2832: IF l_debug_level > 0 THEN
2833: oe_debug_pub.add( 'UOM/ITEM COMBINATION INVALID' , 2 ) ;
3546: -- BEGIN: Validate Desc Flex
3547:
3548: IF p_validate_desc_flex = 'Y' THEN
3549:
3550: IF OE_Bulk_Order_PVT.G_OE_LINE_ATTRIBUTES = 'Y' THEN
3551: IF NOT OE_VALIDATE.Line_Desc_Flex
3552: (p_context => p_line_rec.context(l_index)
3553: ,p_attribute1 => p_line_rec.attribute1(l_index)
3554: ,p_attribute2 => p_line_rec.attribute2(l_index)
3687:
3688: END IF;
3689: END IF;
3690:
3691: IF OE_Bulk_Order_PVT.G_OE_LINE_INDUSTRY_ATTRIBUTE = 'Y' THEN
3692: IF NOT OE_VALIDATE.I_Line_Desc_Flex
3693: (p_context => p_line_rec.Industry_context(l_index)
3694: ,p_attribute1 => p_line_rec.Industry_attribute1(l_index)
3695: ,p_attribute2 => p_line_rec.Industry_attribute2(l_index)
3889: END IF;
3890:
3891: END IF;
3892:
3893: IF OE_Bulk_Order_PVT.G_OE_LINE_TP_ATTRIBUTES = 'Y' THEN
3894: IF NOT OE_VALIDATE.TP_Line_Desc_Flex
3895: (p_context => p_line_rec.tp_context(l_index)
3896: ,p_attribute1 => p_line_rec.tp_attribute1(l_index)
3897: ,p_attribute2 => p_line_rec.tp_attribute2(l_index)
4032: END IF;
4033:
4034: ELSE
4035:
4036: OE_BULK_ORDER_PVT.G_PRICING_NEEDED := 'Y';
4037:
4038: END IF;
4039:
4040: ---------------------------------------------------------------
4167: ---------------------------------------------------------------
4168: oe_debug_pub.add(' SCHEDULING :');
4169: l_c_index := OE_BULK_CACHE.Load_Order_Type(p_header_rec.order_type_id(header_counter));
4170:
4171: IF (OE_BULK_ORDER_PVT.G_AUTO_SCHEDULE = 'Y'
4172: OR OE_BULK_CACHE.G_ORDER_TYPE_TBL(l_c_index).auto_scheduling_flag = 'Y'
4173: OR p_line_rec.schedule_ship_date(l_index) IS NOT NULL
4174: OR p_line_rec.schedule_arrival_date(l_index) IS NOT NULL)
4175: AND p_line_rec.source_type_code(l_index) = 'INTERNAL'
4185: oe_debug_pub.add( 'SCHEDULING VALIDATIONS - ato scheduling') ;
4186: END IF;
4187:
4188: l_d_index := OE_BULK_CACHE.Load_Line_Type(p_line_rec.line_type_id(l_index));
4189: IF ( OE_BULK_ORDER_PVT.G_SCHEDULE_LINE_ON_HOLD = 'N'
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');
4237: END IF; -- ship from not null.
4238:
4239: ELSE -- four/five
4240: p_line_rec.schedule_status_code(l_index) := 'TO_BE_SCHEDULED';
4241: OE_BULK_ORDER_PVT.G_SCH_COUNT := OE_BULK_ORDER_PVT.G_SCH_COUNT + 1;
4242: END IF;
4243: ELSE
4244: IF p_line_rec.schedule_ship_date(l_index) IS NOT NULL
4245: OR p_line_rec.schedule_arrival_date(l_index) IS NOT NULL THEN
4367: THEN
4368:
4369: l_error_count := l_error_count + 1;
4370:
4371: OE_Bulk_Order_PVT.G_ERROR_REC.order_source_id.EXTEND(1);
4372: OE_Bulk_Order_PVT.G_ERROR_REC.order_source_id(l_error_count)
4373: := p_line_rec.order_source_id(l_index);
4374: l_order_source_id := p_line_rec.order_source_id(l_index);
4375:
4368:
4369: l_error_count := l_error_count + 1;
4370:
4371: OE_Bulk_Order_PVT.G_ERROR_REC.order_source_id.EXTEND(1);
4372: OE_Bulk_Order_PVT.G_ERROR_REC.order_source_id(l_error_count)
4373: := p_line_rec.order_source_id(l_index);
4374: l_order_source_id := p_line_rec.order_source_id(l_index);
4375:
4376: OE_Bulk_Order_PVT.G_ERROR_REC.orig_sys_document_ref.EXTEND(1);
4372: OE_Bulk_Order_PVT.G_ERROR_REC.order_source_id(l_error_count)
4373: := p_line_rec.order_source_id(l_index);
4374: l_order_source_id := p_line_rec.order_source_id(l_index);
4375:
4376: OE_Bulk_Order_PVT.G_ERROR_REC.orig_sys_document_ref.EXTEND(1);
4377: OE_Bulk_Order_PVT.G_ERROR_REC.orig_sys_document_ref(l_error_count)
4378: := p_line_rec.orig_sys_document_ref(l_index);
4379: l_orig_sys_document_ref := p_line_rec.orig_sys_document_ref(l_index);
4380: OE_Bulk_Order_PVT.G_ERROR_REC.header_id.EXTEND(1);
4373: := p_line_rec.order_source_id(l_index);
4374: l_order_source_id := p_line_rec.order_source_id(l_index);
4375:
4376: OE_Bulk_Order_PVT.G_ERROR_REC.orig_sys_document_ref.EXTEND(1);
4377: OE_Bulk_Order_PVT.G_ERROR_REC.orig_sys_document_ref(l_error_count)
4378: := p_line_rec.orig_sys_document_ref(l_index);
4379: l_orig_sys_document_ref := p_line_rec.orig_sys_document_ref(l_index);
4380: OE_Bulk_Order_PVT.G_ERROR_REC.header_id.EXTEND(1);
4381: OE_Bulk_Order_PVT.G_ERROR_REC.header_id(l_error_count)
4376: OE_Bulk_Order_PVT.G_ERROR_REC.orig_sys_document_ref.EXTEND(1);
4377: OE_Bulk_Order_PVT.G_ERROR_REC.orig_sys_document_ref(l_error_count)
4378: := p_line_rec.orig_sys_document_ref(l_index);
4379: l_orig_sys_document_ref := p_line_rec.orig_sys_document_ref(l_index);
4380: OE_Bulk_Order_PVT.G_ERROR_REC.header_id.EXTEND(1);
4381: OE_Bulk_Order_PVT.G_ERROR_REC.header_id(l_error_count)
4382: := p_line_rec.header_id(l_index);
4383:
4384: -- Mark Corresponding Header Record as invalid as well
4377: OE_Bulk_Order_PVT.G_ERROR_REC.orig_sys_document_ref(l_error_count)
4378: := p_line_rec.orig_sys_document_ref(l_index);
4379: l_orig_sys_document_ref := p_line_rec.orig_sys_document_ref(l_index);
4380: OE_Bulk_Order_PVT.G_ERROR_REC.header_id.EXTEND(1);
4381: OE_Bulk_Order_PVT.G_ERROR_REC.header_id(l_error_count)
4382: := p_line_rec.header_id(l_index);
4383:
4384: -- Mark Corresponding Header Record as invalid as well
4385: p_header_rec.lock_control(header_counter) := -99;
4923: PROCEDURE Load_Cust_Trx_Type_Id
4924: ( p_line_index IN NUMBER
4925: ,p_line_rec IN OUT NOCOPY OE_WSH_BULK_GRP.LINE_REC_TYPE
4926: ,p_header_index IN NUMBER
4927: ,p_header_rec IN OUT NOCOPY OE_BULK_ORDER_PVT.HEADER_REC_TYPE)
4928: IS
4929: l_index NUMBER;
4930: BEGIN
4931: