[Home] [Help]
817: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
818: END IF;
819:
820: -- dsting setproc
821: MSC_ATP_PROC.Initialize_Set_Processing(p_atp_table);
822: l_set_status := null;
823:
824: WHILE (k IS NOT NULL) LOOP
825:
1018: msc_sch_wb.atp_debug('Schedule: Stmt = '||l_stmt);
1019: END IF;
1020:
1021:
1022: MSC_ATP_PROC.Atp_Sources(p_instance_id,
1023: l_plan_id,
1024: l_requested_item_id,
1025: p_atp_table.Organization_Id(k),
1026: p_atp_table.Customer_Id(k),
1041: IF PG_DEBUG in ('Y', 'C') THEN
1042: msc_sch_wb.atp_debug('Schedule: Stmt = '||l_stmt);
1043: END IF;
1044:
1045: MSC_ATP_PROC.Atp_Sources(p_instance_id,
1046: l_plan_id,
1047: l_requested_item_id,
1048: p_atp_table.Organization_Id(k),
1049: p_atp_table.Customer_Id(k),
1262:
1263: -- dsting setproc
1264: -- 2902129
1265: -- if l_ship_count > 1 then
1266: MSC_ATP_PROC.Initialize_Set_Processing(l_atp_table);
1267: l_set_status := null;
1268: -- end if;
1269:
1270: -- i is the index for the record of tables in l_atp_table
1390: l_item_attribute_rec.parent_bom_item_type := 4;
1391: l_item_attribute_rec.parent_comp_flag := null;
1392: l_item_attribute_rec.parent_repl_ord_flag := 'N';
1393: --e_cto_rearch
1394: MSC_ATP_PROC.get_item_attributes(p_instance_id,
1395: l_plan_id,
1396: l_requested_item_id,
1397: l_process_org_id,
1398: l_item_attribute_rec);
1447: l_atp_table.customer_country(1) IS NULL) THEN --2814895
1448: IF PG_DEBUG in ('Y', 'C') THEN
1449: msc_sch_wb.atp_debug('Schedule: ' || 'Inside Org code');
1450: END IF;
1451: MSC_ATP_PROC.get_delivery_lead_time(
1452: l_sourcing_org_id,
1453: NULL, -- from location id
1454: p_instance_id,
1455: -- l_atp_table.internal_org_id(i), -- Bug 3515520
1472: ELSIF (l_atp_table.customer_site_id(1) IS NOT NULL) THEN
1473: IF PG_DEBUG in ('Y', 'C') THEN
1474: msc_sch_wb.atp_debug('Schedule: ' || 'Inside customer_site_id code');
1475: END IF;
1476: MSC_ATP_PROC.get_delivery_lead_time(
1477: l_sourcing_org_id,
1478: NULL, -- from location id
1479: p_instance_id,
1480: --l_atp_table.organization_id(i), -- Bug 3515520
1497: ELSIF ( l_atp_table.party_site_id(1) IS NOT NULL ) THEN --2814895
1498: IF PG_DEBUG in ('Y', 'C') THEN
1499: msc_sch_wb.atp_debug('Schedule: ' || 'Inside party_site_id code');
1500: END IF;
1501: MSC_ATP_PROC.get_delivery_lead_time(
1502: l_sourcing_org_id,
1503: NULL, -- from location id
1504: p_instance_id,
1505: --l_atp_table.organization_id(i), -- Bug 3515520
1522: ELSIF ( l_atp_table.customer_country(1) IS NOT NULL) THEN --2814895
1523: IF PG_DEBUG in ('Y', 'C') THEN
1524: msc_sch_wb.atp_debug('Schedule: ' || 'Inside address parameter code');
1525: END IF;
1526: MSC_ATP_PROC.get_delivery_lead_time(
1527: l_sourcing_org_id,
1528: NULL, -- from location id
1529: p_instance_id,
1530: --l_atp_table.organization_id(i), -- Bug 3515520
1735: MSC_CALENDAR.OMC);
1736: */
1737: -- Bug 2783787 fix involving removing the call to obtain org defaults
1738: -- restored here
1739: MSC_ATP_PROC.get_global_org_info(p_instance_id,
1740: l_process_org_id);
1741: l_manufacturing_cal_code := MSC_ATP_PVT.G_ORG_INFO_REC.cal_code;
1742: -- End ATP4drp
1743: ELSE
1880:
1881:
1882: IF l_atp_flag <> 'N' OR l_atp_comp_flag <> 'N' THEN
1883: /*
1884: MSC_ATP_PROC.Get_Plan_Info(p_instance_id,
1885: --2152184
1886: l_process_item_id,
1887: --l_requested_item_id,
1888: l_process_org_id,
1890: l_plan_id,
1891: l_assign_set_id);
1892:
1893: -- code changes for bug 2392456 starts
1894: MSC_ATP_PROC.Get_Plan_Info(p_instance_id,
1895: --2152184
1896: l_process_item_id,
1897: --l_requested_item_id,
1898: l_process_org_id,
1964: --bug 4604500: pass correct request item it when match is found.
1965: l_requested_item_id := l_atp_table.match_item_id(i);
1966:
1967: --get item attributes of the matched item
1968: MSC_ATP_PROC.get_item_attributes(p_instance_id,
1969: --3917625: Read attributes from correct plan
1970: --l_plan_id,
1971: MSC_ATP_PVT.G_PLAN_INFO_REC.plan_id,
1972: l_atp_table.match_item_id(i),
2219: l_atp_rec.combined_requested_date_qty := NULL;
2220:
2221: -- need to do uom quantity conversion
2222:
2223: MSC_ATP_PROC.inv_primary_uom_conversion(p_instance_id,
2224: l_sources.Organization_Id(j),
2225: l_process_item_id,
2226: l_atp_table.Quantity_UOM(i),
2227: l_quantity_uom,
2395: -- 2783787 (ssurendr) Null demand class in request should be considered as "Others"
2396: /*
2397: IF (MSC_ATP_PVT.G_ALLOCATED_ATP = 'Y') AND
2398: (l_atp_table.Demand_Class(i) IS NULL) THEN
2399: MSC_ATP_PROC.get_global_org_info(l_atp_rec.instance_id,
2400: l_atp_rec.organization_id);
2401: l_default_atp_rule_id := G_ORG_INFO_REC.default_atp_rule_id;
2402: l_calendar_code := G_ORG_INFO_REC.cal_code;
2403: l_calendar_exception_set_id := G_ORG_INFO_REC.cal_exception_set_id;
2549:
2550: -----------
2551: /* Modularize Item and Org Info */
2552: -- Information already obtained.
2553: /*MSC_ATP_PROC.get_global_item_info( p_instance_id,
2554: -1,
2555: l_atp_rec.inventory_item_id,
2556: l_atp_rec.organization_id );
2557: */
3054: l_atp_rec.requested_date_quantity :=
3055: l_atp_rec.available_quantity;
3056: END IF;
3057:
3058: MSC_ATP_PROC.Details_Output(l_future_atp_period,
3059: l_future_atp_supply_demand,
3060: l_atp_period,
3061: l_atp_supply_demand,
3062: l_return_status);
3325: l_atp_table.Quantity_UOM(i) := l_atp_rec.quantity_uom;
3326: l_atp_table.Quantity_Ordered(i) := l_atp_rec.quantity_ordered;
3327:
3328: /* Modularize Item and Org Info */
3329: MSC_ATP_PROC.get_global_org_info (p_instance_id,
3330: l_atp_rec.organization_id);
3331: l_atp_table.Source_Organization_Code(i) := G_ORG_INFO_REC.org_code;
3332: /*l_atp_table.Source_Organization_Code(i):=
3333: MSC_ATP_FUNC.get_org_code(p_instance_id, l_atp_rec.organization_id);
3399: l_curr_atp_period := l_null_atp_period;
3400: l_curr_atp_supply_demand := l_null_atp_supply_demand;
3401: END IF;
3402:
3403: MSC_ATP_PROC.Details_Output(l_atp_period,
3404: l_atp_supply_demand,
3405: l_curr_atp_period,
3406: l_curr_atp_supply_demand,
3407: l_return_status);
3560: msc_sch_wb.atp_debug('requested_ship_date: ' || l_atp_table.requested_ship_date(i));
3561: END IF;
3562: --bug3439591 end
3563: -- dsting setproc
3564: MSC_ATP_PROC.Process_Set_Line(l_atp_table, i, l_line_status);
3565: Process_Time_Stamp_Errors(l_atp_table,i);
3566: msc_sch_wb.atp_debug('ship_date:(After) ' || to_char(l_atp_table.ship_date(i), 'DD-MON-YYYY HH24:MI:SS'));
3567: msc_sch_wb.atp_debug('Arrival_date:(After) ' || to_char(l_atp_table.arrival_date(i), 'DD-MON-YYYY HH24:MI:SS'));
3568: IF l_ship_count = 1 and l_arrival_count = 1 THEN
3738:
3739: -- this is a set, make sure this set is successful
3740:
3741: -- dsting setproc
3742: MSC_ATP_PROC.Process_Set_Dates_Errors(l_atp_table, 'D', l_set_status);
3743: -- 2902265
3744: l_overall_status := l_set_status;
3745: l_group_date := l_atp_table.group_ship_date(1);
3746: IF l_set_status = ALLSUCCESS THEN
3751: IF PG_DEBUG in ('Y', 'C') THEN
3752: msc_sch_wb.atp_debug('Schedule: ' || 'stmt17');
3753: END IF;
3754:
3755: MSC_ATP_PROC.Update_Set_SD_Dates(l_atp_table,l_req_arr_date);
3756: END IF;
3757: l_stmt := 320;
3758: END IF;
3759:
3872: END IF;
3873: -- Bug 2266808 : krajan
3874: -- dsting setproc
3875: IF l_ship_count > 1 AND i = l_ship_count THEN
3876: MSC_ATP_PROC.Process_Set_Dates_Errors(l_atp_table, 'D', l_set_status);
3877: l_group_date := l_atp_table.group_ship_date(1);
3878: END IF;
3879:
3880: --IF i <> l_ship_count OR (l_atp_table.Action(i) = ATPQUERY AND l_ship_count =1)
4011: l_demand_class_atp_flag.trim(l_fst_src_pegging_ids.count - k + 1);
4012: END IF;
4013:
4014: msc_sch_wb.atp_debug('adding to fst_src_peg p');
4015: MSC_ATP_PROC.number_arr_cat(l_fst_src_pegging_ids, MSC_ATP_PVT.G_PEGGING_FOR_SET);
4016: msc_sch_wb.atp_debug('adding to fst_src_peg d');
4017: MSC_ATP_PROC.date_arr_cat(l_req_atp_date, MSC_ATP_PVT.G_REQ_ATP_DATE);
4018: msc_sch_wb.atp_debug('adding to fst_src_peg q');
4019: MSC_ATP_PROC.number_arr_cat(l_req_date_qty, MSC_ATP_PVT.G_REQ_DATE_QTY);
4013:
4014: msc_sch_wb.atp_debug('adding to fst_src_peg p');
4015: MSC_ATP_PROC.number_arr_cat(l_fst_src_pegging_ids, MSC_ATP_PVT.G_PEGGING_FOR_SET);
4016: msc_sch_wb.atp_debug('adding to fst_src_peg d');
4017: MSC_ATP_PROC.date_arr_cat(l_req_atp_date, MSC_ATP_PVT.G_REQ_ATP_DATE);
4018: msc_sch_wb.atp_debug('adding to fst_src_peg q');
4019: MSC_ATP_PROC.number_arr_cat(l_req_date_qty, MSC_ATP_PVT.G_REQ_DATE_QTY);
4020: msc_sch_wb.atp_debug('adding to fst_src_peg f');
4021: MSC_ATP_PROC.number_arr_cat(l_demand_class_atp_flag, MSC_ATP_PVT.G_DEMAND_CLASS_ATP_FLAG);
4015: MSC_ATP_PROC.number_arr_cat(l_fst_src_pegging_ids, MSC_ATP_PVT.G_PEGGING_FOR_SET);
4016: msc_sch_wb.atp_debug('adding to fst_src_peg d');
4017: MSC_ATP_PROC.date_arr_cat(l_req_atp_date, MSC_ATP_PVT.G_REQ_ATP_DATE);
4018: msc_sch_wb.atp_debug('adding to fst_src_peg q');
4019: MSC_ATP_PROC.number_arr_cat(l_req_date_qty, MSC_ATP_PVT.G_REQ_DATE_QTY);
4020: msc_sch_wb.atp_debug('adding to fst_src_peg f');
4021: MSC_ATP_PROC.number_arr_cat(l_demand_class_atp_flag, MSC_ATP_PVT.G_DEMAND_CLASS_ATP_FLAG);
4022:
4023: IF l_overall_status in (MSC_ATP_PVT.ALLSUCCESS,
4017: MSC_ATP_PROC.date_arr_cat(l_req_atp_date, MSC_ATP_PVT.G_REQ_ATP_DATE);
4018: msc_sch_wb.atp_debug('adding to fst_src_peg q');
4019: MSC_ATP_PROC.number_arr_cat(l_req_date_qty, MSC_ATP_PVT.G_REQ_DATE_QTY);
4020: msc_sch_wb.atp_debug('adding to fst_src_peg f');
4021: MSC_ATP_PROC.number_arr_cat(l_demand_class_atp_flag, MSC_ATP_PVT.G_DEMAND_CLASS_ATP_FLAG);
4022:
4023: IF l_overall_status in (MSC_ATP_PVT.ALLSUCCESS,
4024: MSC_ATP_PVT.ATP_REQ_DATE_FAIL,
4025: MSC_ATP_PVT.GROUPEL_ERROR,
4045: 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);
4046: END LOOP;
4047: END IF;
4048: ELSE --3720018
4049: MSC_ATP_PROC.cleanup_set(p_instance_id,
4050: l_plan_id,
4051: MSC_ATP_PVT.G_PEGGING_FOR_SET,
4052: MSC_ATP_PVT.G_DEMAND_CLASS_ATP_FLAG);
4053: END IF; --3720018
4053: END IF; --3720018
4054: END IF; --3720018
4055: ELSE
4056: -- not using these in fst src peg, so always clean up
4057: MSC_ATP_PROC.cleanup_set(p_instance_id,
4058: l_plan_id,
4059: MSC_ATP_PVT.G_PEGGING_FOR_SET,
4060: MSC_ATP_PVT.G_DEMAND_CLASS_ATP_FLAG);
4061: END IF;
4150: IF MSC_ATP_PVT.G_INV_CTP = 4 THEN
4151: /* time_phased_atp use plan_id populated in l_atp_table.plan_id
4152: -- New procedure for obtaining plan data : Supplier Capacity Lead Time proj.
4153: -- (SCLT)
4154: MSC_ATP_PROC.get_global_plan_info(p_instance_id,
4155: l_atp_table.inventory_item_id(m),
4156: l_atp_table.organization_id(m),
4157: l_atp_table.demand_class(m));
4158:
4240: IF i = l_ship_count THEN
4241: l_temp_atp_table := l_atp_table;
4242: END IF;
4243:
4244: MSC_ATP_PROC.Details_Output(l_atp_period,
4245: l_atp_supply_demand,
4246: l_temp_atp_period,
4247: l_temp_atp_supply_demand,
4248: l_return_status);
4328: l_return_status );
4329:
4330: END IF;
4331:
4332: MSC_ATP_PROC.Details_Output(l_atp_period,
4333: l_atp_supply_demand,
4334: l_temp_atp_period,
4335: l_temp_atp_supply_demand,
4336: l_return_status);
4565: MSC_SATP_FUNC.Assign_Atp_Output_Rec(l_temp_atp_table,
4566: l_temp_arr_atp_table,
4567: x_return_status );
4568:
4569: MSC_ATP_PROC.Details_Output(l_temp_atp_period,
4570: l_temp_atp_supply_demand,
4571: l_temp_arr_atp_period,
4572: l_temp_arr_atp_supply_demand,
4573: x_return_status);
4575: MSC_SATP_FUNC.Assign_Atp_Output_Rec(l_temp_atp_table,
4576: x_atp_table,
4577: x_return_status );
4578:
4579: MSC_ATP_PROC.Details_Output(l_temp_atp_period,
4580: l_temp_atp_supply_demand,
4581: x_atp_period,
4582: x_atp_supply_demand,
4583: x_return_status);
4670: i,
4671: x_atp_table,
4672: l_return_status);
4673:
4674: MSC_ATP_PROC.Get_SD_Period_Rec(l_temp_arr_atp_period,
4675: l_temp_arr_atp_supply_demand,
4676: l_temp_arr_atp_table.Identifier(i),
4677: l_temp_arr_atp_table.Scenario_Id(i),
4678: 1,
4717: i,
4718: x_atp_table,
4719: l_return_status );
4720:
4721: MSC_ATP_PROC.Get_SD_Period_Rec(l_temp_arr_atp_period,
4722: l_temp_arr_atp_supply_demand,
4723: l_temp_arr_atp_table.Identifier(i),
4724: l_temp_arr_atp_table.Scenario_Id(i),
4725: 2,
4769: MSC_SATP_FUNC.Assign_Atp_Output_Rec(l_temp_arr_atp_table,
4770: x_atp_table,
4771: x_return_status );
4772:
4773: MSC_ATP_PROC.Details_Output(l_temp_arr_atp_period,
4774: l_temp_arr_atp_supply_demand,
4775: x_atp_period,
4776: x_atp_supply_demand,
4777: x_return_status);
4798: END IF;
4799: -- dsting setproc
4800:
4801: -- 2902129 delay set processing til here for arrival set
4802: MSC_ATP_PROC.Initialize_Set_Processing(x_atp_table);
4803: for k in 1..x_atp_table.action.count() loop
4804: MSC_ATP_PROC.Process_Set_Line(x_atp_table, k, l_line_status);
4805: end loop;
4806:
4800:
4801: -- 2902129 delay set processing til here for arrival set
4802: MSC_ATP_PROC.Initialize_Set_Processing(x_atp_table);
4803: for k in 1..x_atp_table.action.count() loop
4804: MSC_ATP_PROC.Process_Set_Line(x_atp_table, k, l_line_status);
4805: end loop;
4806:
4807: MSC_ATP_PROC.Process_Set_Dates_Errors(x_atp_table, 'D', l_set_status);
4808: l_group_date := x_atp_table.group_arrival_date(1);
4803: for k in 1..x_atp_table.action.count() loop
4804: MSC_ATP_PROC.Process_Set_Line(x_atp_table, k, l_line_status);
4805: end loop;
4806:
4807: MSC_ATP_PROC.Process_Set_Dates_Errors(x_atp_table, 'D', l_set_status);
4808: l_group_date := x_atp_table.group_arrival_date(1);
4809:
4810: -- IF l_set_status <> ALLSUCCESS THEN
4811: IF l_set_status <> ALLSUCCESS OR x_atp_table.action(1) = ATPQUERY
4815: msc_sch_wb.atp_debug('Schedule: ' || 'before removing the data for arrival set');
4816: END IF;
4817:
4818: -- 2902265
4819: MSC_ATP_PROC.cleanup_set(p_instance_id,
4820: l_plan_id,
4821: l_fst_src_pegging_ids,
4822: l_demand_class_atp_flag);
4823: /*
4852: MSC_ATP_PVT.G_DEMAND_CLASS_ATP_FLAG := l_demand_class_atp_flag;
4853: MSC_ATP_PVT.G_REQ_ATP_DATE := l_req_atp_DATE;
4854: MSC_ATP_PVT.G_REQ_DATE_QTY := l_req_date_qty;
4855:
4856: MSC_ATP_PROC.Update_Set_SD_Dates(x_atp_table,l_req_arr_date); --Plan by request date
4857: END IF;
4858:
4859: FOR i in 1..x_atp_table.Action.COUNT LOOP
4860: x_atp_table.Scenario_Id(i) := 1;
5325: l_plan_id, UNDO, MSC_ATP_PVT.G_DEMAND_CLASS_ATP_FLAG(i),l_return_status);
5326: END LOOP;
5327:
5328: -- 2902265
5329: MSC_ATP_PROC.cleanup_set(p_instance_id,
5330: l_plan_id,
5331: l_fst_src_pegging_ids,
5332: l_demand_class_atp_flag);
5333:
6454: END IF;
6455: MSC_ATP_PVT.G_ITEM_INFO_REC.organization_id := null;
6456: END IF;
6457: --e_cto_rearch
6458: MSC_ATP_PROC.get_global_item_info(p_atp_record.instance_id,
6459: --3917625: read item attributes from planned data
6460: -- -1,
6461: p_plan_id,
6462: l_request_item_id,
6478: PF_ITEM_INFO_REC.parent_atp_flag := p_atp_record.parent_atp_flag;
6479: PF_ITEM_INFO_REC.parent_comp_flag := p_atp_record.parent_atp_comp_flag;
6480: PF_ITEM_INFO_REC.parent_repl_ord_flag := p_atp_record.parent_repl_order_flag;
6481: --e_cto_rearch
6482: MSC_ATP_PROC.get_item_attributes(p_atp_record.instance_id,
6483: --3917625: Read item attribute from plani data
6484: -- -1,
6485: p_plan_id,
6486: l_family_item_id,
6607: END IF;
6608:
6609: -- cchen : changes for ship method
6610:
6611: MSC_ATP_PROC.get_delivery_lead_time(p_atp_record.organization_id,
6612: NULL, -- from location id
6613: p_atp_record.instance_id,
6614: p_atp_record.to_organization_id,
6615: l_location_id, --p_atp_record.to_location_id, --2814895
7220:
7221: /* Modularize Item and Org Info */
7222: -- Re-Use info instead of making unnecessary call.
7223: l_inv_item_name := C_ITEM_INFO_REC.item_name;
7224: MSC_ATP_PROC.get_global_org_info (p_atp_record.instance_id,
7225: p_atp_record.organization_id);
7226: l_org_code := G_ORG_INFO_REC.org_code;
7227:
7228: l_atp_insert_rec.old_demand_id := null;
7396:
7397: /* Modularize Item and Org Info */
7398: -- Re-Use info instead of making unnecessary call.
7399: l_inv_item_name := C_ITEM_INFO_REC.item_name;
7400: MSC_ATP_PROC.get_global_org_info (p_atp_record.instance_id,
7401: p_atp_record.organization_id);
7402: l_org_code := G_ORG_INFO_REC.org_code;
7403:
7404: l_atp_insert_rec.old_demand_id := null;
7442: p_atp_record.inventory_item_id,
7443: p_atp_record.organization_id);
7444:
7445: Modularize Item and Org Info */
7446: MSC_ATP_PROC.get_global_org_info (p_atp_record.instance_id,
7447: p_atp_record.organization_id );
7448: l_org_code := G_ORG_INFO_REC.org_code;
7449: /*l_org_code := MSC_ATP_FUNC.get_org_code(p_atp_record.instance_id,
7450: p_atp_record.organization_id);
7701: IF PG_DEBUG in ('Y', 'C') THEN
7702: msc_sch_wb.atp_debug('ATP_Check: ' || 'Initialize atp_date and atp_quantity_this_level');
7703: END IF;
7704:
7705: /* s_cto_rearch: chnage call to MSC_ATP_PROC.get_infinite_time_fence_date procedure
7706: l_atp_date_this_level := GREATEST(MSC_ATP_FUNC.get_infinite_time_fence_date(
7707: p_atp_record.instance_id, p_atp_record.inventory_item_id,
7708: p_atp_record.organization_id,p_plan_id), l_requested_ship_date);
7709: e_cto_rearch*/
7708: p_atp_record.organization_id,p_plan_id), l_requested_ship_date);
7709: e_cto_rearch*/
7710:
7711: --bug 4394904: Store ITF in seperate variable
7712: MSC_ATP_PROC.get_infinite_time_fence_date(
7713: p_atp_record.instance_id, p_atp_record.inventory_item_id,
7714: p_atp_record.organization_id,p_plan_id,
7715: --l_atp_date_this_level, l_atp_rule_name);
7716: l_infinite_time_fence, l_atp_rule_name);
7933: p_atp_record.inventory_item_id,
7934: p_atp_record.organization_id);
7935:
7936: Modularize Item and Org Info */
7937: MSC_ATP_PROC.get_global_org_info (p_atp_record.instance_id,
7938: p_atp_record.organization_id);
7939: l_org_code := G_ORG_INFO_REC.org_code;
7940: /* l_org_code := MSC_ATP_FUNC.get_org_code(p_atp_record.instance_id,
7941: p_atp_record.organization_id);
8585: END IF;
8586:
8587: -- update summary records removed in ODS case - for summary enhancement
8588: IF MSC_ATP_PVT.G_SUMMARY_FLAG = 'Y' AND p_plan_id = -1 THEN
8589: MSC_ATP_PROC.SHOW_SUMMARY_QUANTITY(p_atp_record.instance_id,
8590: p_plan_id,
8591: p_atp_record.organization_id,
8592: l_inventory_item_id,
8593: l_requested_ship_date,
8633: -- 1413608: instead of replace x_atp with l_atp, append it
8634: -- x_atp_supply_demand := l_atp_supply_demand;
8635: -- x_atp_period := l_atp_period;
8636:
8637: MSC_ATP_PROC.Details_Output(l_atp_period,
8638: l_atp_supply_demand,
8639: x_atp_period,
8640: x_atp_supply_demand,
8641: l_return_status);
8835: END IF;
8836:
8837: IF (l_stealing_qty > 0) THEN
8838: ----bug 1892779
8839: MSC_ATP_PROC.Details_Output(l_atp_period,
8840: l_atp_supply_demand,
8841: x_atp_period,
8842: x_atp_supply_demand,
8843: l_return_status);
9340: IF MSC_ATP_PVT.G_SUMMARY_FLAG = 'Y' and (p_parent_pegging_id is not null) AND p_plan_id = -1 THEN
9341: IF PG_DEBUG in ('Y', 'C') THEN
9342: msc_sch_wb.atp_debug('ATP_Check: ' || 'update old date demand');
9343: END IF;
9344: MSC_ATP_PROC.SHOW_SUMMARY_QUANTITY(p_atp_record.instance_id,
9345: p_plan_id,
9346: p_atp_record.organization_id,
9347: l_inventory_item_id,
9348: l_requested_ship_date,
9361: and organization_id = p_atp_record.organization_id
9362: and inventory_item_id = l_inventory_item_id
9363: and sd_date = trunc(l_requested_ship_date);
9364: commit;
9365: MSC_ATP_PROC.SHOW_SUMMARY_QUANTITY(p_atp_record.instance_id,
9366: p_plan_id,
9367: p_atp_record.organization_id,
9368: l_inventory_item_id,
9369: l_atp_date_this_level,
9551: l_atp_period_first.End_Pegging_Id(i) :=
9552: MSC_ATP_PVT.G_DEMAND_PEGGING_ID;
9553: END LOOP;
9554:
9555: MSC_ATP_PROC.Details_Output(l_atp_period_first,
9556: l_atp_supply_demand,
9557: x_atp_period,
9558: x_atp_supply_demand,
9559: l_return_status);
9574: MSC_ATP_DB_UTILS.move_SD_temp_into_mrp_details(l_atp_pegging_id,
9575: MSC_ATP_PVT.G_DEMAND_PEGGING_ID);
9576: END IF;
9577:
9578: MSC_ATP_PROC.Details_Output(l_atp_period,
9579: l_atp_supply_demand,
9580: x_atp_period,
9581: x_atp_supply_demand,
9582: l_return_status);
9697: msc_sch_wb.atp_debug('ATP_Check: ' || 'l_inventory_item_id := ' || l_inventory_item_id);
9698: msc_sch_wb.atp_debug('ATP_Check: ' || 'l_requested_ship_date := ' || l_requested_ship_date);
9699: END IF;
9700:
9701: MSC_ATP_PROC.SHOW_SUMMARY_QUANTITY(p_atp_record.instance_id,
9702: p_plan_id,
9703: p_atp_record.organization_id,
9704: l_inventory_item_id,
9705: l_requested_ship_date,
9997:
9998: l_temp_net_demand := l_net_demand;
9999: l_parent_pegging_id := l_substitutes_rec.pegging_id(l_index);
10000: l_request_item_id := l_substitutes_rec.inventory_item_id(l_index);
10001: MSC_ATP_PROC.get_global_item_info(p_atp_record.instance_id,
10002: --3917625: read item attributes from planned data
10003: -- -1,
10004: p_plan_id,
10005: l_request_item_id,
10078: ELSIF NOT (C_ITEM_INFO_REC.bom_item_type = 1 and NVL(p_atp_record.wip_supply_type,2) = 6 and
10079: C_ITEM_INFO_REC.replenish_to_ord_flag = 'Y') THEN
10080:
10081:
10082: MSC_ATP_PROC.Atp_Sources(p_atp_record.instance_id,
10083: p_plan_id,
10084: l_request_item_id, -- for time_phased_atp
10085: p_atp_record.organization_id,
10086: NULL,
10242: ELSE
10243: l_atp_rec.ship_method := null;
10244: l_atp_rec.delivery_lead_time := null;
10245:
10246: MSC_ATP_PROC.get_delivery_lead_time(
10247: l_sources.organization_id(j), -- p_from_org_id
10248: NULL, -- p_from_loc_id
10249: l_sources.instance_id(j),
10250: p_atp_record.organization_id,
10357: MSC_CALENDAR.ORC);
10358: */
10359:
10360: -- supplier intransit LT
10361: MSC_ATP_PROC.Get_Supplier_Regions(l_sources.Supplier_Site_Id(j),
10362: 724, -- calling module is immaterial here
10363: l_sources.instance_id(j),
10364: l_return_status);
10365: --3953635: If ship method is null then l_sources.Ship_Method(j) contains '@@@'
10369: ELSE
10370: l_atp_rec.ship_method := null;
10371: END IF;
10372:
10373: MSC_ATP_PROC.get_delivery_lead_time(
10374: NULL, -- p_from_org_id
10375: NULL, -- p_from_loc_id
10376: l_sources.instance_id(j),
10377: p_atp_record.organization_id,
10675:
10676: /*
10677: -- New procedure for obtaining plan data : Supplier Capacity Lead Time proj.
10678: -- (SCLT)
10679: MSC_ATP_PROC.get_global_plan_info(l_atp_rec.instance_id,
10680: l_atp_rec.inventory_item_id,
10681: l_atp_rec.organization_id,
10682: l_atp_rec.demand_class);*/
10683:
10762: ELSIF l_plan_id is NOT NULL THEN
10763: -- dsting 2764213
10764: l_planned_sources := 1;
10765:
10766: MSC_ATP_PROC.inv_primary_uom_conversion(l_atp_rec.instance_id,
10767: l_atp_rec.organization_id,
10768: l_atp_rec.inventory_item_id,
10769: p_atp_record.quantity_uom,
10770: l_atp_rec.quantity_uom,
11894: -- Org id contains source org. We need to create atp simplified peg
11895: --- in rec org. Therefore, we remember it
11896: ELSE
11897: /* Modularize Item and Org Info */
11898: MSC_ATP_PROC.get_global_org_info(p_atp_record.instance_id,
11899: l_pegging_rec.organization_id);
11900: l_pegging_rec.organization_code := MSC_ATP_PVT.G_ORG_INFO_REC.org_code;
11901: /* l_pegging_rec.organization_code :=
11902: MSC_ATP_FUNC.get_org_code(p_atp_record.instance_id,
12831: -- 2754446
12832: IF least(l_prim_uom_req_date_qty, l_PO_qty) > 0 THEN
12833: -- IF least(l_atp_rec.requested_date_quantity,
12834: -- l_atp_rec.quantity_ordered) > 0 THEN
12835: MSC_ATP_PROC.Details_Output(l_tb_atp_period,
12836: l_tb_atp_supply_demand,
12837: x_atp_period,
12838: x_atp_supply_demand,
12839: l_return_status);
13239: -- capacity for config item
13240: IF l_check_model_capacity = 2 THEN
13241: /* Make case Get the Process Sequence ID.*/
13242: -- (ssurendr) Bug 2865389 : Replace call to function MSC_ATP_FUNC.get_process_seq_id
13243: -- by procedure MSC_ATP_PROC.get_process_effectivity
13244: --Details. Derive Item's Start Date by Offsetting
13245: --Due date with LT. Check effectivity on Start Date.
13246: /* ship_rec_cal
13247: l_opm_start_date := MSC_CALENDAR.date_offset(p_atp_record.organization_id,
13254: p_atp_record.instance_id,
13255: l_requested_ship_date,
13256: -1 * (nvl(PF_ITEM_INFO_REC.fixed_lt,0) +
13257: nvl(PF_ITEM_INFO_REC.variable_lt,0) * l_PO_qty), -1);
13258: MSC_ATP_PROC.get_process_effectivity(
13259: p_plan_id,
13260: --PF_ITEM_INFO_REC.dest_inv_item_id,
13261: C_ITEM_INFO_REC.dest_inv_item_id, -- For time_phased_atp
13262: p_atp_record.organization_id,
13575: p_atp_record.instance_id,
13576: l_requested_ship_date,
13577: -1 * (nvl(PF_ITEM_INFO_REC.fixed_lt,0) +
13578: nvl(PF_ITEM_INFO_REC.variable_lt,0) * l_avail_assembly_qty), -1);
13579: MSC_ATP_PROC.get_process_effectivity(
13580: p_plan_id,
13581: --PF_ITEM_INFO_REC.dest_inv_item_id,
13582: C_ITEM_INFO_REC.dest_inv_item_id, -- For time_phased_atp
13583: p_atp_record.organization_id,
13762: END IF;
13763: -- move the supply/demand, period atp
13764: -- of the components to the output record of
13765: -- tables.
13766: MSC_ATP_PROC.Details_Output(l_comp_atp_period,
13767: l_comp_atp_supply_demand,
13768: x_atp_period,
13769: x_atp_supply_demand,
13770: l_return_status);
13768: x_atp_period,
13769: x_atp_supply_demand,
13770: l_return_status);
13771:
13772: MSC_ATP_PROC.Details_Output(l_res_atp_period,
13773: l_res_atp_supply_demand,
13774: x_atp_period,
13775: x_atp_supply_demand,
13776: l_return_status);
13864: p_atp_record.instance_id,
13865: l_requested_ship_date,
13866: -1 * (nvl(PF_ITEM_INFO_REC.fixed_lt,0) +
13867: nvl(PF_ITEM_INFO_REC.variable_lt,0) * l_res_demand), -1);
13868: MSC_ATP_PROC.get_process_effectivity(
13869: p_plan_id,
13870: --PF_ITEM_INFO_REC.dest_inv_item_id,
13871: C_ITEM_INFO_REC.dest_inv_item_id, -- For time_phased_atp
13872: p_atp_record.organization_id,
14018: -- that due to lead time we check different
14019: -- comp/res that may not have enough capacities.
14020:
14021: IF l_avail_assembly_qty > 0 THEN
14022: MSC_ATP_PROC.Details_Output(l_comp_atp_period,
14023: l_comp_atp_supply_demand,
14024: x_atp_period,
14025: x_atp_supply_demand,
14026: l_return_status);
14024: x_atp_period,
14025: x_atp_supply_demand,
14026: l_return_status);
14027:
14028: MSC_ATP_PROC.Details_Output(l_res_atp_period,
14029: l_res_atp_supply_demand,
14030: x_atp_period,
14031: x_atp_supply_demand,
14032: l_return_status);
14071: ELSE
14072: -- move the supply/demand, period atp
14073: -- of the components to the output record of
14074: -- tables.
14075: MSC_ATP_PROC.Details_Output(l_comp_atp_period,
14076: l_comp_atp_supply_demand,
14077: x_atp_period,
14078: x_atp_supply_demand,
14079: l_return_status);
14077: x_atp_period,
14078: x_atp_supply_demand,
14079: l_return_status);
14080:
14081: MSC_ATP_PROC.Details_Output(l_res_atp_period,
14082: l_res_atp_supply_demand,
14083: x_atp_period,
14084: x_atp_supply_demand,
14085: l_return_status);
14103:
14104: IF PG_DEBUG in ('Y', 'C') THEN
14105: msc_sch_wb.atp_debug('ATP_Check: ' || 'Add Coproducts for item '||p_atp_record.inventory_item_id);
14106: END IF;
14107: MSC_ATP_PROC.Add_Coproducts(
14108: p_plan_id,
14109: p_atp_record.instance_id,
14110: p_atp_record.organization_id,
14111: --bug 3766179: pass request item as inventory_item_id contains
14217: p_atp_record.instance_id,
14218: l_requested_ship_date,
14219: -1 * (nvl(PF_ITEM_INFO_REC.fixed_lt,0) +
14220: nvl(PF_ITEM_INFO_REC.variable_lt,0) * l_PO_qty), -1);
14221: MSC_ATP_PROC.get_process_effectivity(
14222: p_plan_id,
14223: --PF_ITEM_INFO_REC.dest_inv_item_id,
14224: C_ITEM_INFO_REC.dest_inv_item_id, -- For time_phased_atp
14225: p_atp_record.organization_id,
14635: l_future_atp_supply_demand :=
14636: l_comp_atp_supply_demand;
14637: l_future_pegging_id := l_pegging_id;
14638:
14639: MSC_ATP_PROC.Details_Output(l_res_atp_period,
14640: l_res_atp_supply_demand,
14641: l_future_atp_period,
14642: l_future_atp_supply_demand,
14643: l_return_status);
14657:
14658: IF PG_DEBUG in ('Y', 'C') THEN
14659: msc_sch_wb.atp_debug('ATP_Check: ' || 'Add Coproducts for item '||p_atp_record.inventory_item_id);
14660: END IF;
14661: MSC_ATP_PROC.Add_Coproducts(
14662: p_plan_id,
14663: p_atp_record.instance_id,
14664: p_atp_record.organization_id,
14665: --p_atp_record.inventory_item_id,
14781: msc_sch_wb.atp_debug('ATP_Check: ' || ' MSC_ATP_PVT.G_SUMMARY_FLAG := ' || MSC_ATP_PVT.G_SUMMARY_FLAG);
14782: END IF;
14783: -- update summary records removed in ODS case - for summary enhancement
14784: IF MSC_ATP_PVT.G_SUMMARY_FLAG = 'Y' AND p_plan_id = -1 THEN
14785: MSC_ATP_PROC.SHOW_SUMMARY_QUANTITY(p_atp_record.instance_id,
14786: p_plan_id,
14787: p_atp_record.organization_id,
14788: l_inventory_item_id,
14789: l_requested_ship_date,
14813: p_atp_record.request_item_id := l_substitutes_rec.inventory_item_id(1);
14814: l_parent_pegging_id := l_tmp_parent_pegging_id;
14815: l_pegging_id := l_substitutes_rec.inventory_item_id(1);
14816: -- Re initialize the C_item_info_rec G_item_info_rec
14817: MSC_ATP_PROC.get_global_item_info(p_atp_record.instance_id,
14818: p_plan_id,
14819: p_atp_record.request_item_id,
14820: p_atp_record.organization_id,
14821: l_item_info_rec );
14941: msc_sch_wb.atp_debug('ATP_Check: ' || 'l_inventory_item_id := ' || l_inventory_item_id);
14942: msc_sch_wb.atp_debug('ATP_Check: ' || 'l_requested_ship_date := ' || l_requested_ship_date);
14943: END IF;
14944:
14945: MSC_ATP_PROC.SHOW_SUMMARY_QUANTITY(p_atp_record.instance_id,
14946: p_plan_id,
14947: p_atp_record.organization_id,
14948: l_inventory_item_id,
14949: l_requested_ship_date,
15154: msc_sch_wb.atp_debug('ATP_Check: ' || 'l_inventory_item_id := ' || l_inventory_item_id);
15155: msc_sch_wb.atp_debug('ATP_Check: ' || 'l_requested_ship_date := ' || l_requested_ship_date);
15156: END IF;
15157:
15158: MSC_ATP_PROC.SHOW_SUMMARY_QUANTITY(p_atp_record.instance_id,
15159: p_plan_id,
15160: p_atp_record.organization_id,
15161: l_inventory_item_id,
15162: l_requested_ship_date,
15318: IF PG_DEBUG in ('Y', 'C') THEN
15319: msc_sch_wb.atp_debug('ATP_Check: ' || 'old and new dates are not same');
15320: msc_sch_wb.atp_debug('ATP_Check: ' || 'Update summary for old date');
15321: END IF;
15322: MSC_ATP_PROC.SHOW_SUMMARY_QUANTITY(p_atp_record.instance_id,
15323: p_plan_id,
15324: p_atp_record.organization_id,
15325: l_inventory_item_id,
15326: l_requested_ship_date,
15346: --- if record exists then update
15347: IF PG_DEBUG in ('Y', 'C') THEN
15348: msc_sch_wb.atp_debug('ATP_Check: ' || 'update the qty on new date ');
15349: END IF;
15350: MSC_ATP_PROC.SHOW_SUMMARY_QUANTITY(p_atp_record.instance_id,
15351: p_plan_id,
15352: p_atp_record.organization_id,
15353: l_inventory_item_id,
15354: p_atp_record.ship_date,
15395:
15396: --END IF; -- end changes for cto override
15397: END IF;
15398:
15399: MSC_ATP_PROC.Details_Output(l_future_atp_period,
15400: l_future_atp_supply_demand,
15401: x_atp_period,
15402: x_atp_supply_demand,
15403: l_return_status);
15433: --l_inv_item_id := C_ITEM_INFO_REC.dest_inv_item_id;
15434: IF NVL(G_ITEM_INFO_REC.sr_inv_item_id, 0) = p_atp_record.inventory_item_id THEN
15435: l_inv_item_id := G_ITEM_INFO_REC.dest_inv_item_id;
15436: ELSE
15437: MSC_ATP_PROC.get_global_item_info(p_atp_record.instance_id,
15438: --bug 3917625: read attributes from planned data
15439: -- -1,
15440: p_plan_id,
15441: p_atp_record.inventory_item_id,
15657: --l_inv_item_name := C_ITEM_INFO_REC.item_name;
15658: IF NVL(G_ITEM_INFO_REC.sr_inv_item_id, 0) = p_atp_record.inventory_item_id THEN
15659: l_inv_item_name := G_ITEM_INFO_REC.item_name;
15660: ELSE
15661: MSC_ATP_PROC.get_global_item_info(p_atp_record.instance_id,
15662: --3917625: Read data from plan output
15663: -- -1,
15664: p_plan_id,
15665: p_atp_record.inventory_item_id,
15874: msc_sch_wb.atp_debug('ATP_Check: ' || 'l_inv_item_id := ' || l_inv_item_id);
15875: msc_sch_wb.atp_debug('ATP_Check: ' || ' Quantity := ' || least(l_requested_date_quantity, p_atp_record.quantity_ordered));
15876: msc_sch_wb.atp_debug('ATP_Check: ' || 'First try to update');
15877: END IF;
15878: MSC_ATP_PROC.SHOW_SUMMARY_QUANTITY(p_atp_record.instance_id,
15879: p_plan_id,
15880: null,
15881: l_inv_item_id,
15882: l_requested_ship_date,
15932: sysdate,
15933: FND_GLOBAL.USER_ID);
15934: EXCEPTION
15935: WHEN DUP_VAL_ON_INDEX THEN
15936: MSC_ATP_PROC.SHOW_SUMMARY_QUANTITY(p_atp_record.instance_id,
15937: p_plan_id,
15938: null,
15939: l_inv_item_id,
15940: l_requested_ship_date,
15966: msc_sch_wb.atp_debug('ATP_Check: ' || 'l_inv_item_id := ' || l_inv_item_id);
15967: msc_sch_wb.atp_debug('ATP_Check: ' || ' Quantity := ' || p_atp_record.quantity_ordered);
15968: msc_sch_wb.atp_debug('ATP_Check: ' || 'First try to update');
15969: END IF;
15970: MSC_ATP_PROC.SHOW_SUMMARY_QUANTITY(p_atp_record.instance_id,
15971: p_plan_id,
15972: p_atp_record.organization_id,
15973: l_inv_item_id,
15974: l_atp_date_this_level,
16024: sysdate,
16025: FND_GLOBAL.USER_ID);
16026: EXCEPTION
16027: WHEN DUP_VAL_ON_INDEX THEN
16028: MSC_ATP_PROC.SHOW_SUMMARY_QUANTITY(p_atp_record.instance_id,
16029: p_plan_id,
16030: null,
16031: l_inv_item_id,
16032: l_atp_date_this_level,
16640: msc_sch_wb.atp_debug('Explode Included Items');
16641: msc_sch_wb.atp_debug('First Do UOM Convesrion');
16642: END IF;
16643:
16644: MSC_ATP_PROC.inv_primary_uom_conversion(p_instance_id,
16645: p_atp_table.validation_org(j),
16646: p_atp_table.inventory_item_id(j),
16647: p_atp_table.Quantity_UOM(i),
16648: l_quantity_uom,
16832: msc_sch_wb.atp_debug('Before get_plan_info_call:MSC_CONSUME_INT_SALES_ORDERS ' || l_consume_so_profile_value);
16833: msc_sch_wb.atp_debug('New profile: '||FND_PROFILE.VALUE('MSC_ATP_CHECK_INT_SALES_ORDERS')); --5564082
16834: END IF;
16835: IF l_consume_so_profile_value = CHECK_ORG_IN_PLAN THEN
16836: MSC_ATP_PROC.get_plan_info(p_instance_id,
16837: l_atp_input_table.inventory_item_id(m),
16838: l_atp_input_table.source_organization_id(m),
16839: null,
16840: x_plan_info_rec);
16965:
16966: IF (x_atp_table.internal_org_id(m) IS NOT NULL) OR
16967: (x_atp_table.organization_id(m) IS NOT NULL AND
16968: x_atp_table.customer_id(m) IS NULL AND x_atp_table.customer_site_id(m) IS NULL) THEN
16969: MSC_ATP_PROC.get_delivery_lead_time(
16970: x_atp_table.source_organization_id(m),
16971: NULL, -- from_loc
16972: p_instance_id,
16973: -- x_atp_table.internal_org_id(m), -- Bug 3515520
16983: l_ship_method,
16984: l_delivery_lead_time
16985: );
16986: ELSE
16987: MSC_ATP_PROC.get_delivery_lead_time(
16988: x_atp_table.source_organization_id(m),
16989: NULL, -- from_loc
16990: p_instance_id,
16991: -- x_atp_table.organization_id(m), --Bug 3515520
17460: --4500382 ENDS
17461: -- now get the results/details and append it to the 'real' output
17462: MSC_SATP_FUNC.Assign_Atp_Output_Rec(l_atp_output_table,x_atp_table,l_return_status );
17463:
17464: MSC_ATP_PROC.Details_Output(l_atp_period,
17465: l_atp_supply_demand,
17466: x_atp_period,
17467: x_atp_supply_demand,
17468: l_return_status);
17677:
17678:
17679: IF PG_DEBUG in ('Y', 'C') THEN
17680: msc_sch_wb.atp_debug('Call_Schedule: ' || 'Rows deleted from msc_atp_src_profile_temp : '||sql%rowcount);
17681: msc_sch_wb.atp_debug('Call_Schedule: ' || 'Before calling MSC_ATP_PROC.Delete_Copy_Demand');
17682: END IF;
17683:
17684: -- Summary enhancement - Delete the copy demands that were created in this transaction if refresh number has moved.
17685: IF MSC_ATP_PVT.G_SUMMARY_FLAG = 'Y' THEN --bug4291375 Delete_Copy_Demand should be called when summary is ON.
18545: l_atp_table.ship_date(i) := trunc(l_atp_table.ship_date(i)) + MSC_ATP_PVT.G_END_OF_DAY; --4967040
18546:
18547: END IF;
18548: END IF;
18549: MSC_ATP_PROC.G_latest_ship_date_set := GREATEST(NVL(MSC_ATP_PROC.G_latest_ship_date_set, l_atp_table.ship_date(i)),
18550: NVL(l_atp_table.ship_date(i), MSC_ATP_PROC.G_latest_ship_date_set));
18551: MSC_ATP_PROC.G_latest_arr_date_set := GREATEST(NVL(MSC_ATP_PROC.G_latest_arr_date_set, l_atp_table.arrival_date(i)),
18552: NVL(l_atp_table.arrival_date(i), MSC_ATP_PROC.G_latest_arr_date_set));
18553: IF PG_DEBUG in ('Y', 'C') THEN
18546:
18547: END IF;
18548: END IF;
18549: MSC_ATP_PROC.G_latest_ship_date_set := GREATEST(NVL(MSC_ATP_PROC.G_latest_ship_date_set, l_atp_table.ship_date(i)),
18550: NVL(l_atp_table.ship_date(i), MSC_ATP_PROC.G_latest_ship_date_set));
18551: MSC_ATP_PROC.G_latest_arr_date_set := GREATEST(NVL(MSC_ATP_PROC.G_latest_arr_date_set, l_atp_table.arrival_date(i)),
18552: NVL(l_atp_table.arrival_date(i), MSC_ATP_PROC.G_latest_arr_date_set));
18553: IF PG_DEBUG in ('Y', 'C') THEN
18554: msc_sch_wb.atp_debug('ship_date:(After) ' || to_char(l_atp_table.ship_date(i), 'DD-MON-YYYY HH24:MI:SS'));
18547: END IF;
18548: END IF;
18549: MSC_ATP_PROC.G_latest_ship_date_set := GREATEST(NVL(MSC_ATP_PROC.G_latest_ship_date_set, l_atp_table.ship_date(i)),
18550: NVL(l_atp_table.ship_date(i), MSC_ATP_PROC.G_latest_ship_date_set));
18551: MSC_ATP_PROC.G_latest_arr_date_set := GREATEST(NVL(MSC_ATP_PROC.G_latest_arr_date_set, l_atp_table.arrival_date(i)),
18552: NVL(l_atp_table.arrival_date(i), MSC_ATP_PROC.G_latest_arr_date_set));
18553: IF PG_DEBUG in ('Y', 'C') THEN
18554: msc_sch_wb.atp_debug('ship_date:(After) ' || to_char(l_atp_table.ship_date(i), 'DD-MON-YYYY HH24:MI:SS'));
18555: msc_sch_wb.atp_debug('Arrival_date:(After) ' || to_char(l_atp_table.arrival_date(i), 'DD-MON-YYYY HH24:MI:SS'));
18548: END IF;
18549: MSC_ATP_PROC.G_latest_ship_date_set := GREATEST(NVL(MSC_ATP_PROC.G_latest_ship_date_set, l_atp_table.ship_date(i)),
18550: NVL(l_atp_table.ship_date(i), MSC_ATP_PROC.G_latest_ship_date_set));
18551: MSC_ATP_PROC.G_latest_arr_date_set := GREATEST(NVL(MSC_ATP_PROC.G_latest_arr_date_set, l_atp_table.arrival_date(i)),
18552: NVL(l_atp_table.arrival_date(i), MSC_ATP_PROC.G_latest_arr_date_set));
18553: IF PG_DEBUG in ('Y', 'C') THEN
18554: msc_sch_wb.atp_debug('ship_date:(After) ' || to_char(l_atp_table.ship_date(i), 'DD-MON-YYYY HH24:MI:SS'));
18555: msc_sch_wb.atp_debug('Arrival_date:(After) ' || to_char(l_atp_table.arrival_date(i), 'DD-MON-YYYY HH24:MI:SS'));
18556: msc_sch_wb.atp_debug('Req. ship_date:(After) ' || to_char(l_atp_table.requested_ship_date(i), 'DD-MON-YYYY HH24:MI:SS'));