[Home] [Help]
283: -- ADDING code
284: l_c_index := OE_BULK_CACHE.Load_Line_Type(p_line_rec.line_type_id(p_index));
285: IF (OE_BULK_CACHE.G_LINE_TYPE_TBL(l_c_index).scheduling_level_code = 'FOUR'
286: OR OE_BULK_CACHE.G_LINE_TYPE_TBL(l_c_index).scheduling_level_code = 'FIVE') AND
287: (p_line_rec.item_type_code(p_index) <> 'STANDARD'
288: OR p_line_rec.ato_line_id(p_index) is not null) THEN
289:
290: IF l_debug_level > 0 THEN
291: oe_debug_pub.add( 'CHECKING THAT IT IS A STANDARD ITEM...' , 1 ) ;
287: (p_line_rec.item_type_code(p_index) <> 'STANDARD'
288: OR p_line_rec.ato_line_id(p_index) is not null) THEN
289:
290: IF l_debug_level > 0 THEN
291: oe_debug_pub.add( 'CHECKING THAT IT IS A STANDARD ITEM...' , 1 ) ;
292: END IF;
293:
294: FND_MESSAGE.SET_NAME('ONT', 'OE_SCH_INACTIVE_STD_ONLY');
295: FND_MESSAGE.SET_TOKEN('LTYPE',
307:
308: IF p_line_rec.ato_line_id(p_index) is not null AND
309: NOT(p_line_rec.ato_line_id(p_index) = p_line_rec.line_id(p_index) AND
310: p_line_rec.item_type_code(p_index) IN ( OE_GLOBALS.G_ITEM_OPTION,
311: OE_GLOBALS.G_ITEM_STANDARD))
312: THEN
313: IF MSC_ATP_GLOBAL.GET_APS_VERSION <> 10 AND
314: p_line_rec.ship_from_org_id(p_index) is NULL
315: THEN
323: END IF;
324: END IF; -- Gop code level
325:
326: IF p_line_rec.ato_line_id(p_index) = p_line_rec.line_id(p_index) AND
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);
875: /* Bug 1741158 chhung modify BEGIN */
876: IF p_line_category_code ='ORDER' THEN
877:
878: /* for Internal Orders */
879: /* Internal Orders only support standard item */
880: IF p_source_document_type_id = 10 THEN
881: --perf bug 5121218, replace org_organization_definitions with
882: --hr_all_organization_units
883:
935: AND sysdate <= nvl( org.date_to, sysdate)
936: AND org.organization_id= p_ship_from_org_id
937: AND rownum=1;
938:
939: ELSE /* item type is MODEL,STANDARD,SERVICE,KIT in top most level*/
940: --perf bug 5121218, replace org_organization_definitions with
941: --hr_all_organization_units
942:
943: /* SELECT null
1095:
1096: IF p_source_document_type_id = 10
1097: THEN
1098: /* for Internal Orders */
1099: /* Internal Orders only support standard item */
1100: IF OE_Bulk_Cache.G_ITEM_TBL(l_c_index).internal_order_enabled_flag
1101: <> 'Y'
1102: THEN
1103: RETURN FALSE;
1111: (p_item_type_code = OE_GLOBALS.G_ITEM_KIT AND
1112: nvl(p_top_model_line_id, -1) <> p_line_id)
1113: THEN
1114: RETURN TRUE;
1115: ELSE /* item type is MODEL,STANDARD,SERVICE,KIT in top most level*/
1116: IF OE_Bulk_Cache.G_ITEM_TBL(l_c_index).customer_order_enabled_flag
1117: <> 'Y'
1118: THEN
1119: RETURN FALSE;
1551: p_line_rec.tax_date(p_index) := sysdate;
1552: END IF;
1553:
1554: IF p_line_rec.tax_exempt_flag(p_index) IS NULL THEN
1555: p_line_rec.tax_exempt_flag(p_index) := 'S'; -- 'Standard'
1556: END IF;
1557:
1558: EXCEPTION
1559: WHEN OTHERS THEN
1803: ELSIF p_line_rec.top_model_line_id(p_index) IS NOT NULL THEN
1804: p_line_rec.item_type_code(p_index) := 'OPTION';
1805: oe_debug_pub.add( 'Populate_Internal_Fields bb' ) ;
1806: ELSE
1807: -- Standard Item
1808: p_line_rec.item_type_code(p_index) := OE_GLOBALS.G_ITEM_STANDARD;
1809: END IF;
1810: END IF; --bom_item_type = 4
1811:
1804: p_line_rec.item_type_code(p_index) := 'OPTION';
1805: oe_debug_pub.add( 'Populate_Internal_Fields bb' ) ;
1806: ELSE
1807: -- Standard Item
1808: p_line_rec.item_type_code(p_index) := OE_GLOBALS.G_ITEM_STANDARD;
1809: END IF;
1810: END IF; --bom_item_type = 4
1811:
1812: END IF; -- item_type_code IS NULL
1825: END IF; --bom_item_type = 4
1826:
1827: -- Set ato_line_id on ato_item
1828: oe_debug_pub.add( 'Populate_Internal_Fields dd' ) ;
1829: IF p_line_rec.item_type_code(p_index) IN ('OPTION', 'STANDARD') AND
1830: nvl(OE_BULK_CACHE.G_Item_Tbl(l_c_index).replenish_to_order_flag, 'N') = 'Y' AND
1831: nvl(OE_BULK_CACHE.G_Item_Tbl(l_c_index).build_in_wip_flag, 'N') = 'Y'
1832: THEN
1833: p_line_rec.ato_line_id(p_index) := p_line_rec.line_id(p_index);
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:
1908: IF OE_BULK_CACHE.G_ITEM_TBL(l_c_index).bom_item_type = 4 THEN
1909: oe_debug_pub.add( 'Populate_Internal_Fields 6a' ) ;
1910: -- KIT Item
1919:
1920: p_line_rec.ship_tolerance_above(p_index) := 0;
1921: p_line_rec.ship_tolerance_below(p_index) := 0;
1922:
1923: -- Standard Item
1924: ELSE
1925: p_line_rec.item_type_code(p_index) := OE_GLOBALS.G_ITEM_STANDARD;
1926: END IF;
1927: END IF;
1921: p_line_rec.ship_tolerance_below(p_index) := 0;
1922:
1923: -- Standard Item
1924: ELSE
1925: p_line_rec.item_type_code(p_index) := OE_GLOBALS.G_ITEM_STANDARD;
1926: END IF;
1927: END IF;
1928: oe_debug_pub.add( 'Populate_Internal_Fields 8a' ) ;
1929: p_line_rec.shippable_flag(p_index)
2086: -- to end of the line tbl e.g. item_type_code <> 'INCLUDED'
2087: -- But for null item types, the loop may end earlier resulting
2088: -- in any record after not being processed.
2089: IF p_line_rec.item_type_code(p_index) IS NULL THEN
2090: p_line_rec.item_type_code(p_index) := 'STANDARD';
2091: END IF;
2092:
2093: oe_debug_pub.add( 'Populate_Internal_Fields 9' ) ;
2094: EXCEPTION
2982: END IF;
2983:
2984: --Item Orderability
2985: --Validate Item Orderability Rules
2986: IF ( NVL( p_line_rec.item_type_code(l_index),OE_GLOBALS.G_ITEM_STANDARD) = OE_GLOBALS.G_ITEM_STANDARD
2987: OR ( p_line_rec.item_type_code(l_index) = OE_GLOBALS.G_ITEM_MODEL )
2988: ) then
2989:
2990: oe_debug_pub.add(' Checking Validate_item_orderability ');