3:
4: G_PKG_NAME CONSTANT VARCHAR2(30):='OE_GROUP_SCH_UTIL';
5: G_TOP_MODEL_LINE_ID NUMBER;
6: G_PART_OF_SET BOOLEAN;
7: G_BINARY_LIMIT CONSTANT NUMBER := OE_GLOBALS.G_BINARY_LIMIT; -- Added for bug 8636027
8:
9: /*---------------------------------------------------------------------
10: Procedure Name : Validate_Item_Warehouse
11: Description : This API will be called to check valid Item and warehouse
321: IF p_x_line_tbl(I).ship_model_complete_flag = 'N' AND
322: p_x_line_tbl(I).top_model_line_id IS NOT NULL AND
323: (p_x_line_tbl(I).ato_line_id IS NULL OR
324: p_x_line_tbl(I).ato_line_id <> p_x_line_tbl(I).top_model_line_id) AND
325: p_x_line_tbl(I).item_type_code = OE_GLOBALS.G_ITEM_INCLUDED THEN
326: IF NOT OE_SCH_CONC_REQUESTS.included_processed(p_x_line_tbl(I).line_id) THEN
327: IF l_debug_level > 0 THEN
328: oe_debug_pub.add( 'INCLUDED PROCESSED : ' || p_x_line_tbl(I).line_id, 3 ) ;
329: END IF;
570: AND open_flag = 'Y'
571: AND line_category_code <> 'RETURN'
572: AND item_type_code <> 'SERVICE'
573: AND NVL(subscription_enable_flag,'N') = 'N' --sol_ord_er #16014165
574: AND source_type_code <> OE_GLOBALS.G_SOURCE_EXTERNAL
575: ORDER BY arrival_set_id,ship_set_id,line_number,shipment_number,nvl(option_number,-1)
576: --added for bug 13537520
577: ,nvl(component_number,-1),nvl(service_number,-1);
578:
704: IF l_debug_level > 0 THEN
705: oe_debug_pub.add( 'LINE SELECTED FOR SCHEDULING **** : ' || L_LINE_REC.LINE_ID , 1 ) ;
706: END IF;
707: x_line_tbl(I) := l_line_rec;
708: x_line_tbl(I).operation := OE_GLOBALS.G_OPR_UPDATE;
709:
710: IF (x_line_tbl(I).arrival_set_id is not null) THEN
711:
712: l_set_rec := OE_ORDER_CACHE.Load_Set
913: -- code fix for 3300528
914: --FND_MESSAGE.SET_NAME('ONT','OE_SCH_NO_ACTION_DONE_NO_EXP');
915: IF l_line_rec.ato_line_id IS NOT NULL AND
916: NOT ( l_line_rec.ato_line_id = l_line_rec.line_id AND
917: l_line_rec.item_type_code IN ( OE_GLOBALS.G_ITEM_OPTION,
918: OE_GLOBALS.G_ITEM_STANDARD,OE_GLOBALS.G_ITEM_INCLUDED)) --9775352
919: THEN
920: FND_MESSAGE.SET_NAME('ONT','OE_SCH_RES_NO_CONFIG');
921: ELSE
914: --FND_MESSAGE.SET_NAME('ONT','OE_SCH_NO_ACTION_DONE_NO_EXP');
915: IF l_line_rec.ato_line_id IS NOT NULL AND
916: NOT ( l_line_rec.ato_line_id = l_line_rec.line_id AND
917: l_line_rec.item_type_code IN ( OE_GLOBALS.G_ITEM_OPTION,
918: OE_GLOBALS.G_ITEM_STANDARD,OE_GLOBALS.G_ITEM_INCLUDED)) --9775352
919: THEN
920: FND_MESSAGE.SET_NAME('ONT','OE_SCH_RES_NO_CONFIG');
921: ELSE
922: FND_MESSAGE.SET_NAME('ONT','ONT_SCH_NOT_RESERVABLE');
940: oe_debug_pub.add( 'LINE SELECTED FOR RESERVE **** : '|| L_LINE_REC.LINE_ID , 1 ) ;
941: END IF;
942: I := I + 1;
943: x_line_tbl(I) := l_line_rec;
944: x_line_tbl(I).operation := OE_GLOBALS.G_OPR_UPDATE;
945:
946: IF (x_line_tbl(I).arrival_set_id is not null) THEN
947: l_set_rec := OE_ORDER_CACHE.Load_Set
948: ( x_line_tbl(I).arrival_set_id);
1020:
1021: IF l_return_status = FND_API.G_RET_STS_SUCCESS THEN
1022: I := I +1; -- 2327783
1023: x_line_tbl(I) := l_line_rec;
1024: -- x_line_tbl(I).operation := OE_GLOBALS.G_OPR_UPDATE;
1025:
1026: IF (x_line_tbl(I).arrival_set_id is not null) THEN
1027: l_set_rec := OE_ORDER_CACHE.Load_Set
1028: ( x_line_tbl(I).arrival_set_id);
1203: oe_debug_pub.add( 'LINE SELECTED FOR UNRES **** : ' || L_LINE_REC.LINE_ID , 1 ) ;
1204: END IF;
1205:
1206:
1207: l_line_rec.operation := OE_GLOBALS.G_OPR_UPDATE;
1208: l_line_rec.schedule_action_code := p_sch_action;
1209: l_return_status := FND_API.G_RET_STS_SUCCESS;
1210:
1211: OE_SCHEDULE_UTIL.Validate_Line(p_line_rec => l_line_rec,
1298: ,p_source_document_type_id =>
1299: l_line_rec.source_document_type_id);
1300:
1301:
1302: l_line_rec.operation := OE_GLOBALS.G_OPR_UPDATE;
1303: l_line_rec.schedule_action_code := p_sch_action;
1304:
1305: l_return_status := FND_API.G_RET_STS_SUCCESS;
1306: OE_SCHEDULE_UTIL.Validate_Line(p_line_rec => l_line_rec,
1424:
1425: If a line is part of SMC or ATO or if it is a TOP MODEL, selected whole model for processing. If it is a non smc class or kit, select its included items if any.
1426: ----------------------------------------------------------------- */
1427: PROCEDURE Query_Schedule_Lines
1428: ( p_selected_tbl IN OE_GLOBALS.Selected_record_Tbl, --R12.MOAC
1429: p_sch_action IN VARCHAR2,
1430: x_line_tbl IN OUT NOCOPY OE_Order_PUB.Line_Tbl_Type
1431: )
1432: IS
1529: OR l_smc_flag = 'Y') AND
1530: l_schedule_status_code is NOT NULL)
1531: OR l_line_category_code = 'RETURN'
1532: OR l_item_type_code = 'SERVICE'
1533: OR l_source_type_code = OE_GLOBALS.G_SOURCE_EXTERNAL
1534: OR nvl(l_open_flag,'Y') = 'N'
1535: OR NVL(l_subscription_enable_flag,'N') = 'Y' --sol_ord_er #16014165
1536: THEN
1537: -- Schedule action is not required for the line.
1588: -- model will query the line.
1589:
1590: FOR K IN 1..p_selected_tbl.count LOOP -- R12.MOAC
1591: IF l_top_model_line_id = p_selected_tbl(K).id1
1592: OR (l_item_type_code = OE_GLOBALS.G_ITEM_INCLUDED AND
1593: l_link_to_line_id = p_selected_tbl(K).id1) THEN
1594: IF l_debug_level > 0 THEN
1595: oe_debug_pub.add( 'PARENT LINE IS PART OF TABLE' || P_SELECTED_TBL(K).ID1 , 2 ) ;
1596: END IF;
1654: END IF;
1655:
1656: ELSIF (l_ato_line_id is not null AND
1657: NOT (l_line_id = l_ato_line_id AND
1658: l_item_type_code IN(OE_GLOBALS.G_ITEM_STANDARD,
1659: OE_GLOBALS.G_ITEM_OPTION,
1660: OE_GLOBALS.G_ITEM_INCLUDED))) --9775352
1661: THEN
1662:
1655:
1656: ELSIF (l_ato_line_id is not null AND
1657: NOT (l_line_id = l_ato_line_id AND
1658: l_item_type_code IN(OE_GLOBALS.G_ITEM_STANDARD,
1659: OE_GLOBALS.G_ITEM_OPTION,
1660: OE_GLOBALS.G_ITEM_INCLUDED))) --9775352
1661: THEN
1662:
1663:
1656: ELSIF (l_ato_line_id is not null AND
1657: NOT (l_line_id = l_ato_line_id AND
1658: l_item_type_code IN(OE_GLOBALS.G_ITEM_STANDARD,
1659: OE_GLOBALS.G_ITEM_OPTION,
1660: OE_GLOBALS.G_ITEM_INCLUDED))) --9775352
1661: THEN
1662:
1663:
1664: -- Query ato model.
1837: If a line is part of SMC or ATO or if it is a TOP MODEL, selected whole model
1838: for processing. If it is a non smc class or kit, select its included items if any.
1839: ----------------------------------------------------------------- */
1840: PROCEDURE Query_Unschedule_Lines
1841: ( p_selected_tbl IN OE_GLOBALS.Selected_record_Tbl, --R12.MOAC
1842: p_sch_action IN VARCHAR2,
1843: x_line_tbl IN OUT NOCOPY OE_Order_PUB.Line_Tbl_Type
1844: )
1845: IS
1938: OE_MSG_PUB.Add;
1939: ELSIF (l_schedule_status_code IS NULL AND
1940: (l_smc_flag = 'Y' OR
1941: l_ato_line_id is not null OR
1942: l_item_type_code = OE_GLOBALS.G_ITEM_INCLUDED OR
1943: l_item_type_code = OE_GLOBALS.G_ITEM_OPTION OR
1944: l_item_type_code = OE_GLOBALS.G_ITEM_STANDARD))
1945: OR l_line_category_code = 'RETURN'
1946: OR l_item_type_code = OE_GLOBALS.G_ITEM_SERVICE
1939: ELSIF (l_schedule_status_code IS NULL AND
1940: (l_smc_flag = 'Y' OR
1941: l_ato_line_id is not null OR
1942: l_item_type_code = OE_GLOBALS.G_ITEM_INCLUDED OR
1943: l_item_type_code = OE_GLOBALS.G_ITEM_OPTION OR
1944: l_item_type_code = OE_GLOBALS.G_ITEM_STANDARD))
1945: OR l_line_category_code = 'RETURN'
1946: OR l_item_type_code = OE_GLOBALS.G_ITEM_SERVICE
1947: OR nvl(l_open_flag,'Y') = 'N'
1940: (l_smc_flag = 'Y' OR
1941: l_ato_line_id is not null OR
1942: l_item_type_code = OE_GLOBALS.G_ITEM_INCLUDED OR
1943: l_item_type_code = OE_GLOBALS.G_ITEM_OPTION OR
1944: l_item_type_code = OE_GLOBALS.G_ITEM_STANDARD))
1945: OR l_line_category_code = 'RETURN'
1946: OR l_item_type_code = OE_GLOBALS.G_ITEM_SERVICE
1947: OR nvl(l_open_flag,'Y') = 'N'
1948: OR NVL(l_subscription_enable_flag,'N') = 'Y' --sol_ord_er #16014165
1942: l_item_type_code = OE_GLOBALS.G_ITEM_INCLUDED OR
1943: l_item_type_code = OE_GLOBALS.G_ITEM_OPTION OR
1944: l_item_type_code = OE_GLOBALS.G_ITEM_STANDARD))
1945: OR l_line_category_code = 'RETURN'
1946: OR l_item_type_code = OE_GLOBALS.G_ITEM_SERVICE
1947: OR nvl(l_open_flag,'Y') = 'N'
1948: OR NVL(l_subscription_enable_flag,'N') = 'Y' --sol_ord_er #16014165
1949: THEN
1950: -- line is part of ATO/SMC Model or an ato item which is
1971:
1972: --R12.MOAC
1973: FOR K IN 1..p_selected_tbl.count LOOP
1974: IF l_top_model_line_id =p_selected_tbl(K).id1
1975: OR (l_item_type_code = OE_GLOBALS.G_ITEM_INCLUDED AND
1976: l_link_to_line_id = p_selected_tbl(K).id1) THEN
1977: l_query := 'N';
1978: exit;
1979: END IF;
1999: -- Decided to query the line. See what to pass to query sets.
2000: IF l_smc_flag = 'Y'
2001: OR (l_ato_line_id is not null AND
2002: NOT (l_line_id = l_ato_line_id AND
2003: l_item_type_code IN(OE_GLOBALS.G_ITEM_STANDARD,
2004: OE_GLOBALS.G_ITEM_OPTION,
2005: OE_GLOBALS.G_ITEM_INCLUDED))) --9775352
2006: THEN
2007:
2000: IF l_smc_flag = 'Y'
2001: OR (l_ato_line_id is not null AND
2002: NOT (l_line_id = l_ato_line_id AND
2003: l_item_type_code IN(OE_GLOBALS.G_ITEM_STANDARD,
2004: OE_GLOBALS.G_ITEM_OPTION,
2005: OE_GLOBALS.G_ITEM_INCLUDED))) --9775352
2006: THEN
2007:
2008: -- query using top_model_line_id / ato line id
2001: OR (l_ato_line_id is not null AND
2002: NOT (l_line_id = l_ato_line_id AND
2003: l_item_type_code IN(OE_GLOBALS.G_ITEM_STANDARD,
2004: OE_GLOBALS.G_ITEM_OPTION,
2005: OE_GLOBALS.G_ITEM_INCLUDED))) --9775352
2006: THEN
2007:
2008: -- query using top_model_line_id / ato line id
2009:
2244: If line is a top model selected all its children that are scheduled and it is a class or kit select its included items as well or else select by itself.
2245:
2246: ----------------------------------------------------------------- */
2247: PROCEDURE Query_Unreserve_Lines
2248: ( p_selected_tbl IN OE_GLOBALS.Selected_record_Tbl, --R12.MOAC
2249: p_sch_action IN VARCHAR2,
2250: x_line_tbl IN OUT NOCOPY OE_Order_PUB.Line_Tbl_Type
2251: )
2252: IS
2361:
2362: --R12.MOAC
2363: FOR K IN 1..p_selected_tbl.count LOOP
2364: IF l_top_model_line_id = p_selected_tbl(K).id1
2365: OR (l_item_type_code = OE_GLOBALS.G_ITEM_INCLUDED AND
2366: l_link_to_line_id = p_selected_tbl(K).id1) THEN
2367: l_query := 'N';
2368: exit;
2369: END IF;
2573: selected then select its included items as well.
2574:
2575: ------------------------------------------------------------------*/
2576: PROCEDURE Query_Reserve_Lines
2577: ( p_selected_tbl IN OE_GLOBALS.Selected_record_Tbl, --R12.MOAC
2578: p_sch_action IN VARCHAR2,
2579: x_line_tbl IN OUT NOCOPY OE_Order_PUB.Line_Tbl_Type
2580: )
2581: IS
2666:
2667: IF l_line_category_code = 'RETURN'
2668: OR l_item_type_code = 'SERVICE'
2669: OR NVL(l_subscription_enable_flag,'N') = 'Y' --sol_ord_er #16014165
2670: OR l_source_type_code = OE_GLOBALS.G_SOURCE_EXTERNAL
2671: OR nvl(l_open_flag,'Y') = 'N' THEN
2672:
2673: -- populate the error message and skip the line.
2674: FND_MESSAGE.SET_NAME('ONT','OE_SCH_NO_ACTION_DONE_NO_EXP');
2717: -- model will query the line.
2718: --R12.MOAC
2719: FOR K IN 1..p_selected_tbl.count LOOP
2720: IF l_top_model_line_id = p_selected_tbl(K).id1
2721: OR (l_item_type_code = OE_GLOBALS.G_ITEM_INCLUDED AND
2722: l_link_to_line_id = p_selected_tbl(K).id1) THEN
2723: l_query := 'N';
2724: exit;
2725: END IF;
2786:
2787:
2788: ELSIF (l_ato_line_id is not null AND
2789: NOT (l_line_id = l_ato_line_id AND
2790: l_item_type_code IN(OE_GLOBALS.G_ITEM_STANDARD,
2791: OE_GLOBALS.G_ITEM_OPTION,
2792: OE_GLOBALS.G_ITEM_INCLUDED))) -- 9775352
2793: AND l_schedule_status_code is null
2794: THEN
2787:
2788: ELSIF (l_ato_line_id is not null AND
2789: NOT (l_line_id = l_ato_line_id AND
2790: l_item_type_code IN(OE_GLOBALS.G_ITEM_STANDARD,
2791: OE_GLOBALS.G_ITEM_OPTION,
2792: OE_GLOBALS.G_ITEM_INCLUDED))) -- 9775352
2793: AND l_schedule_status_code is null
2794: THEN
2795:
2788: ELSIF (l_ato_line_id is not null AND
2789: NOT (l_line_id = l_ato_line_id AND
2790: l_item_type_code IN(OE_GLOBALS.G_ITEM_STANDARD,
2791: OE_GLOBALS.G_ITEM_OPTION,
2792: OE_GLOBALS.G_ITEM_INCLUDED))) -- 9775352
2793: AND l_schedule_status_code is null
2794: THEN
2795:
2796: -- Query ato model.
2818: END IF;
2819:
2820: -- 2746802
2821: ELSIF l_ato_line_id = l_line_id
2822: AND l_item_type_code = OE_GLOBALS.G_ITEM_MODEL
2823: AND l_schedule_status_code is not null THEN
2824:
2825: l_config_id := Null;
2826:
3103: IF nvl(l_line_tbl(I).shippable_flag,'N') = 'N'
3104: THEN
3105: IF l_line_tbl(I).ato_line_id IS NOT NULL AND
3106: NOT ( l_line_tbl(I).ato_line_id = l_line_tbl(I).line_id AND
3107: l_line_tbl(I).item_type_code IN ( OE_GLOBALS.G_ITEM_OPTION,
3108: OE_GLOBALS.G_ITEM_STANDARD,OE_GLOBALS.G_ITEM_INCLUDED)) -- 9775352
3109: THEN -- check for ato
3110: FND_MESSAGE.SET_NAME('ONT','OE_SCH_RES_NO_CONFIG');
3111: IF l_debug_level > 0 THEN
3104: THEN
3105: IF l_line_tbl(I).ato_line_id IS NOT NULL AND
3106: NOT ( l_line_tbl(I).ato_line_id = l_line_tbl(I).line_id AND
3107: l_line_tbl(I).item_type_code IN ( OE_GLOBALS.G_ITEM_OPTION,
3108: OE_GLOBALS.G_ITEM_STANDARD,OE_GLOBALS.G_ITEM_INCLUDED)) -- 9775352
3109: THEN -- check for ato
3110: FND_MESSAGE.SET_NAME('ONT','OE_SCH_RES_NO_CONFIG');
3111: IF l_debug_level > 0 THEN
3112: oe_debug_pub.add( 'NON SHIPPABLE ATO LINE' , 2 ) ;
3188: If top model is selected for processing or line part of smc or ato then query whole model. If class or kit is selected then select its included items as well.If line is selected which is part of set then select whole set for processing
3189:
3190: ------------------------------------------------------------------*/
3191: PROCEDURE Query_ATP_CHECK_Lines
3192: ( p_selected_tbl IN OE_GLOBALS.Selected_record_Tbl, --R12.MOAC
3193: p_sch_action IN VARCHAR2,
3194: x_line_tbl IN OUT NOCOPY OE_Order_PUB.Line_Tbl_Type
3195: )
3196: IS
3273:
3274: IF l_line_category_code = 'RETURN'
3275: OR l_item_type_code = 'SERVICE'
3276: OR NVL(l_subscription_enable_flag,'N') = 'Y' --sol_ord_er #16014165
3277: OR l_source_type_code = OE_GLOBALS.G_SOURCE_EXTERNAL
3278: OR nvl(l_open_flag,'Y') = 'N' THEN
3279:
3280: -- populate the error message and skip the line.
3281: FND_MESSAGE.SET_NAME('ONT','OE_SCH_NO_ACTION_DONE_NO_EXP');
3304: -- model will query the line.
3305: --R12.MOAC
3306: FOR K IN 1..p_selected_tbl.count LOOP
3307: IF l_top_model_line_id = p_selected_tbl(K).id1
3308: OR (l_item_type_code = OE_GLOBALS.G_ITEM_INCLUDED AND
3309: l_link_to_line_id = p_selected_tbl(K).id1) THEN
3310: l_query := 'N';
3311: exit;
3312: END IF;
3334: OR l_ship_set_id is not null
3335: OR l_smc_flag = 'Y'
3336: OR (l_ato_line_id is not null AND
3337: NOT (l_line_id = l_ato_line_id AND
3338: l_item_type_code IN(OE_GLOBALS.G_ITEM_STANDARD,
3339: OE_GLOBALS.G_ITEM_OPTION,
3340: OE_GLOBALS.G_ITEM_INCLUDED))) --9775352
3341: THEN
3342:
3335: OR l_smc_flag = 'Y'
3336: OR (l_ato_line_id is not null AND
3337: NOT (l_line_id = l_ato_line_id AND
3338: l_item_type_code IN(OE_GLOBALS.G_ITEM_STANDARD,
3339: OE_GLOBALS.G_ITEM_OPTION,
3340: OE_GLOBALS.G_ITEM_INCLUDED))) --9775352
3341: THEN
3342:
3343: IF l_arrival_set_id is not null
3336: OR (l_ato_line_id is not null AND
3337: NOT (l_line_id = l_ato_line_id AND
3338: l_item_type_code IN(OE_GLOBALS.G_ITEM_STANDARD,
3339: OE_GLOBALS.G_ITEM_OPTION,
3340: OE_GLOBALS.G_ITEM_INCLUDED))) --9775352
3341: THEN
3342:
3343: IF l_arrival_set_id is not null
3344: OR l_ship_set_id is not null
3720: query api's which will get all approprite a lines. Based on the
3721: action call process group or multi atp check.
3722: ---------------------------------------------------------------*/
3723: Procedure Schedule_Multi_lines
3724: (p_selected_line_tbl IN OE_GLOBALS.Selected_Record_Tbl, --R12.MOAC
3725: p_line_count IN NUMBER,
3726: p_sch_action IN VARCHAR2,
3727: x_atp_tbl OUT NOCOPY /* file.sql.39 change */ OE_ATP.Atp_Tbl_Type,
3728: x_return_status OUT NOCOPY /* file.sql.39 change */ VARCHAR2,
3849:
3850: IF l_debug_level > 0 THEN
3851: oe_debug_pub.add( ' LINE ID : ' || L_LINE_TBL ( I ) .LINE_ID , 4 ) ;
3852: END IF;
3853: l_line_tbl(I).operation := OE_GLOBALS.G_OPR_UPDATE;
3854: l_line_tbl(I).schedule_action_code := p_sch_action;
3855:
3856: IF (l_line_tbl(I).arrival_set_id is not null) THEN
3857: l_set_rec := OE_ORDER_CACHE.Load_Set
4019: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4020: END Schedule_Multi_lines;
4021: /* ------------------------------------------------------------
4022: Procedure schedule_set_lines
4023: (p_entity_code => OE_GLOBALS.G_ENTITY_LINE,
4024: p_entity_id => p_line_rec.line_id,
4025: p_requesting_entity_code => OE_GLOBALS.G_ENTITY_LINE,
4026: p_requesting_entity_id => p_line_rec.line_id,
4027: p_request_type => OE_GLOBALS.G_SCHEDULE_LINE,
4021: /* ------------------------------------------------------------
4022: Procedure schedule_set_lines
4023: (p_entity_code => OE_GLOBALS.G_ENTITY_LINE,
4024: p_entity_id => p_line_rec.line_id,
4025: p_requesting_entity_code => OE_GLOBALS.G_ENTITY_LINE,
4026: p_requesting_entity_id => p_line_rec.line_id,
4027: p_request_type => OE_GLOBALS.G_SCHEDULE_LINE,
4028: p_param1 => l_param1,
4029: p_param2 => p_line_rec.header_id,
4023: (p_entity_code => OE_GLOBALS.G_ENTITY_LINE,
4024: p_entity_id => p_line_rec.line_id,
4025: p_requesting_entity_code => OE_GLOBALS.G_ENTITY_LINE,
4026: p_requesting_entity_id => p_line_rec.line_id,
4027: p_request_type => OE_GLOBALS.G_SCHEDULE_LINE,
4028: p_param1 => l_param1,
4029: p_param2 => p_line_rec.header_id,
4030: p_param3 => l_action,
4031: p_param4 => p_old_line_rec.ship_from_org_id,
4179: oe_debug_pub.add( 'UPDATE SHIPPING : CHILDREN OF MODEL ' || TO_CHAR ( OPTIONREC.LINE_ID ) , 1 ) ;
4180: END IF;
4181:
4182: OE_Delayed_Requests_Pvt.Log_Request(
4183: p_entity_code => OE_GLOBALS.G_ENTITY_LINE,
4184: p_entity_id => optionrec.line_id,
4185: p_requesting_entity_code => OE_GLOBALS.G_ENTITY_LINE,
4186: p_requesting_entity_id => optionrec.line_id,
4187: p_request_type => OE_GLOBALS.G_UPDATE_SHIPPING,
4181:
4182: OE_Delayed_Requests_Pvt.Log_Request(
4183: p_entity_code => OE_GLOBALS.G_ENTITY_LINE,
4184: p_entity_id => optionrec.line_id,
4185: p_requesting_entity_code => OE_GLOBALS.G_ENTITY_LINE,
4186: p_requesting_entity_id => optionrec.line_id,
4187: p_request_type => OE_GLOBALS.G_UPDATE_SHIPPING,
4188: p_request_unique_key1 => OE_GLOBALS.G_OPR_UPDATE,
4189: p_param1 => FND_API.G_TRUE,
4183: p_entity_code => OE_GLOBALS.G_ENTITY_LINE,
4184: p_entity_id => optionrec.line_id,
4185: p_requesting_entity_code => OE_GLOBALS.G_ENTITY_LINE,
4186: p_requesting_entity_id => optionrec.line_id,
4187: p_request_type => OE_GLOBALS.G_UPDATE_SHIPPING,
4188: p_request_unique_key1 => OE_GLOBALS.G_OPR_UPDATE,
4189: p_param1 => FND_API.G_TRUE,
4190: x_return_status => x_return_status);
4191:
4184: p_entity_id => optionrec.line_id,
4185: p_requesting_entity_code => OE_GLOBALS.G_ENTITY_LINE,
4186: p_requesting_entity_id => optionrec.line_id,
4187: p_request_type => OE_GLOBALS.G_UPDATE_SHIPPING,
4188: p_request_unique_key1 => OE_GLOBALS.G_OPR_UPDATE,
4189: p_param1 => FND_API.G_TRUE,
4190: x_return_status => x_return_status);
4191:
4192: End loop;
4203: AND l_top_model_line_id is not null
4204: THEN
4205: FOR J IN 1..p_sch_set_tbl.count LOOP
4206: IF (l_link_to_line_id = p_sch_set_tbl(J).entity_id
4207: AND l_item_type_code = OE_GLOBALS.G_ITEM_INCLUDED)
4208: OR l_top_model_line_id = p_sch_set_tbl(J).entity_id
4209: THEN
4210: --Parent exists.
4211: IF l_debug_level > 0 THEN
4218: END IF; -- Not top
4219:
4220: ELSE -- GOP Code
4221: -- If the line is present in the table ignore the line.
4222: IF l_item_type_code = OE_GLOBALS.G_ITEM_INCLUDED
4223: THEN
4224: FOR J IN 1..p_sch_set_tbl.count LOOP
4225: IF l_link_to_line_id = p_sch_set_tbl(J).entity_id THEN
4226: --Parent exists.
4242: oe_debug_pub.add(' l_ato_line_id :' || l_ato_line_id,1);
4243: oe_debug_pub.add(' l_item_type_code :'|| l_item_type_code,1);
4244: IF l_line_exists = 'N'
4245: AND nvl(l_top_model_line_id,0) <> p_sch_set_tbl(I).entity_id
4246: AND NOT (l_item_type_code = OE_GLOBALS.G_ITEM_CLASS
4247: AND nvl(l_ato_line_id,-99) = p_sch_set_tbl(I).entity_id) THEN
4248:
4249:
4250: IF l_debug_level > 0 THEN
4331: l_line_tbl(K).change_reason := 'SYSTEM';
4332: l_line_tbl(K).change_comments := 'Delayed Request , Scheduling';
4333: /* End Audit Trail */
4334:
4335: l_line_tbl(K).operation := OE_GLOBALS.G_OPR_UPDATE;
4336:
4337: /* Commented the above line to fix the bug 2916814 */
4338: --3564302 (#1)
4339: -- Get the order date type code
4405: x_return_status => x_return_status);
4406:
4407: ELSIF (l_ato_line_id is not null AND
4408: NOT (l_ato_line_id = p_sch_set_tbl(I).entity_id AND
4409: l_item_type_code IN (OE_GLOBALS.G_ITEM_STANDARD,
4410: OE_GLOBALS.G_ITEM_OPTION,
4411: OE_GLOBALS.G_ITEM_INCLUDED))) --9775352
4412: THEN
4413:
4406:
4407: ELSIF (l_ato_line_id is not null AND
4408: NOT (l_ato_line_id = p_sch_set_tbl(I).entity_id AND
4409: l_item_type_code IN (OE_GLOBALS.G_ITEM_STANDARD,
4410: OE_GLOBALS.G_ITEM_OPTION,
4411: OE_GLOBALS.G_ITEM_INCLUDED))) --9775352
4412: THEN
4413:
4414: OE_Config_Util.Query_ATO_Options
4407: ELSIF (l_ato_line_id is not null AND
4408: NOT (l_ato_line_id = p_sch_set_tbl(I).entity_id AND
4409: l_item_type_code IN (OE_GLOBALS.G_ITEM_STANDARD,
4410: OE_GLOBALS.G_ITEM_OPTION,
4411: OE_GLOBALS.G_ITEM_INCLUDED))) --9775352
4412: THEN
4413:
4414: OE_Config_Util.Query_ATO_Options
4415: ( p_ato_line_id => l_ato_line_id
4413:
4414: OE_Config_Util.Query_ATO_Options
4415: ( p_ato_line_id => l_ato_line_id
4416: ,p_send_cancel_lines => 'Y'
4417: ,p_source_type => OE_Globals.G_SOURCE_INTERNAL
4418: ,x_line_tbl => l_iline_tbl);
4419:
4420:
4421: ELSE
4480:
4481: oe_debug_pub.add('Line is interfaced ',2);
4482:
4483: OE_Delayed_Requests_Pvt.Log_Request(
4484: p_entity_code => OE_GLOBALS.G_ENTITY_LINE,
4485: p_entity_id => l_iline_tbl(I).line_id,
4486: p_requesting_entity_code => OE_GLOBALS.G_ENTITY_LINE,
4487: p_requesting_entity_id => l_iline_tbl(I).line_id,
4488: p_request_type => OE_GLOBALS.G_UPDATE_SHIPPING,
4482:
4483: OE_Delayed_Requests_Pvt.Log_Request(
4484: p_entity_code => OE_GLOBALS.G_ENTITY_LINE,
4485: p_entity_id => l_iline_tbl(I).line_id,
4486: p_requesting_entity_code => OE_GLOBALS.G_ENTITY_LINE,
4487: p_requesting_entity_id => l_iline_tbl(I).line_id,
4488: p_request_type => OE_GLOBALS.G_UPDATE_SHIPPING,
4489: p_request_unique_key1 => OE_GLOBALS.G_OPR_UPDATE,
4490: p_param1 => FND_API.G_TRUE,
4484: p_entity_code => OE_GLOBALS.G_ENTITY_LINE,
4485: p_entity_id => l_iline_tbl(I).line_id,
4486: p_requesting_entity_code => OE_GLOBALS.G_ENTITY_LINE,
4487: p_requesting_entity_id => l_iline_tbl(I).line_id,
4488: p_request_type => OE_GLOBALS.G_UPDATE_SHIPPING,
4489: p_request_unique_key1 => OE_GLOBALS.G_OPR_UPDATE,
4490: p_param1 => FND_API.G_TRUE,
4491: x_return_status => x_return_status);
4492:
4485: p_entity_id => l_iline_tbl(I).line_id,
4486: p_requesting_entity_code => OE_GLOBALS.G_ENTITY_LINE,
4487: p_requesting_entity_id => l_iline_tbl(I).line_id,
4488: p_request_type => OE_GLOBALS.G_UPDATE_SHIPPING,
4489: p_request_unique_key1 => OE_GLOBALS.G_OPR_UPDATE,
4490: p_param1 => FND_API.G_TRUE,
4491: x_return_status => x_return_status);
4492:
4493: END IF;
4592: l_line_tbl(K).change_reason := 'SYSTEM';
4593: l_line_tbl(K).change_comments := 'Delayed Request , Scheduling';
4594: /* End Audit Trail */
4595:
4596: l_line_tbl(K).operation := OE_GLOBALS.G_OPR_UPDATE;
4597:
4598: IF p_sch_set_tbl(I).param8 = OE_SCHEDULE_UTIL.OESCH_ENTITY_SHIP_SET
4599: THEN
4600: -- Ship set date.
4739:
4740: IF l_debug_level > 0 THEN
4741: oe_debug_pub.add('Stng G_CASCADING_REQUEST_LOGGED to TRUE',2);
4742: END IF;
4743: OE_GLOBALS.G_CASCADING_REQUEST_LOGGED := TRUE;
4744:
4745: Schedule_Set(p_request_rec => l_request_rec,
4746: x_return_status => x_return_status);
4747:
4839:
4840: IF l_line_tbl(I).shipping_interfaced_flag = 'Y'
4841: AND l_line_tbl(I).Ordered_quantity > 0 THEN
4842: OE_Delayed_Requests_Pvt.Log_Request(
4843: p_entity_code => OE_GLOBALS.G_ENTITY_LINE,
4844: p_entity_id => l_line_tbl(I).line_id,
4845: p_requesting_entity_code => OE_GLOBALS.G_ENTITY_LINE,
4846: p_requesting_entity_id => l_line_tbl(I).line_id,
4847: p_request_type => OE_GLOBALS.G_UPDATE_SHIPPING,
4841: AND l_line_tbl(I).Ordered_quantity > 0 THEN
4842: OE_Delayed_Requests_Pvt.Log_Request(
4843: p_entity_code => OE_GLOBALS.G_ENTITY_LINE,
4844: p_entity_id => l_line_tbl(I).line_id,
4845: p_requesting_entity_code => OE_GLOBALS.G_ENTITY_LINE,
4846: p_requesting_entity_id => l_line_tbl(I).line_id,
4847: p_request_type => OE_GLOBALS.G_UPDATE_SHIPPING,
4848: p_request_unique_key1 => OE_GLOBALS.G_OPR_UPDATE,
4849: p_param1 => FND_API.G_TRUE,
4843: p_entity_code => OE_GLOBALS.G_ENTITY_LINE,
4844: p_entity_id => l_line_tbl(I).line_id,
4845: p_requesting_entity_code => OE_GLOBALS.G_ENTITY_LINE,
4846: p_requesting_entity_id => l_line_tbl(I).line_id,
4847: p_request_type => OE_GLOBALS.G_UPDATE_SHIPPING,
4848: p_request_unique_key1 => OE_GLOBALS.G_OPR_UPDATE,
4849: p_param1 => FND_API.G_TRUE,
4850: x_return_status => x_return_status);
4851: END IF;
4844: p_entity_id => l_line_tbl(I).line_id,
4845: p_requesting_entity_code => OE_GLOBALS.G_ENTITY_LINE,
4846: p_requesting_entity_id => l_line_tbl(I).line_id,
4847: p_request_type => OE_GLOBALS.G_UPDATE_SHIPPING,
4848: p_request_unique_key1 => OE_GLOBALS.G_OPR_UPDATE,
4849: p_param1 => FND_API.G_TRUE,
4850: x_return_status => x_return_status);
4851: END IF;
4852: END IF; -- Part of Model.
4910:
4911: /* ---------------------------------------------------------------
4912: Procedure : Schedule_Set
4913: Description:
4914: p_entity_code => OE_GLOBALS.G_ENTITY_LINE,
4915: p_entity_id => p_line_rec.line_id,
4916: p_requesting_entity_code => OE_GLOBALS.G_ENTITY_LINE,
4917: p_requesting_entity_id => p_line_rec.line_id,
4918: p_request_type => OE_GLOBALS.G_GROUP_SCHEDULE,
4912: Procedure : Schedule_Set
4913: Description:
4914: p_entity_code => OE_GLOBALS.G_ENTITY_LINE,
4915: p_entity_id => p_line_rec.line_id,
4916: p_requesting_entity_code => OE_GLOBALS.G_ENTITY_LINE,
4917: p_requesting_entity_id => p_line_rec.line_id,
4918: p_request_type => OE_GLOBALS.G_GROUP_SCHEDULE,
4919: p_param1 => l_param1,ship_set_id/arrival_set_id
4920: p_param2 => p_line_rec.header_id,
4914: p_entity_code => OE_GLOBALS.G_ENTITY_LINE,
4915: p_entity_id => p_line_rec.line_id,
4916: p_requesting_entity_code => OE_GLOBALS.G_ENTITY_LINE,
4917: p_requesting_entity_id => p_line_rec.line_id,
4918: p_request_type => OE_GLOBALS.G_GROUP_SCHEDULE,
4919: p_param1 => l_param1,ship_set_id/arrival_set_id
4920: p_param2 => p_line_rec.header_id,
4921: p_param3 => l_action,
4922: p_param4 => p_old_line_rec.ship_from_org_id,
5178:
5179: FOR I IN 1..l_line_tbl.count LOOP
5180:
5181: IF l_line_tbl(I).schedule_status_code IS NULL OR
5182: (l_line_tbl(I).item_type_code <> OE_GLOBALS.G_ITEM_STANDARD AND
5183: nvl(l_line_tbl(I).model_remnant_flag,'N') = 'N') THEN
5184:
5185: IF l_debug_level > 0 THEN
5186: oe_debug_pub.add( 'UNABLE TO BYPASS' , 2 ) ;
5322: AND nvl(l_line_tbl(I).override_atp_date_code,'N') = 'N' THEN
5323:
5324: IF (l_line_tbl(I).ato_line_id is not null AND
5325: NOT (l_line_tbl(I).ato_line_id = l_line_tbl(I).line_id AND
5326: l_line_tbl(I).item_type_code IN (OE_GLOBALS.G_ITEM_STANDARD,
5327: OE_GLOBALS.G_ITEM_OPTION,
5328: OE_GLOBALS.G_ITEM_INCLUDED))) --9775352
5329: THEN
5330:
5323:
5324: IF (l_line_tbl(I).ato_line_id is not null AND
5325: NOT (l_line_tbl(I).ato_line_id = l_line_tbl(I).line_id AND
5326: l_line_tbl(I).item_type_code IN (OE_GLOBALS.G_ITEM_STANDARD,
5327: OE_GLOBALS.G_ITEM_OPTION,
5328: OE_GLOBALS.G_ITEM_INCLUDED))) --9775352
5329: THEN
5330:
5331: BEGIN
5324: IF (l_line_tbl(I).ato_line_id is not null AND
5325: NOT (l_line_tbl(I).ato_line_id = l_line_tbl(I).line_id AND
5326: l_line_tbl(I).item_type_code IN (OE_GLOBALS.G_ITEM_STANDARD,
5327: OE_GLOBALS.G_ITEM_OPTION,
5328: OE_GLOBALS.G_ITEM_INCLUDED))) --9775352
5329: THEN
5330:
5331: BEGIN
5332:
5348: END;
5349: IF l_debug_level > 0 THEN
5350: oe_debug_pub.add( 'override_atp for ato :' || L_LINE_TBL ( I ) .OVERRIDE_ATP_DATE_CODE || L_LINE_TBL ( I ) .LINE_ID , 3 ) ;
5351: END IF;
5352: ELSIF l_line_tbl(I).item_type_code = OE_GLOBALS.G_ITEM_INCLUDED THEN
5353:
5354:
5355: BEGIN
5356:
5414: l_line_tbl(I).ship_from_org_id :=
5415: l_set_ship_from_org_id;
5416: END IF; --12642790
5417: IF (l_ship_from_org_id is not null)
5418: AND NOT OE_GLOBALS.Equal( l_ship_from_org_id,
5419: l_old_ship_from_org_id) THEN -- 12642790
5420: l_line_tbl(I).ship_from_org_id :=
5421: l_ship_from_org_id;
5422: END IF;
5437: THEN
5438: l_line_tbl(I).request_date := oe_schedule_util.OE_sch_Attrb_Tbl(mod(l_line_tbl(I).top_model_line_id, G_BINARY_LIMIT)).date_attribute1;
5439: ELSIF l_line_tbl(I).ato_line_id is not null
5440: AND NOT(l_line_tbl(I).ato_line_id = l_line_tbl(I).line_id
5441: AND l_line_tbl(I).item_type_code IN (OE_GLOBALS.G_ITEM_STANDARD, OE_GLOBALS.G_ITEM_OPTION,OE_GLOBALS.G_ITEM_INCLUDED)) --9775352
5442: AND oe_schedule_util.OE_sch_Attrb_Tbl.EXISTS(mod(l_line_tbl(I).ato_line_id, G_BINARY_LIMIT) )
5443: AND oe_schedule_util.OE_sch_Attrb_Tbl(mod(l_line_tbl(I).ato_line_id, G_BINARY_LIMIT)).date_attribute1 is not null
5444: THEN
5445: l_line_tbl(I).request_date := oe_schedule_util.OE_sch_Attrb_Tbl(mod(l_line_tbl(I).ato_line_id, G_BINARY_LIMIT)).date_attribute1;
5442: AND oe_schedule_util.OE_sch_Attrb_Tbl.EXISTS(mod(l_line_tbl(I).ato_line_id, G_BINARY_LIMIT) )
5443: AND oe_schedule_util.OE_sch_Attrb_Tbl(mod(l_line_tbl(I).ato_line_id, G_BINARY_LIMIT)).date_attribute1 is not null
5444: THEN
5445: l_line_tbl(I).request_date := oe_schedule_util.OE_sch_Attrb_Tbl(mod(l_line_tbl(I).ato_line_id, G_BINARY_LIMIT)).date_attribute1;
5446: ELSIF l_line_tbl(I).item_type_code = OE_GLOBALS.G_ITEM_INCLUDED
5447: AND oe_schedule_util.OE_sch_Attrb_Tbl.EXISTS(mod(l_line_tbl(I).link_to_line_id, G_BINARY_LIMIT) )
5448: AND oe_schedule_util.OE_sch_Attrb_Tbl(mod(l_line_tbl(I).link_to_line_id, G_BINARY_LIMIT)).date_attribute1 is not null
5449: THEN
5450: l_line_tbl(I).request_date := oe_schedule_util.OE_sch_Attrb_Tbl(mod(l_line_tbl(I).link_to_line_id, G_BINARY_LIMIT)).date_attribute1;
5452: END IF;
5453: -- End 2787962
5454:
5455: IF (l_request_date is not null
5456: AND NOT OE_GLOBALS.Equal( l_request_date,
5457: l_old_request_date)) THEN
5458:
5459: IF NOT l_set_overridden THEN
5460: --4483035
5476: -- 4929511 :Commented
5477: -- 12602958 Uncommented
5478: ELSIF (l_schedule_ship_date is not null
5479: AND NVL(l_line_tbl(I).OVERRIDE_ATP_DATE_CODE,'N') ='Y'
5480: AND NOT OE_GLOBALS.Equal( l_schedule_ship_date,
5481: l_old_schedule_ship_date)) THEN
5482: l_line_tbl(I).schedule_ship_date :=
5483: l_schedule_ship_date;
5484:
5499: -- 4929511 :Commented
5500: -- 12602958 Uncommented
5501: ELSIF (l_schedule_arrival_date is not null
5502: AND NVL(l_line_tbl(I).OVERRIDE_ATP_DATE_CODE,'N') ='Y'
5503: AND NOT OE_GLOBALS.Equal( l_schedule_arrival_date,
5504: l_old_schedule_arrival_date)) THEN
5505: l_line_tbl(I).schedule_arrival_date :=
5506: l_schedule_arrival_date;
5507: END IF;
5506: l_schedule_arrival_date;
5507: END IF;
5508: -- END IF; -- 2716220
5509:
5510: l_line_tbl(I).operation := OE_GLOBALS.G_OPR_UPDATE;
5511: IF l_debug_level > 0 THEN
5512: oe_debug_pub.add('request date :' || l_line_tbl(i).request_date , 1 ) ;
5513: oe_debug_pub.add('schedule_ship_date :' || l_line_tbl(I).schedule_ship_date , 1 ) ;
5514: oe_debug_pub.add('schedule_arrival_date :' || l_line_tbl(I).schedule_arrival_date , 1 ) ;
5562: THEN
5563: l_line_tbl(I).request_date := oe_schedule_util.OE_sch_Attrb_Tbl(mod(l_line_tbl(I).top_model_line_id, G_BINARY_LIMIT)).date_attribute1;
5564: ELSIF l_line_tbl(I).ato_line_id is not null
5565: AND NOT(l_line_tbl(I).ato_line_id = l_line_tbl(I).line_id
5566: AND l_line_tbl(I).item_type_code IN (OE_GLOBALS.G_ITEM_STANDARD, OE_GLOBALS.G_ITEM_OPTION, OE_GLOBALS.G_ITEM_INCLUDED)) --9775352
5567: AND oe_schedule_util.OE_sch_Attrb_Tbl.EXISTS(mod(l_line_tbl(I).ato_line_id, G_BINARY_LIMIT) )
5568: AND oe_schedule_util.OE_sch_Attrb_Tbl (mod(l_line_tbl(I).ato_line_id, G_BINARY_LIMIT)).date_attribute1 is not null
5569: THEN
5570: l_line_tbl(I).request_date := oe_schedule_util.OE_sch_Attrb_Tbl(mod(l_line_tbl(I).ato_line_id, G_BINARY_LIMIT)).date_attribute1;
5567: AND oe_schedule_util.OE_sch_Attrb_Tbl.EXISTS(mod(l_line_tbl(I).ato_line_id, G_BINARY_LIMIT) )
5568: AND oe_schedule_util.OE_sch_Attrb_Tbl (mod(l_line_tbl(I).ato_line_id, G_BINARY_LIMIT)).date_attribute1 is not null
5569: THEN
5570: l_line_tbl(I).request_date := oe_schedule_util.OE_sch_Attrb_Tbl(mod(l_line_tbl(I).ato_line_id, G_BINARY_LIMIT)).date_attribute1;
5571: ELSIF l_line_tbl(I).item_type_code = OE_GLOBALS.G_ITEM_INCLUDED
5572: AND oe_schedule_util.OE_sch_Attrb_Tbl.EXISTS(mod(l_line_tbl(I).link_to_line_id, G_BINARY_LIMIT) )
5573: AND oe_schedule_util.OE_sch_Attrb_Tbl(mod(l_line_tbl(I).link_to_line_id, G_BINARY_LIMIT)).date_attribute1 is not null
5574: THEN
5575: l_line_tbl(I).request_date := oe_schedule_util.OE_sch_Attrb_Tbl(mod(l_line_tbl(I).link_to_line_id, G_BINARY_LIMIT)).date_attribute1;
5584: THEN
5585: l_line_tbl(I).Ship_from_org_id := oe_schedule_util.OE_sch_Attrb_Tbl(mod(l_line_tbl(I).top_model_line_id, G_BINARY_LIMIT)).attribute1;
5586: ELSIF l_line_tbl(I).ato_line_id is not null
5587: AND NOT(l_line_tbl(I).ato_line_id = l_line_tbl(I).line_id
5588: AND l_line_tbl(I).item_type_code IN (OE_GLOBALS.G_ITEM_STANDARD,
5589: OE_GLOBALS.G_ITEM_OPTION,
5590: OE_GLOBALS.G_ITEM_INCLUDED)) --9775352
5591: AND oe_schedule_util.OE_sch_Attrb_Tbl.EXISTS(mod(l_line_tbl(I).ato_line_id, G_BINARY_LIMIT) )
5592: AND oe_schedule_util.OE_sch_Attrb_Tbl(mod(l_line_tbl(I).ato_line_id, G_BINARY_LIMIT)).attribute1 is not null
5585: l_line_tbl(I).Ship_from_org_id := oe_schedule_util.OE_sch_Attrb_Tbl(mod(l_line_tbl(I).top_model_line_id, G_BINARY_LIMIT)).attribute1;
5586: ELSIF l_line_tbl(I).ato_line_id is not null
5587: AND NOT(l_line_tbl(I).ato_line_id = l_line_tbl(I).line_id
5588: AND l_line_tbl(I).item_type_code IN (OE_GLOBALS.G_ITEM_STANDARD,
5589: OE_GLOBALS.G_ITEM_OPTION,
5590: OE_GLOBALS.G_ITEM_INCLUDED)) --9775352
5591: AND oe_schedule_util.OE_sch_Attrb_Tbl.EXISTS(mod(l_line_tbl(I).ato_line_id, G_BINARY_LIMIT) )
5592: AND oe_schedule_util.OE_sch_Attrb_Tbl(mod(l_line_tbl(I).ato_line_id, G_BINARY_LIMIT)).attribute1 is not null
5593: THEN
5586: ELSIF l_line_tbl(I).ato_line_id is not null
5587: AND NOT(l_line_tbl(I).ato_line_id = l_line_tbl(I).line_id
5588: AND l_line_tbl(I).item_type_code IN (OE_GLOBALS.G_ITEM_STANDARD,
5589: OE_GLOBALS.G_ITEM_OPTION,
5590: OE_GLOBALS.G_ITEM_INCLUDED)) --9775352
5591: AND oe_schedule_util.OE_sch_Attrb_Tbl.EXISTS(mod(l_line_tbl(I).ato_line_id, G_BINARY_LIMIT) )
5592: AND oe_schedule_util.OE_sch_Attrb_Tbl(mod(l_line_tbl(I).ato_line_id, G_BINARY_LIMIT)).attribute1 is not null
5593: THEN
5594: l_line_tbl(I).Ship_from_org_id := oe_schedule_util.OE_sch_Attrb_Tbl(mod(l_line_tbl(I).ato_line_id, G_BINARY_LIMIT)).attribute1;
5596:
5597: -- 2391781
5598:
5599: IF (l_request_date is not null
5600: AND NOT OE_GLOBALS.Equal( l_request_date,
5601: l_old_request_date)) THEN
5602: IF NOT l_set_overridden THEN
5603: --4483035
5604: --l_line_tbl(I).schedule_arrival_date := l_request_date;
5617: --4929511 : Commented
5618: --12602958 Uncommented
5619: ELSIF (l_schedule_arrival_date is not null
5620: AND NVL(l_line_tbl(I).OVERRIDE_ATP_DATE_CODE,'N') ='Y'
5621: AND NOT OE_GLOBALS.Equal( l_schedule_arrival_date,
5622: l_old_schedule_arrival_date)) THEN
5623: l_line_tbl(I).schedule_arrival_date := l_schedule_arrival_date;
5624:
5625: END IF;
5634: --4929511 : Commented
5635: ----12602958 Uncommented
5636: ELSIF (l_schedule_ship_date is not null
5637: AND NVL(l_line_tbl(I).OVERRIDE_ATP_DATE_CODE,'N') ='Y'
5638: AND NOT OE_GLOBALS.Equal( l_schedule_ship_date,
5639: l_old_schedule_ship_date)) THEN
5640: l_line_tbl(I).schedule_ship_date :=
5641: l_schedule_ship_date;
5642: END IF;
5646: oe_debug_pub.add( 'REQUEST ARRIVAL DATE :' || L_LINE_TBL ( I ) .SCHEDULE_ARRIVAL_DATE , 1 ) ;
5647: END IF;
5648:
5649:
5650: l_line_tbl(I).operation := OE_GLOBALS.G_OPR_UPDATE;
5651:
5652: END LOOP;
5653: END IF;
5654:
5816: IF l_debug_level > 0 THEN
5817: oe_debug_pub.add('l_operation :' || l_operation,2);
5818: oe_debug_pub.add('l_set_rec.set_status :' || l_set_rec.set_status,2);
5819: END IF;
5820: IF l_operation = OE_GLOBALS.G_OPR_CREATE
5821: AND l_set_rec.set_status = 'T' THEN
5822: -- Could not schedule the line on the set date. Let's schedule
5823: -- the whole set to see if we get another date got the whole
5824: -- set.
5964: END IF;
5965: EXCEPTION
5966: WHEN FND_API.G_EXC_ERROR THEN
5967: --3543774 If new set show the error message
5968: IF p_request_rec.request_type = OE_GLOBALS.G_GROUP_SCHEDULE
5969: AND ((l_entity_type =
5970: OE_SCHEDULE_UTIL.OESCH_ENTITY_SHIP_SET
5971: AND NOT OE_GLOBALS.equal(l_ship_set_id,l_old_ship_set_id))
5972: OR (l_entity_type =
5967: --3543774 If new set show the error message
5968: IF p_request_rec.request_type = OE_GLOBALS.G_GROUP_SCHEDULE
5969: AND ((l_entity_type =
5970: OE_SCHEDULE_UTIL.OESCH_ENTITY_SHIP_SET
5971: AND NOT OE_GLOBALS.equal(l_ship_set_id,l_old_ship_set_id))
5972: OR (l_entity_type =
5973: OE_SCHEDULE_UTIL.OESCH_ENTITY_ARRIVAL_SET
5974: AND NOT OE_GLOBALS.equal(l_arrival_set_id,l_old_arrival_set_id)))
5975: THEN
5970: OE_SCHEDULE_UTIL.OESCH_ENTITY_SHIP_SET
5971: AND NOT OE_GLOBALS.equal(l_ship_set_id,l_old_ship_set_id))
5972: OR (l_entity_type =
5973: OE_SCHEDULE_UTIL.OESCH_ENTITY_ARRIVAL_SET
5974: AND NOT OE_GLOBALS.equal(l_arrival_set_id,l_old_arrival_set_id)))
5975: THEN
5976: fnd_message.set_name('ONT','OE_SCH_SET_INS_FAILED');
5977: OE_MSG_PUB.Add;
5978: END IF;
6003: /***************************************************
6004: Procedure Group_Schedule_sets has been written to take care
6005: of set_for_each_line project.
6006:
6007: p_entity_code => OE_GLOBALS.G_ENTITY_LINE,
6008: p_entity_id => nvl(p_line_rec.ship_set_id,p_line_rec.arrival_set_
6009: id),
6010: p_requesting_entity_code => OE_GLOBALS.G_ENTITY_LINE,
6011: p_requesting_entity_id => p_line_rec.line_id,
6006:
6007: p_entity_code => OE_GLOBALS.G_ENTITY_LINE,
6008: p_entity_id => nvl(p_line_rec.ship_set_id,p_line_rec.arrival_set_
6009: id),
6010: p_requesting_entity_code => OE_GLOBALS.G_ENTITY_LINE,
6011: p_requesting_entity_id => p_line_rec.line_id,
6012: p_request_type => OE_GLOBALS.G_GROUP_SET,
6013: p_param1 => l_set_type,
6014: p_param2 => p_line_rec.header_id,
6008: p_entity_id => nvl(p_line_rec.ship_set_id,p_line_rec.arrival_set_
6009: id),
6010: p_requesting_entity_code => OE_GLOBALS.G_ENTITY_LINE,
6011: p_requesting_entity_id => p_line_rec.line_id,
6012: p_request_type => OE_GLOBALS.G_GROUP_SET,
6013: p_param1 => l_set_type,
6014: p_param2 => p_line_rec.header_id,
6015: p_param3 => p_line_rec.line_id,
6016: p_param4 => p_line_rec.top_model_line_id,
6154:
6155: IF nvl(l_line_tbl(J).override_atp_date_code,'N') = 'N'
6156: AND (l_line_tbl(J).ato_line_id is not null AND
6157: NOT (l_line_tbl(J).ato_line_id = l_line_tbl(J).line_id AND
6158: l_line_tbl(J).item_type_code IN (OE_GLOBALS.G_ITEM_STANDARD,
6159: OE_GLOBALS.G_ITEM_OPTION,
6160: OE_GLOBALS.G_ITEM_INCLUDED))) --9775352
6161: THEN
6162:
6155: IF nvl(l_line_tbl(J).override_atp_date_code,'N') = 'N'
6156: AND (l_line_tbl(J).ato_line_id is not null AND
6157: NOT (l_line_tbl(J).ato_line_id = l_line_tbl(J).line_id AND
6158: l_line_tbl(J).item_type_code IN (OE_GLOBALS.G_ITEM_STANDARD,
6159: OE_GLOBALS.G_ITEM_OPTION,
6160: OE_GLOBALS.G_ITEM_INCLUDED))) --9775352
6161: THEN
6162:
6163: BEGIN
6156: AND (l_line_tbl(J).ato_line_id is not null AND
6157: NOT (l_line_tbl(J).ato_line_id = l_line_tbl(J).line_id AND
6158: l_line_tbl(J).item_type_code IN (OE_GLOBALS.G_ITEM_STANDARD,
6159: OE_GLOBALS.G_ITEM_OPTION,
6160: OE_GLOBALS.G_ITEM_INCLUDED))) --9775352
6161: THEN
6162:
6163: BEGIN
6164: