[Home] [Help]
857: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
858: END IF;
859:
860: -- dsting setproc
861: MSC_ATP_PROC.Initialize_Set_Processing(p_atp_table);
862: l_set_status := null;
863:
864: WHILE (k IS NOT NULL) LOOP
865:
1060: msc_sch_wb.atp_debug('Schedule: Stmt = '||l_stmt);
1061: END IF;
1062:
1063:
1064: MSC_ATP_PROC.Atp_Sources(p_instance_id,
1065: l_plan_id,
1066: l_requested_item_id,
1067: p_atp_table.Organization_Id(k),
1068: p_atp_table.Customer_Id(k),
1083: IF PG_DEBUG in ('Y', 'C') THEN
1084: msc_sch_wb.atp_debug('Schedule: Stmt = '||l_stmt);
1085: END IF;
1086:
1087: MSC_ATP_PROC.Atp_Sources(p_instance_id,
1088: l_plan_id,
1089: l_requested_item_id,
1090: p_atp_table.Organization_Id(k),
1091: p_atp_table.Customer_Id(k),
1306:
1307: -- dsting setproc
1308: -- 2902129
1309: -- if l_ship_count > 1 then
1310: MSC_ATP_PROC.Initialize_Set_Processing(l_atp_table);
1311: l_set_status := null;
1312: -- end if;
1313:
1314: -- i is the index for the record of tables in l_atp_table
1435: l_item_attribute_rec.parent_bom_item_type := 4;
1436: l_item_attribute_rec.parent_comp_flag := null;
1437: l_item_attribute_rec.parent_repl_ord_flag := 'N';
1438: --e_cto_rearch
1439: MSC_ATP_PROC.get_item_attributes(p_instance_id,
1440: l_plan_id,
1441: l_requested_item_id,
1442: l_process_org_id,
1443: l_item_attribute_rec);
1510: l_atp_table.customer_country(1) IS NULL) THEN --2814895
1511: IF PG_DEBUG in ('Y', 'C') THEN
1512: msc_sch_wb.atp_debug('Schedule: ' || 'Inside Org code');
1513: END IF;
1514: MSC_ATP_PROC.get_delivery_lead_time(
1515: l_sourcing_org_id,
1516: NULL, -- from location id
1517: p_instance_id,
1518: -- l_atp_table.internal_org_id(i), -- Bug 3515520
1535: ELSIF (l_atp_table.customer_site_id(1) IS NOT NULL) THEN
1536: IF PG_DEBUG in ('Y', 'C') THEN
1537: msc_sch_wb.atp_debug('Schedule: ' || 'Inside customer_site_id code');
1538: END IF;
1539: MSC_ATP_PROC.get_delivery_lead_time(
1540: l_sourcing_org_id,
1541: NULL, -- from location id
1542: p_instance_id,
1543: --l_atp_table.organization_id(i), -- Bug 3515520
1560: ELSIF ( l_atp_table.party_site_id(1) IS NOT NULL ) THEN --2814895
1561: IF PG_DEBUG in ('Y', 'C') THEN
1562: msc_sch_wb.atp_debug('Schedule: ' || 'Inside party_site_id code');
1563: END IF;
1564: MSC_ATP_PROC.get_delivery_lead_time(
1565: l_sourcing_org_id,
1566: NULL, -- from location id
1567: p_instance_id,
1568: --l_atp_table.organization_id(i), -- Bug 3515520
1585: ELSIF ( l_atp_table.customer_country(1) IS NOT NULL) THEN --2814895
1586: IF PG_DEBUG in ('Y', 'C') THEN
1587: msc_sch_wb.atp_debug('Schedule: ' || 'Inside address parameter code');
1588: END IF;
1589: MSC_ATP_PROC.get_delivery_lead_time(
1590: l_sourcing_org_id,
1591: NULL, -- from location id
1592: p_instance_id,
1593: --l_atp_table.organization_id(i), -- Bug 3515520
1798: MSC_CALENDAR.OMC);
1799: */
1800: -- Bug 2783787 fix involving removing the call to obtain org defaults
1801: -- restored here
1802: MSC_ATP_PROC.get_global_org_info(p_instance_id,
1803: l_process_org_id);
1804: l_manufacturing_cal_code := MSC_ATP_PVT.G_ORG_INFO_REC.cal_code;
1805: -- End ATP4drp
1806: ELSE
1944:
1945:
1946: IF l_atp_flag <> 'N' OR l_atp_comp_flag <> 'N' THEN
1947: /*
1948: MSC_ATP_PROC.Get_Plan_Info(p_instance_id,
1949: --2152184
1950: l_process_item_id,
1951: --l_requested_item_id,
1952: l_process_org_id,
1954: l_plan_id,
1955: l_assign_set_id);
1956:
1957: -- code changes for bug 2392456 starts
1958: MSC_ATP_PROC.Get_Plan_Info(p_instance_id,
1959: --2152184
1960: l_process_item_id,
1961: --l_requested_item_id,
1962: l_process_org_id,
2028: --bug 4604500: pass correct request item it when match is found.
2029: l_requested_item_id := l_atp_table.match_item_id(i);
2030:
2031: --get item attributes of the matched item
2032: MSC_ATP_PROC.get_item_attributes(p_instance_id,
2033: --3917625: Read attributes from correct plan
2034: --l_plan_id,
2035: MSC_ATP_PVT.G_PLAN_INFO_REC.plan_id,
2036: l_atp_table.match_item_id(i),
2287: l_atp_rec.combined_requested_date_qty := NULL;
2288:
2289: -- need to do uom quantity conversion
2290:
2291: MSC_ATP_PROC.inv_primary_uom_conversion(p_instance_id,
2292: l_sources.Organization_Id(j),
2293: l_process_item_id,
2294: l_atp_table.Quantity_UOM(i),
2295: l_quantity_uom,
2420: msc_sch_wb.atp_debug('Schedule: ' || 'l_atp_rec.requested_ship_date: ' || l_atp_rec.requested_ship_date);
2421: msc_sch_wb.atp_debug('Schedule: ' || 'l_request_date_qty: ' || l_request_date_qty);
2422: END IF;
2423: --for OPTIONAL FW PASS cases initialize it to ITF
2424: MSC_ATP_PROC.get_infinite_time_fence_date(l_atp_rec.instance_id,
2425: l_atp_rec.request_item_id,
2426: l_atp_rec.organization_id,
2427: l_plan_id,
2428: l_last_date,
2653: -- 2783787 (ssurendr) Null demand class in request should be considered as "Others"
2654: /*
2655: IF (MSC_ATP_PVT.G_ALLOCATED_ATP = 'Y') AND
2656: (l_atp_table.Demand_Class(i) IS NULL) THEN
2657: MSC_ATP_PROC.get_global_org_info(l_atp_rec.instance_id,
2658: l_atp_rec.organization_id);
2659: l_default_atp_rule_id := G_ORG_INFO_REC.default_atp_rule_id;
2660: l_calendar_code := G_ORG_INFO_REC.cal_code;
2661: l_calendar_exception_set_id := G_ORG_INFO_REC.cal_exception_set_id;
2807:
2808: -----------
2809: /* Modularize Item and Org Info */
2810: -- Information already obtained.
2811: /*MSC_ATP_PROC.get_global_item_info( p_instance_id,
2812: -1,
2813: l_atp_rec.inventory_item_id,
2814: l_atp_rec.organization_id );
2815: */
3342: l_atp_rec.requested_date_quantity :=
3343: l_atp_rec.available_quantity;
3344: END IF;
3345:
3346: MSC_ATP_PROC.Details_Output(l_future_atp_period,
3347: l_future_atp_supply_demand,
3348: l_atp_period,
3349: l_atp_supply_demand,
3350: l_return_status);
3916: l_atp_table.Quantity_UOM(i) := l_atp_rec.quantity_uom;
3917: l_atp_table.Quantity_Ordered(i) := l_atp_rec.quantity_ordered;
3918:
3919: /* Modularize Item and Org Info */
3920: MSC_ATP_PROC.get_global_org_info (p_instance_id,
3921: l_atp_rec.organization_id);
3922: l_atp_table.Source_Organization_Code(i) := G_ORG_INFO_REC.org_code;
3923: /*l_atp_table.Source_Organization_Code(i):=
3924: MSC_ATP_FUNC.get_org_code(p_instance_id, l_atp_rec.organization_id);
3990: l_curr_atp_period := l_null_atp_period;
3991: l_curr_atp_supply_demand := l_null_atp_supply_demand;
3992: END IF;
3993:
3994: MSC_ATP_PROC.Details_Output(l_atp_period,
3995: l_atp_supply_demand,
3996: l_curr_atp_period,
3997: l_curr_atp_supply_demand,
3998: l_return_status);
4161: msc_sch_wb.atp_debug('requested_ship_date: ' || l_atp_table.requested_ship_date(i));
4162: END IF;
4163: --bug3439591 end
4164: -- dsting setproc
4165: MSC_ATP_PROC.Process_Set_Line(l_atp_table, i, l_line_status);
4166: Process_Time_Stamp_Errors(l_atp_table,i);
4167: msc_sch_wb.atp_debug('ship_date:(After) ' || to_char(l_atp_table.ship_date(i), 'DD-MON-YYYY HH24:MI:SS'));
4168: msc_sch_wb.atp_debug('Arrival_date:(After) ' || to_char(l_atp_table.arrival_date(i), 'DD-MON-YYYY HH24:MI:SS'));
4169: IF l_ship_count = 1 and l_arrival_count = 1 THEN
4339:
4340: -- this is a set, make sure this set is successful
4341:
4342: -- dsting setproc
4343: MSC_ATP_PROC.Process_Set_Dates_Errors(l_atp_table, 'D', l_set_status);
4344: -- 2902265
4345: l_overall_status := l_set_status;
4346: l_group_date := l_atp_table.group_ship_date(1);
4347: IF l_set_status = ALLSUCCESS THEN
4352: IF PG_DEBUG in ('Y', 'C') THEN
4353: msc_sch_wb.atp_debug('Schedule: ' || 'stmt17');
4354: END IF;
4355:
4356: MSC_ATP_PROC.Update_Set_SD_Dates(l_atp_table,l_req_arr_date);
4357: END IF;
4358: l_stmt := 320;
4359: END IF;
4360:
4473: END IF;
4474: -- Bug 2266808 : krajan
4475: -- dsting setproc
4476: IF l_ship_count > 1 AND i = l_ship_count THEN
4477: MSC_ATP_PROC.Process_Set_Dates_Errors(l_atp_table, 'D', l_set_status);
4478: l_group_date := l_atp_table.group_ship_date(1);
4479: END IF;
4480:
4481: --IF i <> l_ship_count OR (l_atp_table.Action(i) = ATPQUERY AND l_ship_count =1)
4612: l_demand_class_atp_flag.trim(l_fst_src_pegging_ids.count - k + 1);
4613: END IF;
4614:
4615: msc_sch_wb.atp_debug('adding to fst_src_peg p');
4616: MSC_ATP_PROC.number_arr_cat(l_fst_src_pegging_ids, MSC_ATP_PVT.G_PEGGING_FOR_SET);
4617: msc_sch_wb.atp_debug('adding to fst_src_peg d');
4618: MSC_ATP_PROC.date_arr_cat(l_req_atp_date, MSC_ATP_PVT.G_REQ_ATP_DATE);
4619: msc_sch_wb.atp_debug('adding to fst_src_peg q');
4620: MSC_ATP_PROC.number_arr_cat(l_req_date_qty, MSC_ATP_PVT.G_REQ_DATE_QTY);
4614:
4615: msc_sch_wb.atp_debug('adding to fst_src_peg p');
4616: MSC_ATP_PROC.number_arr_cat(l_fst_src_pegging_ids, MSC_ATP_PVT.G_PEGGING_FOR_SET);
4617: msc_sch_wb.atp_debug('adding to fst_src_peg d');
4618: MSC_ATP_PROC.date_arr_cat(l_req_atp_date, MSC_ATP_PVT.G_REQ_ATP_DATE);
4619: msc_sch_wb.atp_debug('adding to fst_src_peg q');
4620: MSC_ATP_PROC.number_arr_cat(l_req_date_qty, MSC_ATP_PVT.G_REQ_DATE_QTY);
4621: msc_sch_wb.atp_debug('adding to fst_src_peg f');
4622: MSC_ATP_PROC.number_arr_cat(l_demand_class_atp_flag, MSC_ATP_PVT.G_DEMAND_CLASS_ATP_FLAG);
4616: MSC_ATP_PROC.number_arr_cat(l_fst_src_pegging_ids, MSC_ATP_PVT.G_PEGGING_FOR_SET);
4617: msc_sch_wb.atp_debug('adding to fst_src_peg d');
4618: MSC_ATP_PROC.date_arr_cat(l_req_atp_date, MSC_ATP_PVT.G_REQ_ATP_DATE);
4619: msc_sch_wb.atp_debug('adding to fst_src_peg q');
4620: MSC_ATP_PROC.number_arr_cat(l_req_date_qty, MSC_ATP_PVT.G_REQ_DATE_QTY);
4621: msc_sch_wb.atp_debug('adding to fst_src_peg f');
4622: MSC_ATP_PROC.number_arr_cat(l_demand_class_atp_flag, MSC_ATP_PVT.G_DEMAND_CLASS_ATP_FLAG);
4623:
4624: IF l_overall_status in (MSC_ATP_PVT.ALLSUCCESS,
4618: MSC_ATP_PROC.date_arr_cat(l_req_atp_date, MSC_ATP_PVT.G_REQ_ATP_DATE);
4619: msc_sch_wb.atp_debug('adding to fst_src_peg q');
4620: MSC_ATP_PROC.number_arr_cat(l_req_date_qty, MSC_ATP_PVT.G_REQ_DATE_QTY);
4621: msc_sch_wb.atp_debug('adding to fst_src_peg f');
4622: MSC_ATP_PROC.number_arr_cat(l_demand_class_atp_flag, MSC_ATP_PVT.G_DEMAND_CLASS_ATP_FLAG);
4623:
4624: IF l_overall_status in (MSC_ATP_PVT.ALLSUCCESS,
4625: MSC_ATP_PVT.ATP_REQ_DATE_FAIL,
4626: MSC_ATP_PVT.GROUPEL_ERROR,
4646: MSC_ATP_PVT.G_REMOVE_REQUEST_LEVEL_REC.REMOVE_DC_ATP_FLAG_REQUEST(l_count + m) := MSC_ATP_PVT.G_DEMAND_CLASS_ATP_FLAG(m);
4647: END LOOP;
4648: END IF;
4649: ELSE --3720018
4650: MSC_ATP_PROC.cleanup_set(p_instance_id,
4651: l_plan_id,
4652: MSC_ATP_PVT.G_PEGGING_FOR_SET,
4653: MSC_ATP_PVT.G_DEMAND_CLASS_ATP_FLAG);
4654: END IF; --3720018
4654: END IF; --3720018
4655: END IF; --3720018
4656: ELSE
4657: -- not using these in fst src peg, so always clean up
4658: MSC_ATP_PROC.cleanup_set(p_instance_id,
4659: l_plan_id,
4660: MSC_ATP_PVT.G_PEGGING_FOR_SET,
4661: MSC_ATP_PVT.G_DEMAND_CLASS_ATP_FLAG);
4662: END IF;
4751: IF MSC_ATP_PVT.G_INV_CTP = 4 THEN
4752: /* time_phased_atp use plan_id populated in l_atp_table.plan_id
4753: -- New procedure for obtaining plan data : Supplier Capacity Lead Time proj.
4754: -- (SCLT)
4755: MSC_ATP_PROC.get_global_plan_info(p_instance_id,
4756: l_atp_table.inventory_item_id(m),
4757: l_atp_table.organization_id(m),
4758: l_atp_table.demand_class(m));
4759:
4841: IF i = l_ship_count THEN
4842: l_temp_atp_table := l_atp_table;
4843: END IF;
4844:
4845: MSC_ATP_PROC.Details_Output(l_atp_period,
4846: l_atp_supply_demand,
4847: l_temp_atp_period,
4848: l_temp_atp_supply_demand,
4849: l_return_status);
4929: l_return_status );
4930:
4931: END IF;
4932:
4933: MSC_ATP_PROC.Details_Output(l_atp_period,
4934: l_atp_supply_demand,
4935: l_temp_atp_period,
4936: l_temp_atp_supply_demand,
4937: l_return_status);
5171: MSC_SATP_FUNC.Assign_Atp_Output_Rec(l_temp_atp_table,
5172: l_temp_arr_atp_table,
5173: x_return_status );
5174:
5175: MSC_ATP_PROC.Details_Output(l_temp_atp_period,
5176: l_temp_atp_supply_demand,
5177: l_temp_arr_atp_period,
5178: l_temp_arr_atp_supply_demand,
5179: x_return_status);
5181: MSC_SATP_FUNC.Assign_Atp_Output_Rec(l_temp_atp_table,
5182: x_atp_table,
5183: x_return_status );
5184:
5185: MSC_ATP_PROC.Details_Output(l_temp_atp_period,
5186: l_temp_atp_supply_demand,
5187: x_atp_period,
5188: x_atp_supply_demand,
5189: x_return_status);
5276: i,
5277: x_atp_table,
5278: l_return_status);
5279:
5280: MSC_ATP_PROC.Get_SD_Period_Rec(l_temp_arr_atp_period,
5281: l_temp_arr_atp_supply_demand,
5282: l_temp_arr_atp_table.Identifier(i),
5283: l_temp_arr_atp_table.Scenario_Id(i),
5284: 1,
5323: i,
5324: x_atp_table,
5325: l_return_status );
5326:
5327: MSC_ATP_PROC.Get_SD_Period_Rec(l_temp_arr_atp_period,
5328: l_temp_arr_atp_supply_demand,
5329: l_temp_arr_atp_table.Identifier(i),
5330: l_temp_arr_atp_table.Scenario_Id(i),
5331: 2,
5375: MSC_SATP_FUNC.Assign_Atp_Output_Rec(l_temp_arr_atp_table,
5376: x_atp_table,
5377: x_return_status );
5378:
5379: MSC_ATP_PROC.Details_Output(l_temp_arr_atp_period,
5380: l_temp_arr_atp_supply_demand,
5381: x_atp_period,
5382: x_atp_supply_demand,
5383: x_return_status);
5404: END IF;
5405: -- dsting setproc
5406:
5407: -- 2902129 delay set processing til here for arrival set
5408: MSC_ATP_PROC.Initialize_Set_Processing(x_atp_table);
5409: for k in 1..x_atp_table.action.count() loop
5410: MSC_ATP_PROC.Process_Set_Line(x_atp_table, k, l_line_status);
5411: end loop;
5412:
5406:
5407: -- 2902129 delay set processing til here for arrival set
5408: MSC_ATP_PROC.Initialize_Set_Processing(x_atp_table);
5409: for k in 1..x_atp_table.action.count() loop
5410: MSC_ATP_PROC.Process_Set_Line(x_atp_table, k, l_line_status);
5411: end loop;
5412:
5413: MSC_ATP_PROC.Process_Set_Dates_Errors(x_atp_table, 'D', l_set_status);
5414: l_group_date := x_atp_table.group_arrival_date(1);
5409: for k in 1..x_atp_table.action.count() loop
5410: MSC_ATP_PROC.Process_Set_Line(x_atp_table, k, l_line_status);
5411: end loop;
5412:
5413: MSC_ATP_PROC.Process_Set_Dates_Errors(x_atp_table, 'D', l_set_status);
5414: l_group_date := x_atp_table.group_arrival_date(1);
5415:
5416: -- IF l_set_status <> ALLSUCCESS THEN
5417: IF l_set_status <> ALLSUCCESS OR x_atp_table.action(1) = ATPQUERY
5421: msc_sch_wb.atp_debug('Schedule: ' || 'before removing the data for arrival set');
5422: END IF;
5423:
5424: -- 2902265
5425: MSC_ATP_PROC.cleanup_set(p_instance_id,
5426: l_plan_id,
5427: l_fst_src_pegging_ids,
5428: l_demand_class_atp_flag);
5429: /*
5458: MSC_ATP_PVT.G_DEMAND_CLASS_ATP_FLAG := l_demand_class_atp_flag;
5459: MSC_ATP_PVT.G_REQ_ATP_DATE := l_req_atp_DATE;
5460: MSC_ATP_PVT.G_REQ_DATE_QTY := l_req_date_qty;
5461:
5462: MSC_ATP_PROC.Update_Set_SD_Dates(x_atp_table,l_req_arr_date); --Plan by request date
5463: END IF;
5464:
5465: FOR i in 1..x_atp_table.Action.COUNT LOOP
5466: x_atp_table.Scenario_Id(i) := 1;
5933: l_plan_id, UNDO, MSC_ATP_PVT.G_DEMAND_CLASS_ATP_FLAG(i),l_return_status);
5934: END LOOP;
5935:
5936: -- 2902265
5937: MSC_ATP_PROC.cleanup_set(p_instance_id,
5938: l_plan_id,
5939: l_fst_src_pegging_ids,
5940: l_demand_class_atp_flag);
5941:
7088: END IF;
7089: MSC_ATP_PVT.G_ITEM_INFO_REC.organization_id := null;
7090: END IF;
7091: --e_cto_rearch
7092: MSC_ATP_PROC.get_global_item_info(p_atp_record.instance_id,
7093: --3917625: read item attributes from planned data
7094: -- -1,
7095: p_plan_id,
7096: l_request_item_id,
7112: PF_ITEM_INFO_REC.parent_atp_flag := p_atp_record.parent_atp_flag;
7113: PF_ITEM_INFO_REC.parent_comp_flag := p_atp_record.parent_atp_comp_flag;
7114: PF_ITEM_INFO_REC.parent_repl_ord_flag := p_atp_record.parent_repl_order_flag;
7115: --e_cto_rearch
7116: MSC_ATP_PROC.get_item_attributes(p_atp_record.instance_id,
7117: --3917625: Read item attribute from plani data
7118: -- -1,
7119: p_plan_id,
7120: l_family_item_id,
7241: END IF;
7242:
7243: -- cchen : changes for ship method
7244:
7245: MSC_ATP_PROC.get_delivery_lead_time(p_atp_record.organization_id,
7246: NULL, -- from location id
7247: p_atp_record.instance_id,
7248: p_atp_record.to_organization_id,
7249: l_location_id, --p_atp_record.to_location_id, --2814895
7854:
7855: /* Modularize Item and Org Info */
7856: -- Re-Use info instead of making unnecessary call.
7857: l_inv_item_name := C_ITEM_INFO_REC.item_name;
7858: MSC_ATP_PROC.get_global_org_info (p_atp_record.instance_id,
7859: p_atp_record.organization_id);
7860: l_org_code := G_ORG_INFO_REC.org_code;
7861:
7862: l_atp_insert_rec.old_demand_id := null;
8030:
8031: /* Modularize Item and Org Info */
8032: -- Re-Use info instead of making unnecessary call.
8033: l_inv_item_name := C_ITEM_INFO_REC.item_name;
8034: MSC_ATP_PROC.get_global_org_info (p_atp_record.instance_id,
8035: p_atp_record.organization_id);
8036: l_org_code := G_ORG_INFO_REC.org_code;
8037:
8038: l_atp_insert_rec.old_demand_id := null;
8076: p_atp_record.inventory_item_id,
8077: p_atp_record.organization_id);
8078:
8079: Modularize Item and Org Info */
8080: MSC_ATP_PROC.get_global_org_info (p_atp_record.instance_id,
8081: p_atp_record.organization_id );
8082: l_org_code := G_ORG_INFO_REC.org_code;
8083: /*l_org_code := MSC_ATP_FUNC.get_org_code(p_atp_record.instance_id,
8084: p_atp_record.organization_id);
8335: IF PG_DEBUG in ('Y', 'C') THEN
8336: msc_sch_wb.atp_debug('ATP_Check: ' || 'Initialize atp_date and atp_quantity_this_level');
8337: END IF;
8338:
8339: /* s_cto_rearch: chnage call to MSC_ATP_PROC.get_infinite_time_fence_date procedure
8340: l_atp_date_this_level := GREATEST(MSC_ATP_FUNC.get_infinite_time_fence_date(
8341: p_atp_record.instance_id, p_atp_record.inventory_item_id,
8342: p_atp_record.organization_id,p_plan_id), l_requested_ship_date);
8343: e_cto_rearch*/
8342: p_atp_record.organization_id,p_plan_id), l_requested_ship_date);
8343: e_cto_rearch*/
8344:
8345: --bug 4394904: Store ITF in seperate variable
8346: MSC_ATP_PROC.get_infinite_time_fence_date(
8347: p_atp_record.instance_id, p_atp_record.inventory_item_id,
8348: p_atp_record.organization_id,p_plan_id,
8349: --l_atp_date_this_level, l_atp_rule_name);
8350: l_infinite_time_fence, l_atp_rule_name);
8584: p_atp_record.inventory_item_id,
8585: p_atp_record.organization_id);
8586:
8587: Modularize Item and Org Info */
8588: MSC_ATP_PROC.get_global_org_info (p_atp_record.instance_id,
8589: p_atp_record.organization_id);
8590: l_org_code := G_ORG_INFO_REC.org_code;
8591: /* l_org_code := MSC_ATP_FUNC.get_org_code(p_atp_record.instance_id,
8592: p_atp_record.organization_id);
9277: END IF;
9278:
9279: -- update summary records removed in ODS case - for summary enhancement
9280: IF MSC_ATP_PVT.G_SUMMARY_FLAG = 'Y' AND p_plan_id = -1 THEN
9281: MSC_ATP_PROC.SHOW_SUMMARY_QUANTITY(p_atp_record.instance_id,
9282: p_plan_id,
9283: p_atp_record.organization_id,
9284: l_inventory_item_id,
9285: l_requested_ship_date,
9325: -- 1413608: instead of replace x_atp with l_atp, append it
9326: -- x_atp_supply_demand := l_atp_supply_demand;
9327: -- x_atp_period := l_atp_period;
9328:
9329: MSC_ATP_PROC.Details_Output(l_atp_period,
9330: l_atp_supply_demand,
9331: x_atp_period,
9332: x_atp_supply_demand,
9333: l_return_status);
9528: END IF;
9529:
9530: IF (l_stealing_qty > 0) THEN
9531: ----bug 1892779
9532: MSC_ATP_PROC.Details_Output(l_atp_period,
9533: l_atp_supply_demand,
9534: x_atp_period,
9535: x_atp_supply_demand,
9536: l_return_status);
10046: IF MSC_ATP_PVT.G_SUMMARY_FLAG = 'Y' and (p_parent_pegging_id is not null) AND p_plan_id = -1 THEN
10047: IF PG_DEBUG in ('Y', 'C') THEN
10048: msc_sch_wb.atp_debug('ATP_Check: ' || 'update old date demand');
10049: END IF;
10050: MSC_ATP_PROC.SHOW_SUMMARY_QUANTITY(p_atp_record.instance_id,
10051: p_plan_id,
10052: p_atp_record.organization_id,
10053: l_inventory_item_id,
10054: l_requested_ship_date,
10067: and organization_id = p_atp_record.organization_id
10068: and inventory_item_id = l_inventory_item_id
10069: and sd_date = trunc(l_requested_ship_date);
10070: commit;
10071: MSC_ATP_PROC.SHOW_SUMMARY_QUANTITY(p_atp_record.instance_id,
10072: p_plan_id,
10073: p_atp_record.organization_id,
10074: l_inventory_item_id,
10075: l_atp_date_this_level,
10258: l_atp_period_first.End_Pegging_Id(i) :=
10259: MSC_ATP_PVT.G_DEMAND_PEGGING_ID;
10260: END LOOP;
10261:
10262: MSC_ATP_PROC.Details_Output(l_atp_period_first,
10263: l_atp_supply_demand,
10264: x_atp_period,
10265: x_atp_supply_demand,
10266: l_return_status);
10281: MSC_ATP_DB_UTILS.move_SD_temp_into_mrp_details(l_atp_pegging_id,
10282: MSC_ATP_PVT.G_DEMAND_PEGGING_ID);
10283: END IF;
10284:
10285: MSC_ATP_PROC.Details_Output(l_atp_period,
10286: l_atp_supply_demand,
10287: x_atp_period,
10288: x_atp_supply_demand,
10289: l_return_status);
10404: msc_sch_wb.atp_debug('ATP_Check: ' || 'l_inventory_item_id := ' || l_inventory_item_id);
10405: msc_sch_wb.atp_debug('ATP_Check: ' || 'l_requested_ship_date := ' || l_requested_ship_date);
10406: END IF;
10407:
10408: MSC_ATP_PROC.SHOW_SUMMARY_QUANTITY(p_atp_record.instance_id,
10409: p_plan_id,
10410: p_atp_record.organization_id,
10411: l_inventory_item_id,
10412: l_requested_ship_date,
10706:
10707: l_temp_net_demand := l_net_demand;
10708: l_parent_pegging_id := l_substitutes_rec.pegging_id(l_index);
10709: l_request_item_id := l_substitutes_rec.inventory_item_id(l_index);
10710: MSC_ATP_PROC.get_global_item_info(p_atp_record.instance_id,
10711: --3917625: read item attributes from planned data
10712: -- -1,
10713: p_plan_id,
10714: l_request_item_id,
10787: ELSIF NOT (C_ITEM_INFO_REC.bom_item_type = 1 and NVL(p_atp_record.wip_supply_type,2) = 6 and
10788: C_ITEM_INFO_REC.replenish_to_ord_flag = 'Y') THEN
10789:
10790:
10791: MSC_ATP_PROC.Atp_Sources(p_atp_record.instance_id,
10792: p_plan_id,
10793: l_request_item_id, -- for time_phased_atp
10794: p_atp_record.organization_id,
10795: NULL,
10964: ELSE
10965: l_atp_rec.ship_method := null;
10966: l_atp_rec.delivery_lead_time := null;
10967:
10968: MSC_ATP_PROC.get_delivery_lead_time(
10969: l_sources.organization_id(j), -- p_from_org_id
10970: NULL, -- p_from_loc_id
10971: l_sources.instance_id(j),
10972: p_atp_record.organization_id,
11079: MSC_CALENDAR.ORC);
11080: */
11081:
11082: -- supplier intransit LT
11083: MSC_ATP_PROC.Get_Supplier_Regions(l_sources.Supplier_Site_Id(j),
11084: 724, -- calling module is immaterial here
11085: l_sources.instance_id(j),
11086: l_return_status);
11087: --3953635: If ship method is null then l_sources.Ship_Method(j) contains '@@@'
11091: ELSE
11092: l_atp_rec.ship_method := null;
11093: END IF;
11094:
11095: MSC_ATP_PROC.get_delivery_lead_time(
11096: NULL, -- p_from_org_id
11097: NULL, -- p_from_loc_id
11098: l_sources.instance_id(j),
11099: p_atp_record.organization_id,
11430:
11431: /*
11432: -- New procedure for obtaining plan data : Supplier Capacity Lead Time proj.
11433: -- (SCLT)
11434: MSC_ATP_PROC.get_global_plan_info(l_atp_rec.instance_id,
11435: l_atp_rec.inventory_item_id,
11436: l_atp_rec.organization_id,
11437: l_atp_rec.demand_class);*/
11438:
11517: ELSIF l_plan_id is NOT NULL THEN
11518: -- dsting 2764213
11519: l_planned_sources := 1;
11520:
11521: MSC_ATP_PROC.inv_primary_uom_conversion(l_atp_rec.instance_id,
11522: l_atp_rec.organization_id,
11523: l_atp_rec.inventory_item_id,
11524: p_atp_record.quantity_uom,
11525: l_atp_rec.quantity_uom,
12649: -- Org id contains source org. We need to create atp simplified peg
12650: --- in rec org. Therefore, we remember it
12651: ELSE
12652: /* Modularize Item and Org Info */
12653: MSC_ATP_PROC.get_global_org_info(p_atp_record.instance_id,
12654: l_pegging_rec.organization_id);
12655: l_pegging_rec.organization_code := MSC_ATP_PVT.G_ORG_INFO_REC.org_code;
12656: /* l_pegging_rec.organization_code :=
12657: MSC_ATP_FUNC.get_org_code(p_atp_record.instance_id,
13623: -- 2754446
13624: IF least(l_prim_uom_req_date_qty, l_PO_qty) > 0 THEN
13625: -- IF least(l_atp_rec.requested_date_quantity,
13626: -- l_atp_rec.quantity_ordered) > 0 THEN
13627: MSC_ATP_PROC.Details_Output(l_tb_atp_period,
13628: l_tb_atp_supply_demand,
13629: x_atp_period,
13630: x_atp_supply_demand,
13631: l_return_status);
14036: -- capacity for config item
14037: IF l_check_model_capacity = 2 THEN
14038: /* Make case Get the Process Sequence ID.*/
14039: -- (ssurendr) Bug 2865389 : Replace call to function MSC_ATP_FUNC.get_process_seq_id
14040: -- by procedure MSC_ATP_PROC.get_process_effectivity
14041: --Details. Derive Item's Start Date by Offsetting
14042: --Due date with LT. Check effectivity on Start Date.
14043: /* ship_rec_cal
14044: l_opm_start_date := MSC_CALENDAR.date_offset(p_atp_record.organization_id,
14051: p_atp_record.instance_id,
14052: l_requested_ship_date,
14053: -1 * (nvl(PF_ITEM_INFO_REC.fixed_lt,0) +
14054: nvl(PF_ITEM_INFO_REC.variable_lt,0) * l_PO_qty), -1);
14055: MSC_ATP_PROC.get_process_effectivity(
14056: p_plan_id,
14057: --PF_ITEM_INFO_REC.dest_inv_item_id,
14058: C_ITEM_INFO_REC.dest_inv_item_id, -- For time_phased_atp
14059: p_atp_record.organization_id,
14411: p_atp_record.instance_id,
14412: l_requested_ship_date,
14413: -1 * (nvl(PF_ITEM_INFO_REC.fixed_lt,0) +
14414: nvl(PF_ITEM_INFO_REC.variable_lt,0) * l_avail_assembly_qty), -1);
14415: MSC_ATP_PROC.get_process_effectivity(
14416: p_plan_id,
14417: --PF_ITEM_INFO_REC.dest_inv_item_id,
14418: C_ITEM_INFO_REC.dest_inv_item_id, -- For time_phased_atp
14419: p_atp_record.organization_id,
14602: END IF;
14603: -- move the supply/demand, period atp
14604: -- of the components to the output record of
14605: -- tables.
14606: MSC_ATP_PROC.Details_Output(l_comp_atp_period,
14607: l_comp_atp_supply_demand,
14608: x_atp_period,
14609: x_atp_supply_demand,
14610: l_return_status);
14608: x_atp_period,
14609: x_atp_supply_demand,
14610: l_return_status);
14611:
14612: MSC_ATP_PROC.Details_Output(l_res_atp_period,
14613: l_res_atp_supply_demand,
14614: x_atp_period,
14615: x_atp_supply_demand,
14616: l_return_status);
14704: p_atp_record.instance_id,
14705: l_requested_ship_date,
14706: -1 * (nvl(PF_ITEM_INFO_REC.fixed_lt,0) +
14707: nvl(PF_ITEM_INFO_REC.variable_lt,0) * l_res_demand), -1);
14708: MSC_ATP_PROC.get_process_effectivity(
14709: p_plan_id,
14710: --PF_ITEM_INFO_REC.dest_inv_item_id,
14711: C_ITEM_INFO_REC.dest_inv_item_id, -- For time_phased_atp
14712: p_atp_record.organization_id,
14858: -- that due to lead time we check different
14859: -- comp/res that may not have enough capacities.
14860:
14861: IF l_avail_assembly_qty > 0 THEN
14862: MSC_ATP_PROC.Details_Output(l_comp_atp_period,
14863: l_comp_atp_supply_demand,
14864: x_atp_period,
14865: x_atp_supply_demand,
14866: l_return_status);
14864: x_atp_period,
14865: x_atp_supply_demand,
14866: l_return_status);
14867:
14868: MSC_ATP_PROC.Details_Output(l_res_atp_period,
14869: l_res_atp_supply_demand,
14870: x_atp_period,
14871: x_atp_supply_demand,
14872: l_return_status);
14911: ELSE
14912: -- move the supply/demand, period atp
14913: -- of the components to the output record of
14914: -- tables.
14915: MSC_ATP_PROC.Details_Output(l_comp_atp_period,
14916: l_comp_atp_supply_demand,
14917: x_atp_period,
14918: x_atp_supply_demand,
14919: l_return_status);
14917: x_atp_period,
14918: x_atp_supply_demand,
14919: l_return_status);
14920:
14921: MSC_ATP_PROC.Details_Output(l_res_atp_period,
14922: l_res_atp_supply_demand,
14923: x_atp_period,
14924: x_atp_supply_demand,
14925: l_return_status);
14943:
14944: IF PG_DEBUG in ('Y', 'C') THEN
14945: msc_sch_wb.atp_debug('ATP_Check: ' || 'Add Coproducts for item '||p_atp_record.inventory_item_id);
14946: END IF;
14947: MSC_ATP_PROC.Add_Coproducts(
14948: p_plan_id,
14949: p_atp_record.instance_id,
14950: p_atp_record.organization_id,
14951: --bug 3766179: pass request item as inventory_item_id contains
15057: p_atp_record.instance_id,
15058: l_requested_ship_date,
15059: -1 * (nvl(PF_ITEM_INFO_REC.fixed_lt,0) +
15060: nvl(PF_ITEM_INFO_REC.variable_lt,0) * l_PO_qty), -1);
15061: MSC_ATP_PROC.get_process_effectivity(
15062: p_plan_id,
15063: --PF_ITEM_INFO_REC.dest_inv_item_id,
15064: C_ITEM_INFO_REC.dest_inv_item_id, -- For time_phased_atp
15065: p_atp_record.organization_id,
15475: l_future_atp_supply_demand :=
15476: l_comp_atp_supply_demand;
15477: l_future_pegging_id := l_pegging_id;
15478:
15479: MSC_ATP_PROC.Details_Output(l_res_atp_period,
15480: l_res_atp_supply_demand,
15481: l_future_atp_period,
15482: l_future_atp_supply_demand,
15483: l_return_status);
15497:
15498: IF PG_DEBUG in ('Y', 'C') THEN
15499: msc_sch_wb.atp_debug('ATP_Check: ' || 'Add Coproducts for item '||p_atp_record.inventory_item_id);
15500: END IF;
15501: MSC_ATP_PROC.Add_Coproducts(
15502: p_plan_id,
15503: p_atp_record.instance_id,
15504: p_atp_record.organization_id,
15505: --p_atp_record.inventory_item_id,
15623: msc_sch_wb.atp_debug('ATP_Check: ' || ' MSC_ATP_PVT.G_SUMMARY_FLAG := ' || MSC_ATP_PVT.G_SUMMARY_FLAG);
15624: END IF;
15625: -- update summary records removed in ODS case - for summary enhancement
15626: IF MSC_ATP_PVT.G_SUMMARY_FLAG = 'Y' AND p_plan_id = -1 THEN
15627: MSC_ATP_PROC.SHOW_SUMMARY_QUANTITY(p_atp_record.instance_id,
15628: p_plan_id,
15629: p_atp_record.organization_id,
15630: l_inventory_item_id,
15631: l_requested_ship_date,
15655: p_atp_record.request_item_id := l_substitutes_rec.inventory_item_id(1);
15656: l_parent_pegging_id := l_tmp_parent_pegging_id;
15657: l_pegging_id := l_substitutes_rec.inventory_item_id(1);
15658: -- Re initialize the C_item_info_rec G_item_info_rec
15659: MSC_ATP_PROC.get_global_item_info(p_atp_record.instance_id,
15660: p_plan_id,
15661: p_atp_record.request_item_id,
15662: p_atp_record.organization_id,
15663: l_item_info_rec );
15785: msc_sch_wb.atp_debug('ATP_Check: ' || 'l_inventory_item_id := ' || l_inventory_item_id);
15786: msc_sch_wb.atp_debug('ATP_Check: ' || 'l_requested_ship_date := ' || l_requested_ship_date);
15787: END IF;
15788:
15789: MSC_ATP_PROC.SHOW_SUMMARY_QUANTITY(p_atp_record.instance_id,
15790: p_plan_id,
15791: p_atp_record.organization_id,
15792: l_inventory_item_id,
15793: l_requested_ship_date,
16004: msc_sch_wb.atp_debug('ATP_Check: ' || 'l_inventory_item_id := ' || l_inventory_item_id);
16005: msc_sch_wb.atp_debug('ATP_Check: ' || 'l_requested_ship_date := ' || l_requested_ship_date);
16006: END IF;
16007:
16008: MSC_ATP_PROC.SHOW_SUMMARY_QUANTITY(p_atp_record.instance_id,
16009: p_plan_id,
16010: p_atp_record.organization_id,
16011: l_inventory_item_id,
16012: l_requested_ship_date,
16169: IF PG_DEBUG in ('Y', 'C') THEN
16170: msc_sch_wb.atp_debug('ATP_Check: ' || 'old and new dates are not same');
16171: msc_sch_wb.atp_debug('ATP_Check: ' || 'Update summary for old date');
16172: END IF;
16173: MSC_ATP_PROC.SHOW_SUMMARY_QUANTITY(p_atp_record.instance_id,
16174: p_plan_id,
16175: p_atp_record.organization_id,
16176: l_inventory_item_id,
16177: l_requested_ship_date,
16197: --- if record exists then update
16198: IF PG_DEBUG in ('Y', 'C') THEN
16199: msc_sch_wb.atp_debug('ATP_Check: ' || 'update the qty on new date ');
16200: END IF;
16201: MSC_ATP_PROC.SHOW_SUMMARY_QUANTITY(p_atp_record.instance_id,
16202: p_plan_id,
16203: p_atp_record.organization_id,
16204: l_inventory_item_id,
16205: p_atp_record.ship_date,
16246:
16247: --END IF; -- end changes for cto override
16248: END IF;
16249:
16250: MSC_ATP_PROC.Details_Output(l_future_atp_period,
16251: l_future_atp_supply_demand,
16252: x_atp_period,
16253: x_atp_supply_demand,
16254: l_return_status);
16284: --l_inv_item_id := C_ITEM_INFO_REC.dest_inv_item_id;
16285: IF NVL(G_ITEM_INFO_REC.sr_inv_item_id, 0) = p_atp_record.inventory_item_id THEN
16286: l_inv_item_id := G_ITEM_INFO_REC.dest_inv_item_id;
16287: ELSE
16288: MSC_ATP_PROC.get_global_item_info(p_atp_record.instance_id,
16289: --bug 3917625: read attributes from planned data
16290: -- -1,
16291: p_plan_id,
16292: p_atp_record.inventory_item_id,
16508: --l_inv_item_name := C_ITEM_INFO_REC.item_name;
16509: IF NVL(G_ITEM_INFO_REC.sr_inv_item_id, 0) = p_atp_record.inventory_item_id THEN
16510: l_inv_item_name := G_ITEM_INFO_REC.item_name;
16511: ELSE
16512: MSC_ATP_PROC.get_global_item_info(p_atp_record.instance_id,
16513: --3917625: Read data from plan output
16514: -- -1,
16515: p_plan_id,
16516: p_atp_record.inventory_item_id,
16727: msc_sch_wb.atp_debug('ATP_Check: ' || 'l_inv_item_id := ' || l_inv_item_id);
16728: msc_sch_wb.atp_debug('ATP_Check: ' || ' Quantity := ' || least(l_requested_date_quantity, p_atp_record.quantity_ordered));
16729: msc_sch_wb.atp_debug('ATP_Check: ' || 'First try to update');
16730: END IF;
16731: MSC_ATP_PROC.SHOW_SUMMARY_QUANTITY(p_atp_record.instance_id,
16732: p_plan_id,
16733: null,
16734: l_inv_item_id,
16735: l_requested_ship_date,
16785: sysdate,
16786: FND_GLOBAL.USER_ID);
16787: EXCEPTION
16788: WHEN DUP_VAL_ON_INDEX THEN
16789: MSC_ATP_PROC.SHOW_SUMMARY_QUANTITY(p_atp_record.instance_id,
16790: p_plan_id,
16791: null,
16792: l_inv_item_id,
16793: l_requested_ship_date,
16819: msc_sch_wb.atp_debug('ATP_Check: ' || 'l_inv_item_id := ' || l_inv_item_id);
16820: msc_sch_wb.atp_debug('ATP_Check: ' || ' Quantity := ' || p_atp_record.quantity_ordered);
16821: msc_sch_wb.atp_debug('ATP_Check: ' || 'First try to update');
16822: END IF;
16823: MSC_ATP_PROC.SHOW_SUMMARY_QUANTITY(p_atp_record.instance_id,
16824: p_plan_id,
16825: p_atp_record.organization_id,
16826: l_inv_item_id,
16827: l_atp_date_this_level,
16877: sysdate,
16878: FND_GLOBAL.USER_ID);
16879: EXCEPTION
16880: WHEN DUP_VAL_ON_INDEX THEN
16881: MSC_ATP_PROC.SHOW_SUMMARY_QUANTITY(p_atp_record.instance_id,
16882: p_plan_id,
16883: null,
16884: l_inv_item_id,
16885: l_atp_date_this_level,
17503: msc_sch_wb.atp_debug('Explode Included Items');
17504: msc_sch_wb.atp_debug('First Do UOM Convesrion');
17505: END IF;
17506:
17507: MSC_ATP_PROC.inv_primary_uom_conversion(p_instance_id,
17508: p_atp_table.validation_org(j),
17509: p_atp_table.inventory_item_id(j),
17510: p_atp_table.Quantity_UOM(i),
17511: l_quantity_uom,
17695: msc_sch_wb.atp_debug('Before get_plan_info_call:MSC_CONSUME_INT_SALES_ORDERS ' || l_consume_so_profile_value);
17696: msc_sch_wb.atp_debug('New profile: '||FND_PROFILE.VALUE('MSC_ATP_CHECK_INT_SALES_ORDERS')); --5564082
17697: END IF;
17698: IF l_consume_so_profile_value = CHECK_ORG_IN_PLAN THEN
17699: MSC_ATP_PROC.get_plan_info(p_instance_id,
17700: l_atp_input_table.inventory_item_id(m),
17701: l_atp_input_table.source_organization_id(m),
17702: null,
17703: x_plan_info_rec);
17832:
17833: IF (l_atp_output_table.internal_org_id(m) IS NOT NULL) OR
17834: (l_atp_output_table.organization_id(m) IS NOT NULL AND
17835: l_atp_output_table.customer_id(m) IS NULL AND l_atp_output_table.customer_site_id(m) IS NULL) THEN
17836: MSC_ATP_PROC.get_delivery_lead_time(
17837: l_atp_output_table.source_organization_id(m),
17838: NULL, -- from_loc
17839: p_instance_id,
17840: -- x_atp_table.internal_org_id(m), -- Bug 3515520
17850: l_ship_method,
17851: l_delivery_lead_time
17852: );
17853: ELSE
17854: MSC_ATP_PROC.get_delivery_lead_time(
17855: l_atp_output_table.source_organization_id(m),
17856: NULL, -- from_loc
17857: p_instance_id,
17858: -- x_atp_table.organization_id(m), --Bug 3515520
18332: --4500382 ENDS
18333: -- now get the results/details and append it to the 'real' output
18334: MSC_SATP_FUNC.Assign_Atp_Output_Rec(l_atp_output_table,x_atp_table,l_return_status );
18335:
18336: MSC_ATP_PROC.Details_Output(l_atp_period,
18337: l_atp_supply_demand,
18338: x_atp_period,
18339: x_atp_supply_demand,
18340: l_return_status);
18551:
18552:
18553: IF PG_DEBUG in ('Y', 'C') THEN
18554: msc_sch_wb.atp_debug('Call_Schedule: ' || 'Rows deleted from msc_atp_src_profile_temp : '||sql%rowcount);
18555: msc_sch_wb.atp_debug('Call_Schedule: ' || 'Before calling MSC_ATP_PROC.Delete_Copy_Demand');
18556: END IF;
18557:
18558: -- Summary enhancement - Delete the copy demands that were created in this transaction if refresh number has moved.
18559: IF MSC_ATP_PVT.G_SUMMARY_FLAG = 'Y' THEN --bug4291375 Delete_Copy_Demand should be called when summary is ON.
19427: l_atp_table.ship_date(i) := trunc(l_atp_table.ship_date(i)) + MSC_ATP_PVT.G_END_OF_DAY; --4967040
19428:
19429: END IF;
19430: END IF;
19431: MSC_ATP_PROC.G_latest_ship_date_set := GREATEST(NVL(MSC_ATP_PROC.G_latest_ship_date_set, l_atp_table.ship_date(i)),
19432: NVL(l_atp_table.ship_date(i), MSC_ATP_PROC.G_latest_ship_date_set));
19433: MSC_ATP_PROC.G_latest_arr_date_set := GREATEST(NVL(MSC_ATP_PROC.G_latest_arr_date_set, l_atp_table.arrival_date(i)),
19434: NVL(l_atp_table.arrival_date(i), MSC_ATP_PROC.G_latest_arr_date_set));
19435: IF PG_DEBUG in ('Y', 'C') THEN
19428:
19429: END IF;
19430: END IF;
19431: MSC_ATP_PROC.G_latest_ship_date_set := GREATEST(NVL(MSC_ATP_PROC.G_latest_ship_date_set, l_atp_table.ship_date(i)),
19432: NVL(l_atp_table.ship_date(i), MSC_ATP_PROC.G_latest_ship_date_set));
19433: MSC_ATP_PROC.G_latest_arr_date_set := GREATEST(NVL(MSC_ATP_PROC.G_latest_arr_date_set, l_atp_table.arrival_date(i)),
19434: NVL(l_atp_table.arrival_date(i), MSC_ATP_PROC.G_latest_arr_date_set));
19435: IF PG_DEBUG in ('Y', 'C') THEN
19436: msc_sch_wb.atp_debug('ship_date:(After) ' || to_char(l_atp_table.ship_date(i), 'DD-MON-YYYY HH24:MI:SS'));
19429: END IF;
19430: END IF;
19431: MSC_ATP_PROC.G_latest_ship_date_set := GREATEST(NVL(MSC_ATP_PROC.G_latest_ship_date_set, l_atp_table.ship_date(i)),
19432: NVL(l_atp_table.ship_date(i), MSC_ATP_PROC.G_latest_ship_date_set));
19433: MSC_ATP_PROC.G_latest_arr_date_set := GREATEST(NVL(MSC_ATP_PROC.G_latest_arr_date_set, l_atp_table.arrival_date(i)),
19434: NVL(l_atp_table.arrival_date(i), MSC_ATP_PROC.G_latest_arr_date_set));
19435: IF PG_DEBUG in ('Y', 'C') THEN
19436: msc_sch_wb.atp_debug('ship_date:(After) ' || to_char(l_atp_table.ship_date(i), 'DD-MON-YYYY HH24:MI:SS'));
19437: msc_sch_wb.atp_debug('Arrival_date:(After) ' || to_char(l_atp_table.arrival_date(i), 'DD-MON-YYYY HH24:MI:SS'));
19430: END IF;
19431: MSC_ATP_PROC.G_latest_ship_date_set := GREATEST(NVL(MSC_ATP_PROC.G_latest_ship_date_set, l_atp_table.ship_date(i)),
19432: NVL(l_atp_table.ship_date(i), MSC_ATP_PROC.G_latest_ship_date_set));
19433: MSC_ATP_PROC.G_latest_arr_date_set := GREATEST(NVL(MSC_ATP_PROC.G_latest_arr_date_set, l_atp_table.arrival_date(i)),
19434: NVL(l_atp_table.arrival_date(i), MSC_ATP_PROC.G_latest_arr_date_set));
19435: IF PG_DEBUG in ('Y', 'C') THEN
19436: msc_sch_wb.atp_debug('ship_date:(After) ' || to_char(l_atp_table.ship_date(i), 'DD-MON-YYYY HH24:MI:SS'));
19437: msc_sch_wb.atp_debug('Arrival_date:(After) ' || to_char(l_atp_table.arrival_date(i), 'DD-MON-YYYY HH24:MI:SS'));
19438: msc_sch_wb.atp_debug('Req. ship_date:(After) ' || to_char(l_atp_table.requested_ship_date(i), 'DD-MON-YYYY HH24:MI:SS'));