[Home] [Help]
1130: l_rsv_tbl inv_reservation_global.mtl_reservation_tbl_type;
1131: l_count NUMBER;
1132: l_dummy_sn inv_reservation_global.serial_number_tbl_type;
1133: l_qty_to_unreserve NUMBER;
1134: l_source_code VARCHAR2(40) := FND_PROFILE.VALUE('ONT_SOURCE_CODE');
1135: l_sales_order_id NUMBER;
1136: l_x_error_code NUMBER;
1137: l_lock_records VARCHAR2(1);
1138: l_sort_by_req_date NUMBER ;
1317: p_line_ship_to_org_id = p_set_Ship_To_Org_Id AND
1318: p_line_schedule_ship_date = p_set_schedule_ship_date) THEN
1319:
1320: /* Modified the above line and added followinf 7 lines to fix the bug 3393033 */
1321: IF NVL(fnd_profile.value('ONT_SHIP_METHOD_FOR_SHIP_SET'),'N') = 'Y' THEN
1322: -- 3878494
1323: IF OE_GLOBALS.equal(p_line_shipping_method_code,p_set_shipping_method_code) THEN
1324: RETURN TRUE;
1325: END IF;
1512: l_set_ship_from_org_id := l_ship_from_org_id;
1513: l_set_shipping_method_code := l_shipping_method_code;
1514:
1515: IF l_schedule_ship_date is null
1516: AND NVL(fnd_profile.value('ONT_SET_FOR_EACH_LINE'),'N') = 'Y'
1517: AND p_line_rec.schedule_status_code is null
1518: AND l_set_status = 'T' THEN
1519:
1520: l_action := OESCH_ACT_SCHEDULE;
2423:
2424: IF NOT OE_Internal_Requisition_Pvt.G_Update_ISO_From_Req
2425: AND NOT OE_SALES_CAN_UTIL.G_IR_ISO_HDR_CANCEL THEN
2426:
2427: IF FND_PROFILE.VALUE('POR_SYNC_NEEDBYDATE_OM') = 'YES' THEN
2428:
2429: IF l_debug_level > 0 THEN
2430: oe_debug_pub.add(' Logging G_UPDATE_REQUISITION delayed request for date change');
2431: END IF;
4092: END IF;
4093:
4094: ELSE
4095:
4096: l_inv_ctp := fnd_profile.value('INV_CTP');
4097:
4098: IF l_debug_level > 0 THEN
4099: oe_debug_pub.add( 'INV_CTP : '||L_INV_CTP , 3 ) ;
4100: END IF;
4441: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
4442: --
4443: BEGIN
4444:
4445: l_mrp_calc_sd := fnd_profile.value('MRP_ATP_CALC_SD');
4446:
4447: IF l_debug_level > 0 THEN
4448: oe_debug_pub.add( 'MRP_ATP_CALC_SD : '||L_MRP_CALC_SD , 3 ) ;
4449: END IF;
4528:
4529: IF l_debug_level > 0 THEN
4530: oe_debug_pub.add( 'ENTERING LOAD_MRP_REQUEST_FROM_TBL' , 1 ) ;
4531: END IF;
4532: l_mrp_calc_sd := fnd_profile.value('MRP_ATP_CALC_SD');
4533:
4534: IF l_debug_level > 0 THEN
4535: oe_debug_pub.add( 'MRP_ATP_CALC_SD : '||L_MRP_CALC_SD , 3 ) ;
4536: END IF;
4593:
4594: --3763015
4595: IF l_scheduling_level_code = SCH_LEVEL_FOUR OR
4596: l_scheduling_level_code = SCH_LEVEL_FIVE OR
4597: NVL(fnd_profile.value('ONT_BYPASS_ATP'),'N') = 'Y' OR
4598: Nvl(p_line_tbl(i).bypass_sch_flag, 'N') = 'Y' THEN -- for DOO Integration
4599:
4600: IF l_debug_level > 0 THEN
4601: oe_debug_pub.add( 'INACTIVE DEMAND LINE , LINE_ID = ' || P_LINE_TBL.LAST ) ;
5907:
5908: IF p_x_line_rec.order_source_id = 10 THEN
5909: IF NOT OE_Internal_Requisition_Pvt.G_Update_ISO_From_Req
5910: AND NOT OE_SALES_CAN_UTIL.G_IR_ISO_HDR_CANCEL THEN
5911: IF FND_PROFILE.VALUE('POR_SYNC_NEEDBYDATE_OM') = 'YES' THEN
5912: -- Modified for IR ISO Tracking bug 7667702
5913:
5914: IF l_debug_level > 0 THEN
5915: oe_debug_pub.add(' Logging G_UPDATE_REQUISITION delayed request for date change',5);
6321: ) THEN
6322:
6323: IF NOT OE_Internal_Requisition_Pvt.G_Update_ISO_From_Req
6324: AND NOT OE_SALES_CAN_UTIL.G_IR_ISO_HDR_CANCEL THEN
6325: -- AND FND_PROFILE.VALUE('POR_SYNC_NEEDBYDATE_OM') = 'YES' THEN
6326: IF FND_PROFILE.VALUE('POR_SYNC_NEEDBYDATE_OM') = 'YES' THEN
6327: -- Modified for IR ISO Tracking bug 7667702
6328:
6329: IF l_debug_level > 0 THEN
6322:
6323: IF NOT OE_Internal_Requisition_Pvt.G_Update_ISO_From_Req
6324: AND NOT OE_SALES_CAN_UTIL.G_IR_ISO_HDR_CANCEL THEN
6325: -- AND FND_PROFILE.VALUE('POR_SYNC_NEEDBYDATE_OM') = 'YES' THEN
6326: IF FND_PROFILE.VALUE('POR_SYNC_NEEDBYDATE_OM') = 'YES' THEN
6327: -- Modified for IR ISO Tracking bug 7667702
6328:
6329: IF l_debug_level > 0 THEN
6330: oe_debug_pub.add(' Logging G_UPDATE_REQUISITION delayed request for date change');
6639: -- BUG 1955004
6640: -- 3763015
6641: IF (sch_cached_sch_level_code = SCH_LEVEL_FOUR OR
6642: sch_cached_sch_level_code = SCH_LEVEL_FIVE OR
6643: NVL(fnd_profile.value('ONT_BYPASS_ATP'),'N') = 'Y') OR
6644: Nvl(p_x_line_rec.bypass_sch_flag, 'N') = 'Y' THEN -- DOO Integration
6645: -- this is an inactive demand line.
6646:
6647: IF l_debug_level > 0 THEN
7947: END IF;
7948: -- 3763015
7949: IF (l_scheduling_level_code = SCH_LEVEL_FOUR OR
7950: l_scheduling_level_code = SCH_LEVEL_FIVE OR
7951: NVL(fnd_profile.value('ONT_BYPASS_ATP'),'N') = 'Y') OR
7952: Nvl(p_old_line_rec.bypass_sch_flag, 'N') = 'Y' THEN -- DOO Integration
7953: -- this is an inactive demand line.
7954:
7955: IF l_debug_level > 0 THEN
8995: , p_quantity2_to_reserve IN NUMBER DEFAULT NULL
8996: , x_reservation_rec OUT NOCOPY Inv_Reservation_Global.Mtl_Reservation_Rec_Type)
8997:
8998: IS
8999: l_source_code VARCHAR2(40) := FND_PROFILE.VALUE('ONT_SOURCE_CODE');
9000: l_sales_order_id NUMBER;
9001: l_subinventory VARCHAR2(10);
9002: --
9003: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
9733:
9734: IF NVL(OE_SYS_PARAMETERS.value('RESCHEDULE_SHIP_METHOD_FLAG'),'Y') = 'N'
9735: AND NOT OE_GLOBALS.Equal(p_x_line_rec.shipping_method_code,
9736: l_old_line_rec.shipping_method_code)
9737: AND fnd_profile.value('ONT_SHIP_METHOD_FOR_SHIP_SET') = 'Y'
9738: THEN
9739:
9740: IF l_debug_level > 0 THEN
9741: oe_debug_pub.add( 'SHIPPING_METHOD CHANGED , CASCADE' , 4 ) ;
10178: l_order_date_type_code VARCHAR2(30):='';
10179: l_request_date_flag VARCHAR2(1) := 'Y';
10180: l_shipping_method_flag VARCHAR2(1) := 'Y';
10181: /* 6663462 Added the following 3 variables for the Delayed Scheduling feature */
10182: l_delayed_schedule VARCHAR2(1) := NVL(fnd_profile.value('ONT_DELAY_SCHEDULING'),'N') ;
10183: l_index NUMBER := 0;
10184: l_return_status VARCHAR2(1);
10185: l_auto_schedule_sets VARCHAR2(1):='Y'; --4241385
10186: l_set_exists BOOLEAN ; --4241385
10456:
10457: END IF;
10458: --8728176 : log request if OM: Bypass ATP is set to 'No'
10459: IF l_delayed_schedule = 'N' OR
10460: NVL(fnd_profile.value('ONT_BYPASS_ATP'),'N') ='Y' THEN
10461: x_auto_sch := 'Y';
10462: RETURN TRUE;
10463: ELSE
10464: OE_delayed_requests_Pvt.log_request(
11173: END IF;
11174: x_return_status := FND_API.G_RET_STS_ERROR;
11175: END IF;
11176: -- 3763015
11177: IF NVL(fnd_profile.value('ONT_BYPASS_ATP'),'N') = 'Y' OR
11178: Nvl(p_line_rec.bypass_sch_flag, 'N') = 'Y' THEN --- DOO Integration Changes
11179:
11180: -- An item with this profile set MUST have a warehouse
11181: IF l_debug_level > 0 THEN
11361:
11362: -- 3763015
11363: IF (l_scheduling_level_code is not null
11364: AND l_scheduling_level_code <> SCH_LEVEL_THREE)
11365: OR NVL(fnd_profile.value('ONT_BYPASS_ATP'),'N') = 'Y'
11366: OR Nvl(p_line_rec.bypass_sch_flag, 'N') = 'Y' THEN -- DOO Integration related.
11367: IF l_scheduling_level_code = SCH_LEVEL_ONE THEN
11368: IF p_sch_action = OESCH_ACT_SCHEDULE OR
11369: p_sch_action = OESCH_ACT_RESERVE OR
11409: --BUG 1955004
11410: -- 3763015
11411: IF l_scheduling_level_code = SCH_LEVEL_FOUR OR
11412: l_scheduling_level_code = SCH_LEVEL_FIVE OR
11413: NVL(fnd_profile.value('ONT_BYPASS_ATP'),'N') = 'Y' OR
11414: Nvl(p_line_rec.bypass_sch_flag, 'N') = 'Y' -- DOO Integration.
11415: THEN
11416: IF p_sch_action = OESCH_ACT_ATP_CHECK THEN
11417: -- levels Four and Five CANNOT have ATP Performed
11576: -- code fix for 3300528
11577: END IF; -- part of ato
11578:
11579: -- Added for 3451987
11580: IF NVL(FND_PROFILE.VALUE('ONT_SCH_ATO_ITEM_WO_BOM'), 'N') = 'N' THEN
11581: -- Added this part of validation to fix bug 2051855
11582: IF p_line_rec.ato_line_id = p_line_rec.line_id
11583: AND p_line_rec.item_type_code in ('STANDARD','OPTION','INCLUDED') --9775352
11584: AND fnd_profile.value('INV_CTP') = '5'THEN
11580: IF NVL(FND_PROFILE.VALUE('ONT_SCH_ATO_ITEM_WO_BOM'), 'N') = 'N' THEN
11581: -- Added this part of validation to fix bug 2051855
11582: IF p_line_rec.ato_line_id = p_line_rec.line_id
11583: AND p_line_rec.item_type_code in ('STANDARD','OPTION','INCLUDED') --9775352
11584: AND fnd_profile.value('INV_CTP') = '5'THEN
11585:
11586: l_org_id := OE_Sys_Parameters.VALUE('MASTER_ORGANIZATION_ID');
11587:
11588: -- Added code to fix bug 2156268
11761: */
11762: -- BUG 1282873
11763: IF OE_CODE_CONTROL.Get_Code_Release_Level >= '110509' THEN
11764: l_auth_to_override_atp :=
11765: NVL(FND_PROFILE.VALUE('ONT_OVERRIDE_ATP'), 'N');
11766:
11767: IF l_debug_level > 0 THEN
11768: oe_debug_pub.add( 'ONT_OVERRIDE_ATP' || L_AUTH_TO_OVERRIDE_ATP , 3 ) ;
11769: END IF;
12715: FUNCTION Get_mtl_sales_order_id(p_header_id IN NUMBER,
12716: p_order_type_id IN NUMBER DEFAULT NULL)
12717: RETURN NUMBER
12718: IS
12719: l_source_code VARCHAR2(40) := FND_PROFILE.VALUE('ONT_SOURCE_CODE');
12720: l_sales_order_id NUMBER := 0;
12721: l_order_type_name VARCHAR2(80);
12722: l_order_type_id NUMBER;
12723: --
12853: Procedure Insert_Into_Mtl_Sales_Orders
12854: ( p_header_rec IN OE_ORDER_PUB.header_rec_type)
12855: IS
12856: l_order_type_name VARCHAR2(80);
12857: l_source_code VARCHAR2(40) := FND_PROFILE.VALUE('ONT_SOURCE_CODE');
12858: l_sales_order_id NUMBER;
12859: l_msg_data VARCHAR2(2000);
12860: l_msg_count NUMBER;
12861: l_return_status VARCHAR2(1);
13944: END IF;
13945: -- 3763015
13946: IF l_scheduling_level_code <> SCH_LEVEL_FOUR AND
13947: l_scheduling_level_code <> SCH_LEVEL_FIVE AND
13948: NVL(fnd_profile.value('ONT_BYPASS_ATP'),'N') = 'N' AND
13949: (Nvl(p_x_line_rec.bypass_sch_flag, 'N') = 'N'
13950: OR p_x_line_rec.bypass_sch_flag = FND_API.G_MISS_CHAR ) THEN --14043008
13951: -- FOUR and FIVE CANNOT have ATP Performed
13952: -- validation may be off, so we we need to double-check here
16464: IF l_debug_level > 0 THEN
16465: oe_debug_pub.add( 'This API is not supported ' , 1 ) ;
16466: END IF;
16467: /*
16468: fnd_profile.put('OE_DEBUG_LOG_DIRECTORY','/sqlcom/outbound/dom1151');
16469:
16470: IF l_debug_level > 0 THEN
16471: oe_debug_pub.add( 'ENTERING UPDATE_RESULTS_FROM_BACKLOG_WB' , 1 ) ;
16472: END IF;
16970: l_count NUMBER;
16971: l_dummy_sn inv_reservation_global.serial_number_tbl_type;
16972: l_qty_to_unreserve NUMBER;
16973: l_qty2_to_unreserve NUMBER := p_quantity2_to_unreserve; --ER#14763609
16974: l_source_code VARCHAR2(40) := FND_PROFILE.VALUE('ONT_SOURCE_CODE');
16975: l_sales_order_id NUMBER;
16976: l_x_error_code NUMBER;
16977: l_lock_records VARCHAR2(1);
16978: l_sort_by_req_date NUMBER ;
17722: SELECT instance_id
17723: INTO l_instance_id
17724: FROM mrp_ap_apps_instances;
17725:
17726: l_insert_flag := fnd_profile.value('MRP_ATP_CALC_SD');
17727:
17728: IF nvl(l_insert_flag,'N') = 'Y' THEN
17729: l_insert_code := 1;
17730: ELSE