286:
287: )
288: IS
289: l_model_line_rec OE_ORDER_PUB.line_rec_type;
290: l_model_rec MRP_ATP_PUB.ATP_Rec_Typ;
291: l_smc_rec MRP_ATP_PUB.ATP_Rec_Typ;
292: l_ship_set VARCHAR2(30);
293: lTableName VARCHAR2(30);
294: lMessageName VARCHAR2(30);
287: )
288: IS
289: l_model_line_rec OE_ORDER_PUB.line_rec_type;
290: l_model_rec MRP_ATP_PUB.ATP_Rec_Typ;
291: l_smc_rec MRP_ATP_PUB.ATP_Rec_Typ;
292: l_ship_set VARCHAR2(30);
293: lTableName VARCHAR2(30);
294: lMessageName VARCHAR2(30);
295: lErrorMessage VARCHAR2(2000);
343: Get_Lead_Time
344: (p_ato_line_id => l_model_line_rec.ato_line_id,
345: p_ship_from_org_id => l_model_line_rec.ship_from_org_id);
346:
347: l_model_rec.Inventory_Item_Id := MRP_ATP_PUB.number_arr
348: (l_model_line_rec.Inventory_Item_Id);
349:
350: l_model_rec.Source_Organization_Id := MRP_ATP_PUB.number_arr
351: (l_model_line_rec.ship_from_org_id);
346:
347: l_model_rec.Inventory_Item_Id := MRP_ATP_PUB.number_arr
348: (l_model_line_rec.Inventory_Item_Id);
349:
350: l_model_rec.Source_Organization_Id := MRP_ATP_PUB.number_arr
351: (l_model_line_rec.ship_from_org_id);
352:
353: l_model_rec.Identifier := MRP_ATP_PUB.number_arr
354: (l_model_line_rec.line_id);
349:
350: l_model_rec.Source_Organization_Id := MRP_ATP_PUB.number_arr
351: (l_model_line_rec.ship_from_org_id);
352:
353: l_model_rec.Identifier := MRP_ATP_PUB.number_arr
354: (l_model_line_rec.line_id);
355:
356: l_model_rec.Calling_Module := MRP_ATP_PUB.number_arr
357: (660);
352:
353: l_model_rec.Identifier := MRP_ATP_PUB.number_arr
354: (l_model_line_rec.line_id);
355:
356: l_model_rec.Calling_Module := MRP_ATP_PUB.number_arr
357: (660);
358:
359: l_model_rec.Customer_Id := MRP_ATP_PUB.number_arr
360: (l_model_line_rec.sold_to_org_id);
355:
356: l_model_rec.Calling_Module := MRP_ATP_PUB.number_arr
357: (660);
358:
359: l_model_rec.Customer_Id := MRP_ATP_PUB.number_arr
360: (l_model_line_rec.sold_to_org_id);
361:
362: l_model_rec.Customer_Site_Id := MRP_ATP_PUB.number_arr
363: (l_model_line_rec.ship_to_org_id);
358:
359: l_model_rec.Customer_Id := MRP_ATP_PUB.number_arr
360: (l_model_line_rec.sold_to_org_id);
361:
362: l_model_rec.Customer_Site_Id := MRP_ATP_PUB.number_arr
363: (l_model_line_rec.ship_to_org_id);
364:
365: l_model_rec.Destination_Time_Zone := MRP_ATP_PUB.char30_arr
366: (null);
361:
362: l_model_rec.Customer_Site_Id := MRP_ATP_PUB.number_arr
363: (l_model_line_rec.ship_to_org_id);
364:
365: l_model_rec.Destination_Time_Zone := MRP_ATP_PUB.char30_arr
366: (null);
367:
368: l_model_rec.Quantity_Ordered := MRP_ATP_PUB.number_arr
369: (l_model_line_rec.ordered_quantity);
364:
365: l_model_rec.Destination_Time_Zone := MRP_ATP_PUB.char30_arr
366: (null);
367:
368: l_model_rec.Quantity_Ordered := MRP_ATP_PUB.number_arr
369: (l_model_line_rec.ordered_quantity);
370:
371: l_model_rec.Quantity_UOM := MRP_ATP_PUB.char3_arr
372: (l_model_line_rec.order_quantity_uom);
367:
368: l_model_rec.Quantity_Ordered := MRP_ATP_PUB.number_arr
369: (l_model_line_rec.ordered_quantity);
370:
371: l_model_rec.Quantity_UOM := MRP_ATP_PUB.char3_arr
372: (l_model_line_rec.order_quantity_uom);
373:
374: l_model_rec.Earliest_Acceptable_Date := MRP_ATP_PUB.date_arr
375: (l_model_line_rec.Earliest_Acceptable_Date);
370:
371: l_model_rec.Quantity_UOM := MRP_ATP_PUB.char3_arr
372: (l_model_line_rec.order_quantity_uom);
373:
374: l_model_rec.Earliest_Acceptable_Date := MRP_ATP_PUB.date_arr
375: (l_model_line_rec.Earliest_Acceptable_Date);
376:
377: l_model_rec.Requested_Ship_Date := MRP_ATP_PUB.date_arr
378: (l_model_line_rec.request_date);
373:
374: l_model_rec.Earliest_Acceptable_Date := MRP_ATP_PUB.date_arr
375: (l_model_line_rec.Earliest_Acceptable_Date);
376:
377: l_model_rec.Requested_Ship_Date := MRP_ATP_PUB.date_arr
378: (l_model_line_rec.request_date);
379:
380: l_model_rec.Requested_Arrival_Date := MRP_ATP_PUB.date_arr
381: (l_model_line_rec.request_date);
376:
377: l_model_rec.Requested_Ship_Date := MRP_ATP_PUB.date_arr
378: (l_model_line_rec.request_date);
379:
380: l_model_rec.Requested_Arrival_Date := MRP_ATP_PUB.date_arr
381: (l_model_line_rec.request_date);
382:
383: l_model_rec.Latest_Acceptable_Date := MRP_ATP_PUB.date_arr
384: (l_model_line_rec.Latest_Acceptable_Date);
379:
380: l_model_rec.Requested_Arrival_Date := MRP_ATP_PUB.date_arr
381: (l_model_line_rec.request_date);
382:
383: l_model_rec.Latest_Acceptable_Date := MRP_ATP_PUB.date_arr
384: (l_model_line_rec.Latest_Acceptable_Date);
385:
386: l_model_rec.Delivery_Lead_Time := MRP_ATP_PUB.number_arr
387: (l_model_line_rec.Delivery_Lead_Time);
382:
383: l_model_rec.Latest_Acceptable_Date := MRP_ATP_PUB.date_arr
384: (l_model_line_rec.Latest_Acceptable_Date);
385:
386: l_model_rec.Delivery_Lead_Time := MRP_ATP_PUB.number_arr
387: (l_model_line_rec.Delivery_Lead_Time);
388: l_model_rec.Atp_lead_Time := MRP_ATP_PUB.number_arr
389: (l_st_atp_lead_time);
390:
384: (l_model_line_rec.Latest_Acceptable_Date);
385:
386: l_model_rec.Delivery_Lead_Time := MRP_ATP_PUB.number_arr
387: (l_model_line_rec.Delivery_Lead_Time);
388: l_model_rec.Atp_lead_Time := MRP_ATP_PUB.number_arr
389: (l_st_atp_lead_time);
390:
391: l_model_rec.Freight_Carrier := MRP_ATP_PUB.char30_arr
392: (l_model_line_rec.Freight_Carrier_Code);
387: (l_model_line_rec.Delivery_Lead_Time);
388: l_model_rec.Atp_lead_Time := MRP_ATP_PUB.number_arr
389: (l_st_atp_lead_time);
390:
391: l_model_rec.Freight_Carrier := MRP_ATP_PUB.char30_arr
392: (l_model_line_rec.Freight_Carrier_Code);
393:
394: l_model_rec.Ship_Method := MRP_ATP_PUB.char30_arr
395: (null);
390:
391: l_model_rec.Freight_Carrier := MRP_ATP_PUB.char30_arr
392: (l_model_line_rec.Freight_Carrier_Code);
393:
394: l_model_rec.Ship_Method := MRP_ATP_PUB.char30_arr
395: (null);
396:
397: l_model_rec.Demand_Class := MRP_ATP_PUB.char30_arr
398: (l_model_line_rec.Demand_Class_Code);
393:
394: l_model_rec.Ship_Method := MRP_ATP_PUB.char30_arr
395: (null);
396:
397: l_model_rec.Demand_Class := MRP_ATP_PUB.char30_arr
398: (l_model_line_rec.Demand_Class_Code);
399:
400: l_model_rec.Ship_Set_Name := MRP_ATP_PUB.char30_arr
401: (l_model_line_rec.ship_set_id);
396:
397: l_model_rec.Demand_Class := MRP_ATP_PUB.char30_arr
398: (l_model_line_rec.Demand_Class_Code);
399:
400: l_model_rec.Ship_Set_Name := MRP_ATP_PUB.char30_arr
401: (l_model_line_rec.ship_set_id);
402:
403: l_model_rec.Arrival_Set_Name := MRP_ATP_PUB.char30_arr
404: (l_model_line_rec.arrival_set_id);
399:
400: l_model_rec.Ship_Set_Name := MRP_ATP_PUB.char30_arr
401: (l_model_line_rec.ship_set_id);
402:
403: l_model_rec.Arrival_Set_Name := MRP_ATP_PUB.char30_arr
404: (l_model_line_rec.arrival_set_id);
405:
406: l_model_rec.Override_Flag := MRP_ATP_PUB.char1_arr
407: (null);
402:
403: l_model_rec.Arrival_Set_Name := MRP_ATP_PUB.char30_arr
404: (l_model_line_rec.arrival_set_id);
405:
406: l_model_rec.Override_Flag := MRP_ATP_PUB.char1_arr
407: (null);
408:
409: l_model_rec.Ship_Date := MRP_ATP_PUB.date_arr
410: (null);
405:
406: l_model_rec.Override_Flag := MRP_ATP_PUB.char1_arr
407: (null);
408:
409: l_model_rec.Ship_Date := MRP_ATP_PUB.date_arr
410: (null);
411:
412: l_model_rec.Available_Quantity := MRP_ATP_PUB.number_arr
413: (null);
408:
409: l_model_rec.Ship_Date := MRP_ATP_PUB.date_arr
410: (null);
411:
412: l_model_rec.Available_Quantity := MRP_ATP_PUB.number_arr
413: (null);
414:
415: l_model_rec.Requested_Date_Quantity := MRP_ATP_PUB.number_arr
416: (null);
411:
412: l_model_rec.Available_Quantity := MRP_ATP_PUB.number_arr
413: (null);
414:
415: l_model_rec.Requested_Date_Quantity := MRP_ATP_PUB.number_arr
416: (null);
417:
418: l_model_rec.Group_Ship_Date := MRP_ATP_PUB.date_arr
419: (null);
414:
415: l_model_rec.Requested_Date_Quantity := MRP_ATP_PUB.number_arr
416: (null);
417:
418: l_model_rec.Group_Ship_Date := MRP_ATP_PUB.date_arr
419: (null);
420:
421: l_model_rec.Group_Arrival_Date := MRP_ATP_PUB.date_arr
422: (null);
417:
418: l_model_rec.Group_Ship_Date := MRP_ATP_PUB.date_arr
419: (null);
420:
421: l_model_rec.Group_Arrival_Date := MRP_ATP_PUB.date_arr
422: (null);
423:
424: l_model_rec.Vendor_Id := MRP_ATP_PUB.number_arr
425: (null);
420:
421: l_model_rec.Group_Arrival_Date := MRP_ATP_PUB.date_arr
422: (null);
423:
424: l_model_rec.Vendor_Id := MRP_ATP_PUB.number_arr
425: (null);
426:
427: l_model_rec.Vendor_Site_Id := MRP_ATP_PUB.number_arr
428: (null);
423:
424: l_model_rec.Vendor_Id := MRP_ATP_PUB.number_arr
425: (null);
426:
427: l_model_rec.Vendor_Site_Id := MRP_ATP_PUB.number_arr
428: (null);
429:
430: l_model_rec.Insert_Flag := MRP_ATP_PUB.number_arr
431: (null);
426:
427: l_model_rec.Vendor_Site_Id := MRP_ATP_PUB.number_arr
428: (null);
429:
430: l_model_rec.Insert_Flag := MRP_ATP_PUB.number_arr
431: (null);
432:
433: l_model_rec.Error_Code := MRP_ATP_PUB.number_arr
434: (null);
429:
430: l_model_rec.Insert_Flag := MRP_ATP_PUB.number_arr
431: (null);
432:
433: l_model_rec.Error_Code := MRP_ATP_PUB.number_arr
434: (null);
435:
436: l_model_rec.Message := MRP_ATP_PUB.char2000_arr
437: (null);
432:
433: l_model_rec.Error_Code := MRP_ATP_PUB.number_arr
434: (null);
435:
436: l_model_rec.Message := MRP_ATP_PUB.char2000_arr
437: (null);
438:
439: l_model_rec.Action := MRP_ATP_PUB.number_arr
440: (null);
435:
436: l_model_rec.Message := MRP_ATP_PUB.char2000_arr
437: (null);
438:
439: l_model_rec.Action := MRP_ATP_PUB.number_arr
440: (null);
441:
442: l_order_number := Get_order_number(l_model_line_rec.header_id);
443:
440: (null);
441:
442: l_order_number := Get_order_number(l_model_line_rec.header_id);
443:
444: l_model_rec.Order_number := MRP_ATP_PUB.number_arr
445: (l_order_number);
446:
447: IF l_debug_level > 0 THEN
448: oe_debug_pub.add( '1.. CALLING CTO GET_BOM_MANDATORY_COMPS' , 1 ) ;
2418: Description : This procedure create l_count records each for each table
2419: in the record of tables of MRP's p_atp_rec.
2420: ------------------------------------------------------------------------*/
2421: Procedure Initialize_mrp_record
2422: ( p_x_atp_rec IN OUT NOCOPY MRP_ATP_PUB.ATP_Rec_Typ
2423: ,l_count IN NUMBER)
2424: IS
2425: l_return_status VARCHAR2(1);
2426: --
2524: ,p_partial_set IN BOOLEAN := FALSE
2525: ,p_config_line_id IN NUMBER := NULL
2526: ,p_part_of_set IN VARCHAR2 DEFAULT 'N' -- 4405004
2527: ,p_index IN OUT NOCOPY NUMBER
2528: ,x_atp_rec IN OUT NOCOPY MRP_ATP_PUB.ATP_Rec_Typ)
2529: IS
2530: I NUMBER := p_index;
2531: l_insert_flag NUMBER;
2532: l_oe_flag VARCHAR2(1);
2541: l_organization_id NUMBER;
2542: l_inventory_item_id NUMBER;
2543: l_result NUMBER := 1;
2544:
2545: l_model_rec MRP_ATP_PUB.ATP_Rec_Typ;
2546: l_smc_rec MRP_ATP_PUB.ATP_Rec_Typ;
2547:
2548: lTableName VARCHAR2(30);
2549: lMessageName VARCHAR2(30);
2542: l_inventory_item_id NUMBER;
2543: l_result NUMBER := 1;
2544:
2545: l_model_rec MRP_ATP_PUB.ATP_Rec_Typ;
2546: l_smc_rec MRP_ATP_PUB.ATP_Rec_Typ;
2547:
2548: lTableName VARCHAR2(30);
2549: lMessageName VARCHAR2(30);
2550: lErrorMessage VARCHAR2(2000);
3256:
3257: --Load Model Rec to pass to ATO's API
3258: --Load Model Rec to pass to ATO's API
3259:
3260: l_model_rec.Inventory_Item_Id := MRP_ATP_PUB.number_arr
3261: (x_atp_rec.Inventory_Item_Id(I));
3262:
3263: l_model_rec.Source_Organization_Id := MRP_ATP_PUB.number_arr
3264: (x_atp_rec.Source_Organization_Id(I));
3259:
3260: l_model_rec.Inventory_Item_Id := MRP_ATP_PUB.number_arr
3261: (x_atp_rec.Inventory_Item_Id(I));
3262:
3263: l_model_rec.Source_Organization_Id := MRP_ATP_PUB.number_arr
3264: (x_atp_rec.Source_Organization_Id(I));
3265:
3266: l_model_rec.Identifier := MRP_ATP_PUB.number_arr
3267: (x_atp_rec.Identifier(I));
3262:
3263: l_model_rec.Source_Organization_Id := MRP_ATP_PUB.number_arr
3264: (x_atp_rec.Source_Organization_Id(I));
3265:
3266: l_model_rec.Identifier := MRP_ATP_PUB.number_arr
3267: (x_atp_rec.Identifier(I));
3268:
3269: l_model_rec.Calling_Module := MRP_ATP_PUB.number_arr
3270: (x_atp_rec.Calling_Module(I));
3265:
3266: l_model_rec.Identifier := MRP_ATP_PUB.number_arr
3267: (x_atp_rec.Identifier(I));
3268:
3269: l_model_rec.Calling_Module := MRP_ATP_PUB.number_arr
3270: (x_atp_rec.Calling_Module(I));
3271:
3272: l_model_rec.Customer_Id := MRP_ATP_PUB.number_arr
3273: (x_atp_rec.Customer_Id(I));
3268:
3269: l_model_rec.Calling_Module := MRP_ATP_PUB.number_arr
3270: (x_atp_rec.Calling_Module(I));
3271:
3272: l_model_rec.Customer_Id := MRP_ATP_PUB.number_arr
3273: (x_atp_rec.Customer_Id(I));
3274:
3275: l_model_rec.Customer_Site_Id := MRP_ATP_PUB.number_arr
3276: (x_atp_rec.Customer_Site_Id(I));
3271:
3272: l_model_rec.Customer_Id := MRP_ATP_PUB.number_arr
3273: (x_atp_rec.Customer_Id(I));
3274:
3275: l_model_rec.Customer_Site_Id := MRP_ATP_PUB.number_arr
3276: (x_atp_rec.Customer_Site_Id(I));
3277:
3278: l_model_rec.Destination_Time_Zone := MRP_ATP_PUB.char30_arr
3279: (x_atp_rec.Destination_Time_Zone(I));
3274:
3275: l_model_rec.Customer_Site_Id := MRP_ATP_PUB.number_arr
3276: (x_atp_rec.Customer_Site_Id(I));
3277:
3278: l_model_rec.Destination_Time_Zone := MRP_ATP_PUB.char30_arr
3279: (x_atp_rec.Destination_Time_Zone(I));
3280:
3281: l_model_rec.Quantity_Ordered := MRP_ATP_PUB.number_arr
3282: (x_atp_rec.Quantity_Ordered(I));
3277:
3278: l_model_rec.Destination_Time_Zone := MRP_ATP_PUB.char30_arr
3279: (x_atp_rec.Destination_Time_Zone(I));
3280:
3281: l_model_rec.Quantity_Ordered := MRP_ATP_PUB.number_arr
3282: (x_atp_rec.Quantity_Ordered(I));
3283:
3284: l_model_rec.Quantity_UOM := MRP_ATP_PUB.char3_arr
3285: (x_atp_rec.Quantity_UOM(I));
3280:
3281: l_model_rec.Quantity_Ordered := MRP_ATP_PUB.number_arr
3282: (x_atp_rec.Quantity_Ordered(I));
3283:
3284: l_model_rec.Quantity_UOM := MRP_ATP_PUB.char3_arr
3285: (x_atp_rec.Quantity_UOM(I));
3286:
3287: l_model_rec.Earliest_Acceptable_Date := MRP_ATP_PUB.date_arr
3288: (x_atp_rec.Earliest_Acceptable_Date(I));
3283:
3284: l_model_rec.Quantity_UOM := MRP_ATP_PUB.char3_arr
3285: (x_atp_rec.Quantity_UOM(I));
3286:
3287: l_model_rec.Earliest_Acceptable_Date := MRP_ATP_PUB.date_arr
3288: (x_atp_rec.Earliest_Acceptable_Date(I));
3289:
3290: l_model_rec.Requested_Ship_Date := MRP_ATP_PUB.date_arr
3291: (x_atp_rec.Requested_Ship_Date(I));
3286:
3287: l_model_rec.Earliest_Acceptable_Date := MRP_ATP_PUB.date_arr
3288: (x_atp_rec.Earliest_Acceptable_Date(I));
3289:
3290: l_model_rec.Requested_Ship_Date := MRP_ATP_PUB.date_arr
3291: (x_atp_rec.Requested_Ship_Date(I));
3292:
3293: l_model_rec.Requested_Arrival_Date := MRP_ATP_PUB.date_arr
3294: (x_atp_rec.Requested_Arrival_Date(I));
3289:
3290: l_model_rec.Requested_Ship_Date := MRP_ATP_PUB.date_arr
3291: (x_atp_rec.Requested_Ship_Date(I));
3292:
3293: l_model_rec.Requested_Arrival_Date := MRP_ATP_PUB.date_arr
3294: (x_atp_rec.Requested_Arrival_Date(I));
3295:
3296: l_model_rec.Latest_Acceptable_Date := MRP_ATP_PUB.date_arr
3297: (x_atp_rec.Latest_Acceptable_Date(I));
3292:
3293: l_model_rec.Requested_Arrival_Date := MRP_ATP_PUB.date_arr
3294: (x_atp_rec.Requested_Arrival_Date(I));
3295:
3296: l_model_rec.Latest_Acceptable_Date := MRP_ATP_PUB.date_arr
3297: (x_atp_rec.Latest_Acceptable_Date(I));
3298:
3299: l_model_rec.Delivery_Lead_Time := MRP_ATP_PUB.number_arr
3300: (x_atp_rec.Delivery_Lead_Time(I));
3295:
3296: l_model_rec.Latest_Acceptable_Date := MRP_ATP_PUB.date_arr
3297: (x_atp_rec.Latest_Acceptable_Date(I));
3298:
3299: l_model_rec.Delivery_Lead_Time := MRP_ATP_PUB.number_arr
3300: (x_atp_rec.Delivery_Lead_Time(I));
3301:
3302: l_model_rec.Atp_lead_Time := MRP_ATP_PUB.number_arr
3303: (x_atp_rec.Atp_lead_Time(I));
3298:
3299: l_model_rec.Delivery_Lead_Time := MRP_ATP_PUB.number_arr
3300: (x_atp_rec.Delivery_Lead_Time(I));
3301:
3302: l_model_rec.Atp_lead_Time := MRP_ATP_PUB.number_arr
3303: (x_atp_rec.Atp_lead_Time(I));
3304:
3305: l_model_rec.Freight_Carrier := MRP_ATP_PUB.char30_arr
3306: (x_atp_rec.Freight_Carrier(I));
3301:
3302: l_model_rec.Atp_lead_Time := MRP_ATP_PUB.number_arr
3303: (x_atp_rec.Atp_lead_Time(I));
3304:
3305: l_model_rec.Freight_Carrier := MRP_ATP_PUB.char30_arr
3306: (x_atp_rec.Freight_Carrier(I));
3307:
3308: l_model_rec.Ship_Method := MRP_ATP_PUB.char30_arr
3309: (x_atp_rec.Ship_Method(I));
3304:
3305: l_model_rec.Freight_Carrier := MRP_ATP_PUB.char30_arr
3306: (x_atp_rec.Freight_Carrier(I));
3307:
3308: l_model_rec.Ship_Method := MRP_ATP_PUB.char30_arr
3309: (x_atp_rec.Ship_Method(I));
3310:
3311: l_model_rec.Demand_Class := MRP_ATP_PUB.char30_arr
3312: (x_atp_rec.Demand_Class(I));
3307:
3308: l_model_rec.Ship_Method := MRP_ATP_PUB.char30_arr
3309: (x_atp_rec.Ship_Method(I));
3310:
3311: l_model_rec.Demand_Class := MRP_ATP_PUB.char30_arr
3312: (x_atp_rec.Demand_Class(I));
3313:
3314: l_model_rec.Ship_Set_Name := MRP_ATP_PUB.char30_arr
3315: (x_atp_rec.Ship_Set_Name(I));
3310:
3311: l_model_rec.Demand_Class := MRP_ATP_PUB.char30_arr
3312: (x_atp_rec.Demand_Class(I));
3313:
3314: l_model_rec.Ship_Set_Name := MRP_ATP_PUB.char30_arr
3315: (x_atp_rec.Ship_Set_Name(I));
3316:
3317: l_model_rec.Arrival_Set_Name := MRP_ATP_PUB.char30_arr
3318: (x_atp_rec.Arrival_Set_Name(I));
3313:
3314: l_model_rec.Ship_Set_Name := MRP_ATP_PUB.char30_arr
3315: (x_atp_rec.Ship_Set_Name(I));
3316:
3317: l_model_rec.Arrival_Set_Name := MRP_ATP_PUB.char30_arr
3318: (x_atp_rec.Arrival_Set_Name(I));
3319:
3320: l_model_rec.Override_Flag := MRP_ATP_PUB.char1_arr
3321: (x_atp_rec.Override_Flag(I));
3316:
3317: l_model_rec.Arrival_Set_Name := MRP_ATP_PUB.char30_arr
3318: (x_atp_rec.Arrival_Set_Name(I));
3319:
3320: l_model_rec.Override_Flag := MRP_ATP_PUB.char1_arr
3321: (x_atp_rec.Override_Flag(I));
3322:
3323: l_model_rec.Ship_Date := MRP_ATP_PUB.date_arr
3324: (x_atp_rec.Ship_Date(I));
3319:
3320: l_model_rec.Override_Flag := MRP_ATP_PUB.char1_arr
3321: (x_atp_rec.Override_Flag(I));
3322:
3323: l_model_rec.Ship_Date := MRP_ATP_PUB.date_arr
3324: (x_atp_rec.Ship_Date(I));
3325:
3326: l_model_rec.Available_Quantity := MRP_ATP_PUB.number_arr
3327: (x_atp_rec.Available_Quantity(I));
3322:
3323: l_model_rec.Ship_Date := MRP_ATP_PUB.date_arr
3324: (x_atp_rec.Ship_Date(I));
3325:
3326: l_model_rec.Available_Quantity := MRP_ATP_PUB.number_arr
3327: (x_atp_rec.Available_Quantity(I));
3328:
3329: l_model_rec.Requested_Date_Quantity := MRP_ATP_PUB.number_arr
3330: (x_atp_rec.Requested_Date_Quantity(I));
3325:
3326: l_model_rec.Available_Quantity := MRP_ATP_PUB.number_arr
3327: (x_atp_rec.Available_Quantity(I));
3328:
3329: l_model_rec.Requested_Date_Quantity := MRP_ATP_PUB.number_arr
3330: (x_atp_rec.Requested_Date_Quantity(I));
3331:
3332: l_model_rec.Group_Ship_Date := MRP_ATP_PUB.date_arr
3333: (x_atp_rec.Group_Ship_Date(I));
3328:
3329: l_model_rec.Requested_Date_Quantity := MRP_ATP_PUB.number_arr
3330: (x_atp_rec.Requested_Date_Quantity(I));
3331:
3332: l_model_rec.Group_Ship_Date := MRP_ATP_PUB.date_arr
3333: (x_atp_rec.Group_Ship_Date(I));
3334:
3335: l_model_rec.Group_Arrival_Date := MRP_ATP_PUB.date_arr
3336: (x_atp_rec.Group_Arrival_Date(I));
3331:
3332: l_model_rec.Group_Ship_Date := MRP_ATP_PUB.date_arr
3333: (x_atp_rec.Group_Ship_Date(I));
3334:
3335: l_model_rec.Group_Arrival_Date := MRP_ATP_PUB.date_arr
3336: (x_atp_rec.Group_Arrival_Date(I));
3337:
3338: l_model_rec.Vendor_Id := MRP_ATP_PUB.number_arr
3339: (x_atp_rec.Vendor_Id(I));
3334:
3335: l_model_rec.Group_Arrival_Date := MRP_ATP_PUB.date_arr
3336: (x_atp_rec.Group_Arrival_Date(I));
3337:
3338: l_model_rec.Vendor_Id := MRP_ATP_PUB.number_arr
3339: (x_atp_rec.Vendor_Id(I));
3340:
3341: l_model_rec.Vendor_Site_Id := MRP_ATP_PUB.number_arr
3342: (x_atp_rec.Vendor_Site_Id(I));
3337:
3338: l_model_rec.Vendor_Id := MRP_ATP_PUB.number_arr
3339: (x_atp_rec.Vendor_Id(I));
3340:
3341: l_model_rec.Vendor_Site_Id := MRP_ATP_PUB.number_arr
3342: (x_atp_rec.Vendor_Site_Id(I));
3343:
3344: l_model_rec.Insert_Flag := MRP_ATP_PUB.number_arr
3345: (x_atp_rec.Insert_Flag(I));
3340:
3341: l_model_rec.Vendor_Site_Id := MRP_ATP_PUB.number_arr
3342: (x_atp_rec.Vendor_Site_Id(I));
3343:
3344: l_model_rec.Insert_Flag := MRP_ATP_PUB.number_arr
3345: (x_atp_rec.Insert_Flag(I));
3346:
3347: l_model_rec.Error_Code := MRP_ATP_PUB.number_arr
3348: (x_atp_rec.Error_Code(I));
3343:
3344: l_model_rec.Insert_Flag := MRP_ATP_PUB.number_arr
3345: (x_atp_rec.Insert_Flag(I));
3346:
3347: l_model_rec.Error_Code := MRP_ATP_PUB.number_arr
3348: (x_atp_rec.Error_Code(I));
3349:
3350: l_model_rec.Message := MRP_ATP_PUB.char2000_arr
3351: (x_atp_rec.Message(I));
3346:
3347: l_model_rec.Error_Code := MRP_ATP_PUB.number_arr
3348: (x_atp_rec.Error_Code(I));
3349:
3350: l_model_rec.Message := MRP_ATP_PUB.char2000_arr
3351: (x_atp_rec.Message(I));
3352:
3353: l_model_rec.Action := MRP_ATP_PUB.number_arr
3354: (x_atp_rec.action(I));
3349:
3350: l_model_rec.Message := MRP_ATP_PUB.char2000_arr
3351: (x_atp_rec.Message(I));
3352:
3353: l_model_rec.Action := MRP_ATP_PUB.number_arr
3354: (x_atp_rec.action(I));
3355:
3356: l_model_rec.order_number := MRP_ATP_PUB.number_arr
3357: (x_atp_rec.order_number(I));
3352:
3353: l_model_rec.Action := MRP_ATP_PUB.number_arr
3354: (x_atp_rec.action(I));
3355:
3356: l_model_rec.order_number := MRP_ATP_PUB.number_arr
3357: (x_atp_rec.order_number(I));
3358:
3359: IF x_atp_rec.Old_Source_Organization_Id.Exists(I) THEN
3360: l_model_rec.Old_Source_Organization_Id := MRP_ATP_PUB.number_arr
3356: l_model_rec.order_number := MRP_ATP_PUB.number_arr
3357: (x_atp_rec.order_number(I));
3358:
3359: IF x_atp_rec.Old_Source_Organization_Id.Exists(I) THEN
3360: l_model_rec.Old_Source_Organization_Id := MRP_ATP_PUB.number_arr
3361: (x_atp_rec.Old_Source_Organization_Id(I));
3362: END IF;
3363:
3364: IF x_atp_rec.Old_Demand_Class.Exists(I) THEN
3362: END IF;
3363:
3364: IF x_atp_rec.Old_Demand_Class.Exists(I) THEN
3365: l_model_rec.Old_Demand_Class :=
3366: MRP_ATP_PUB.char30_arr(x_atp_rec.Old_Demand_Class(I));
3367: END IF;
3368:
3369: BEGIN
3370: IF l_debug_level > 0 THEN
3523: Procedure Load_MRP_request_from_rec
3524: ( p_line_rec IN OE_ORDER_PUB.Line_rec_Type
3525: ,p_old_line_rec IN OE_ORDER_PUB.Line_rec_Type
3526: ,p_sch_action IN VARCHAR2 := NULL
3527: ,x_mrp_atp_rec OUT NOCOPY MRP_ATP_PUB.ATP_Rec_Typ)
3528:
3529: IS
3530: l_mrp_calc_sd VARCHAR2(240);
3531: l_type_code VARCHAR2(30);
3598: ,p_old_line_tbl IN OE_ORDER_PUB.Line_Tbl_Type
3599: ,p_partial_set IN BOOLEAN := FALSE
3600: ,p_sch_action IN VARCHAR2 := NULL
3601: ,p_part_of_set IN VARCHAR2 DEFAULT 'N' -- 4405004
3602: ,x_mrp_atp_rec OUT NOCOPY MRP_ATP_PUB.ATP_Rec_Typ)
3603:
3604: IS
3605: l_mrp_calc_sd VARCHAR2(240);
3606: l_type_code VARCHAR2(30);
3808: We ignore the mandatory components which we passed to MRP
3809: while loading the results.
3810: -------------------------------------------------------------------------- */
3811: Procedure Load_Results_from_rec
3812: ( p_atp_rec IN MRP_ATP_PUB.ATP_Rec_Typ
3813: , p_x_line_rec IN OUT NOCOPY OE_ORDER_PUB.line_rec_type
3814: , p_index IN NUMBER := 1
3815: , p_sch_action IN VARCHAR2 := NULL
3816: , p_config_exists IN VARCHAR2 := 'N'
4938: Added parameter p_old_line_tbl to support bug 1955004
4939: for call to Inactive_Demand_Scheduling()
4940: -------------------------------------------------------------------------- */
4941: Procedure Load_Results_from_tbl
4942: ( p_atp_rec IN MRP_ATP_PUB.ATP_Rec_Typ
4943: , p_old_line_tbl IN OE_ORDER_PUB.line_tbl_type
4944: , p_x_line_tbl IN OUT NOCOPY OE_ORDER_PUB.line_tbl_type
4945: , p_sch_action IN VARCHAR2 := NULL
4946: , p_partial IN BOOLEAN := FALSE
5338: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
5339: END Load_Results_from_tbl;
5340:
5341: Procedure Display_Sch_Errors
5342: ( p_atp_rec IN MRP_ATP_PUB.ATP_Rec_Typ
5343: , p_line_tbl IN OE_ORDER_PUB.line_tbl_type
5344: := OE_ORDER_PUB.G_MISS_LINE_TBL
5345: , p_line_id IN NUMBER DEFAULT NULL)
5346:
5539:
5540: IS
5541: l_msg_count NUMBER;
5542: l_session_id NUMBER := 0;
5543: l_mrp_atp_rec MRP_ATP_PUB.ATP_Rec_Typ;
5544: l_out_mrp_atp_rec MRP_ATP_PUB.ATP_Rec_Typ;
5545: l_atp_supply_demand MRP_ATP_PUB.ATP_Supply_Demand_Typ;
5546: l_atp_period MRP_ATP_PUB.ATP_Period_Typ;
5547: l_atp_details MRP_ATP_PUB.ATP_Details_Typ;
5540: IS
5541: l_msg_count NUMBER;
5542: l_session_id NUMBER := 0;
5543: l_mrp_atp_rec MRP_ATP_PUB.ATP_Rec_Typ;
5544: l_out_mrp_atp_rec MRP_ATP_PUB.ATP_Rec_Typ;
5545: l_atp_supply_demand MRP_ATP_PUB.ATP_Supply_Demand_Typ;
5546: l_atp_period MRP_ATP_PUB.ATP_Period_Typ;
5547: l_atp_details MRP_ATP_PUB.ATP_Details_Typ;
5548: l_mrp_msg_data VARCHAR2(200);
5541: l_msg_count NUMBER;
5542: l_session_id NUMBER := 0;
5543: l_mrp_atp_rec MRP_ATP_PUB.ATP_Rec_Typ;
5544: l_out_mrp_atp_rec MRP_ATP_PUB.ATP_Rec_Typ;
5545: l_atp_supply_demand MRP_ATP_PUB.ATP_Supply_Demand_Typ;
5546: l_atp_period MRP_ATP_PUB.ATP_Period_Typ;
5547: l_atp_details MRP_ATP_PUB.ATP_Details_Typ;
5548: l_mrp_msg_data VARCHAR2(200);
5549:
5542: l_session_id NUMBER := 0;
5543: l_mrp_atp_rec MRP_ATP_PUB.ATP_Rec_Typ;
5544: l_out_mrp_atp_rec MRP_ATP_PUB.ATP_Rec_Typ;
5545: l_atp_supply_demand MRP_ATP_PUB.ATP_Supply_Demand_Typ;
5546: l_atp_period MRP_ATP_PUB.ATP_Period_Typ;
5547: l_atp_details MRP_ATP_PUB.ATP_Details_Typ;
5548: l_mrp_msg_data VARCHAR2(200);
5549:
5550: --
5543: l_mrp_atp_rec MRP_ATP_PUB.ATP_Rec_Typ;
5544: l_out_mrp_atp_rec MRP_ATP_PUB.ATP_Rec_Typ;
5545: l_atp_supply_demand MRP_ATP_PUB.ATP_Supply_Demand_Typ;
5546: l_atp_period MRP_ATP_PUB.ATP_Period_Typ;
5547: l_atp_details MRP_ATP_PUB.ATP_Details_Typ;
5548: l_mrp_msg_data VARCHAR2(200);
5549:
5550: --
5551: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
5614: END;
5615:
5616:
5617:
5618: MRP_ATP_PUB.Call_ATP
5619: ( p_session_id => l_session_id
5620: , p_atp_rec => l_mrp_atp_rec
5621: , x_atp_rec => l_out_mrp_atp_rec
5622: , x_atp_supply_demand => l_atp_supply_demand
5626: , x_msg_data => l_mrp_msg_data
5627: , x_msg_count => l_msg_count);
5628:
5629: IF l_debug_level > 0 THEN
5630: oe_debug_pub.add( '3. AFTER CALLING MRP_ATP_PUB.CALL_ATP' || X_RETURN_STATUS , 1 ) ;
5631: END IF;
5632:
5633: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
5634: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
5957: IS
5958: l_msg_count NUMBER;
5959: l_mrp_msg_data VARCHAR2(2000);
5960: --l_session_id NUMBER := 0;
5961: --l_mrp_atp_rec MRP_ATP_PUB.ATP_Rec_Typ;
5962: --l_atp_supply_demand MRP_ATP_PUB.ATP_Supply_Demand_Typ;
5963: --l_atp_period MRP_ATP_PUB.ATP_Period_Typ;
5964: --l_atp_details MRP_ATP_PUB.ATP_Details_Typ;
5965: l_on_hand_qty NUMBER;
5958: l_msg_count NUMBER;
5959: l_mrp_msg_data VARCHAR2(2000);
5960: --l_session_id NUMBER := 0;
5961: --l_mrp_atp_rec MRP_ATP_PUB.ATP_Rec_Typ;
5962: --l_atp_supply_demand MRP_ATP_PUB.ATP_Supply_Demand_Typ;
5963: --l_atp_period MRP_ATP_PUB.ATP_Period_Typ;
5964: --l_atp_details MRP_ATP_PUB.ATP_Details_Typ;
5965: l_on_hand_qty NUMBER;
5966: l_avail_to_reserve NUMBER;
5959: l_mrp_msg_data VARCHAR2(2000);
5960: --l_session_id NUMBER := 0;
5961: --l_mrp_atp_rec MRP_ATP_PUB.ATP_Rec_Typ;
5962: --l_atp_supply_demand MRP_ATP_PUB.ATP_Supply_Demand_Typ;
5963: --l_atp_period MRP_ATP_PUB.ATP_Period_Typ;
5964: --l_atp_details MRP_ATP_PUB.ATP_Details_Typ;
5965: l_on_hand_qty NUMBER;
5966: l_avail_to_reserve NUMBER;
5967: l_on_hand_qty2 NUMBER; -- INVCONV
5960: --l_session_id NUMBER := 0;
5961: --l_mrp_atp_rec MRP_ATP_PUB.ATP_Rec_Typ;
5962: --l_atp_supply_demand MRP_ATP_PUB.ATP_Supply_Demand_Typ;
5963: --l_atp_period MRP_ATP_PUB.ATP_Period_Typ;
5964: --l_atp_details MRP_ATP_PUB.ATP_Details_Typ;
5965: l_on_hand_qty NUMBER;
5966: l_avail_to_reserve NUMBER;
5967: l_on_hand_qty2 NUMBER; -- INVCONV
5968: l_avail_to_reserve2 NUMBER; -- INVCONV
6008:
6009:
6010: oe_debug_pub.add('1. Calling MRP API with session id '||l_session_id,1);
6011:
6012: MRP_ATP_PUB.Call_ATP
6013: ( p_session_id => l_session_id
6014: , p_atp_rec => l_mrp_atp_rec
6015: , x_atp_rec => l_mrp_atp_rec
6016: , x_atp_supply_demand => l_atp_supply_demand
6020: , x_msg_data => l_mrp_msg_data
6021: , x_msg_count => l_msg_count);
6022:
6023:
6024: oe_debug_pub.add('5. After Calling MRP_ATP_PUB.Call_ATP' ||
6025: x_return_status,1);
6026: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
6027: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
6028: END IF;
6165:
6166: IS
6167: l_msg_count NUMBER;
6168: --l_session_id NUMBER := 0;
6169: --l_mrp_atp_rec MRP_ATP_PUB.ATP_Rec_Typ;
6170: --l_atp_supply_demand MRP_ATP_PUB.ATP_Supply_Demand_Typ;
6171: --l_atp_period MRP_ATP_PUB.ATP_Period_Typ;
6172: --l_atp_details MRP_ATP_PUB.ATP_Details_Typ;
6173: l_mrp_msg_data VARCHAR2(200);
6166: IS
6167: l_msg_count NUMBER;
6168: --l_session_id NUMBER := 0;
6169: --l_mrp_atp_rec MRP_ATP_PUB.ATP_Rec_Typ;
6170: --l_atp_supply_demand MRP_ATP_PUB.ATP_Supply_Demand_Typ;
6171: --l_atp_period MRP_ATP_PUB.ATP_Period_Typ;
6172: --l_atp_details MRP_ATP_PUB.ATP_Details_Typ;
6173: l_mrp_msg_data VARCHAR2(200);
6174: l_old_reserved_quantity NUMBER;
6167: l_msg_count NUMBER;
6168: --l_session_id NUMBER := 0;
6169: --l_mrp_atp_rec MRP_ATP_PUB.ATP_Rec_Typ;
6170: --l_atp_supply_demand MRP_ATP_PUB.ATP_Supply_Demand_Typ;
6171: --l_atp_period MRP_ATP_PUB.ATP_Period_Typ;
6172: --l_atp_details MRP_ATP_PUB.ATP_Details_Typ;
6173: l_mrp_msg_data VARCHAR2(200);
6174: l_old_reserved_quantity NUMBER;
6175: l_qty_to_reserve NUMBER;
6168: --l_session_id NUMBER := 0;
6169: --l_mrp_atp_rec MRP_ATP_PUB.ATP_Rec_Typ;
6170: --l_atp_supply_demand MRP_ATP_PUB.ATP_Supply_Demand_Typ;
6171: --l_atp_period MRP_ATP_PUB.ATP_Period_Typ;
6172: --l_atp_details MRP_ATP_PUB.ATP_Details_Typ;
6173: l_mrp_msg_data VARCHAR2(200);
6174: l_old_reserved_quantity NUMBER;
6175: l_qty_to_reserve NUMBER;
6176:
6222: l_session_id := Get_Session_Id;
6223:
6224: oe_debug_pub.add('1. Calling MRP API with session id '||l_session_id,1);
6225:
6226: MRP_ATP_PUB.Call_ATP
6227: ( p_session_id => l_session_id
6228: , p_atp_rec => l_mrp_atp_rec
6229: , x_atp_rec => l_mrp_atp_rec
6230: , x_atp_supply_demand => l_atp_supply_demand
6233: , x_return_status => x_return_status
6234: , x_msg_data => l_mrp_msg_data
6235: , x_msg_count => l_msg_count);
6236:
6237: oe_debug_pub.add('1. After Calling MRP_ATP_PUB.Call_ATP' ||
6238: x_return_status,1);
6239: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
6240: oe_debug_pub.add('Error is' || l_mrp_msg_data,1);
6241: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
6473:
6474: l_msg_count NUMBER;
6475: --l_msg_data VARCHAR2(2000);
6476: --l_session_id NUMBER := 0;
6477: --l_mrp_atp_rec MRP_ATP_PUB.ATP_Rec_Typ;
6478: --l_atp_supply_demand MRP_ATP_PUB.ATP_Supply_Demand_Typ;
6479: --l_atp_period MRP_ATP_PUB.ATP_Period_Typ;
6480: --l_atp_details MRP_ATP_PUB.ATP_Details_Typ;
6481: l_mrp_msg_data VARCHAR2(200);
6474: l_msg_count NUMBER;
6475: --l_msg_data VARCHAR2(2000);
6476: --l_session_id NUMBER := 0;
6477: --l_mrp_atp_rec MRP_ATP_PUB.ATP_Rec_Typ;
6478: --l_atp_supply_demand MRP_ATP_PUB.ATP_Supply_Demand_Typ;
6479: --l_atp_period MRP_ATP_PUB.ATP_Period_Typ;
6480: --l_atp_details MRP_ATP_PUB.ATP_Details_Typ;
6481: l_mrp_msg_data VARCHAR2(200);
6482: l_qty_to_unreserve NUMBER;
6475: --l_msg_data VARCHAR2(2000);
6476: --l_session_id NUMBER := 0;
6477: --l_mrp_atp_rec MRP_ATP_PUB.ATP_Rec_Typ;
6478: --l_atp_supply_demand MRP_ATP_PUB.ATP_Supply_Demand_Typ;
6479: --l_atp_period MRP_ATP_PUB.ATP_Period_Typ;
6480: --l_atp_details MRP_ATP_PUB.ATP_Details_Typ;
6481: l_mrp_msg_data VARCHAR2(200);
6482: l_qty_to_unreserve NUMBER;
6483: l_qty2_to_unreserve NUMBER; -- INVCONV
6476: --l_session_id NUMBER := 0;
6477: --l_mrp_atp_rec MRP_ATP_PUB.ATP_Rec_Typ;
6478: --l_atp_supply_demand MRP_ATP_PUB.ATP_Supply_Demand_Typ;
6479: --l_atp_period MRP_ATP_PUB.ATP_Period_Typ;
6480: --l_atp_details MRP_ATP_PUB.ATP_Details_Typ;
6481: l_mrp_msg_data VARCHAR2(200);
6482: l_qty_to_unreserve NUMBER;
6483: l_qty2_to_unreserve NUMBER; -- INVCONV
6484: --
6540: -- Call ATP
6541:
6542: oe_debug_pub.add('1. Calling MRP API with session id '||l_session_id,1);
6543:
6544: MRP_ATP_PUB.Call_ATP
6545: ( p_session_id => l_session_id
6546: , p_atp_rec => l_mrp_atp_rec
6547: , x_atp_rec => l_mrp_atp_rec
6548: , x_atp_supply_demand => l_atp_supply_demand
6551: , x_return_status => x_return_status
6552: , x_msg_data => l_mrp_msg_data
6553: , x_msg_count => l_msg_count);
6554:
6555: oe_debug_pub.add('2. After Calling MRP_ATP_PUB.Call_ATP' ||
6556: x_return_status,1);
6557:
6558: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
6559: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
6636: IS
6637: l_msg_count NUMBER;
6638: l_msg_data VARCHAR2(2000);
6639: l_session_id NUMBER := 0;
6640: l_mrp_atp_rec MRP_ATP_PUB.ATP_Rec_Typ;
6641: l_out_mrp_atp_rec MRP_ATP_PUB.ATP_Rec_Typ;
6642: l_atp_supply_demand MRP_ATP_PUB.ATP_Supply_Demand_Typ;
6643: l_atp_period MRP_ATP_PUB.ATP_Period_Typ;
6644: l_atp_details MRP_ATP_PUB.ATP_Details_Typ;
6637: l_msg_count NUMBER;
6638: l_msg_data VARCHAR2(2000);
6639: l_session_id NUMBER := 0;
6640: l_mrp_atp_rec MRP_ATP_PUB.ATP_Rec_Typ;
6641: l_out_mrp_atp_rec MRP_ATP_PUB.ATP_Rec_Typ;
6642: l_atp_supply_demand MRP_ATP_PUB.ATP_Supply_Demand_Typ;
6643: l_atp_period MRP_ATP_PUB.ATP_Period_Typ;
6644: l_atp_details MRP_ATP_PUB.ATP_Details_Typ;
6645: -- Bug 1955004
6638: l_msg_data VARCHAR2(2000);
6639: l_session_id NUMBER := 0;
6640: l_mrp_atp_rec MRP_ATP_PUB.ATP_Rec_Typ;
6641: l_out_mrp_atp_rec MRP_ATP_PUB.ATP_Rec_Typ;
6642: l_atp_supply_demand MRP_ATP_PUB.ATP_Supply_Demand_Typ;
6643: l_atp_period MRP_ATP_PUB.ATP_Period_Typ;
6644: l_atp_details MRP_ATP_PUB.ATP_Details_Typ;
6645: -- Bug 1955004
6646: l_scheduling_level_code VARCHAR2(30);
6639: l_session_id NUMBER := 0;
6640: l_mrp_atp_rec MRP_ATP_PUB.ATP_Rec_Typ;
6641: l_out_mrp_atp_rec MRP_ATP_PUB.ATP_Rec_Typ;
6642: l_atp_supply_demand MRP_ATP_PUB.ATP_Supply_Demand_Typ;
6643: l_atp_period MRP_ATP_PUB.ATP_Period_Typ;
6644: l_atp_details MRP_ATP_PUB.ATP_Details_Typ;
6645: -- Bug 1955004
6646: l_scheduling_level_code VARCHAR2(30);
6647:
6640: l_mrp_atp_rec MRP_ATP_PUB.ATP_Rec_Typ;
6641: l_out_mrp_atp_rec MRP_ATP_PUB.ATP_Rec_Typ;
6642: l_atp_supply_demand MRP_ATP_PUB.ATP_Supply_Demand_Typ;
6643: l_atp_period MRP_ATP_PUB.ATP_Period_Typ;
6644: l_atp_details MRP_ATP_PUB.ATP_Details_Typ;
6645: -- Bug 1955004
6646: l_scheduling_level_code VARCHAR2(30);
6647:
6648: --
6698: IF l_debug_level > 0 THEN
6699: oe_debug_pub.add( '4. CALLING MRP API WITH SESSION ID '||L_SESSION_ID , 1 ) ;
6700: END IF;
6701:
6702: MRP_ATP_PUB.Call_ATP
6703: ( p_session_id => l_session_id
6704: , p_atp_rec => l_mrp_atp_rec
6705: , x_atp_rec => l_out_mrp_atp_rec
6706: , x_atp_supply_demand => l_atp_supply_demand
6710: , x_msg_data => l_msg_data
6711: , x_msg_count => l_msg_count);
6712:
6713: IF l_debug_level > 0 THEN
6714: oe_debug_pub.add( '4. AFTER CALLING MRP_ATP_PUB.CALL_ATP' || X_RETURN_STATUS , 1 ) ;
6715: END IF;
6716:
6717: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
6718: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
12416: IS
12417: l_msg_count NUMBER;
12418: l_mrp_msg_data VARCHAR2(2000);
12419: l_session_id NUMBER := 0;
12420: l_mrp_atp_rec MRP_ATP_PUB.ATP_Rec_Typ;
12421: l_out_mrp_atp_rec MRP_ATP_PUB.ATP_Rec_Typ;
12422: l_atp_supply_demand MRP_ATP_PUB.ATP_Supply_Demand_Typ;
12423: l_atp_period MRP_ATP_PUB.ATP_Period_Typ;
12424: l_atp_details MRP_ATP_PUB.ATP_Details_Typ;
12417: l_msg_count NUMBER;
12418: l_mrp_msg_data VARCHAR2(2000);
12419: l_session_id NUMBER := 0;
12420: l_mrp_atp_rec MRP_ATP_PUB.ATP_Rec_Typ;
12421: l_out_mrp_atp_rec MRP_ATP_PUB.ATP_Rec_Typ;
12422: l_atp_supply_demand MRP_ATP_PUB.ATP_Supply_Demand_Typ;
12423: l_atp_period MRP_ATP_PUB.ATP_Period_Typ;
12424: l_atp_details MRP_ATP_PUB.ATP_Details_Typ;
12425: l_on_hand_qty NUMBER;
12418: l_mrp_msg_data VARCHAR2(2000);
12419: l_session_id NUMBER := 0;
12420: l_mrp_atp_rec MRP_ATP_PUB.ATP_Rec_Typ;
12421: l_out_mrp_atp_rec MRP_ATP_PUB.ATP_Rec_Typ;
12422: l_atp_supply_demand MRP_ATP_PUB.ATP_Supply_Demand_Typ;
12423: l_atp_period MRP_ATP_PUB.ATP_Period_Typ;
12424: l_atp_details MRP_ATP_PUB.ATP_Details_Typ;
12425: l_on_hand_qty NUMBER;
12426: l_avail_to_reserve NUMBER;
12419: l_session_id NUMBER := 0;
12420: l_mrp_atp_rec MRP_ATP_PUB.ATP_Rec_Typ;
12421: l_out_mrp_atp_rec MRP_ATP_PUB.ATP_Rec_Typ;
12422: l_atp_supply_demand MRP_ATP_PUB.ATP_Supply_Demand_Typ;
12423: l_atp_period MRP_ATP_PUB.ATP_Period_Typ;
12424: l_atp_details MRP_ATP_PUB.ATP_Details_Typ;
12425: l_on_hand_qty NUMBER;
12426: l_avail_to_reserve NUMBER;
12427: l_on_hand_qty2 NUMBER; -- INVCONV
12420: l_mrp_atp_rec MRP_ATP_PUB.ATP_Rec_Typ;
12421: l_out_mrp_atp_rec MRP_ATP_PUB.ATP_Rec_Typ;
12422: l_atp_supply_demand MRP_ATP_PUB.ATP_Supply_Demand_Typ;
12423: l_atp_period MRP_ATP_PUB.ATP_Period_Typ;
12424: l_atp_details MRP_ATP_PUB.ATP_Details_Typ;
12425: l_on_hand_qty NUMBER;
12426: l_avail_to_reserve NUMBER;
12427: l_on_hand_qty2 NUMBER; -- INVCONV
12428: l_avail_to_reserve2 NUMBER; -- invconv
12463: IF l_debug_level > 0 THEN
12464: oe_debug_pub.add( 'CALLING MRP API WITH SESSION ID '||L_SESSION_ID , 1 ) ;
12465: END IF;
12466:
12467: MRP_ATP_PUB.Call_ATP
12468: ( p_session_id => l_session_id
12469: , p_atp_rec => l_mrp_atp_rec
12470: , x_atp_rec => l_out_mrp_atp_rec
12471: , x_atp_supply_demand => l_atp_supply_demand
12476: , x_msg_count => l_msg_count);
12477:
12478:
12479: IF l_debug_level > 0 THEN
12480: oe_debug_pub.add( ' AFTER CALLING MRP_ATP_PUB.CALL_ATP ' || X_RETURN_STATUS , 1 ) ;
12481: END IF;
12482:
12483: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
12484: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
13038: l_entity VARCHAR2(30);
13039:
13040: -- MRP API variables
13041: l_session_id NUMBER := 0;
13042: l_mrp_atp_rec MRP_ATP_PUB.ATP_Rec_Typ;
13043: l_out_mtp_atp_rec MRP_ATP_PUB.ATP_Rec_Typ;
13044: l_atp_supply_demand MRP_ATP_PUB.ATP_Supply_Demand_Typ;
13045: l_atp_period MRP_ATP_PUB.ATP_Period_Typ;
13046: l_atp_details MRP_ATP_PUB.ATP_Details_Typ;
13039:
13040: -- MRP API variables
13041: l_session_id NUMBER := 0;
13042: l_mrp_atp_rec MRP_ATP_PUB.ATP_Rec_Typ;
13043: l_out_mtp_atp_rec MRP_ATP_PUB.ATP_Rec_Typ;
13044: l_atp_supply_demand MRP_ATP_PUB.ATP_Supply_Demand_Typ;
13045: l_atp_period MRP_ATP_PUB.ATP_Period_Typ;
13046: l_atp_details MRP_ATP_PUB.ATP_Details_Typ;
13047: mrp_msg_data VARCHAR2(200);
13040: -- MRP API variables
13041: l_session_id NUMBER := 0;
13042: l_mrp_atp_rec MRP_ATP_PUB.ATP_Rec_Typ;
13043: l_out_mtp_atp_rec MRP_ATP_PUB.ATP_Rec_Typ;
13044: l_atp_supply_demand MRP_ATP_PUB.ATP_Supply_Demand_Typ;
13045: l_atp_period MRP_ATP_PUB.ATP_Period_Typ;
13046: l_atp_details MRP_ATP_PUB.ATP_Details_Typ;
13047: mrp_msg_data VARCHAR2(200);
13048: l_on_hand_qty NUMBER;
13041: l_session_id NUMBER := 0;
13042: l_mrp_atp_rec MRP_ATP_PUB.ATP_Rec_Typ;
13043: l_out_mtp_atp_rec MRP_ATP_PUB.ATP_Rec_Typ;
13044: l_atp_supply_demand MRP_ATP_PUB.ATP_Supply_Demand_Typ;
13045: l_atp_period MRP_ATP_PUB.ATP_Period_Typ;
13046: l_atp_details MRP_ATP_PUB.ATP_Details_Typ;
13047: mrp_msg_data VARCHAR2(200);
13048: l_on_hand_qty NUMBER;
13049: l_avail_to_reserve NUMBER;
13042: l_mrp_atp_rec MRP_ATP_PUB.ATP_Rec_Typ;
13043: l_out_mtp_atp_rec MRP_ATP_PUB.ATP_Rec_Typ;
13044: l_atp_supply_demand MRP_ATP_PUB.ATP_Supply_Demand_Typ;
13045: l_atp_period MRP_ATP_PUB.ATP_Period_Typ;
13046: l_atp_details MRP_ATP_PUB.ATP_Details_Typ;
13047: mrp_msg_data VARCHAR2(200);
13048: l_on_hand_qty NUMBER;
13049: l_avail_to_reserve NUMBER;
13050: l_out_atp_tbl OE_ATP.atp_tbl_type;
13215: IF l_debug_level > 0 THEN
13216: oe_debug_pub.add( 'SPLIT CALLING MRP API WITH SESSION ID '||L_SESSION_ID , 1 ) ;
13217: END IF;
13218:
13219: MRP_ATP_PUB.Call_ATP
13220: ( p_session_id => l_session_id
13221: , p_atp_rec => l_mrp_atp_rec
13222: , x_atp_rec => l_out_mtp_atp_rec
13223: , x_atp_supply_demand => l_atp_supply_demand
13228: , x_msg_count => l_msg_count);
13229:
13230:
13231: IF l_debug_level > 0 THEN
13232: oe_debug_pub.add( 'SPLIT. AFTER CALLING MRP_ATP_PUB.CALL_ATP' || L_RETURN_STATUS , 1 ) ;
13233: END IF;
13234:
13235: IF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
13236: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
15753:
15754: IS
15755: l_msg_count NUMBER;
15756: l_session_id NUMBER := 0;
15757: l_mrp_atp_rec MRP_ATP_PUB.ATP_Rec_Typ;
15758: l_out_mrp_atp_rec MRP_ATP_PUB.ATP_Rec_Typ;
15759: l_atp_supply_demand MRP_ATP_PUB.ATP_Supply_Demand_Typ;
15760: l_atp_period MRP_ATP_PUB.ATP_Period_Typ;
15761: l_atp_details MRP_ATP_PUB.ATP_Details_Typ;
15754: IS
15755: l_msg_count NUMBER;
15756: l_session_id NUMBER := 0;
15757: l_mrp_atp_rec MRP_ATP_PUB.ATP_Rec_Typ;
15758: l_out_mrp_atp_rec MRP_ATP_PUB.ATP_Rec_Typ;
15759: l_atp_supply_demand MRP_ATP_PUB.ATP_Supply_Demand_Typ;
15760: l_atp_period MRP_ATP_PUB.ATP_Period_Typ;
15761: l_atp_details MRP_ATP_PUB.ATP_Details_Typ;
15762: l_mrp_msg_data VARCHAR2(200);
15755: l_msg_count NUMBER;
15756: l_session_id NUMBER := 0;
15757: l_mrp_atp_rec MRP_ATP_PUB.ATP_Rec_Typ;
15758: l_out_mrp_atp_rec MRP_ATP_PUB.ATP_Rec_Typ;
15759: l_atp_supply_demand MRP_ATP_PUB.ATP_Supply_Demand_Typ;
15760: l_atp_period MRP_ATP_PUB.ATP_Period_Typ;
15761: l_atp_details MRP_ATP_PUB.ATP_Details_Typ;
15762: l_mrp_msg_data VARCHAR2(200);
15763: l_old_line_rec OE_Order_Pub.Line_Rec_Type;
15756: l_session_id NUMBER := 0;
15757: l_mrp_atp_rec MRP_ATP_PUB.ATP_Rec_Typ;
15758: l_out_mrp_atp_rec MRP_ATP_PUB.ATP_Rec_Typ;
15759: l_atp_supply_demand MRP_ATP_PUB.ATP_Supply_Demand_Typ;
15760: l_atp_period MRP_ATP_PUB.ATP_Period_Typ;
15761: l_atp_details MRP_ATP_PUB.ATP_Details_Typ;
15762: l_mrp_msg_data VARCHAR2(200);
15763: l_old_line_rec OE_Order_Pub.Line_Rec_Type;
15764: l_new_line_rec OE_Order_Pub.Line_Rec_Type;
15757: l_mrp_atp_rec MRP_ATP_PUB.ATP_Rec_Typ;
15758: l_out_mrp_atp_rec MRP_ATP_PUB.ATP_Rec_Typ;
15759: l_atp_supply_demand MRP_ATP_PUB.ATP_Supply_Demand_Typ;
15760: l_atp_period MRP_ATP_PUB.ATP_Period_Typ;
15761: l_atp_details MRP_ATP_PUB.ATP_Details_Typ;
15762: l_mrp_msg_data VARCHAR2(200);
15763: l_old_line_rec OE_Order_Pub.Line_Rec_Type;
15764: l_new_line_rec OE_Order_Pub.Line_Rec_Type;
15765:
15791: IF l_debug_level > 0 THEN
15792: oe_debug_pub.add( '1. CALLING MRP API WITH SESSION ID '||L_SESSION_ID , 1 ) ;
15793: END IF;
15794:
15795: MRP_ATP_PUB.Call_ATP
15796: ( p_session_id => l_session_id
15797: , p_atp_rec => l_mrp_atp_rec
15798: , x_atp_rec => l_out_mrp_atp_rec
15799: , x_atp_supply_demand => l_atp_supply_demand
15803: , x_msg_data => l_mrp_msg_data
15804: , x_msg_count => l_msg_count);
15805:
15806: IF l_debug_level > 0 THEN
15807: oe_debug_pub.add( '3. AFTER CALLING MRP_ATP_PUB.CALL_ATP' || X_RETURN_STATUS , 1 ) ;
15808: END IF;
15809:
15810: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
15811: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;