[Home] [Help]
30: BEGIN
31: IF l_debug_level > 0 THEN
32: oe_debug_pub.add( 'ENTERING ITEM IS ATO MODEL' , 1 ) ;
33: END IF;
34: IF p_line_rec.item_type_code = OE_GLOBALS.G_ITEM_MODEL
35: and p_line_rec.line_id = p_line_rec.ato_line_id
36: THEN
37: IF l_debug_level > 0 THEN
38: oe_debug_pub.add( 'RR: RETURNING TRUE' , 1 ) ;
80:
81: -- If the operation is delete, we just need to unschedule this line.
82: -- So we do not need to perform any group scheduling right away.
83:
84: IF p_line_rec.operation = OE_GLOBALS.G_OPR_DELETE THEN
85: RETURN FALSE;
86: END IF;
87:
88: -- If the line belongs to a remnant set, we should not treat it in a
92: RETURN FALSE;
93: END IF;
94:
95:
96: IF (p_line_rec.operation = OE_GLOBALS.G_OPR_CREATE) THEN
97:
98: IF l_debug_level > 0 THEN
99: oe_debug_pub.add( 'IT IS A CREATE ACTION ON THE LINE' , 1 ) ;
100: END IF;
106: (p_line_rec.ship_model_complete_flag = 'Y') OR
107: (p_line_rec.ato_line_id is not null AND
108: p_line_rec.ato_line_id <> FND_API.G_MISS_NUM AND
109: NOT (p_line_rec.ato_line_id = p_line_rec.line_id AND
110: p_line_rec.item_type_code IN (OE_GLOBALS.G_ITEM_STANDARD,
111: OE_GLOBALS.G_ITEM_OPTION))) THEN
112:
113: RETURN TRUE;
114:
107: (p_line_rec.ato_line_id is not null AND
108: p_line_rec.ato_line_id <> FND_API.G_MISS_NUM AND
109: NOT (p_line_rec.ato_line_id = p_line_rec.line_id AND
110: p_line_rec.item_type_code IN (OE_GLOBALS.G_ITEM_STANDARD,
111: OE_GLOBALS.G_ITEM_OPTION))) THEN
112:
113: RETURN TRUE;
114:
115: END IF;
114:
115: END IF;
116: END IF;
117:
118: IF (p_line_rec.operation = OE_GLOBALS.G_OPR_UPDATE) THEN
119:
120: IF l_debug_level > 0 THEN
121: oe_debug_pub.add( 'IT IS A UPDATE ACTION ON THE LINE' , 1 ) ;
122: END IF;
120: IF l_debug_level > 0 THEN
121: oe_debug_pub.add( 'IT IS A UPDATE ACTION ON THE LINE' , 1 ) ;
122: END IF;
123:
124: IF (NOT OE_GLOBALS.Equal(p_line_rec.ship_set_id,
125: p_old_line_rec.ship_set_id)
126: AND p_line_rec.ship_set_id IS NOT NULL ) OR
127: (NOT OE_GLOBALS.Equal(p_line_rec.arrival_set_id,
128: p_old_line_rec.arrival_set_id)
123:
124: IF (NOT OE_GLOBALS.Equal(p_line_rec.ship_set_id,
125: p_old_line_rec.ship_set_id)
126: AND p_line_rec.ship_set_id IS NOT NULL ) OR
127: (NOT OE_GLOBALS.Equal(p_line_rec.arrival_set_id,
128: p_old_line_rec.arrival_set_id)
129: AND p_line_rec.arrival_set_id IS NOT NULL) THEN
130: RETURN TRUE;
131: END IF;
137: -- that the line is being added to a set, or being moved from
138: -- one to another. This does not need group scheduling right away. We
139: -- will just try to schedule the line as is.
140:
141: IF NOT OE_GLOBALS.Equal(p_line_rec.ship_set_id,
142: p_old_line_rec.ship_set_id)
143: THEN
144: RETURN FALSE;
145: END IF;
143: THEN
144: RETURN FALSE;
145: END IF;
146:
147: IF NOT OE_GLOBALS.Equal(p_line_rec.arrival_set_id,
148: p_old_line_rec.arrival_set_id)
149: THEN
150: RETURN FALSE;
151: END IF;
166:
167: -- Adding this code so that, if an item is changed on one of the line
168: -- which belong to set require a group_scheduling.
169:
170: IF p_line_rec.operation = OE_GLOBALS.G_OPR_UPDATE AND
171: p_line_rec.schedule_status_code IS NOT NULL AND
172: (NOT OE_GLOBALS.Equal(p_line_rec.inventory_item_id,
173: p_old_line_rec.inventory_item_id))
174:
168: -- which belong to set require a group_scheduling.
169:
170: IF p_line_rec.operation = OE_GLOBALS.G_OPR_UPDATE AND
171: p_line_rec.schedule_status_code IS NOT NULL AND
172: (NOT OE_GLOBALS.Equal(p_line_rec.inventory_item_id,
173: p_old_line_rec.inventory_item_id))
174:
175: THEN
176: RETURN TRUE;
180:
181:
182: IF (p_line_rec.ato_line_id is not null AND
183: NOT (p_line_rec.ato_line_id = p_line_rec.line_id AND
184: p_line_rec.item_type_code IN (OE_GLOBALS.G_ITEM_STANDARD,
185: OE_GLOBALS.G_ITEM_OPTION))) OR
186: (nvl(p_line_rec.ship_model_complete_flag,'N') = 'Y') OR
187: (p_line_rec.ship_set_id is not null) OR
188: (p_line_rec.arrival_set_id is not null)
181:
182: IF (p_line_rec.ato_line_id is not null AND
183: NOT (p_line_rec.ato_line_id = p_line_rec.line_id AND
184: p_line_rec.item_type_code IN (OE_GLOBALS.G_ITEM_STANDARD,
185: OE_GLOBALS.G_ITEM_OPTION))) OR
186: (nvl(p_line_rec.ship_model_complete_flag,'N') = 'Y') OR
187: (p_line_rec.ship_set_id is not null) OR
188: (p_line_rec.arrival_set_id is not null)
189: THEN
199:
200:
201: IF (p_line_rec.ato_line_id is not null) AND
202: NOT (p_line_rec.ato_line_id = p_line_rec.line_id AND
203: p_line_rec.item_type_code IN (OE_GLOBALS.G_ITEM_STANDARD,
204: OE_GLOBALS.G_ITEM_OPTION))
205: THEN
206:
207: IF l_debug_level > 0 THEN
200:
201: IF (p_line_rec.ato_line_id is not null) AND
202: NOT (p_line_rec.ato_line_id = p_line_rec.line_id AND
203: p_line_rec.item_type_code IN (OE_GLOBALS.G_ITEM_STANDARD,
204: OE_GLOBALS.G_ITEM_OPTION))
205: THEN
206:
207: IF l_debug_level > 0 THEN
208: oe_debug_pub.add( 'ITEM CHANGED IS ATO MODEL OR OPTION' , 1 ) ;
211: -- Change of following attributes affects the whole set
212: -- and thus we must create a group request for it.
213:
214:
215: IF NOT OE_GLOBALS.Equal(p_line_rec.DEMAND_CLASS_CODE,
216: p_old_line_rec.DEMAND_CLASS_CODE)
217: THEN
218: RETURN TRUE;
219: END IF;
218: RETURN TRUE;
219: END IF;
220:
221: -- Added > 0 to fix bug 2019034.
222: IF NOT OE_GLOBALS.Equal(p_line_rec.ORDERED_QUANTITY,
223: p_old_line_rec.ORDERED_QUANTITY)
224: --AND p_line_rec.ORDERED_QUANTITY > 0
225: /* commented the above line for bug 2690471 */
226: THEN
226: THEN
227: RETURN TRUE;
228: END IF;
229:
230: IF NOT OE_GLOBALS.Equal(p_line_rec.REQUEST_DATE,
231: p_old_line_rec.REQUEST_DATE)
232: THEN
233: RETURN TRUE;
234: END IF;
232: THEN
233: RETURN TRUE;
234: END IF;
235:
236: IF NOT OE_GLOBALS.Equal(p_line_rec.SHIP_FROM_ORG_ID,
237: p_old_line_rec.SHIP_FROM_ORG_ID)
238: THEN
239: RETURN TRUE;
240: END IF;
238: THEN
239: RETURN TRUE;
240: END IF;
241:
242: IF NOT OE_GLOBALS.Equal(p_line_rec.SHIP_TO_ORG_ID,
243: p_old_line_rec.SHIP_TO_ORG_ID)
244: THEN
245: RETURN TRUE;
246: END IF;
244: THEN
245: RETURN TRUE;
246: END IF;
247:
248: IF NOT OE_GLOBALS.Equal(p_line_rec.SCHEDULE_SHIP_DATE,
249: p_old_line_rec.SCHEDULE_SHIP_DATE)
250: THEN
251: RETURN TRUE;
252: END IF;
250: THEN
251: RETURN TRUE;
252: END IF;
253:
254: IF NOT OE_GLOBALS.Equal(p_line_rec.SCHEDULE_ARRIVAL_DATE,
255: p_old_line_rec.SCHEDULE_ARRIVAL_DATE)
256: THEN
257: RETURN TRUE;
258: END IF;
256: THEN
257: RETURN TRUE;
258: END IF;
259:
260: IF NOT OE_GLOBALS.Equal(p_line_rec.SHIPPING_METHOD_CODE,
261: p_old_line_rec.SHIPPING_METHOD_CODE)
262: THEN
263: RETURN TRUE;
264: END IF;
274:
275: -- Change of following attributes affects the whole set
276: -- and thus we must create a group request for it.
277:
278: IF NOT OE_GLOBALS.Equal(p_line_rec.SHIP_FROM_ORG_ID,
279: p_old_line_rec.SHIP_FROM_ORG_ID)
280: THEN
281: RETURN TRUE;
282: END IF;
280: THEN
281: RETURN TRUE;
282: END IF;
283:
284: IF NOT OE_GLOBALS.Equal(p_line_rec.SHIP_TO_ORG_ID,
285: p_old_line_rec.SHIP_TO_ORG_ID)
286: THEN
287: RETURN TRUE;
288: END IF;
286: THEN
287: RETURN TRUE;
288: END IF;
289:
290: IF NOT OE_GLOBALS.Equal(p_line_rec.SCHEDULE_SHIP_DATE,
291: p_old_line_rec.SCHEDULE_SHIP_DATE)
292: THEN
293: RETURN TRUE;
294: END IF;
292: THEN
293: RETURN TRUE;
294: END IF;
295:
296: IF NOT OE_GLOBALS.Equal(p_line_rec.SCHEDULE_ARRIVAL_DATE,
297: p_old_line_rec.SCHEDULE_ARRIVAL_DATE)
298: THEN
299: RETURN TRUE;
300: END IF;
306:
307: -- If the line is getting unscheduled due to cancellation
308: -- let it not be group schedule.
309: -- Added 0 check to fix 2019034.
310: IF NOT OE_GLOBALS.Equal(p_line_rec.ORDERED_QUANTITY,
311: p_old_line_rec.ORDERED_QUANTITY)
312: AND p_line_rec.ORDERED_QUANTITY > 0
313: THEN
314: RETURN TRUE;
314: RETURN TRUE;
315: END IF;
316:
317: /* Commented the following lines to fix the bug 2720398
318: IF NOT OE_GLOBALS.Equal(p_line_rec.SHIPPING_METHOD_CODE,
319: p_old_line_rec.SHIPPING_METHOD_CODE)
320: THEN
321: RETURN TRUE;
322: END IF;
325: END IF;
326:
327: /* Added the following if condition to fix the bug 2720398 */
328:
329: IF NOT OE_GLOBALS.Equal(p_line_rec.SHIPPING_METHOD_CODE,
330: p_old_line_rec.SHIPPING_METHOD_CODE)
331: THEN
332: RETURN TRUE;
333: END IF;
333: END IF;
334:
335: /* End of new code added to fix the bug 2720398 */
336:
337: IF NOT OE_GLOBALS.Equal(p_line_rec.REQUEST_DATE,
338: p_old_line_rec.REQUEST_DATE)
339: THEN
340: RETURN TRUE;
341: END IF;
347: -- Change of following attributes affects the whole set
348: -- and thus we must create a group request for it.
349:
350:
351: IF NOT OE_GLOBALS.Equal(p_line_rec.SCHEDULE_ARRIVAL_DATE,
352: p_old_line_rec.SCHEDULE_ARRIVAL_DATE)
353: THEN
354: RETURN TRUE;
355: END IF;
353: THEN
354: RETURN TRUE;
355: END IF;
356:
357: IF NOT OE_GLOBALS.Equal(p_line_rec.SCHEDULE_SHIP_DATE,
358: p_old_line_rec.SCHEDULE_SHIP_DATE)
359: THEN
360: RETURN TRUE;
361: END IF;
359: THEN
360: RETURN TRUE;
361: END IF;
362:
363: IF NOT OE_GLOBALS.Equal(p_line_rec.SHIP_TO_ORG_ID,
364: p_old_line_rec.SHIP_TO_ORG_ID)
365: THEN
366: RETURN TRUE;
367: END IF;
365: THEN
366: RETURN TRUE;
367: END IF;
368:
369: IF NOT OE_GLOBALS.Equal(p_line_rec.REQUEST_DATE,
370: p_old_line_rec.REQUEST_DATE)
371: THEN
372: RETURN TRUE;
373: END IF;
398:
399: OE_Line_Util.Query_Row(p_line_id => p_x_line_rec.line_id,
400: x_line_rec => l_line_rec);
401:
402: IF NOT OE_GLOBALS.Equal(p_x_line_rec.ship_from_org_id,
403: l_line_rec.ship_from_org_id)
404: THEN
405: p_x_line_rec.ship_from_org_id := l_line_rec.ship_from_org_id;
406: END IF;
404: THEN
405: p_x_line_rec.ship_from_org_id := l_line_rec.ship_from_org_id;
406: END IF;
407:
408: IF NOT OE_GLOBALS.Equal(p_x_line_rec.schedule_ship_date,
409: l_line_rec.schedule_ship_date)
410: THEN
411: p_x_line_rec.schedule_ship_date := l_line_rec.schedule_ship_date;
412: END IF;
410: THEN
411: p_x_line_rec.schedule_ship_date := l_line_rec.schedule_ship_date;
412: END IF;
413:
414: IF NOT OE_GLOBALS.Equal(p_x_line_rec.schedule_arrival_date,
415: l_line_rec.schedule_arrival_date)
416: THEN
417: p_x_line_rec.schedule_arrival_date := l_line_rec.schedule_arrival_date;
418: END IF;
416: THEN
417: p_x_line_rec.schedule_arrival_date := l_line_rec.schedule_arrival_date;
418: END IF;
419:
420: IF NOT OE_GLOBALS.Equal(p_x_line_rec.schedule_status_code,
421: l_line_rec.schedule_status_code)
422: THEN
423: p_x_line_rec.schedule_status_code := l_line_rec.schedule_status_code;
424: END IF;
422: THEN
423: p_x_line_rec.schedule_status_code := l_line_rec.schedule_status_code;
424: END IF;
425:
426: IF NOT OE_GLOBALS.Equal(p_x_line_rec.shipping_method_code,
427: l_line_rec.shipping_method_code)
428: THEN
429: p_x_line_rec.shipping_method_code := l_line_rec.shipping_method_code;
430: END IF;
428: THEN
429: p_x_line_rec.shipping_method_code := l_line_rec.shipping_method_code;
430: END IF;
431:
432: IF NOT OE_GLOBALS.Equal(p_x_line_rec.visible_demand_flag,
433: l_line_rec.visible_demand_flag)
434: THEN
435: p_x_line_rec.visible_demand_flag := l_line_rec.visible_demand_flag;
436: END IF;
489: (p_line_rec.schedule_action_code = OESCH_ACT_UNRESERVE)) THEN
490: l_explode := FALSE;
491: END IF;
492:
493: IF p_line_rec.operation = OE_GLOBALS.G_OPR_CREATE THEN
494: l_explode := TRUE;
495: END IF;
496:
497: IF p_line_rec.operation = OE_GLOBALS.G_OPR_DELETE THEN
493: IF p_line_rec.operation = OE_GLOBALS.G_OPR_CREATE THEN
494: l_explode := TRUE;
495: END IF;
496:
497: IF p_line_rec.operation = OE_GLOBALS.G_OPR_DELETE THEN
498: l_explode := FALSE;
499: END IF;
500:
501: IF p_line_rec.operation = OE_GLOBALS.G_OPR_UPDATE THEN
497: IF p_line_rec.operation = OE_GLOBALS.G_OPR_DELETE THEN
498: l_explode := FALSE;
499: END IF;
500:
501: IF p_line_rec.operation = OE_GLOBALS.G_OPR_UPDATE THEN
502: IF l_debug_level > 0 THEN
503: oe_debug_pub.add( 'RR:I1' ) ;
504: END IF;
505: IF p_line_rec.explosion_date is not null AND
676: IF p_x_line_rec.schedule_status_code is null THEN
677: -- The line was never scheduled before. So it needs to
678: -- get scheduled.
679: l_schedule_action_code := OESCH_ACT_SCHEDULE;
680: ELSIF p_x_line_rec.operation = OE_GLOBALS.G_OPR_DELETE THEN
681: l_schedule_action_code := OESCH_ACT_UNSCHEDULE;
682: ELSE
683: l_schedule_action_code := OESCH_ACT_RESCHEDULE;
684: END IF;
702:
703: -- l_included_items_tbl := Build_Included_Items
704: -- (p_line_rec => p_x_line_rec);
705:
706: l_old_recursion_mode := OE_GLOBALS.G_RECURSION_MODE;
707:
708: IF p_recursive_call = FND_API.G_TRUE
709: THEN
710:
707:
708: IF p_recursive_call = FND_API.G_TRUE
709: THEN
710:
711: -- OE_GLOBALS.G_RECURSION_MODE := 'Y';
712: null;
713:
714: END IF;
715:
715:
716: Build_Included_Items( p_line_rec => p_x_line_rec,
717: x_line_tbl => l_included_items_tbl);
718:
719: -- OE_GLOBALS.G_RECURSION_MODE := l_old_recursion_mode;
720:
721: IF l_debug_level > 0 THEN
722: oe_debug_pub.add( 'SCH:AFTER CALLING BUILD_INCLUDED_ITEMS' , 1 ) ;
723: END IF;
752:
753: l_line_rec.schedule_action_code :=
754: p_x_line_rec.schedule_action_code;
755:
756: l_line_rec.operation := OE_GLOBALS.G_OPR_UPDATE;
757:
758: /* -----------Bug 2315471 Start ---------------------*/
759:
760: IF NOT OE_GLOBALS.Equal(p_x_line_rec.ordered_quantity,
756: l_line_rec.operation := OE_GLOBALS.G_OPR_UPDATE;
757:
758: /* -----------Bug 2315471 Start ---------------------*/
759:
760: IF NOT OE_GLOBALS.Equal(p_x_line_rec.ordered_quantity,
761: p_old_line_rec.ordered_quantity)
762: AND p_x_line_rec.ordered_quantity = 0 THEN
763: l_line_rec.schedule_action_code := OESCH_ACT_UNDEMAND;
764: END IF;
765:
766: /* -----------Bug 2315471 End -----------------------*/
767:
768:
769: IF NOT OE_GLOBALS.Equal(p_x_line_rec.ship_from_org_id,
770: p_old_line_rec.ship_from_org_id) OR
771: l_line_rec.ship_from_org_id IS NULL OR
772: l_line_rec.ship_from_org_id = FND_API.G_MISS_NUM
773: THEN
778: IF l_debug_level > 0 THEN
779: oe_debug_pub.add( 'OLD ORDERED QUANTITY : '|| P_OLD_LINE_REC.ORDERED_QUANTITY , 3 ) ;
780: oe_debug_pub.add( 'NEW ORDERED QUANTITY : '|| P_X_LINE_REC.ORDERED_QUANTITY , 3 ) ;
781: END IF;
782: IF NOT OE_GLOBALS.Equal(p_x_line_rec.ordered_quantity,
783: p_old_line_rec.ordered_quantity)
784: THEN
785: l_old_ordered_quantity := p_old_line_rec.ordered_quantity;
786: IF l_old_ordered_quantity IS null OR
799: */
800: END IF;
801:
802:
803: IF NOT OE_GLOBALS.Equal(p_x_line_rec.schedule_ship_date,
804: p_old_line_rec.schedule_ship_date)
805: THEN
806: l_line_rec.schedule_ship_date := p_x_line_rec.schedule_ship_date;
807: END IF;
805: THEN
806: l_line_rec.schedule_ship_date := p_x_line_rec.schedule_ship_date;
807: END IF;
808:
809: IF NOT OE_GLOBALS.Equal(p_x_line_rec.schedule_arrival_date,
810: p_old_line_rec.schedule_arrival_date)
811: THEN
812: l_line_rec.schedule_arrival_date :=
813: p_x_line_rec.schedule_arrival_date;
812: l_line_rec.schedule_arrival_date :=
813: p_x_line_rec.schedule_arrival_date;
814: END IF;
815:
816: IF NOT OE_GLOBALS.Equal(p_x_line_rec.shipping_method_code,
817: p_old_line_rec.shipping_method_code)
818: THEN
819: l_line_rec.shipping_method_code :=
820: p_x_line_rec.shipping_method_code;
819: l_line_rec.shipping_method_code :=
820: p_x_line_rec.shipping_method_code;
821: END IF;
822:
823: IF NOT OE_GLOBALS.Equal(p_x_line_rec.delivery_lead_time,
824: p_old_line_rec.delivery_lead_time)
825: THEN
826: l_line_rec.delivery_lead_time := p_x_line_rec.delivery_lead_time;
827: END IF;
899: END LOOP;
900:
901: -- Update order lines if the scheduling resulted in any attribute change.
902:
903: IF NOT OE_GLOBALS.Equal(p_x_line_rec.schedule_action_code,
904: OESCH_ACT_ATP_CHECK) AND
905: NOT OE_GLOBALS.Equal(p_x_line_rec.schedule_action_code,
906: OESCH_ACT_UNRESERVE) AND
907: g_update_flag = FND_API.G_TRUE
901: -- Update order lines if the scheduling resulted in any attribute change.
902:
903: IF NOT OE_GLOBALS.Equal(p_x_line_rec.schedule_action_code,
904: OESCH_ACT_ATP_CHECK) AND
905: NOT OE_GLOBALS.Equal(p_x_line_rec.schedule_action_code,
906: OESCH_ACT_UNRESERVE) AND
907: g_update_flag = FND_API.G_TRUE
908: THEN
909:
961:
962: -- 2351698.
963: IF OESCH_SCH_POST_WRITE = 'Y' THEN
964:
965: l_line_tbl(1).operation := OE_GLOBALS.G_OPR_CREATE;
966:
967: END IF;
968:
969: OE_Order_PVT.Process_Requests_And_Notify
1276: l_old_line_rec.ship_from_org_id := null;
1277: END IF;
1278:
1279:
1280: IF NOT OE_GLOBALS.Equal(l_old_line_rec.ship_from_org_id,
1281: l_line_rec.ship_from_org_id) THEN
1282: IF l_line_rec.ship_from_org_id is not null
1283: THEN
1284: IF l_debug_level > 0 THEN
1422: -- Get the Order Date Type Code
1423: l_type_code := Get_Date_Type(l_line_rec.header_id);
1424: IF ((l_line_rec.schedule_status_code IS NOT NULL AND
1425: l_line_rec.schedule_status_code <> FND_API.G_MISS_CHAR) AND
1426: l_line_rec.operation = OE_GLOBALS.G_OPR_UPDATE AND
1427: (NOT OE_GLOBALS.Equal(p_x_line_rec.inventory_item_id,
1428: p_old_line_rec.inventory_item_id)))
1429: THEN
1430:
1423: l_type_code := Get_Date_Type(l_line_rec.header_id);
1424: IF ((l_line_rec.schedule_status_code IS NOT NULL AND
1425: l_line_rec.schedule_status_code <> FND_API.G_MISS_CHAR) AND
1426: l_line_rec.operation = OE_GLOBALS.G_OPR_UPDATE AND
1427: (NOT OE_GLOBALS.Equal(p_x_line_rec.inventory_item_id,
1428: p_old_line_rec.inventory_item_id)))
1429: THEN
1430:
1431: -- If the scheduling is happening due to inventory item change.
1485: l_entity_type := OESCH_ENTITY_ARRIVAL_SET;
1486: l_set_id := p_x_line_rec.arrival_set_id;
1487: END IF;
1488:
1489: IF l_line_rec.operation = OE_GLOBALS.G_OPR_CREATE THEN
1490:
1491: -- Line is getting created, and is also being added to a set.
1492:
1493: IF l_line_rec.ato_line_id is NOT NULL THEN
1506: oe_debug_pub.add( 'L_PARAM ' || L_PARAM , 1 ) ;
1507: END IF;
1508:
1509: OE_delayed_requests_Pvt.log_request
1510: (p_entity_code => OE_GLOBALS.G_ENTITY_LINE,
1511: p_entity_id => l_param,
1512: p_requesting_entity_code => OE_GLOBALS.G_ENTITY_LINE,
1513: p_requesting_entity_id => p_x_line_rec.line_id,
1514: p_request_type => OE_GLOBALS.G_GROUP_SCHEDULE,
1508:
1509: OE_delayed_requests_Pvt.log_request
1510: (p_entity_code => OE_GLOBALS.G_ENTITY_LINE,
1511: p_entity_id => l_param,
1512: p_requesting_entity_code => OE_GLOBALS.G_ENTITY_LINE,
1513: p_requesting_entity_id => p_x_line_rec.line_id,
1514: p_request_type => OE_GLOBALS.G_GROUP_SCHEDULE,
1515: p_param1 => l_set_id,
1516: p_param2 => p_x_line_rec.header_id,
1510: (p_entity_code => OE_GLOBALS.G_ENTITY_LINE,
1511: p_entity_id => l_param,
1512: p_requesting_entity_code => OE_GLOBALS.G_ENTITY_LINE,
1513: p_requesting_entity_id => p_x_line_rec.line_id,
1514: p_request_type => OE_GLOBALS.G_GROUP_SCHEDULE,
1515: p_param1 => l_set_id,
1516: p_param2 => p_x_line_rec.header_id,
1517: p_param3 => l_entity_type,
1518: p_param4 => OESCH_ACT_RESCHEDULE,
1526: oe_debug_pub.add( 'LOGGING REQUEST: SCHEDULE LINE' , 1 ) ;
1527: END IF;
1528:
1529: OE_delayed_requests_Pvt.log_request
1530: (p_entity_code => OE_GLOBALS.G_ENTITY_LINE,
1531: p_entity_id => l_line_rec.line_id,
1532: p_requesting_entity_code => OE_GLOBALS.G_ENTITY_LINE,
1533: p_requesting_entity_id => l_line_rec.line_id,
1534: p_request_type => OE_GLOBALS.G_SCHEDULE_LINE,
1528:
1529: OE_delayed_requests_Pvt.log_request
1530: (p_entity_code => OE_GLOBALS.G_ENTITY_LINE,
1531: p_entity_id => l_line_rec.line_id,
1532: p_requesting_entity_code => OE_GLOBALS.G_ENTITY_LINE,
1533: p_requesting_entity_id => l_line_rec.line_id,
1534: p_request_type => OE_GLOBALS.G_SCHEDULE_LINE,
1535: p_param1 => l_set_id,
1536: p_param2 => p_x_line_rec.header_id,
1530: (p_entity_code => OE_GLOBALS.G_ENTITY_LINE,
1531: p_entity_id => l_line_rec.line_id,
1532: p_requesting_entity_code => OE_GLOBALS.G_ENTITY_LINE,
1533: p_requesting_entity_id => l_line_rec.line_id,
1534: p_request_type => OE_GLOBALS.G_SCHEDULE_LINE,
1535: p_param1 => l_set_id,
1536: p_param2 => p_x_line_rec.header_id,
1537: p_param3 => l_entity_type,
1538: x_return_status => l_return_status);
1539:
1540: goto end_schedule_line;
1541:
1542: END IF; -- ATO Check
1543: ELSIF l_line_rec.operation = OE_GLOBALS.G_OPR_UPDATE AND
1544: ((NOT OE_GLOBALS.Equal(p_x_line_rec.ship_set_id,
1545: p_old_line_rec.ship_set_id)) OR
1546: (NOT OE_GLOBALS.Equal(p_x_line_rec.arrival_set_id,
1547: p_old_line_rec.arrival_set_id)))
1540: goto end_schedule_line;
1541:
1542: END IF; -- ATO Check
1543: ELSIF l_line_rec.operation = OE_GLOBALS.G_OPR_UPDATE AND
1544: ((NOT OE_GLOBALS.Equal(p_x_line_rec.ship_set_id,
1545: p_old_line_rec.ship_set_id)) OR
1546: (NOT OE_GLOBALS.Equal(p_x_line_rec.arrival_set_id,
1547: p_old_line_rec.arrival_set_id)))
1548: THEN
1542: END IF; -- ATO Check
1543: ELSIF l_line_rec.operation = OE_GLOBALS.G_OPR_UPDATE AND
1544: ((NOT OE_GLOBALS.Equal(p_x_line_rec.ship_set_id,
1545: p_old_line_rec.ship_set_id)) OR
1546: (NOT OE_GLOBALS.Equal(p_x_line_rec.arrival_set_id,
1547: p_old_line_rec.arrival_set_id)))
1548: THEN
1549:
1550: -- Line is either being moved from one set to another,
1554:
1555: -- New line which is being added to the set is not
1556: -- scheduled.
1557:
1558: l_request_type := OE_GLOBALS.G_SCHEDULE_LINE;
1559: l_o_request_date := l_old_line_rec.request_date;
1560: l_o_ship_from_org_id := l_old_line_rec.ship_from_org_id;
1561: l_o_ship_to_org_id := l_old_line_rec.ship_to_org_id;
1562:
1568: -- set information, if changed we cannot bypass ato call.
1569:
1570: IF NOT Schedule_Attribute_Changed(p_line_rec => l_line_rec,
1571: p_old_line_rec => l_old_line_rec)
1572: AND OE_GLOBALS.Equal(l_line_rec.ordered_quantity,
1573: l_old_line_rec.ordered_quantity)
1574: AND (l_line_rec.item_type_code = OE_GLOBALS.G_ITEM_STANDARD OR
1575: nvl(l_line_rec.model_remnant_flag,'N') = 'Y')
1576: THEN
1570: IF NOT Schedule_Attribute_Changed(p_line_rec => l_line_rec,
1571: p_old_line_rec => l_old_line_rec)
1572: AND OE_GLOBALS.Equal(l_line_rec.ordered_quantity,
1573: l_old_line_rec.ordered_quantity)
1574: AND (l_line_rec.item_type_code = OE_GLOBALS.G_ITEM_STANDARD OR
1575: nvl(l_line_rec.model_remnant_flag,'N') = 'Y')
1576: THEN
1577:
1578:
1622: -- New line which is being added to the set is
1623: -- scheduled. We need to reschedule it with
1624: -- the set attributes.
1625:
1626: l_request_type := OE_GLOBALS.G_RESCHEDULE_LINE;
1627: l_o_request_date := l_old_line_rec.request_date;
1628: l_o_sch_ship_date := l_old_line_rec.schedule_ship_date;
1629: l_o_sch_arr_date := l_old_line_rec.schedule_arrival_date;
1630: l_o_ship_from_org_id := l_old_line_rec.ship_from_org_id;
1634:
1635: END IF;
1636:
1637: IF l_debug_level > 0 THEN
1638: oe_debug_pub.add( '2. LOGGING REQUEST: '|| OE_GLOBALS.G_SCHEDULE_LINE , 1 ) ;
1639: END IF;
1640: -- Added param7 to list to fix bug 1894284.
1641: OE_delayed_requests_Pvt.log_request
1642: (p_entity_code => OE_GLOBALS.G_ENTITY_LINE,
1638: oe_debug_pub.add( '2. LOGGING REQUEST: '|| OE_GLOBALS.G_SCHEDULE_LINE , 1 ) ;
1639: END IF;
1640: -- Added param7 to list to fix bug 1894284.
1641: OE_delayed_requests_Pvt.log_request
1642: (p_entity_code => OE_GLOBALS.G_ENTITY_LINE,
1643: p_entity_id => l_line_rec.line_id,
1644: p_requesting_entity_code => OE_GLOBALS.G_ENTITY_LINE,
1645: p_requesting_entity_id => l_line_rec.line_id,
1646: p_request_type => l_request_type,
1640: -- Added param7 to list to fix bug 1894284.
1641: OE_delayed_requests_Pvt.log_request
1642: (p_entity_code => OE_GLOBALS.G_ENTITY_LINE,
1643: p_entity_id => l_line_rec.line_id,
1644: p_requesting_entity_code => OE_GLOBALS.G_ENTITY_LINE,
1645: p_requesting_entity_id => l_line_rec.line_id,
1646: p_request_type => l_request_type,
1647: p_param1 => l_set_id,
1648: p_param2 => p_x_line_rec.header_id,
1679: l_action := OESCH_ACT_RESCHEDULE;
1680: END IF;
1681:
1682: /*
1683: IF NOT OE_GLOBALS.Equal(l_line_rec.request_date,
1684: l_old_line_rec.request_date)
1685: THEN
1686: IF (l_type_code = 'ARRIVAL') THEN
1687: l_line_rec.schedule_arrival_date := l_line_rec.request_date;
1693: */
1694:
1695: -- We dont require this check here. This data will be
1696: -- used in group_schedule delayed request.
1697: /* IF NOT OE_GLOBALS.Equal(l_line_rec.schedule_ship_date,
1698: l_old_line_rec.schedule_ship_date)
1699: THEN
1700: l_schedule_ship_date := l_old_line_rec.schedule_ship_date;
1701: END IF;
1699: THEN
1700: l_schedule_ship_date := l_old_line_rec.schedule_ship_date;
1701: END IF;
1702:
1703: IF NOT OE_GLOBALS.Equal(l_line_rec.schedule_arrival_date,
1704: l_old_line_rec.schedule_arrival_date)
1705: THEN
1706: l_schedule_arrival_date := l_old_line_rec.schedule_arrival_date;
1707: END IF;
1713: oe_debug_pub.add( '2. LOGGING A GROUP_SCH_REQUEST' , 1 ) ;
1714: END IF;
1715:
1716: OE_delayed_requests_Pvt.log_request
1717: (p_entity_code => OE_GLOBALS.G_ENTITY_LINE,
1718: p_entity_id => p_x_line_rec.line_id,
1719: p_requesting_entity_code => OE_GLOBALS.G_ENTITY_LINE,
1720: p_requesting_entity_id => p_x_line_rec.line_id,
1721: p_request_type => OE_GLOBALS.G_GROUP_SCHEDULE,
1715:
1716: OE_delayed_requests_Pvt.log_request
1717: (p_entity_code => OE_GLOBALS.G_ENTITY_LINE,
1718: p_entity_id => p_x_line_rec.line_id,
1719: p_requesting_entity_code => OE_GLOBALS.G_ENTITY_LINE,
1720: p_requesting_entity_id => p_x_line_rec.line_id,
1721: p_request_type => OE_GLOBALS.G_GROUP_SCHEDULE,
1722: p_param1 => l_set_id,
1723: p_param2 => p_x_line_rec.header_id,
1717: (p_entity_code => OE_GLOBALS.G_ENTITY_LINE,
1718: p_entity_id => p_x_line_rec.line_id,
1719: p_requesting_entity_code => OE_GLOBALS.G_ENTITY_LINE,
1720: p_requesting_entity_id => p_x_line_rec.line_id,
1721: p_request_type => OE_GLOBALS.G_GROUP_SCHEDULE,
1722: p_param1 => l_set_id,
1723: p_param2 => p_x_line_rec.header_id,
1724: p_param3 => l_entity_type,
1725: p_param4 => l_action,
1774: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
1775: RAISE FND_API.G_EXC_ERROR;
1776: END IF;
1777:
1778: IF NOT OE_GLOBALS.Equal(l_line_rec.schedule_action_code,
1779: OESCH_ACT_ATP_CHECK)
1780: THEN
1781:
1782: -- Group Schedule had updated all the scheduling related
1809:
1810: IF l_debug_level > 0 THEN
1811: oe_debug_pub.add( 'SETTING G_CASCADING_REQUEST_LOGGED' , 1 ) ;
1812: END IF;
1813: OE_GLOBALS.G_CASCADING_REQUEST_LOGGED := TRUE;
1814: l_new_line_tbl(1) := l_out_line_rec;
1815:
1816: END IF;
1817:
1830: -- Scheduling Parent lines separately. These parent lines will be for
1831: -- non-SMC complete PTO only. For parents, the group request would have
1832: -- taken care of it.
1833:
1834: IF (l_line_rec.item_type_code = OE_GLOBALS.G_ITEM_MODEL OR
1835: l_line_rec.item_type_code = OE_GLOBALS.G_ITEM_CLASS OR
1836: l_line_rec.item_type_code = OE_GLOBALS.G_ITEM_KIT) AND
1837: l_line_rec.ato_line_id is null THEN
1838:
1831: -- non-SMC complete PTO only. For parents, the group request would have
1832: -- taken care of it.
1833:
1834: IF (l_line_rec.item_type_code = OE_GLOBALS.G_ITEM_MODEL OR
1835: l_line_rec.item_type_code = OE_GLOBALS.G_ITEM_CLASS OR
1836: l_line_rec.item_type_code = OE_GLOBALS.G_ITEM_KIT) AND
1837: l_line_rec.ato_line_id is null THEN
1838:
1839:
1832: -- taken care of it.
1833:
1834: IF (l_line_rec.item_type_code = OE_GLOBALS.G_ITEM_MODEL OR
1835: l_line_rec.item_type_code = OE_GLOBALS.G_ITEM_CLASS OR
1836: l_line_rec.item_type_code = OE_GLOBALS.G_ITEM_KIT) AND
1837: l_line_rec.ato_line_id is null THEN
1838:
1839:
1840:
1837: l_line_rec.ato_line_id is null THEN
1838:
1839:
1840:
1841: IF l_line_rec.OPERATION = OE_GLOBALS.G_OPR_CREATE THEN
1842:
1843: IF l_debug_level > 0 THEN
1844: oe_debug_pub.add( 'CALL SCHEDULE_PARENT_LINE IN POST-WRITE' , 3 ) ;
1845: END IF;
1934: IF l_debug_level > 0 THEN
1935: oe_debug_pub.add( 'SCHEDULE STATUS OLD : '||L_OLD_LINE_REC.SCHEDULE_STATUS_CODE , 3 ) ;
1936: oe_debug_pub.add( 'SCHEDULE STATUS NEW : '||L_OUT_LINE_REC.SCHEDULE_STATUS_CODE , 3 ) ;
1937: END IF;
1938: IF NOT OE_GLOBALS.Equal(l_out_line_rec.schedule_action_code,
1939: OESCH_ACT_ATP_CHECK) AND
1940: NOT OE_GLOBALS.Equal(l_out_line_rec.schedule_action_code,
1941: OESCH_ACT_UNRESERVE) AND
1942: NOT (OE_GLOBALS.EQUAL(l_out_line_rec.schedule_action_code,
1936: oe_debug_pub.add( 'SCHEDULE STATUS NEW : '||L_OUT_LINE_REC.SCHEDULE_STATUS_CODE , 3 ) ;
1937: END IF;
1938: IF NOT OE_GLOBALS.Equal(l_out_line_rec.schedule_action_code,
1939: OESCH_ACT_ATP_CHECK) AND
1940: NOT OE_GLOBALS.Equal(l_out_line_rec.schedule_action_code,
1941: OESCH_ACT_UNRESERVE) AND
1942: NOT (OE_GLOBALS.EQUAL(l_out_line_rec.schedule_action_code,
1943: OESCH_ACT_RESERVE) AND
1944: l_old_line_rec.schedule_status_code IS NOT NULL) AND
1938: IF NOT OE_GLOBALS.Equal(l_out_line_rec.schedule_action_code,
1939: OESCH_ACT_ATP_CHECK) AND
1940: NOT OE_GLOBALS.Equal(l_out_line_rec.schedule_action_code,
1941: OESCH_ACT_UNRESERVE) AND
1942: NOT (OE_GLOBALS.EQUAL(l_out_line_rec.schedule_action_code,
1943: OESCH_ACT_RESERVE) AND
1944: l_old_line_rec.schedule_status_code IS NOT NULL) AND
1945: g_update_flag = FND_API.G_TRUE
1946: THEN
1991:
1992: -- If schedule date has change, we need to call PO callback function
1993: -- to indicate the change.
1994:
1995: IF p_x_line_rec.operation = oe_globals.g_opr_update AND
1996: p_x_line_rec.source_document_type_id = 10 THEN
1997:
1998: /* Changing schedule ship date to schedule arrival date for
1999: bug 2024748 */
1996: p_x_line_rec.source_document_type_id = 10 THEN
1997:
1998: /* Changing schedule ship date to schedule arrival date for
1999: bug 2024748 */
2000: IF NOT OE_GLOBALS.EQUAL(l_out_line_rec.schedule_arrival_date,
2001: p_old_line_rec.schedule_arrival_date) THEN
2002:
2003: IF l_debug_level > 0 THEN
2004: oe_debug_pub.add( 'PASSING SCHEDULE_ARRIVAL_DATE TO PO ' , 3 ) ;
2010: END IF;
2011:
2012: -- Commented this portion to fix bug 1883110.
2013: -- ReSet recursion mode.
2014: -- OE_GLOBALS.G_RECURSION_MODE := 'N';
2015:
2016: END IF;
2017:
2018: p_x_line_rec := l_new_line_tbl(1);
2091: I NUMBER;
2092: l_return_status VARCHAR2(1);
2093: l_msg_count NUMBER;
2094: l_msg_data VARCHAR2(2000);
2095: l_control_rec OE_GLOBALS.control_rec_type;
2096: l_line_tbl OE_ORDER_PUB.line_tbl_type;
2097: l_process_requests BOOLEAN;
2098: is_set_recursion VARCHAR2(1) := 'Y';
2099: /*
2357: oe_debug_pub.add( 'S. LINE_ID :' || P_LINE_REC.SPLIT_FROM_LINE_ID , 1 ) ;
2358: END IF;
2359:
2360: -- We do not schedule service lines. So return false for them.
2361: IF (p_line_rec.item_type_code = OE_GLOBALS.G_ITEM_SERVICE) THEN
2362: RETURN FALSE;
2363: END IF;
2364:
2365: -- We do not schedule OTA lines. So return false for them.
2372: -- Config Item can be deleted only through delink API. While delinking,
2373: -- CTO team takes care of updating the demand picture for the
2374: -- configuration.
2375:
2376: IF (p_line_rec.item_type_code = OE_GLOBALS.G_ITEM_CONFIG AND
2377: p_line_rec.operation = OE_GLOBALS.G_OPR_DELETE)
2378: THEN
2379: RETURN FALSE;
2380: END IF;
2373: -- CTO team takes care of updating the demand picture for the
2374: -- configuration.
2375:
2376: IF (p_line_rec.item_type_code = OE_GLOBALS.G_ITEM_CONFIG AND
2377: p_line_rec.operation = OE_GLOBALS.G_OPR_DELETE)
2378: THEN
2379: RETURN FALSE;
2380: END IF;
2381:
2380: END IF;
2381:
2382: -- If a config item is getting created, we do not need to call scheduling.
2383:
2384: IF (p_line_rec.item_type_code = OE_GLOBALS.G_ITEM_CONFIG AND
2385: p_line_rec.operation = OE_GLOBALS.G_OPR_CREATE)
2386: THEN
2387: RETURN FALSE;
2388: END IF;
2381:
2382: -- If a config item is getting created, we do not need to call scheduling.
2383:
2384: IF (p_line_rec.item_type_code = OE_GLOBALS.G_ITEM_CONFIG AND
2385: p_line_rec.operation = OE_GLOBALS.G_OPR_CREATE)
2386: THEN
2387: RETURN FALSE;
2388: END IF;
2389:
2397: -- have already scheduled the line before.
2398:
2399: IF (p_line_rec.split_from_line_id is not null) AND
2400: (p_line_rec.split_from_line_id <> FND_API.G_MISS_NUM) AND
2401: (p_line_rec.operation = OE_GLOBALS.G_OPR_CREATE)
2402: THEN
2403: IF l_debug_level > 0 THEN
2404: oe_debug_pub.add( 'THIS IS A NEW LINE CREATED THRU SPLIT' , 1 ) ;
2405: END IF;
2411: -- If it is, then return FALSE, since this line is already rescheduled.
2412:
2413: IF (p_line_rec.split_action_code = 'SPLIT') THEN
2414: IF (p_line_rec.schedule_status_code is not null) AND
2415: (p_line_rec.operation = OE_GLOBALS.G_OPR_UPDATE)
2416: THEN
2417: IF l_debug_level > 0 THEN
2418: oe_debug_pub.add( 'THIS LINE IS BEING SPLIT' , 1 ) ;
2419: END IF;
2429: END IF;
2430:
2431: -- If a scheduled line is deleted, the line should be unscheduled.
2432: IF (l_schedule_status_code is not null) AND
2433: (p_line_rec.operation = OE_GLOBALS.G_OPR_DELETE)
2434: THEN
2435: RETURN TRUE;
2436: END IF;
2437:
2437:
2438: -- Currently, we will not perform any scheduling action
2439: -- for lines with source_type=EXTERNAL
2440:
2441: IF (p_line_rec.source_type_code = OE_GLOBALS.G_SOURCE_EXTERNAL)
2442: AND (p_old_line_rec.schedule_status_code is null)
2443: THEN
2444: FND_MESSAGE.SET_NAME('ONT','OE_DS_COULD_NOT_SCH');
2445: FND_MESSAGE.SET_TOKEN('LINE',p_line_rec.line_number);
2477:
2478: IF l_debug_level > 0 THEN
2479: oe_debug_pub.add( 'N8' , 1 ) ;
2480: END IF;
2481: IF NOT OE_GLOBALS.Equal(p_line_rec.schedule_ship_date,
2482: p_old_line_rec.schedule_ship_date)
2483: THEN
2484: RETURN TRUE;
2485: END IF;
2483: THEN
2484: RETURN TRUE;
2485: END IF;
2486:
2487: IF NOT OE_GLOBALS.Equal(p_line_rec.schedule_arrival_date,
2488: p_old_line_rec.schedule_arrival_date)
2489: THEN
2490: RETURN TRUE;
2491: END IF;
2494: oe_debug_pub.add( 'NEW RESERVED QTY' || P_LINE_REC.RESERVED_QUANTITY ) ;
2495: oe_debug_pub.add( 'OLD RESERVED QTY' || P_OLD_LINE_REC.RESERVED_QUANTITY ) ;
2496: END IF;
2497:
2498: IF NOT OE_GLOBALS.Equal(p_line_rec.reserved_quantity,
2499: p_old_line_rec.reserved_quantity)
2500: THEN
2501: RETURN TRUE;
2502: END IF;
2511:
2512: IF l_debug_level > 0 THEN
2513: oe_debug_pub.add( 'RR:G5' , 1 ) ;
2514: END IF;
2515: IF (p_line_rec.operation = OE_GLOBALS.G_OPR_CREATE) THEN
2516: IF (OESCH_AUTO_SCH_FLAG = 'N')
2517: THEN
2518: RETURN FALSE;
2519: ELSE
2521: -- an model or option items.
2522:
2523: IF p_line_rec.top_model_line_id is not null AND
2524: p_line_rec.top_model_line_id <> FND_API.G_MISS_NUM AND
2525: p_line_rec.item_type_code <> OE_GLOBALS.G_ITEM_STANDARD THEN
2526: RETURN FALSE;
2527: ELSE
2528: RETURN TRUE;
2529: END IF;
2538: IF l_debug_level > 0 THEN
2539: oe_debug_pub.add( 'RR:G6' , 6 ) ;
2540: END IF;
2541:
2542: IF NOT OE_GLOBALS.Equal(p_line_rec.ship_from_org_id,
2543: p_old_line_rec.ship_from_org_id)
2544: THEN
2545: RETURN TRUE;
2546: END IF;
2544: THEN
2545: RETURN TRUE;
2546: END IF;
2547:
2548: IF NOT OE_GLOBALS.Equal(p_line_rec.subinventory,
2549: p_old_line_rec.subinventory)
2550: THEN
2551: IF l_debug_level > 0 THEN
2552: oe_debug_pub.add( 'SUBINVENTORY CHANGED , NEED RESCHEDULING' , 1 ) ;
2553: END IF;
2554: RETURN TRUE;
2555: END IF;
2556:
2557: IF NOT OE_GLOBALS.Equal(p_line_rec.ordered_quantity,
2558: p_old_line_rec.ordered_quantity)
2559: THEN
2560: RETURN TRUE;
2561: END IF;
2562:
2563: IF l_debug_level > 0 THEN
2564: oe_debug_pub.add( 'RR:G7' , 1 ) ;
2565: END IF;
2566: IF NOT OE_GLOBALS.Equal(p_line_rec.order_quantity_uom,
2567: p_old_line_rec.order_quantity_uom)
2568: THEN
2569: RETURN TRUE;
2570: END IF;
2571:
2572: IF l_debug_level > 0 THEN
2573: oe_debug_pub.add( 'RR:G8' , 1 ) ;
2574: END IF;
2575: IF NOT OE_GLOBALS.Equal(p_line_rec.request_date,
2576: p_old_line_rec.request_date)
2577: THEN
2578: RETURN TRUE;
2579: END IF;
2580:
2581: IF l_debug_level > 0 THEN
2582: oe_debug_pub.add( 'RR:G9' , 1 ) ;
2583: END IF;
2584: IF NOT OE_GLOBALS.Equal(p_line_rec.shipping_method_code,
2585: p_old_line_rec.shipping_method_code)
2586: THEN
2587: RETURN TRUE;
2588: END IF;
2589:
2590: IF l_debug_level > 0 THEN
2591: oe_debug_pub.add( 'RR:G10' , 1 ) ;
2592: END IF;
2593: IF NOT OE_GLOBALS.Equal(p_line_rec.delivery_lead_time,
2594: p_old_line_rec.delivery_lead_time)
2595: THEN
2596:
2597: BEGIN
2613:
2614: IF l_debug_level > 0 THEN
2615: oe_debug_pub.add( 'RR:G11' , 1 ) ;
2616: END IF;
2617: IF NOT OE_GLOBALS.Equal(p_line_rec.demand_class_code,
2618: p_old_line_rec.demand_class_code)
2619: THEN
2620: RETURN TRUE;
2621: END IF;
2626:
2627: IF l_debug_level > 0 THEN
2628: oe_debug_pub.add( 'RR:G12' , 1 ) ;
2629: END IF;
2630: IF NOT OE_GLOBALS.Equal(p_line_rec.ship_to_org_id,
2631: p_old_line_rec.ship_to_org_id)
2632: THEN
2633: RETURN TRUE;
2634: END IF;
2635:
2636: IF l_debug_level > 0 THEN
2637: oe_debug_pub.add( 'RR:G13' , 1 ) ;
2638: END IF;
2639: IF NOT OE_GLOBALS.Equal(p_line_rec.sold_to_org_id,
2640: p_old_line_rec.sold_to_org_id)
2641: THEN
2642: RETURN TRUE;
2643: END IF;
2644:
2645: IF l_debug_level > 0 THEN
2646: oe_debug_pub.add( 'RR:G14' , 1 ) ;
2647: END IF;
2648: IF NOT OE_GLOBALS.Equal(p_line_rec.inventory_item_id,
2649: p_old_line_rec.inventory_item_id)
2650: THEN
2651: RETURN TRUE;
2652: END IF;
2652: END IF;
2653:
2654: -- Changing the source type on a scheduled line.
2655: -- We should unschedule the line
2656: IF p_line_rec.source_type_code = OE_GLOBALS.G_SOURCE_EXTERNAL AND
2657: NOT OE_GLOBALS.Equal(p_line_rec.source_type_code,
2658: p_old_line_rec.source_type_code)
2659: THEN
2660: IF l_debug_level > 0 THEN
2653:
2654: -- Changing the source type on a scheduled line.
2655: -- We should unschedule the line
2656: IF p_line_rec.source_type_code = OE_GLOBALS.G_SOURCE_EXTERNAL AND
2657: NOT OE_GLOBALS.Equal(p_line_rec.source_type_code,
2658: p_old_line_rec.source_type_code)
2659: THEN
2660: IF l_debug_level > 0 THEN
2661: oe_debug_pub.add( 'SOURCE TYPE MADE EXTERNAL , UNSCHEDULE' , 4 ) ;
2869:
2870: -- Check to see if the reserved quantity is changed and is more
2871: -- than the ordered quantity. This should not be allowed.
2872:
2873: IF NOT OE_GLOBALS.Equal(p_old_line_rec.reserved_quantity,
2874: p_line_rec.reserved_quantity) THEN
2875:
2876: -- Bug 2314463 Start
2877: IF p_line_rec.item_type_code = OE_GLOBALS.G_ITEM_CONFIG THEN
2873: IF NOT OE_GLOBALS.Equal(p_old_line_rec.reserved_quantity,
2874: p_line_rec.reserved_quantity) THEN
2875:
2876: -- Bug 2314463 Start
2877: IF p_line_rec.item_type_code = OE_GLOBALS.G_ITEM_CONFIG THEN
2878: IF l_debug_level > 0 THEN
2879: oe_debug_pub.add( 'INSIDE CONFIG ITEM...RESERVED QTY CHANGED' , 1 ) ;
2880: END IF;
2881: FND_MESSAGE.SET_NAME('ONT','OE_INVALID_ACTION');
2930: -- Check to see if the ordered quantity and reserved quantity
2931: -- both have changed and if the ordered quantity is less than
2932: -- the reserved quantity. This should not be allowed.
2933:
2934: IF NOT OE_GLOBALS.Equal(p_old_line_rec.ordered_quantity,
2935: p_line_rec.ordered_quantity)
2936: THEN
2937: -- Ordered Quantity has changed
2938: IF NOT OE_GLOBALS.Equal(p_old_line_rec.reserved_quantity,
2934: IF NOT OE_GLOBALS.Equal(p_old_line_rec.ordered_quantity,
2935: p_line_rec.ordered_quantity)
2936: THEN
2937: -- Ordered Quantity has changed
2938: IF NOT OE_GLOBALS.Equal(p_old_line_rec.reserved_quantity,
2939: p_line_rec.reserved_quantity)
2940: THEN
2941: IF (p_line_rec.ordered_quantity < p_line_rec.reserved_quantity)
2942: THEN
2956: -- Check to see if the ordered quantity2 and reserved quantity2
2957: -- both have changed and if the ordered quantity2 is less than
2958: -- the reserved quantity2. This should not be allowed.
2959:
2960: IF NOT OE_GLOBALS.Equal(p_old_line_rec.ordered_quantity2,
2961: p_line_rec.ordered_quantity2)
2962: THEN
2963: -- Ordered Quantity has changed
2964: IF NOT OE_GLOBALS.Equal(p_old_line_rec.reserved_quantity2,
2960: IF NOT OE_GLOBALS.Equal(p_old_line_rec.ordered_quantity2,
2961: p_line_rec.ordered_quantity2)
2962: THEN
2963: -- Ordered Quantity has changed
2964: IF NOT OE_GLOBALS.Equal(p_old_line_rec.reserved_quantity2,
2965: p_line_rec.reserved_quantity2)
2966: THEN
2967: IF (p_line_rec.ordered_quantity2 < p_line_rec.reserved_quantity2)
2968: THEN
3053: p_old_line_rec => p_old_line_rec)) OR
3054: (p_line_rec.schedule_status_code is not null AND
3055: p_line_rec.ordered_quantity > p_old_line_rec.ordered_quantity))
3056:
3057: /* (p_line_rec.operation = OE_GLOBALS.G_OPR_CREATE AND
3058: OESCH_AUTO_SCH_FLAG = 'Y' AND
3059: p_line_rec.item_type_code = OE_GLOBALS.G_ITEM_STANDARD) OR
3060: (p_line_rec.schedule_status_code is null AND
3061: (p_line_rec.schedule_ship_date is NOT NULL OR
3055: p_line_rec.ordered_quantity > p_old_line_rec.ordered_quantity))
3056:
3057: /* (p_line_rec.operation = OE_GLOBALS.G_OPR_CREATE AND
3058: OESCH_AUTO_SCH_FLAG = 'Y' AND
3059: p_line_rec.item_type_code = OE_GLOBALS.G_ITEM_STANDARD) OR
3060: (p_line_rec.schedule_status_code is null AND
3061: (p_line_rec.schedule_ship_date is NOT NULL OR
3062: p_line_rec.schedule_arrival_date is NOT NULL)))
3063: */
3742:
3743:
3744: IF l_qty_to_reserve > 0 THEN
3745:
3746: IF l_line_rec.operation = OE_GLOBALS.G_OPR_CREATE THEN
3747: -- We cannot create a reservation currently if the line is
3748: -- being created (since the lines is yet not in the database,
3749: -- and there is a validation done with this line id when we
3750: -- call INV API.). We will populate the reserved quantity on
4204: END IF;
4205:
4206: IF (l_line_rec.schedule_status_code IS NULL) AND
4207: (OESCH_AUTO_SCH_FLAG = 'N') AND
4208: OE_GLOBALS.Equal(l_line_rec.schedule_ship_date,
4209: l_old_line_rec.schedule_ship_date) AND
4210: OE_GLOBALS.Equal(l_line_rec.schedule_arrival_date,
4211: l_old_line_rec.schedule_arrival_date) AND
4212: OE_GLOBALS.Equal(l_line_rec.reserved_quantity,
4206: IF (l_line_rec.schedule_status_code IS NULL) AND
4207: (OESCH_AUTO_SCH_FLAG = 'N') AND
4208: OE_GLOBALS.Equal(l_line_rec.schedule_ship_date,
4209: l_old_line_rec.schedule_ship_date) AND
4210: OE_GLOBALS.Equal(l_line_rec.schedule_arrival_date,
4211: l_old_line_rec.schedule_arrival_date) AND
4212: OE_GLOBALS.Equal(l_line_rec.reserved_quantity,
4213: l_old_line_rec.reserved_quantity)
4214: THEN
4208: OE_GLOBALS.Equal(l_line_rec.schedule_ship_date,
4209: l_old_line_rec.schedule_ship_date) AND
4210: OE_GLOBALS.Equal(l_line_rec.schedule_arrival_date,
4211: l_old_line_rec.schedule_arrival_date) AND
4212: OE_GLOBALS.Equal(l_line_rec.reserved_quantity,
4213: l_old_line_rec.reserved_quantity)
4214: THEN
4215:
4216: IF l_debug_level > 0 THEN
4220: goto end_of_processing;
4221:
4222: END IF;
4223:
4224: IF (l_line_rec.operation = OE_GLOBALS.G_OPR_DELETE) OR
4225: ((l_line_rec.source_type_code = OE_GLOBALS.G_SOURCE_EXTERNAL) AND
4226: (l_line_rec.schedule_status_code is not null)) THEN
4227:
4228: -- If the line is deleted, we need to unschedule it.
4221:
4222: END IF;
4223:
4224: IF (l_line_rec.operation = OE_GLOBALS.G_OPR_DELETE) OR
4225: ((l_line_rec.source_type_code = OE_GLOBALS.G_SOURCE_EXTERNAL) AND
4226: (l_line_rec.schedule_status_code is not null)) THEN
4227:
4228: -- If the line is deleted, we need to unschedule it.
4229: -- If the line's source type is being changed from INTERNAL to
4245: goto end_of_processing;
4246:
4247: END IF; /* If operation on line was DELETE */
4248:
4249: IF NOT OE_GLOBALS.Equal(l_line_rec.schedule_ship_date,
4250: l_old_line_rec.schedule_ship_date) THEN
4251:
4252: IF l_debug_level > 0 THEN
4253: oe_debug_pub.add( 'NEW' || L_LINE_REC.SCHEDULE_SHIP_DATE ) ;
4287: oe_debug_pub.add( 'OLD AD ' || L_OLD_LINE_REC.SCHEDULE_ARRIVAL_DATE , 1 ) ;
4288: oe_debug_pub.add( 'NEW AD ' || L_OLD_LINE_REC.SCHEDULE_ARRIVAL_DATE , 1 ) ;
4289: END IF;
4290:
4291: IF NOT OE_GLOBALS.Equal(l_line_rec.schedule_arrival_date,
4292: l_old_line_rec.schedule_arrival_date) THEN
4293:
4294: IF l_debug_level > 0 THEN
4295: oe_debug_pub.add( 'NEW' || L_LINE_REC.SCHEDULE_ARRIVAL_DATE ) ;
4355: --During the fix l_re_reserve_flag is introduced.
4356: l_re_reserve_flag := 'N';
4357: -- Only unreserve line if line has NOT been interfaced to WSH
4358: IF (nvl(l_line_rec.shipping_interfaced_flag, 'N') = 'N' AND
4359: (NOT OE_GLOBALS.Equal(l_line_rec.inventory_item_id,
4360: l_old_line_rec.inventory_item_id)
4361: OR NOT OE_GLOBALS.Equal(l_line_rec.subinventory,
4362: l_old_line_rec.subinventory)
4363: OR NOT OE_GLOBALS.Equal(l_line_rec.ordered_quantity,
4357: -- Only unreserve line if line has NOT been interfaced to WSH
4358: IF (nvl(l_line_rec.shipping_interfaced_flag, 'N') = 'N' AND
4359: (NOT OE_GLOBALS.Equal(l_line_rec.inventory_item_id,
4360: l_old_line_rec.inventory_item_id)
4361: OR NOT OE_GLOBALS.Equal(l_line_rec.subinventory,
4362: l_old_line_rec.subinventory)
4363: OR NOT OE_GLOBALS.Equal(l_line_rec.ordered_quantity,
4364: l_old_line_rec.ordered_quantity)
4365: OR NOT OE_GLOBALS.Equal(l_line_rec.order_quantity_uom,
4359: (NOT OE_GLOBALS.Equal(l_line_rec.inventory_item_id,
4360: l_old_line_rec.inventory_item_id)
4361: OR NOT OE_GLOBALS.Equal(l_line_rec.subinventory,
4362: l_old_line_rec.subinventory)
4363: OR NOT OE_GLOBALS.Equal(l_line_rec.ordered_quantity,
4364: l_old_line_rec.ordered_quantity)
4365: OR NOT OE_GLOBALS.Equal(l_line_rec.order_quantity_uom,
4366: l_old_line_rec.order_quantity_uom)
4367: OR NOT OE_GLOBALS.Equal(l_line_rec.ship_from_org_id,
4361: OR NOT OE_GLOBALS.Equal(l_line_rec.subinventory,
4362: l_old_line_rec.subinventory)
4363: OR NOT OE_GLOBALS.Equal(l_line_rec.ordered_quantity,
4364: l_old_line_rec.ordered_quantity)
4365: OR NOT OE_GLOBALS.Equal(l_line_rec.order_quantity_uom,
4366: l_old_line_rec.order_quantity_uom)
4367: OR NOT OE_GLOBALS.Equal(l_line_rec.ship_from_org_id,
4368: l_old_line_rec.ship_from_org_id))) THEN
4369:
4363: OR NOT OE_GLOBALS.Equal(l_line_rec.ordered_quantity,
4364: l_old_line_rec.ordered_quantity)
4365: OR NOT OE_GLOBALS.Equal(l_line_rec.order_quantity_uom,
4366: l_old_line_rec.order_quantity_uom)
4367: OR NOT OE_GLOBALS.Equal(l_line_rec.ship_from_org_id,
4368: l_old_line_rec.ship_from_org_id))) THEN
4369:
4370: l_re_reserve_flag := 'Y';
4371: -- Call INV to delete the old reservations
4386: -- If the scheduling is happening due to inventory item change.
4387: -- We should call MRP twice. First time we should call the with
4388: -- Undemand for old item. Second call would be redemand.
4389:
4390: IF NOT OE_GLOBALS.Equal(l_line_rec.inventory_item_id,
4391: l_old_line_rec.inventory_item_id)
4392: THEN
4393:
4394: Action_undemand(p_old_line_rec => l_old_line_rec,
4453: l_out_line_rec := l_line_tbl(1);
4454:
4455: -- Adding code to fix bug 2126165.
4456:
4457: IF NOT OE_GLOBALS.Equal(l_out_line_rec.schedule_ship_date,
4458: l_old_line_rec.schedule_ship_date)
4459: AND l_old_line_rec.reserved_quantity > 0
4460: AND l_re_reserve_flag = 'N'
4461: THEN
4559: -- making reservation. If the reservation is being made due to
4560: -- change in inventory_item_id, we will move the reservation
4561: -- call to post_write. -- 1913263.
4562:
4563: IF (NOT OE_GLOBALS.Equal(l_line_rec.inventory_item_id,
4564: l_old_line_rec.inventory_item_id) OR
4565: NOT OE_GLOBALS.Equal(l_line_rec.ship_from_org_id,
4566: l_old_line_rec.ship_from_org_id)) AND
4567: l_re_reserve_flag = 'Y' THEN
4561: -- call to post_write. -- 1913263.
4562:
4563: IF (NOT OE_GLOBALS.Equal(l_line_rec.inventory_item_id,
4564: l_old_line_rec.inventory_item_id) OR
4565: NOT OE_GLOBALS.Equal(l_line_rec.ship_from_org_id,
4566: l_old_line_rec.ship_from_org_id)) AND
4567: l_re_reserve_flag = 'Y' THEN
4568:
4569: IF l_debug_level > 0 THEN
4588: THEN
4589: -- Create INV record from the line to reserve
4590:
4591: IF l_line_rec.reserved_quantity is not null AND
4592: OE_GLOBALS.Equal(p_x_line_rec.order_quantity_uom,
4593: p_old_line_rec.order_quantity_uom)
4594: THEN
4595: --If quantity and request(any scheduling dates) changed, system
4596: --is re_reserving based on the reserved qty, even when qty is
5143: oe_debug_pub.add( 'STARTING THE BIG ELSE LOOP' , 1 ) ;
5144: oe_debug_pub.add( 'OPR: ' || L_LINE_REC.OPERATION , 1 ) ;
5145: END IF;
5146:
5147: IF OE_GLOBALS.Equal(l_line_rec.schedule_action_code,
5148: OESCH_ACT_UNRESERVE)
5149: THEN
5150:
5151: -- Setting update flag to false, so that schedule_line does not
5181: goto end_of_processing;
5182: END IF;
5183:
5184: -- schedule_action_code --> OESCH_ACT_UNDEMAND
5185: ELSIF OE_GLOBALS.Equal(l_line_rec.schedule_action_code,
5186: OESCH_ACT_UNDEMAND)
5187: THEN
5188: IF OE_GLOBALS.Equal(l_line_rec.schedule_status_code,
5189: OESCH_STATUS_DEMANDED) THEN
5184: -- schedule_action_code --> OESCH_ACT_UNDEMAND
5185: ELSIF OE_GLOBALS.Equal(l_line_rec.schedule_action_code,
5186: OESCH_ACT_UNDEMAND)
5187: THEN
5188: IF OE_GLOBALS.Equal(l_line_rec.schedule_status_code,
5189: OESCH_STATUS_DEMANDED) THEN
5190:
5191: l_out_line_rec := l_line_rec;
5192: Action_UnSchedule(p_x_line_rec => l_out_line_rec,
5203: END IF;
5204:
5205:
5206: --schedule_action_code --> OESCH_ACT_UNSCHEDULE
5207: ELSIF OE_GLOBALS.Equal(l_line_rec.schedule_action_code,
5208: OESCH_ACT_UNSCHEDULE)
5209: THEN
5210:
5211: l_out_line_rec := l_line_rec;
5217: goto end_of_processing;
5218:
5219:
5220: --l_line_rec.schedule_action_code --> OESCH_ACT_ATP_CHECK
5221: ELSIF OE_GLOBALS.Equal(l_line_rec.schedule_action_code,
5222: OESCH_ACT_ATP_CHECK)
5223: THEN
5224:
5225: IF l_debug_level > 0 THEN
5331: END LOOP;
5332:
5333:
5334: --l_line_rec.schedule_action_code --> OESCH_ACT_SOURC
5335: ELSIF OE_GLOBALS.Equal(l_line_rec.schedule_action_code,
5336: OESCH_ACT_SOURCE)
5337: THEN
5338:
5339: IF l_debug_level > 0 THEN
5360: END IF;
5361:
5362:
5363: --l_line_rec.schedule_action_code --> OESCH_ACT_SCHEDULE
5364: /* ELSIF OE_GLOBALS.Equal(l_line_rec.schedule_action_code,
5365: OESCH_ACT_SCHEDULE)
5366: THEN
5367: OE_DEBUG_PUB.ADD('Action Requested is OESCH_ACT_SCHEDULE',1);
5368:
5377: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
5378: RAISE FND_API.G_EXC_ERROR;
5379: END IF;
5380: */
5381: ELSIF OE_GLOBALS.Equal(l_line_rec.schedule_action_code,
5382: OESCH_ACT_SCHEDULE)
5383: THEN
5384: IF l_debug_level > 0 THEN
5385: oe_debug_pub.add( 'ACTION REQUESTED IS OESCH_ACT_SCHEDULE' , 1 ) ;
5416:
5417:
5418:
5419: --l_line_rec.schedule_action_code --> OESCH_ACT_RESERVE
5420: ELSIF OE_GLOBALS.Equal(l_line_rec.schedule_action_code,
5421: OESCH_ACT_RESERVE)
5422: THEN
5423: IF l_debug_level > 0 THEN
5424: oe_debug_pub.add( 'ACTION IS RESERVE' , 1 ) ;
5423: IF l_debug_level > 0 THEN
5424: oe_debug_pub.add( 'ACTION IS RESERVE' , 1 ) ;
5425: END IF;
5426:
5427: IF OE_GLOBALS.Equal(l_line_rec.ordered_quantity,
5428: l_line_rec.reserved_quantity) THEN
5429: FND_MESSAGE.SET_NAME('ONT','OE_SCH_NO_ACTION_DONE_NO_EXP');
5430: OE_MSG_PUB.Add;
5431: goto end_of_processing;
5445: END IF;
5446:
5447: -- autoschedule flag is Y
5448: ELSIF (OESCH_AUTO_SCH_FLAG = 'Y') AND
5449: l_line_rec.operation = OE_GLOBALS.G_OPR_CREATE
5450: THEN
5451: -- We are taking care of autoscheduling only if scheduling_action
5452: -- code is null. If the action code has a value, we will perform
5453: -- that action instead of autoscheduling. Thus this check is done
5465: goto end_of_processing;
5466:
5467: END IF;
5468:
5469: IF (l_line_rec.item_type_code <> OE_GLOBALS.G_ITEM_STANDARD) THEN
5470: -- Assigning l_out_line_rec the same values as that
5471: -- l_line_rec.
5472:
5473: l_out_line_rec := l_line_rec;
5842: l_order_number := Get_Order_Number(l_line_rec.header_id);
5843:
5844: END IF;
5845:
5846: IF l_line_rec.item_type_code = OE_GLOBALS.G_ITEM_CONFIG THEN
5847:
5848: -- The config item might be a part of the table since query
5849: -- of a group of lines returns back the config item too. But
5850: -- we should not pass this item to MRP. Thus we will bypass this
5906: l_old_line_rec.ship_from_org_id := null;
5907: END IF;
5908:
5909: /*
5910: IF NOT OE_GLOBALS.Equal(l_line_rec.ship_from_org_id,
5911: l_old_line_rec.ship_from_org_id) OR
5912: (l_line_rec.re_source_flag = 'N')
5913: */
5914: IF (l_line_rec.ship_from_org_id IS NOT NULL)
5942: oe_debug_pub.add( 'A1 : ' || L_LINE_REC.ARRIVAL_SET_ID , 1 ) ;
5943: oe_debug_pub.add( 'A2 : ' || L_OLD_LINE_REC.ARRIVAL_SET_ID , 1 ) ;
5944: END IF;
5945:
5946: IF NOT OE_GLOBALS.Equal(l_line_rec.arrival_set_id,
5947: l_old_line_rec.arrival_set_id)
5948: OR (G_LINE_PART_OF_SET = TRUE AND
5949: l_line_rec.arrival_set_id is not null)
5950: THEN
5962: END IF;
5963:
5964: l_atp_rec.Requested_Ship_Date(I) := null;
5965:
5966: ELSIF NOT OE_GLOBALS.Equal(l_line_rec.ship_set_id,
5967: l_old_line_rec.ship_set_id)
5968: OR (G_LINE_PART_OF_SET = TRUE AND
5969: l_line_rec.ship_set_id is not null)
5970: THEN
5996: IF l_line_rec.schedule_action_code = OESCH_ACT_ATP_CHECK THEN
5997: l_atp_rec.Requested_Arrival_Date(I) :=
5998: l_line_rec.request_date;
5999: ELSE
6000: IF NOT OE_GLOBALS.Equal(l_line_rec.schedule_arrival_date,
6001: l_old_line_rec.schedule_arrival_date) AND
6002: l_line_rec.schedule_arrival_date IS NOT NULL AND
6003: l_line_rec.schedule_arrival_date <> FND_API.G_MISS_DATE
6004: THEN
6005:
6006: l_atp_rec.Requested_Arrival_Date(I) :=
6007: l_line_rec.schedule_arrival_date;
6008:
6009: ELSIF NOT OE_GLOBALS.Equal(l_line_rec.request_date,
6010: l_old_line_rec.request_date) AND
6011: l_line_rec.request_date IS NOT NULL AND
6012: l_line_rec.request_date <> FND_API.G_MISS_DATE
6013: THEN
6041: l_atp_rec.Requested_Ship_Date(I) :=
6042: l_line_rec.request_date;
6043: ELSE
6044:
6045: IF NOT OE_GLOBALS.Equal(l_line_rec.schedule_ship_date,
6046: l_old_line_rec.schedule_ship_date) AND
6047: l_line_rec.schedule_ship_date IS NOT NULL AND
6048: l_line_rec.schedule_ship_date <> FND_API.G_MISS_DATE
6049: THEN
6050:
6051: l_atp_rec.Requested_Ship_Date(I) :=
6052: l_line_rec.schedule_ship_date;
6053:
6054: ELSIF NOT OE_GLOBALS.Equal(l_line_rec.request_date,
6055: l_old_line_rec.request_date) AND
6056: l_line_rec.request_date IS NOT NULL AND
6057: l_line_rec.request_date <> FND_API.G_MISS_DATE
6058: THEN
6268: l_old_line_rec.ordered_quantity
6269: AND l_old_line_rec.reserved_quantity > 0
6270: AND NOT Schedule_Attribute_Changed(p_line_rec => l_line_rec,
6271: p_old_line_rec => l_old_line_rec)
6272: AND OE_GLOBALS.Equal(l_line_rec.sold_to_org_id,
6273: l_old_line_rec.sold_to_org_id)
6274: THEN
6275:
6276: IF l_debug_level > 0 THEN
6738: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
6739: --
6740: BEGIN
6741:
6742: IF NOT OE_GLOBALS.Equal(p_line_rec.SHIP_FROM_ORG_ID,
6743: p_old_line_rec.SHIP_FROM_ORG_ID)
6744: THEN
6745: RETURN TRUE;
6746: END IF;
6744: THEN
6745: RETURN TRUE;
6746: END IF;
6747:
6748: IF NOT OE_GLOBALS.Equal(p_line_rec.SUBINVENTORY,
6749: p_old_line_rec.SUBINVENTORY)
6750: THEN
6751: RETURN TRUE;
6752: END IF;
6750: THEN
6751: RETURN TRUE;
6752: END IF;
6753:
6754: IF NOT OE_GLOBALS.Equal(p_line_rec.SHIP_TO_ORG_ID,
6755: p_old_line_rec.SHIP_TO_ORG_ID)
6756: THEN
6757: RETURN TRUE;
6758: END IF;
6756: THEN
6757: RETURN TRUE;
6758: END IF;
6759:
6760: IF NOT OE_GLOBALS.Equal(p_line_rec.DEMAND_CLASS_CODE,
6761: p_old_line_rec.DEMAND_CLASS_CODE)
6762: THEN
6763: RETURN TRUE;
6764: END IF;
6762: THEN
6763: RETURN TRUE;
6764: END IF;
6765:
6766: IF NOT OE_GLOBALS.Equal(p_line_rec.SCHEDULE_SHIP_DATE,
6767: p_old_line_rec.SCHEDULE_SHIP_DATE)
6768: THEN
6769: RETURN TRUE;
6770: END IF;
6768: THEN
6769: RETURN TRUE;
6770: END IF;
6771:
6772: IF NOT OE_GLOBALS.Equal(p_line_rec.SCHEDULE_ARRIVAL_DATE,
6773: p_old_line_rec.SCHEDULE_ARRIVAL_DATE)
6774: THEN
6775: RETURN TRUE;
6776: END IF;
6774: THEN
6775: RETURN TRUE;
6776: END IF;
6777:
6778: IF NOT OE_GLOBALS.Equal(p_line_rec.SHIPPING_METHOD_CODE,
6779: p_old_line_rec.SHIPPING_METHOD_CODE)
6780: THEN
6781: RETURN TRUE;
6782: END IF;
6780: THEN
6781: RETURN TRUE;
6782: END IF;
6783:
6784: IF NOT OE_GLOBALS.Equal(p_line_rec.REQUEST_DATE,
6785: p_old_line_rec.REQUEST_DATE)
6786: THEN
6787: RETURN TRUE;
6788: END IF;
6786: THEN
6787: RETURN TRUE;
6788: END IF;
6789:
6790: IF NOT OE_GLOBALS.Equal(p_line_rec.DELIVERY_LEAD_TIME,
6791: p_old_line_rec.DELIVERY_LEAD_TIME)
6792: THEN
6793: RETURN TRUE;
6794: END IF;
6793: RETURN TRUE;
6794: END IF;
6795:
6796:
6797: IF NOT OE_GLOBALS.Equal(p_line_rec.inventory_item_id,
6798: p_old_line_rec.inventory_item_id)
6799: THEN
6800: RETURN TRUE;
6801: END IF;
6799: THEN
6800: RETURN TRUE;
6801: END IF;
6802:
6803: IF NOT OE_GLOBALS.Equal(p_line_rec.order_quantity_uom,
6804: p_old_line_rec.order_quantity_uom)
6805: THEN
6806: RETURN TRUE;
6807: END IF;
7144: THEN
7145: l_group_req_rec.old_ship_from_org_id := p_old_line_rec.ship_from_org_id;
7146: END IF;
7147:
7148: IF NOT OE_GLOBALS.Equal(p_line_rec.request_date,
7149: p_old_line_rec.request_date) THEN
7150: l_group_req_rec.request_date := p_line_rec.request_date;
7151: END IF;
7152:
7149: p_old_line_rec.request_date) THEN
7150: l_group_req_rec.request_date := p_line_rec.request_date;
7151: END IF;
7152:
7153: IF NOT OE_GLOBALS.Equal(p_line_rec.schedule_ship_date,
7154: p_old_line_rec.schedule_ship_date)
7155: THEN
7156:
7157: l_group_req_rec.schedule_ship_date := p_line_rec.schedule_ship_date;
7164: END IF;
7165:
7166: END IF;
7167:
7168: IF NOT OE_GLOBALS.Equal(p_line_rec.schedule_arrival_date,
7169: p_old_line_rec.schedule_arrival_date)
7170: THEN
7171:
7172: l_group_req_rec.schedule_arrival_date :=
7181: END IF;
7182:
7183: END IF;
7184:
7185: IF NOT OE_GLOBALS.Equal(p_line_rec.shipping_method_code,
7186: p_old_line_rec.shipping_method_code) THEN
7187:
7188: -- NOTE!!!!
7189: -- We are storing the shipping_method_code value in the
7192: l_group_req_rec.freight_carrier := p_line_rec.shipping_method_code;
7193:
7194: END IF;
7195:
7196: IF NOT OE_GLOBALS.Equal(p_line_rec.ship_to_org_id,
7197: p_old_line_rec.ship_to_org_id) THEN
7198: l_group_req_rec.ship_to_org_id := p_line_rec.ship_to_org_id;
7199: END IF;
7200:
7197: p_old_line_rec.ship_to_org_id) THEN
7198: l_group_req_rec.ship_to_org_id := p_line_rec.ship_to_org_id;
7199: END IF;
7200:
7201: IF NOT OE_GLOBALS.Equal(p_line_rec.ordered_quantity,
7202: p_old_line_rec.ordered_quantity) THEN
7203: l_group_req_rec.quantity := p_line_rec.ordered_quantity;
7204: l_group_req_rec.old_quantity := p_old_line_rec.ordered_quantity;
7205: END IF;
7335: Into l_config_exists
7336: From oe_order_lines_all
7337: Where header_id = p_x_line_tbl(I).header_id
7338: And ato_line_id = p_x_line_tbl(I).ato_line_id
7339: And item_type_code = OE_GLOBALS.G_ITEM_CONFIG;
7340:
7341: EXCEPTION
7342: WHEN OTHERS THEN
7343: IF l_debug_level > 0 THEN
7349: END IF;
7350:
7351: l_line_rec := p_x_line_tbl(I);
7352:
7353: IF l_line_rec.item_type_code = OE_GLOBALS.G_ITEM_CONFIG THEN
7354:
7355: -- The config item might be a part of the table since query
7356: -- of a group of lines returns back the config item too. But
7357: -- we did not pass this item to MRP (in load_mrp_request). Thus
7359:
7360: -- Since we don't pass config line to MRP we need populate schedule date
7361: -- on config from Model line. This is to fix bug1576412.
7362:
7363: IF OE_GLOBALS.Equal(l_line_rec.schedule_action_code,
7364: OESCH_ACT_RESCHEDULE) THEN
7365:
7366: -- Modified this part to fix bug 1900085.
7367: IF l_debug_level > 0 THEN
7409: oe_debug_pub.add( 'SCHEDULE ACTION CODE ' || L_LINE_REC.SCHEDULE_ACTION_CODE , 1 ) ;
7410: END IF;
7411:
7412: IF (p_atp_table.error_code(J) <> 0) AND
7413: NOT OE_GLOBALS.Equal(l_line_rec.schedule_action_code,
7414: OESCH_ACT_ATP_CHECK) AND
7415: (p_atp_table.error_code(J) <> -99 ) AND -- Multi org changes.
7416: (p_atp_table.error_code(J) <> 150) -- to fix bug 1880166
7417:
7671: END IF; --Check for -99.
7672:
7673: IF l_return_status = FND_API.G_RET_STS_SUCCESS THEN
7674:
7675: IF OE_GLOBALS.Equal(l_line_rec.schedule_action_code,
7676: OESCH_ACT_DEMAND)
7677: OR OE_GLOBALS.Equal(l_line_rec.schedule_action_code,
7678: OESCH_ACT_SCHEDULE)
7679: THEN
7673: IF l_return_status = FND_API.G_RET_STS_SUCCESS THEN
7674:
7675: IF OE_GLOBALS.Equal(l_line_rec.schedule_action_code,
7676: OESCH_ACT_DEMAND)
7677: OR OE_GLOBALS.Equal(l_line_rec.schedule_action_code,
7678: OESCH_ACT_SCHEDULE)
7679: THEN
7680: IF l_debug_level > 0 THEN
7681: oe_debug_pub.add( 'LOADING RESULTS OF SCHEDULE' , 1 ) ;
7834: -- Bug 2375055 End
7835:
7836:
7837:
7838: ELSIF OE_GLOBALS.Equal(l_line_rec.schedule_action_code,
7839: OESCH_ACT_REDEMAND) OR
7840: OE_GLOBALS.Equal(l_line_rec.schedule_action_code,
7841: OESCH_ACT_RESCHEDULE)
7842: THEN
7836:
7837:
7838: ELSIF OE_GLOBALS.Equal(l_line_rec.schedule_action_code,
7839: OESCH_ACT_REDEMAND) OR
7840: OE_GLOBALS.Equal(l_line_rec.schedule_action_code,
7841: OESCH_ACT_RESCHEDULE)
7842: THEN
7843: IF l_debug_level > 0 THEN
7844: oe_debug_pub.add( 'LOAD THE RESULT OF RESCHEDULE' , 3 ) ;
8029: END IF;
8030: -- Bug 2375055 End
8031:
8032:
8033: ELSIF OE_GLOBALS.Equal(l_line_rec.schedule_action_code,
8034: OESCH_ACT_UNDEMAND)
8035: THEN
8036: IF l_debug_level > 0 THEN
8037: oe_debug_pub.add( 'RR2:LOAD THE RESULTS OF UNDEMAND: ' || L_LINE_REC.RE_SOURCE_FLAG , 1 ) ;
8707: process_split(p_x_line_tbl => p_x_line_tbl);
8708:
8709: FOR I in 1..p_x_line_tbl.count LOOP
8710:
8711: IF p_x_line_tbl(I).operation = OE_GLOBALS.G_OPR_UPDATE AND
8712: p_x_line_tbl(I).schedule_status_code is not null AND
8713: p_x_line_tbl(I).split_action_code = 'SPLIT' THEN
8714:
8715: IF l_debug_level > 0 THEN
8793: l_out_line_tbl(I).schedule_action_code := null;
8794:
8795: -- Now let's schedule the new split lines.
8796: FOR J IN 1..p_x_line_tbl.count LOOP
8797: IF p_x_line_tbl(J).operation = OE_GLOBALS.G_OPR_CREATE AND
8798: p_x_line_tbl(J).split_from_line_id = l_line_rec.line_id
8799: THEN
8800: l_split_line_rec := p_x_line_tbl(J);
8801: oe_debug_pub.add('Split lines ship from: ' ||
9180: continue_loop := TRUE;
9181: WHILE J <= p_x_line_tbl.count AND continue_loop
9182: LOOP
9183: IF p_x_line_tbl(J).operation =
9184: OE_GLOBALS.G_OPR_CREATE AND
9185: p_x_line_tbl(J).split_from_line_id =
9186: l_line_rec.line_id
9187: THEN
9188: continue_loop := FALSE;
9561: I NUMBER;
9562: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
9563: l_msg_count NUMBER := 0;
9564: l_msg_data VARCHAR2(2000) := null;
9565: l_control_rec OE_GLOBALS.control_rec_type;
9566: l_line_tbl OE_ORDER_PUB.line_tbl_type;
9567: l_old_line_tbl OE_ORDER_PUB.line_tbl_type;
9568: l_mrp_line_tbl OE_SCHEDULE_UTIL.mrp_line_tbl_type;
9569: /*
10182:
10183: END IF; /* Check for shippable flag */
10184:
10185: -- To fix bug 2060293
10186: IF l_line_rec.item_type_code <> OE_GLOBALS.G_ITEM_CONFIG THEN
10187: Action_Undemand(p_old_line_rec => l_line_rec,
10188: x_return_status => l_return_status);
10189: END IF;
10190: