[Home] [Help]
297: x_return_status := FND_API.G_RET_STS_SUCCESS;
298:
299: -- This variable is to track that the Item is being Substituted by Planning Loop Back and not being changed manully by user.
300: -- Initializing to 'N' for current set of Lines. Will set it to Y if any item substitutions are happening.
301: OE_SCHEDULE_UTIL.OESCH_ITEM_IS_SUBSTITUTED := 'N'; -- Added for ER 6110708
302:
303: -- Bug #7667702: Tracking bug for IR ISO CMS Project
304: -- Since, in this code, caller can only be Planning (Planning Workbench
305: -- or DRP), setting the global with default value FALSE
471: END IF;
472:
473: l_opm_enabled := INV_GMI_RSV_BRANCH.Process_Branch(p_organization_id => l_line_rec.ship_from_org_id);
474:
475: l_sales_order_id := OE_SCHEDULE_UTIL.Get_mtl_sales_order_id(l_line_rec.HEADER_ID);
476: l_line_rec.reserved_quantity := OE_LINE_UTIL.Get_Reserved_Quantity
477: ( p_header_id => l_sales_order_id,
478: p_line_id => l_line_rec.line_id,
479: p_org_id => l_line_rec.ship_from_org_id
563: FOR J IN 1..l_local_line_tbl.COUNT LOOP
564:
565: IF l_local_line_tbl(J).shippable_flag = 'Y' THEN
566:
567: l_sales_order_id := OE_SCHEDULE_UTIL.Get_mtl_sales_order_id
568: (l_local_line_tbl(J).HEADER_ID);
569: l_local_line_tbl(J).reserved_quantity :=
570: OE_LINE_UTIL.Get_Reserved_Quantity
571: (p_header_id => l_sales_order_id,
664: ELSE
665:
666: IF nvl(l_line_rec.shippable_flag,'N') = 'Y' THEN
667:
668: l_sales_order_id := OE_SCHEDULE_UTIL.Get_mtl_sales_order_id
669: (l_line_rec.HEADER_ID);
670: l_line_rec.reserved_quantity :=
671: OE_LINE_UTIL.Get_Reserved_Quantity
672: (p_header_id => l_sales_order_id,
701: l_line_rec.item_identifier_type := 'INT';
702: l_item_substituted := TRUE;
703:
704: -- This variable is to track that the Item is being Substituted by Planning Loop Back and not being changed manully by user.
705: OE_SCHEDULE_UTIL.OESCH_ITEM_IS_SUBSTITUTED := 'Y';
706:
707: END IF;
708: /* End of ER 6110708 */
709:
801:
802:
803: IF g_line_tbl(J).schedule_status_code is not null THEN
804:
805: OE_SCHEDULE_UTIL.Promise_Date_for_Sch_Action
806: ( p_x_line_rec => g_line_tbl(J)
807: ,p_sch_action => OE_SCHEDULE_UTIL.OESCH_ACT_RESCHEDULE
808: ,p_header_id => g_line_tbl(J).header_id);
809:
803: IF g_line_tbl(J).schedule_status_code is not null THEN
804:
805: OE_SCHEDULE_UTIL.Promise_Date_for_Sch_Action
806: ( p_x_line_rec => g_line_tbl(J)
807: ,p_sch_action => OE_SCHEDULE_UTIL.OESCH_ACT_RESCHEDULE
808: ,p_header_id => g_line_tbl(J).header_id);
809:
810:
811: ELSE
809:
810:
811: ELSE
812:
813: g_line_tbl(J).schedule_status_code := OE_SCHEDULE_UTIL.OESCH_STATUS_SCHEDULED;
814: g_line_tbl(J).visible_demand_flag := 'Y';
815:
816: OE_SCHEDULE_UTIL.Promise_Date_for_Sch_Action
817: ( p_x_line_rec => g_line_tbl(J)
812:
813: g_line_tbl(J).schedule_status_code := OE_SCHEDULE_UTIL.OESCH_STATUS_SCHEDULED;
814: g_line_tbl(J).visible_demand_flag := 'Y';
815:
816: OE_SCHEDULE_UTIL.Promise_Date_for_Sch_Action
817: ( p_x_line_rec => g_line_tbl(J)
818: ,p_sch_action => OE_SCHEDULE_UTIL.OESCH_ACT_SCHEDULE
819: ,p_header_id => g_line_tbl(J).header_id);
820:
814: g_line_tbl(J).visible_demand_flag := 'Y';
815:
816: OE_SCHEDULE_UTIL.Promise_Date_for_Sch_Action
817: ( p_x_line_rec => g_line_tbl(J)
818: ,p_sch_action => OE_SCHEDULE_UTIL.OESCH_ACT_SCHEDULE
819: ,p_header_id => g_line_tbl(J).header_id);
820:
821: -- Firm Demand Flag.
822: IF nvl(g_line_tbl(J).firm_demand_flag,'N') = 'N'
894: oe_debug_pub.add('Ol OP ' || g_old_line_tbl(J).line_id ,2);
895:
896: END LOOP;
897:
898: OE_Schedule_Util.Call_Process_Order
899: ( p_x_old_line_tbl => g_old_line_tbl
900: ,p_x_line_tbl => g_line_tbl
901: ,p_control_rec => l_control_rec
902: ,p_caller => OE_SCHEDULE_UTIL.SCH_EXTERNAL
898: OE_Schedule_Util.Call_Process_Order
899: ( p_x_old_line_tbl => g_old_line_tbl
900: ,p_x_line_tbl => g_line_tbl
901: ,p_control_rec => l_control_rec
902: ,p_caller => OE_SCHEDULE_UTIL.SCH_EXTERNAL
903: ,x_return_status => x_return_status);
904: /* Commented for 4606248
905: OE_Order_PVT.Process_Requests_And_Notify
906: ( p_process_requests => TRUE
920:
921: OE_Config_Schedule_Pvt.Save_Sch_Attributes
922: ( p_x_line_tbl => l_line_tbl --g_line_tbl
923: ,p_old_line_tbl => l_old_line_tbl --g_old_line_tbl
924: ,p_sch_action => OE_SCHEDULE_UTIL.OESCH_ACT_SCHEDULE
925: ,p_caller => OE_SCHEDULE_UTIL.SCH_EXTERNAL
926: ,x_return_status => x_return_status);
927:
928: EXCEPTION
921: OE_Config_Schedule_Pvt.Save_Sch_Attributes
922: ( p_x_line_tbl => l_line_tbl --g_line_tbl
923: ,p_old_line_tbl => l_old_line_tbl --g_old_line_tbl
924: ,p_sch_action => OE_SCHEDULE_UTIL.OESCH_ACT_SCHEDULE
925: ,p_caller => OE_SCHEDULE_UTIL.SCH_EXTERNAL
926: ,x_return_status => x_return_status);
927:
928: EXCEPTION
929: WHEN OTHERS THEN
946: ,p_old_line_tbl => g_old_line_tbl
947: ,x_return_status => x_return_status);
948:
949: -- Resetting the variable after the Process Order API Call.
950: OE_SCHEDULE_UTIL.OESCH_ITEM_IS_SUBSTITUTED := 'N'; -- Added for ER 6110708
951:
952: -- ELSE -- Updated for bug 7679398/7675256
953: END IF;
954: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1228: OE_MSG_PUB.ADD;
1229: x_return_status := FND_API.G_RET_STS_ERROR;
1230: END IF;
1231:
1232: l_scheduling_level_code := OE_SCHEDULE_UTIL.Get_Scheduling_Level
1233: (g_line_tbl(I).header_id,
1234: g_line_tbl(I).line_type_id);
1235:
1236: IF l_scheduling_level_code = OE_SCHEDULE_UTIL.SCH_LEVEL_FOUR OR
1232: l_scheduling_level_code := OE_SCHEDULE_UTIL.Get_Scheduling_Level
1233: (g_line_tbl(I).header_id,
1234: g_line_tbl(I).line_type_id);
1235:
1236: IF l_scheduling_level_code = OE_SCHEDULE_UTIL.SCH_LEVEL_FOUR OR
1237: l_scheduling_level_code = OE_SCHEDULE_UTIL.SCH_LEVEL_FIVE OR
1238: l_scheduling_level_code = OE_SCHEDULE_UTIL.SCH_LEVEL_ONE THEN
1239:
1240: oe_debug_pub.add('E9',2);
1233: (g_line_tbl(I).header_id,
1234: g_line_tbl(I).line_type_id);
1235:
1236: IF l_scheduling_level_code = OE_SCHEDULE_UTIL.SCH_LEVEL_FOUR OR
1237: l_scheduling_level_code = OE_SCHEDULE_UTIL.SCH_LEVEL_FIVE OR
1238: l_scheduling_level_code = OE_SCHEDULE_UTIL.SCH_LEVEL_ONE THEN
1239:
1240: oe_debug_pub.add('E9',2);
1241: g_line_tbl(I).operation := OE_GLOBALS.G_OPR_NONE;
1234: g_line_tbl(I).line_type_id);
1235:
1236: IF l_scheduling_level_code = OE_SCHEDULE_UTIL.SCH_LEVEL_FOUR OR
1237: l_scheduling_level_code = OE_SCHEDULE_UTIL.SCH_LEVEL_FIVE OR
1238: l_scheduling_level_code = OE_SCHEDULE_UTIL.SCH_LEVEL_ONE THEN
1239:
1240: oe_debug_pub.add('E9',2);
1241: g_line_tbl(I).operation := OE_GLOBALS.G_OPR_NONE;
1242: FND_MESSAGE.SET_NAME('ONT', 'ONT_SCH_LOOP_LVL');
1572: AND nvl(g_line_tbl(p_index).booked_flag, 'N') = 'N'
1573: ) -- OR clause added for ER 6110708
1574: THEN
1575:
1576: OE_SCHEDULE_UTIL.Unreserve_Line
1577: (p_line_rec => g_old_line_tbl(p_index),
1578: p_quantity_to_unreserve => g_old_line_tbl(p_index).reserved_quantity,
1579: p_quantity2_to_unreserve => g_old_line_tbl(p_index).reserved_quantity2,-- --bug 16434168/16480604
1580: x_return_status => x_return_status);
1578: p_quantity_to_unreserve => g_old_line_tbl(p_index).reserved_quantity,
1579: p_quantity2_to_unreserve => g_old_line_tbl(p_index).reserved_quantity2,-- --bug 16434168/16480604
1580: x_return_status => x_return_status);
1581:
1582: OE_SCHEDULE_UTIL.Reserve_Line
1583: (p_line_rec => g_line_tbl(p_index)
1584: ,p_quantity_to_reserve => g_line_tbl(p_index).reserved_quantity
1585: ,x_return_Status => x_return_status);
1586: