eTRM uses javascript that opens and focuses a separate window to display reports. Your browser does not appear to support javascript. This should not prevent you from using eTRM but it does mean the window focus feature will not work. Please check the contents of other windows on your desktop if you click on a link that does not appear to do anything.

APPS.MSC_ATP_PROC dependencies on MSC_ATP_PVT

Line 90: x_atp_period.Total_Supply_Quantity(j) := MSC_ATP_PVT.INFINITE_NUMBER;

86: x_atp_period.Organization_id(j) := p_organization_id;
87: x_atp_period.supplier_id(j) := p_supplier_id;
88: x_atp_period.supplier_site_id(j) := p_supplier_site_id;
89: x_atp_period.Period_Start_Date(j) := p_infinite_time_fence_date;
90: x_atp_period.Total_Supply_Quantity(j) := MSC_ATP_PVT.INFINITE_NUMBER;
91: x_atp_period.Total_Demand_Quantity(j) := 0;
92: x_atp_period.Total_Bucketed_Demand_Quantity(j) := 0; -- for time_phased_atp
93: x_atp_period.Period_Quantity(j) := MSC_ATP_PVT.INFINITE_NUMBER;
94: x_atp_period.Cumulative_Quantity(j) := MSC_ATP_PVT.INFINITE_NUMBER;

Line 93: x_atp_period.Period_Quantity(j) := MSC_ATP_PVT.INFINITE_NUMBER;

89: x_atp_period.Period_Start_Date(j) := p_infinite_time_fence_date;
90: x_atp_period.Total_Supply_Quantity(j) := MSC_ATP_PVT.INFINITE_NUMBER;
91: x_atp_period.Total_Demand_Quantity(j) := 0;
92: x_atp_period.Total_Bucketed_Demand_Quantity(j) := 0; -- for time_phased_atp
93: x_atp_period.Period_Quantity(j) := MSC_ATP_PVT.INFINITE_NUMBER;
94: x_atp_period.Cumulative_Quantity(j) := MSC_ATP_PVT.INFINITE_NUMBER;
95:
96: END add_inf_time_fence_to_period;
97:

Line 94: x_atp_period.Cumulative_Quantity(j) := MSC_ATP_PVT.INFINITE_NUMBER;

90: x_atp_period.Total_Supply_Quantity(j) := MSC_ATP_PVT.INFINITE_NUMBER;
91: x_atp_period.Total_Demand_Quantity(j) := 0;
92: x_atp_period.Total_Bucketed_Demand_Quantity(j) := 0; -- for time_phased_atp
93: x_atp_period.Period_Quantity(j) := MSC_ATP_PVT.INFINITE_NUMBER;
94: x_atp_period.Cumulative_Quantity(j) := MSC_ATP_PVT.INFINITE_NUMBER;
95:
96: END add_inf_time_fence_to_period;
97:
98: --

Line 437: --MSC_ATP_PVT.G_SR_INVENTORY_ITEM_ID := p_ship_set_item(i);

433:
434: -- 4091487 added elsif condition to raise try atp later error in case msc_item_id_lid contains no records
435: -- If dest inv item id is null return from procedure means this item not collected
436: IF l_dest_ship_set_item_list(l_dest_ship_set_item_list.COUNT) IS NULL THEN
437: --MSC_ATP_PVT.G_SR_INVENTORY_ITEM_ID := p_ship_set_item(i);
438: MSC_ATP_PVT.G_SR_INVENTORY_ITEM_ID := p_item_sourcing_info_rec.sr_inventory_item_id(i);
439: --x_return_status := FND_API.G_RET_STS_ERROR;
440: --return;
441: x_return_status := MSC_ATP_PVT.G_ITEM_NOT_COLL;

Line 438: MSC_ATP_PVT.G_SR_INVENTORY_ITEM_ID := p_item_sourcing_info_rec.sr_inventory_item_id(i);

434: -- 4091487 added elsif condition to raise try atp later error in case msc_item_id_lid contains no records
435: -- If dest inv item id is null return from procedure means this item not collected
436: IF l_dest_ship_set_item_list(l_dest_ship_set_item_list.COUNT) IS NULL THEN
437: --MSC_ATP_PVT.G_SR_INVENTORY_ITEM_ID := p_ship_set_item(i);
438: MSC_ATP_PVT.G_SR_INVENTORY_ITEM_ID := p_item_sourcing_info_rec.sr_inventory_item_id(i);
439: --x_return_status := FND_API.G_RET_STS_ERROR;
440: --return;
441: x_return_status := MSC_ATP_PVT.G_ITEM_NOT_COLL;
442:

Line 441: x_return_status := MSC_ATP_PVT.G_ITEM_NOT_COLL;

437: --MSC_ATP_PVT.G_SR_INVENTORY_ITEM_ID := p_ship_set_item(i);
438: MSC_ATP_PVT.G_SR_INVENTORY_ITEM_ID := p_item_sourcing_info_rec.sr_inventory_item_id(i);
439: --x_return_status := FND_API.G_RET_STS_ERROR;
440: --return;
441: x_return_status := MSC_ATP_PVT.G_ITEM_NOT_COLL;
442:
443: IF PG_DEBUG in ('Y', 'C') THEN
444: msc_sch_wb.atp_debug('Atp_Sources: ' || 'Inv Item Id not found for : ' ||
445: p_item_sourcing_info_rec.sr_inventory_item_id(i));

Line 451: x_return_status := MSC_ATP_PVT.G_ITEM_ID_NULL;

447: END IF;
448: RAISE NO_DATA_FOUND;
449: -- If dest inv item id is -1 return from procedure means no items not collected
450: ELSIF l_dest_ship_set_item_list(l_dest_ship_set_item_list.COUNT) = -1 THEN
451: x_return_status := MSC_ATP_PVT.G_ITEM_ID_NULL;
452: IF PG_DEBUG in ('Y', 'C') THEN
453: msc_sch_wb.atp_debug('return status assigned = ' || x_return_status);
454: END IF;
455: RAISE NO_DATA_FOUND;

Line 511: --MSC_ATP_PVT.G_SR_INVENTORY_ITEM_ID := p_ship_set_item(i);

507: p_organization_id);
508: -- 4091487 added elsif condition to raise try atp later error in case msc_item_id_lid contains no records
509: -- If dest inv item id is null return from procedure means this item not collected
510: IF l_dest_ship_set_item_list(l_dest_ship_set_item_list.COUNT) IS NULL THEN
511: --MSC_ATP_PVT.G_SR_INVENTORY_ITEM_ID := p_ship_set_item(i);
512: MSC_ATP_PVT.G_SR_INVENTORY_ITEM_ID := p_item_sourcing_info_rec.sr_inventory_item_id(i);
513: --x_return_status := FND_API.G_RET_STS_ERROR;
514: --return;
515: x_return_status := MSC_ATP_PVT.G_ITEM_NOT_COLL;

Line 512: MSC_ATP_PVT.G_SR_INVENTORY_ITEM_ID := p_item_sourcing_info_rec.sr_inventory_item_id(i);

508: -- 4091487 added elsif condition to raise try atp later error in case msc_item_id_lid contains no records
509: -- If dest inv item id is null return from procedure means this item not collected
510: IF l_dest_ship_set_item_list(l_dest_ship_set_item_list.COUNT) IS NULL THEN
511: --MSC_ATP_PVT.G_SR_INVENTORY_ITEM_ID := p_ship_set_item(i);
512: MSC_ATP_PVT.G_SR_INVENTORY_ITEM_ID := p_item_sourcing_info_rec.sr_inventory_item_id(i);
513: --x_return_status := FND_API.G_RET_STS_ERROR;
514: --return;
515: x_return_status := MSC_ATP_PVT.G_ITEM_NOT_COLL;
516: IF PG_DEBUG in ('Y', 'C') THEN

Line 515: x_return_status := MSC_ATP_PVT.G_ITEM_NOT_COLL;

511: --MSC_ATP_PVT.G_SR_INVENTORY_ITEM_ID := p_ship_set_item(i);
512: MSC_ATP_PVT.G_SR_INVENTORY_ITEM_ID := p_item_sourcing_info_rec.sr_inventory_item_id(i);
513: --x_return_status := FND_API.G_RET_STS_ERROR;
514: --return;
515: x_return_status := MSC_ATP_PVT.G_ITEM_NOT_COLL;
516: IF PG_DEBUG in ('Y', 'C') THEN
517: msc_sch_wb.atp_debug('Atp_Sources: ' || 'Inv Item Id not found for : ' ||
518: p_item_sourcing_info_rec.sr_inventory_item_id(i));
519: msc_sch_wb.atp_debug('return status assigned = ' || x_return_status);

Line 524: x_return_status := MSC_ATP_PVT.G_ITEM_ID_NULL;

520: END IF;
521: RAISE NO_DATA_FOUND;
522: -- If dest inv item id is -1 return from procedure means no items not collected
523: ELSIF l_dest_ship_set_item_list(l_dest_ship_set_item_list.COUNT) = -1 THEN
524: x_return_status := MSC_ATP_PVT.G_ITEM_ID_NULL;
525: IF PG_DEBUG in ('Y', 'C') THEN
526: msc_sch_wb.atp_debug('return status assigned = ' || x_return_status);
527: END IF;
528: RAISE NO_DATA_FOUND;

Line 576: --MSC_ATP_PVT.G_SR_INVENTORY_ITEM_ID := p_inventory_item_id;

572: -- 4091487 added elsif condition to raise try atp later error in case msc_item_id_lid contains no records
573: ---bug 1905037
574: -- If dest inv item id is -1 return from procedure means this item is not collected
575: IF (l_inv_item_id IS NULL) THEN
576: --MSC_ATP_PVT.G_SR_INVENTORY_ITEM_ID := p_inventory_item_id;
577: MSC_ATP_PVT.G_SR_INVENTORY_ITEM_ID := p_item_sourcing_info_rec.sr_inventory_item_id(1);
578: --x_return_status := FND_API.G_RET_STS_ERROR;
579: --return;
580: x_return_status := MSC_ATP_PVT.G_ITEM_NOT_COLL;

Line 577: MSC_ATP_PVT.G_SR_INVENTORY_ITEM_ID := p_item_sourcing_info_rec.sr_inventory_item_id(1);

573: ---bug 1905037
574: -- If dest inv item id is -1 return from procedure means this item is not collected
575: IF (l_inv_item_id IS NULL) THEN
576: --MSC_ATP_PVT.G_SR_INVENTORY_ITEM_ID := p_inventory_item_id;
577: MSC_ATP_PVT.G_SR_INVENTORY_ITEM_ID := p_item_sourcing_info_rec.sr_inventory_item_id(1);
578: --x_return_status := FND_API.G_RET_STS_ERROR;
579: --return;
580: x_return_status := MSC_ATP_PVT.G_ITEM_NOT_COLL;
581: IF PG_DEBUG in ('Y', 'C') THEN

Line 580: x_return_status := MSC_ATP_PVT.G_ITEM_NOT_COLL;

576: --MSC_ATP_PVT.G_SR_INVENTORY_ITEM_ID := p_inventory_item_id;
577: MSC_ATP_PVT.G_SR_INVENTORY_ITEM_ID := p_item_sourcing_info_rec.sr_inventory_item_id(1);
578: --x_return_status := FND_API.G_RET_STS_ERROR;
579: --return;
580: x_return_status := MSC_ATP_PVT.G_ITEM_NOT_COLL;
581: IF PG_DEBUG in ('Y', 'C') THEN
582: msc_sch_wb.atp_debug('Atp_Sources: ' || 'Inv Item Id not found for : ' ||
583: p_item_sourcing_info_rec.sr_inventory_item_id(1));
584: msc_sch_wb.atp_debug('return status assigned = ' || x_return_status);

Line 589: x_return_status := MSC_ATP_PVT.G_ITEM_ID_NULL;

585: END IF;
586: RAISE NO_DATA_FOUND;
587: -- If dest inv item id is -1 return from procedure means no items not collected
588: ELSIF l_inv_item_id = -1 THEN
589: x_return_status := MSC_ATP_PVT.G_ITEM_ID_NULL;
590: IF PG_DEBUG in ('Y', 'C') THEN
591: msc_sch_wb.atp_debug('return status assigned = ' || x_return_status);
592: END IF;
593: RAISE NO_DATA_FOUND;

Line 670: nvl(supplier_id,decode(source_type,MSC_ATP_PVT.BUY,-99,-1)),

666: -- instance id for buy sources
667: -- Bug 3517529: For Buy cases if supplier_id and supplier_site_id are NULL, then
668: -- they are changed to -99 to identify the Buy case, otherwise it will
669: -- be identified as a Transfer case and ATP_Check will be called recursively.
670: nvl(supplier_id,decode(source_type,MSC_ATP_PVT.BUY,-99,-1)),
671: nvl(supplier_site_id,decode(source_type,MSC_ATP_PVT.BUY,-99,-1)),
672: sum(nvl(s.rank, 0) + 1 - nvl(s.allocation_percent,0)/1000), --2910418
673: nvl(min(s.source_type),
674: decode(min(s.source_organization_id),to_number(null), 3, 1)),

Line 671: nvl(supplier_site_id,decode(source_type,MSC_ATP_PVT.BUY,-99,-1)),

667: -- Bug 3517529: For Buy cases if supplier_id and supplier_site_id are NULL, then
668: -- they are changed to -99 to identify the Buy case, otherwise it will
669: -- be identified as a Transfer case and ATP_Check will be called recursively.
670: nvl(supplier_id,decode(source_type,MSC_ATP_PVT.BUY,-99,-1)),
671: nvl(supplier_site_id,decode(source_type,MSC_ATP_PVT.BUY,-99,-1)),
672: sum(nvl(s.rank, 0) + 1 - nvl(s.allocation_percent,0)/1000), --2910418
673: nvl(min(s.source_type),
674: decode(min(s.source_organization_id),to_number(null), 3, 1)),
675: 0,

Line 883: nvl(supplier_id,decode(source_type,MSC_ATP_PVT.BUY,-99,-1)),

879: -- instance id for buy sources
880: -- Bug 3517529: For Buy cases if supplier_id and supplier_site_id are NULL, then
881: -- they are changed to -99 to identify the Buy case, otherwise it will
882: -- be identified as a Transfer case and ATP_Check will be called recursively.
883: nvl(supplier_id,decode(source_type,MSC_ATP_PVT.BUY,-99,-1)),
884: nvl(supplier_site_id,decode(source_type,MSC_ATP_PVT.BUY,-99,-1)),
885: nvl(s.rank, -1),
886: -- 2936920. treat as a make if org/src org are the same
887: decode(s.organization_id, s.source_organization_id, 2,

Line 884: nvl(supplier_site_id,decode(source_type,MSC_ATP_PVT.BUY,-99,-1)),

880: -- Bug 3517529: For Buy cases if supplier_id and supplier_site_id are NULL, then
881: -- they are changed to -99 to identify the Buy case, otherwise it will
882: -- be identified as a Transfer case and ATP_Check will be called recursively.
883: nvl(supplier_id,decode(source_type,MSC_ATP_PVT.BUY,-99,-1)),
884: nvl(supplier_site_id,decode(source_type,MSC_ATP_PVT.BUY,-99,-1)),
885: nvl(s.rank, -1),
886: -- 2936920. treat as a make if org/src org are the same
887: decode(s.organization_id, s.source_organization_id, 2,
888: nvl(s.source_type,

Line 961: decode(s.source_type,MSC_ATP_PVT.MAKE,p_organization_id,-1)) <> -1

957: AND TRUNC(NVL(s.DISABLE_DATE,l_sysdate)) >= l_sysdate
958: AND TRUNC(s.EFFECTIVE_DATE) <= l_sysdate
959: -- bug 1460753
960: AND NVL(s.source_organization_id,
961: decode(s.source_type,MSC_ATP_PVT.MAKE,p_organization_id,-1)) <> -1
962: ORDER BY rank asc, allocation_percent desc;
963: END IF;
964:
965: IF x_atp_sources.Rank.COUNT > 0 THEN

Line 1526: NVL(MSC_ATP_PVT.G_INSTANCE_ID, p_instance_id),

1522: -- that we have valid source
1523: l_source_list := x_atp_sources;
1524: MSC_ATP_CTO.Validate_CTO_Sources(l_source_list,
1525: l_line_ids,
1526: NVL(MSC_ATP_PVT.G_INSTANCE_ID, p_instance_id),
1527: p_session_id,
1528: x_return_status);
1529: x_atp_sources := l_source_list;
1530:

Line 1747: MSC_ATP_UTILS.Put_Period_Data(p_atp_period, NULL, MSC_ATP_PVT.G_SESSION_ID);

1743: -- dsting 10/1/02 supply/demand performance enh
1744: -- insert period data into mrp_atp_details_temp to transfer later
1745: -- since bulk binds across dblink are not supported.
1746:
1747: MSC_ATP_UTILS.Put_Period_Data(p_atp_period, NULL, MSC_ATP_PVT.G_SESSION_ID);
1748: IF PG_DEBUG in ('Y', 'C') THEN
1749: msc_sch_wb.atp_debug('Details_Output: ' || ' dsting expect 0 sd recs: ' || x_atp_supply_demand.level.count);
1750: END IF;
1751: RETURN;

Line 2141: msc_sch_wb.atp_debug('inv_primary_uom_conversion : ' || 'p_inventory_item_id - ' || MSC_ATP_PVT.G_ITEM_INFO_REC.dest_inv_item_id);

2137:
2138: IF PG_DEBUG in ('Y', 'C') THEN --bug3110023
2139: msc_sch_wb.atp_debug('**************** inv_primary_uom_conversion Begin ***************');
2140: msc_sch_wb.atp_debug('inv_primary_uom_conversion : ' || 'p_instance_id - ' || p_instance_id);
2141: msc_sch_wb.atp_debug('inv_primary_uom_conversion : ' || 'p_inventory_item_id - ' || MSC_ATP_PVT.G_ITEM_INFO_REC.dest_inv_item_id);
2142: msc_sch_wb.atp_debug('inv_primary_uom_conversion : ' || 'p_inventory_item_id - ' || p_inventory_item_id);
2143: msc_sch_wb.atp_debug('inv_primary_uom_conversion : ' || 'p_organization_id - ' || p_organization_id);
2144: msc_sch_wb.atp_debug('inv_primary_uom_conversion : ' || 'p_uom_code - ' || p_uom_code);
2145: msc_sch_wb.atp_debug('inv_primary_uom_conversion : ' || 'primary_uom_code - ' || MSC_ATP_PVT.G_ITEM_INFO_REC.uom_code);

Line 2145: msc_sch_wb.atp_debug('inv_primary_uom_conversion : ' || 'primary_uom_code - ' || MSC_ATP_PVT.G_ITEM_INFO_REC.uom_code);

2141: msc_sch_wb.atp_debug('inv_primary_uom_conversion : ' || 'p_inventory_item_id - ' || MSC_ATP_PVT.G_ITEM_INFO_REC.dest_inv_item_id);
2142: msc_sch_wb.atp_debug('inv_primary_uom_conversion : ' || 'p_inventory_item_id - ' || p_inventory_item_id);
2143: msc_sch_wb.atp_debug('inv_primary_uom_conversion : ' || 'p_organization_id - ' || p_organization_id);
2144: msc_sch_wb.atp_debug('inv_primary_uom_conversion : ' || 'p_uom_code - ' || p_uom_code);
2145: msc_sch_wb.atp_debug('inv_primary_uom_conversion : ' || 'primary_uom_code - ' || MSC_ATP_PVT.G_ITEM_INFO_REC.uom_code);
2146: END IF;
2147: /* Tuned for performance bug 2484964 */
2148: /* 4192057: Use the item info available in G_item_ifo_rec
2149: instead of connecting to msc_system_items table

Line 2168: IF p_uom_code <> MSC_ATP_PVT.G_ITEM_INFO_REC.uom_code THEN --bug3110023

2164: AND mucv.sr_instance_id = items.sr_instance_id;
2165: --AND mucv.organization_id = p_organization_id
2166: --AND mucv.sr_instance_id = p_instance_id;
2167: */
2168: IF p_uom_code <> MSC_ATP_PVT.G_ITEM_INFO_REC.uom_code THEN --bug3110023
2169: SELECT primary_uom_code,
2170: conversion_rate
2171: INTO x_primary_uom_code,
2172: x_conversion_rate

Line 2175: AND mucv.primary_uom_code = MSC_ATP_PVT.G_ITEM_INFO_REC.uom_code

2171: INTO x_primary_uom_code,
2172: x_conversion_rate
2173: FROM msc_uom_conversions_view mucv
2174: WHERE mucv.uom_code = p_uom_code
2175: AND mucv.primary_uom_code = MSC_ATP_PVT.G_ITEM_INFO_REC.uom_code
2176: AND mucv.inventory_item_id = MSC_ATP_PVT.G_ITEM_INFO_REC.dest_inv_item_id
2177: AND mucv.organization_id = p_organization_id
2178: AND mucv.sr_instance_id = p_instance_id;
2179: ELSE

Line 2176: AND mucv.inventory_item_id = MSC_ATP_PVT.G_ITEM_INFO_REC.dest_inv_item_id

2172: x_conversion_rate
2173: FROM msc_uom_conversions_view mucv
2174: WHERE mucv.uom_code = p_uom_code
2175: AND mucv.primary_uom_code = MSC_ATP_PVT.G_ITEM_INFO_REC.uom_code
2176: AND mucv.inventory_item_id = MSC_ATP_PVT.G_ITEM_INFO_REC.dest_inv_item_id
2177: AND mucv.organization_id = p_organization_id
2178: AND mucv.sr_instance_id = p_instance_id;
2179: ELSE
2180: x_primary_uom_code := p_uom_code;

Line 2229: x_plan_info_rec OUT NoCopy MSC_ATP_PVT.plan_info_rec, -- added for bug 2392456

2225: p_organization_id IN NUMBER,
2226: p_demand_class IN VARCHAR2,
2227: -- x_plan_id OUT NoCopy NUMBER, commented for bug 2392456
2228: -- x_assign_set_id OUT NoCopy NUMBER comented for bug 2392456
2229: x_plan_info_rec OUT NoCopy MSC_ATP_PVT.plan_info_rec, -- added for bug 2392456
2230: p_parent_plan_id IN NUMBER DEFAULT NULL, --bug3510475
2231: p_time_phased_atp IN VARCHAR2 := 'N' -- time_phased_atp
2232: )
2233: IS

Line 2239: l_plan_info_rec MSC_ATP_PVT.plan_info_rec;

2235: l_summary_flag NUMBER;
2236:
2237: --24x7
2238: l_using_new_plan number;
2239: l_plan_info_rec MSC_ATP_PVT.plan_info_rec;
2240:
2241: --bug 2854351
2242: l_plan_ids MRP_ATP_PUB.number_arr := MRP_ATP_PUB.number_arr();
2243: i number;

Line 2307: IF MSC_ATP_PVT.G_ALLOCATED_ATP = 'N' and

2303: x_plan_info_rec.plan_id := null;
2304: END;
2305: END IF;
2306: --bug3510475 add the x_plan_info_rec.plan_id condition
2307: IF MSC_ATP_PVT.G_ALLOCATED_ATP = 'N' and
2308: p_demand_class IS NOT NULL and
2309: x_plan_info_rec.plan_id is NULL THEN
2310:
2311: -- Check if the demand class ATP is needed

Line 2492: msc_sch_wb.atp_debug('Get_Plan_Info: ' || 'MSC_ATP_PVT.G_CTO_LINE='||MSC_ATP_PVT.G_CTO_LINE);

2488: -- do not switch for multiorg/multilevel ato line.
2489: -- only doing the switch if this line is not MLATO.
2490:
2491: IF PG_DEBUG in ('Y', 'C') THEN
2492: msc_sch_wb.atp_debug('Get_Plan_Info: ' || 'MSC_ATP_PVT.G_CTO_LINE='||MSC_ATP_PVT.G_CTO_LINE);
2493: END IF;
2494:
2495: IF (NVL(MSC_ATP_PVT.G_CTO_LINE, 'N') = 'N') THEN
2496: IF PG_DEBUG in ('Y', 'C') THEN

Line 2495: IF (NVL(MSC_ATP_PVT.G_CTO_LINE, 'N') = 'N') THEN

2491: IF PG_DEBUG in ('Y', 'C') THEN
2492: msc_sch_wb.atp_debug('Get_Plan_Info: ' || 'MSC_ATP_PVT.G_CTO_LINE='||MSC_ATP_PVT.G_CTO_LINE);
2493: END IF;
2494:
2495: IF (NVL(MSC_ATP_PVT.G_CTO_LINE, 'N') = 'N') THEN
2496: IF PG_DEBUG in ('Y', 'C') THEN
2497: msc_sch_wb.atp_debug('Get_Plan_Info: ' || 'x_plan_id is null, set to -1');
2498: END IF;
2499: -- x_plan_id := -1; commented for bug 2392456

Line 2624: --MSC_ATP_PVT.G_PLAN_SUBST_FLAG,

2620: x_plan_info_rec.plan_name,
2621: x_plan_info_rec.plan_id,
2622: --l_summary_flag,
2623: x_plan_info_rec.summary_flag,
2624: --MSC_ATP_PVT.G_PLAN_SUBST_FLAG,
2625: x_plan_info_rec.subst_flag,
2626: x_plan_info_rec.copy_plan_id,
2627: l_plan_info_rec.assignment_set_id,
2628: l_plan_info_rec.plan_name,

Line 2671: msc_sch_wb.atp_debug('G_SYNC_ATP_CHECK := '|| MSC_ATP_PVT.G_SYNC_ATP_CHECK);

2667: and plans.plan_id = plans2.copy_plan_id (+);
2668:
2669:
2670: IF PG_DEBUG in ('Y', 'C') THEN
2671: msc_sch_wb.atp_debug('G_SYNC_ATP_CHECK := '|| MSC_ATP_PVT.G_SYNC_ATP_CHECK);
2672: msc_sch_wb.atp_debug (' ---- ');
2673: msc_sch_wb.atp_debug ('Query Output : Old Plan ID : ' || x_plan_info_rec.plan_id);
2674: msc_sch_wb.atp_debug (' plan name: : ' || x_plan_info_rec.plan_name) ;
2675: msc_sch_wb.atp_debug (' assign_set_id : ' || x_plan_info_rec.assignment_set_id) ;

Line 2720: if (NVL(MSC_ATP_PVT.G_SYNC_ATP_CHECK, 'N') = 'Y') then

2716: -- ATP4drp changes end
2717: msc_sch_wb.atp_debug (' ---- ');
2718: END IF;
2719:
2720: if (NVL(MSC_ATP_PVT.G_SYNC_ATP_CHECK, 'N') = 'Y') then
2721: -- this is a sync call
2722: l_using_new_plan := 1;
2723: if PG_DEBUG in ('Y','C') then
2724: msc_sch_wb.atp_debug ('Sync process. Switching plan to '|| l_plan_info_rec.plan_id);

Line 2757: MSC_ATP_PVT.G_PLAN_SUBST_FLAG := x_plan_info_rec.subst_flag;

2753: END IF;
2754:
2755: -- Assign global and local variables
2756: l_summary_flag := x_plan_info_rec.summary_flag;
2757: MSC_ATP_PVT.G_PLAN_SUBST_FLAG := x_plan_info_rec.subst_flag;
2758:
2759: if PG_DEBUG in ('Y','C') then
2760: msc_sch_wb.atp_debug ('Plan_ID after processing switches is : ' || x_plan_info_rec.plan_id);
2761: end if;

Line 2765: MSC_ATP_PVT.G_ALLOCATED_ATP := 'N';

2761: end if;
2762:
2763: -- ATP4drp
2764: IF NVL(x_plan_info_rec.plan_type, 1) = 5 THEN -- DRP plan then re-set variables
2765: MSC_ATP_PVT.G_ALLOCATED_ATP := 'N';
2766: l_time_phased_atp := 'N';
2767: IF PG_DEBUG in ('Y','C') then
2768: msc_sch_wb.atp_debug('----- ATP4drp Specific Debug Messages -----');
2769: msc_sch_wb.atp_debug('DRP Plan, re-setting variables');

Line 2775: msc_sch_wb.atp_debug('Value of MSC_ATP_PVT.G_ALLOCATED_ATP :' || MSC_ATP_PVT.G_ALLOCATED_ATP);

2771: ELSE
2772: l_time_phased_atp := p_time_phased_atp; -- ALLOC ATP CHANGES, 12973673
2773: END IF;
2774: IF PG_DEBUG in ('Y','C') then
2775: msc_sch_wb.atp_debug('Value of MSC_ATP_PVT.G_ALLOCATED_ATP :' || MSC_ATP_PVT.G_ALLOCATED_ATP);
2776: msc_sch_wb.atp_debug('Value of l_time_phased_atp :' || l_time_phased_atp);
2777: msc_sch_wb.atp_debug('Value of p_time_phased_atp :' || p_time_phased_atp);
2778: END IF;
2779: -- End ATP4drp

Line 2782: IF ((MSC_ATP_PVT.G_INV_CTP = 4) AND

2778: END IF;
2779: -- End ATP4drp
2780: IF x_plan_info_rec.plan_id > 0 THEN
2781:
2782: IF ((MSC_ATP_PVT.G_INV_CTP = 4) AND
2783: (MSC_ATP_PVT.G_ALLOCATED_ATP = 'Y') AND
2784: (MSC_ATP_PVT.G_HIERARCHY_PROFILE = 1) AND
2785: (MSC_ATP_PVT.G_ALLOCATION_METHOD = 1)) THEN
2786:

Line 2783: (MSC_ATP_PVT.G_ALLOCATED_ATP = 'Y') AND

2779: -- End ATP4drp
2780: IF x_plan_info_rec.plan_id > 0 THEN
2781:
2782: IF ((MSC_ATP_PVT.G_INV_CTP = 4) AND
2783: (MSC_ATP_PVT.G_ALLOCATED_ATP = 'Y') AND
2784: (MSC_ATP_PVT.G_HIERARCHY_PROFILE = 1) AND
2785: (MSC_ATP_PVT.G_ALLOCATION_METHOD = 1)) THEN
2786:
2787: IF l_summary_flag = MSC_POST_PRO.G_SF_SUMMARY_NOT_RUN THEN -- Summary / pre-allocation was never run.

Line 2784: (MSC_ATP_PVT.G_HIERARCHY_PROFILE = 1) AND

2780: IF x_plan_info_rec.plan_id > 0 THEN
2781:
2782: IF ((MSC_ATP_PVT.G_INV_CTP = 4) AND
2783: (MSC_ATP_PVT.G_ALLOCATED_ATP = 'Y') AND
2784: (MSC_ATP_PVT.G_HIERARCHY_PROFILE = 1) AND
2785: (MSC_ATP_PVT.G_ALLOCATION_METHOD = 1)) THEN
2786:
2787: IF l_summary_flag = MSC_POST_PRO.G_SF_SUMMARY_NOT_RUN THEN -- Summary / pre-allocation was never run.
2788: x_plan_info_rec.plan_id := -200;

Line 2785: (MSC_ATP_PVT.G_ALLOCATION_METHOD = 1)) THEN

2781:
2782: IF ((MSC_ATP_PVT.G_INV_CTP = 4) AND
2783: (MSC_ATP_PVT.G_ALLOCATED_ATP = 'Y') AND
2784: (MSC_ATP_PVT.G_HIERARCHY_PROFILE = 1) AND
2785: (MSC_ATP_PVT.G_ALLOCATION_METHOD = 1)) THEN
2786:
2787: IF l_summary_flag = MSC_POST_PRO.G_SF_SUMMARY_NOT_RUN THEN -- Summary / pre-allocation was never run.
2788: x_plan_info_rec.plan_id := -200;
2789: if PG_DEBUG in ('Y','C') then

Line 2801: ELSIF NVL(MSC_ATP_PVT.G_SUMMARY_FLAG, 'N') = 'Y' THEN

2797: END IF;
2798: -- Summary enhancement: Do not reset summary flag so that copy SOs can be created
2799: -- this check will be made again just before building period data to decide whether summary should be used
2800: /*
2801: ELSIF NVL(MSC_ATP_PVT.G_SUMMARY_FLAG, 'N') = 'Y' THEN
2802: IF l_summary_flag = 1 THEN
2803: -- set the summary flag
2804: MSC_ATP_PVT.G_SUMMARY_FLAG := 'N';
2805: if PG_DEBUG in ('Y','C') then

Line 2804: MSC_ATP_PVT.G_SUMMARY_FLAG := 'N';

2800: /*
2801: ELSIF NVL(MSC_ATP_PVT.G_SUMMARY_FLAG, 'N') = 'Y' THEN
2802: IF l_summary_flag = 1 THEN
2803: -- set the summary flag
2804: MSC_ATP_PVT.G_SUMMARY_FLAG := 'N';
2805: if PG_DEBUG in ('Y','C') then
2806: msc_sch_wb.atp_debug('Switch from summary to details tables');
2807: end if;
2808: ELSIF l_summary_flag = 2 THEN*/

Line 3155: (MSC_ATP_PVT.G_SESSION_ID,

3151: , last_updated_by
3152: , last_update_login
3153: )
3154: VALUES
3155: (MSC_ATP_PVT.G_SESSION_ID,
3156: MSC_ATP_PVT.G_ORDER_LINE_ID,
3157: msc_full_pegging_s.nextval,
3158: p_parent_pegging_id,
3159: 1,

Line 3156: MSC_ATP_PVT.G_ORDER_LINE_ID,

3152: , last_update_login
3153: )
3154: VALUES
3155: (MSC_ATP_PVT.G_SESSION_ID,
3156: MSC_ATP_PVT.G_ORDER_LINE_ID,
3157: msc_full_pegging_s.nextval,
3158: p_parent_pegging_id,
3159: 1,
3160: 4,

Line 3182: NVL(MSC_ATP_PVT.G_DEMAND_PEGGING_ID, msc_full_pegging_s.currval),

3178: 2,
3179: l_coproducts_rec.quantity(rec_count),
3180: 2,
3181: p_request_date,
3182: NVL(MSC_ATP_PVT.G_DEMAND_PEGGING_ID, msc_full_pegging_s.currval),
3183: null,
3184: null, -- 1527660
3185: null,
3186: null,

Line 3189: MSC_ATP_PVT.G_SUMMARY_FLAG

3185: null,
3186: null,
3187: null,
3188: null,
3189: MSC_ATP_PVT.G_SUMMARY_FLAG
3190: -- dsting 2535568 purge temp table fix
3191: , sysdate -- creation_date
3192: , FND_GLOBAL.USER_ID -- created_by
3193: , sysdate -- last_update_date

Line 3497: ' Error in call to msc_atp_pvt.atp_sources ');

3493: IF l_return_status <> 'S' THEN
3494: x_error_mesg := l_return_status;
3495: IF PG_DEBUG in ('Y', 'C') THEN
3496: msc_sch_wb.atp_debug('get_Supply_Sources: ' ||
3497: ' Error in call to msc_atp_pvt.atp_sources ');
3498: END IF;
3499: RETURN ;
3500: ELSE
3501: IF PG_DEBUG in ('Y', 'C') THEN

Line 4278: p_item_attribute_rec IN OUT NoCopy MSC_ATP_PVT.item_attribute_rec)

4274: PROCEDURE GET_ITEM_ATTRIBUTES (p_instance_id IN NUMBER,
4275: p_plan_id IN NUMBER,
4276: p_inventory_item_id IN NUMBER,
4277: p_organization_id IN NUMBER,
4278: p_item_attribute_rec IN OUT NoCopy MSC_ATP_PVT.item_attribute_rec)
4279: AS
4280:
4281: l_atp_flag VARCHAR2(1);
4282: l_bom_item_type NUMBER;

Line 4298: msc_sch_wb.atp_debug('GET_ITEM_ATTRIBUTES: ' || 'G_ORDER_LINE_ID = '||MSC_ATP_PVT.G_ORDER_LINE_ID);

4294: msc_sch_wb.atp_debug('GET_ITEM_ATTRIBUTES: ' || 'sr_inventory_item_id = '||p_inventory_item_id);
4295: msc_sch_wb.atp_debug('GET_ITEM_ATTRIBUTES: ' || 'organization_id = '||p_organization_id);
4296: msc_sch_wb.atp_debug('GET_ITEM_ATTRIBUTES: ' || 'plan_id = '||p_plan_id);
4297: msc_sch_wb.atp_debug('GET_ITEM_ATTRIBUTES: ' || 'sr_instance_id = '||p_instance_id);
4298: msc_sch_wb.atp_debug('GET_ITEM_ATTRIBUTES: ' || 'G_ORDER_LINE_ID = '||MSC_ATP_PVT.G_ORDER_LINE_ID);
4299: msc_sch_wb.atp_debug('GET_ITEM_ATTRIBUTES: ' || 'G_ASSEMBLY_LINE_ID = '||MSC_ATP_PVT.G_ASSEMBLY_LINE_ID);
4300: msc_sch_wb.atp_debug('GET_ITEM_ATTRIBUTES: ' || 'G_COMP_LINE_ID = '||MSC_ATP_PVT.G_COMP_LINE_ID);
4301: msc_sch_wb.atp_debug('GET_ITEM_ATTRIBUTES: ' || 'G_INV_CTP = '||MSC_ATP_PVT.G_INV_CTP);
4302: msc_sch_wb.atp_debug('GET_ITEM_ATTRIBUTES: ' || 'parent_repl_ord_flag := ' ||

Line 4299: msc_sch_wb.atp_debug('GET_ITEM_ATTRIBUTES: ' || 'G_ASSEMBLY_LINE_ID = '||MSC_ATP_PVT.G_ASSEMBLY_LINE_ID);

4295: msc_sch_wb.atp_debug('GET_ITEM_ATTRIBUTES: ' || 'organization_id = '||p_organization_id);
4296: msc_sch_wb.atp_debug('GET_ITEM_ATTRIBUTES: ' || 'plan_id = '||p_plan_id);
4297: msc_sch_wb.atp_debug('GET_ITEM_ATTRIBUTES: ' || 'sr_instance_id = '||p_instance_id);
4298: msc_sch_wb.atp_debug('GET_ITEM_ATTRIBUTES: ' || 'G_ORDER_LINE_ID = '||MSC_ATP_PVT.G_ORDER_LINE_ID);
4299: msc_sch_wb.atp_debug('GET_ITEM_ATTRIBUTES: ' || 'G_ASSEMBLY_LINE_ID = '||MSC_ATP_PVT.G_ASSEMBLY_LINE_ID);
4300: msc_sch_wb.atp_debug('GET_ITEM_ATTRIBUTES: ' || 'G_COMP_LINE_ID = '||MSC_ATP_PVT.G_COMP_LINE_ID);
4301: msc_sch_wb.atp_debug('GET_ITEM_ATTRIBUTES: ' || 'G_INV_CTP = '||MSC_ATP_PVT.G_INV_CTP);
4302: msc_sch_wb.atp_debug('GET_ITEM_ATTRIBUTES: ' || 'parent_repl_ord_flag := ' ||
4303: p_item_attribute_rec.parent_repl_ord_flag);

Line 4300: msc_sch_wb.atp_debug('GET_ITEM_ATTRIBUTES: ' || 'G_COMP_LINE_ID = '||MSC_ATP_PVT.G_COMP_LINE_ID);

4296: msc_sch_wb.atp_debug('GET_ITEM_ATTRIBUTES: ' || 'plan_id = '||p_plan_id);
4297: msc_sch_wb.atp_debug('GET_ITEM_ATTRIBUTES: ' || 'sr_instance_id = '||p_instance_id);
4298: msc_sch_wb.atp_debug('GET_ITEM_ATTRIBUTES: ' || 'G_ORDER_LINE_ID = '||MSC_ATP_PVT.G_ORDER_LINE_ID);
4299: msc_sch_wb.atp_debug('GET_ITEM_ATTRIBUTES: ' || 'G_ASSEMBLY_LINE_ID = '||MSC_ATP_PVT.G_ASSEMBLY_LINE_ID);
4300: msc_sch_wb.atp_debug('GET_ITEM_ATTRIBUTES: ' || 'G_COMP_LINE_ID = '||MSC_ATP_PVT.G_COMP_LINE_ID);
4301: msc_sch_wb.atp_debug('GET_ITEM_ATTRIBUTES: ' || 'G_INV_CTP = '||MSC_ATP_PVT.G_INV_CTP);
4302: msc_sch_wb.atp_debug('GET_ITEM_ATTRIBUTES: ' || 'parent_repl_ord_flag := ' ||
4303: p_item_attribute_rec.parent_repl_ord_flag);
4304: msc_sch_wb.atp_debug('GET_ITEM_ATTRIBUTES: ' || 'parent_bom_item_type := ' ||

Line 4301: msc_sch_wb.atp_debug('GET_ITEM_ATTRIBUTES: ' || 'G_INV_CTP = '||MSC_ATP_PVT.G_INV_CTP);

4297: msc_sch_wb.atp_debug('GET_ITEM_ATTRIBUTES: ' || 'sr_instance_id = '||p_instance_id);
4298: msc_sch_wb.atp_debug('GET_ITEM_ATTRIBUTES: ' || 'G_ORDER_LINE_ID = '||MSC_ATP_PVT.G_ORDER_LINE_ID);
4299: msc_sch_wb.atp_debug('GET_ITEM_ATTRIBUTES: ' || 'G_ASSEMBLY_LINE_ID = '||MSC_ATP_PVT.G_ASSEMBLY_LINE_ID);
4300: msc_sch_wb.atp_debug('GET_ITEM_ATTRIBUTES: ' || 'G_COMP_LINE_ID = '||MSC_ATP_PVT.G_COMP_LINE_ID);
4301: msc_sch_wb.atp_debug('GET_ITEM_ATTRIBUTES: ' || 'G_INV_CTP = '||MSC_ATP_PVT.G_INV_CTP);
4302: msc_sch_wb.atp_debug('GET_ITEM_ATTRIBUTES: ' || 'parent_repl_ord_flag := ' ||
4303: p_item_attribute_rec.parent_repl_ord_flag);
4304: msc_sch_wb.atp_debug('GET_ITEM_ATTRIBUTES: ' || 'parent_bom_item_type := ' ||
4305: p_item_attribute_rec.parent_bom_item_type);

Line 4375: IF NVL(MSC_ATP_PVT.G_PLAN_INFO_REC.plan_type, 1) = 5 THEN

4371: msc_sch_wb.atp_debug('GET_ITEM_ATTRIBUTES: ' || 'Lowest Level Source = ' || p_item_attribute_rec.lowest_level_src);
4372: END IF;
4373:
4374: -- ATP4drp re-set component flag for DRP plans
4375: IF NVL(MSC_ATP_PVT.G_PLAN_INFO_REC.plan_type, 1) = 5 THEN
4376: IF l_atp_comp_flag = 'C' THEN
4377: l_atp_comp_flag := 'Y';
4378: ELSIF l_atp_comp_flag = 'R' THEN
4379: l_atp_comp_flag := 'N';

Line 4410: ELSIF MSC_ATP_PVT.G_INV_CTP = 5 THEN

4406: --We treat PTO option class and model as non-atpable
4407: l_atp_flag := 'N';
4408: l_atp_comp_flag := 'N';
4409:
4410: ELSIF MSC_ATP_PVT.G_INV_CTP = 5 THEN
4411: IF ((l_bom_item_type = 1 or l_bom_item_type = 4) and l_replenish_flag = 'Y') AND
4412: p_item_attribute_rec.parent_pegging_id is null THEN
4413: --If ATO model or ATO item then we may need to explode it.
4414: If l_atp_comp_flag = 'C' THEN

Line 4494: MSC_ATP_PVT.G_SR_INVENTORY_ITEM_ID := NULL;

4490: END IF;
4491:
4492:
4493: END IF;
4494: MSC_ATP_PVT.G_SR_INVENTORY_ITEM_ID := NULL;
4495: p_item_attribute_rec.atp_flag := l_atp_flag;
4496: p_item_attribute_rec.atp_comp_flag := l_atp_comp_flag;
4497:
4498: --s_cto_rearch

Line 4521: MSC_ATP_PVT.G_SR_INVENTORY_ITEM_ID := p_inventory_item_id;

4517: WHEN NO_DATA_FOUND THEN
4518: p_item_attribute_rec.instance_id := null;
4519: p_item_attribute_rec.organization_id := null;
4520: p_item_attribute_rec.sr_inv_item_id := null;
4521: MSC_ATP_PVT.G_SR_INVENTORY_ITEM_ID := p_inventory_item_id;
4522: p_item_attribute_rec.atp_flag := 'N';
4523: p_item_attribute_rec.atp_comp_flag := 'N';
4524: p_item_attribute_rec.pre_pro_lt := 0;
4525: p_item_attribute_rec.fixed_lt := 0;

Line 4541: x_org_attribute_rec OUT NoCopy MSC_ATP_PVT.org_attribute_rec)

4537:
4538: PROCEDURE GET_ORG_ATTRIBUTES (
4539: p_instance_id IN NUMBER,
4540: p_organization_id IN NUMBER,
4541: x_org_attribute_rec OUT NoCopy MSC_ATP_PVT.org_attribute_rec)
4542: IS
4543: BEGIN
4544:
4545: IF PG_DEBUG in ('Y', 'C') THEN

Line 4601: x_org_attribute_rec MSC_ATP_PVT.org_attribute_rec;

4597: PROCEDURE get_global_org_info (
4598: p_instance_id IN NUMBER,
4599: p_organization_id IN NUMBER) IS
4600:
4601: x_org_attribute_rec MSC_ATP_PVT.org_attribute_rec;
4602:
4603: BEGIN
4604:
4605: IF PG_DEBUG in ('Y', 'C') THEN

Line 4609: IF (MSC_ATP_PVT.G_ORG_INFO_REC.instance_id IS NULL) OR

4605: IF PG_DEBUG in ('Y', 'C') THEN
4606: msc_sch_wb.atp_debug('In get_global_org_info core');
4607: END IF;
4608:
4609: IF (MSC_ATP_PVT.G_ORG_INFO_REC.instance_id IS NULL) OR
4610: (MSC_ATP_PVT.G_ORG_INFO_REC.organization_id IS NULL) OR
4611: (MSC_ATP_PVT.G_ORG_INFO_REC.instance_id <> p_instance_id) OR
4612: (MSC_ATP_PVT.G_ORG_INFO_REC.organization_id <> p_organization_id) THEN
4613:

Line 4610: (MSC_ATP_PVT.G_ORG_INFO_REC.organization_id IS NULL) OR

4606: msc_sch_wb.atp_debug('In get_global_org_info core');
4607: END IF;
4608:
4609: IF (MSC_ATP_PVT.G_ORG_INFO_REC.instance_id IS NULL) OR
4610: (MSC_ATP_PVT.G_ORG_INFO_REC.organization_id IS NULL) OR
4611: (MSC_ATP_PVT.G_ORG_INFO_REC.instance_id <> p_instance_id) OR
4612: (MSC_ATP_PVT.G_ORG_INFO_REC.organization_id <> p_organization_id) THEN
4613:
4614: GET_ORG_ATTRIBUTES(p_instance_id, p_organization_id, x_org_attribute_rec);

Line 4611: (MSC_ATP_PVT.G_ORG_INFO_REC.instance_id <> p_instance_id) OR

4607: END IF;
4608:
4609: IF (MSC_ATP_PVT.G_ORG_INFO_REC.instance_id IS NULL) OR
4610: (MSC_ATP_PVT.G_ORG_INFO_REC.organization_id IS NULL) OR
4611: (MSC_ATP_PVT.G_ORG_INFO_REC.instance_id <> p_instance_id) OR
4612: (MSC_ATP_PVT.G_ORG_INFO_REC.organization_id <> p_organization_id) THEN
4613:
4614: GET_ORG_ATTRIBUTES(p_instance_id, p_organization_id, x_org_attribute_rec);
4615:

Line 4612: (MSC_ATP_PVT.G_ORG_INFO_REC.organization_id <> p_organization_id) THEN

4608:
4609: IF (MSC_ATP_PVT.G_ORG_INFO_REC.instance_id IS NULL) OR
4610: (MSC_ATP_PVT.G_ORG_INFO_REC.organization_id IS NULL) OR
4611: (MSC_ATP_PVT.G_ORG_INFO_REC.instance_id <> p_instance_id) OR
4612: (MSC_ATP_PVT.G_ORG_INFO_REC.organization_id <> p_organization_id) THEN
4613:
4614: GET_ORG_ATTRIBUTES(p_instance_id, p_organization_id, x_org_attribute_rec);
4615:
4616: MSC_ATP_PVT.G_ORG_INFO_REC := x_org_attribute_rec;

Line 4616: MSC_ATP_PVT.G_ORG_INFO_REC := x_org_attribute_rec;

4612: (MSC_ATP_PVT.G_ORG_INFO_REC.organization_id <> p_organization_id) THEN
4613:
4614: GET_ORG_ATTRIBUTES(p_instance_id, p_organization_id, x_org_attribute_rec);
4615:
4616: MSC_ATP_PVT.G_ORG_INFO_REC := x_org_attribute_rec;
4617:
4618: END IF;
4619:
4620: END get_global_org_info;

Line 4626: p_item_attribute_rec IN MSC_ATP_PVT.item_attribute_rec ) IS

4622: PROCEDURE get_global_item_info (p_instance_id IN NUMBER,
4623: p_plan_id IN NUMBER,
4624: p_inventory_item_id IN NUMBER,
4625: p_organization_id IN NUMBER,
4626: p_item_attribute_rec IN MSC_ATP_PVT.item_attribute_rec ) IS
4627:
4628: l_item_attribute_rec MSC_ATP_PVT.item_attribute_rec;
4629:
4630: BEGIN

Line 4628: l_item_attribute_rec MSC_ATP_PVT.item_attribute_rec;

4624: p_inventory_item_id IN NUMBER,
4625: p_organization_id IN NUMBER,
4626: p_item_attribute_rec IN MSC_ATP_PVT.item_attribute_rec ) IS
4627:
4628: l_item_attribute_rec MSC_ATP_PVT.item_attribute_rec;
4629:
4630: BEGIN
4631:
4632: IF PG_DEBUG in ('Y', 'C') THEN

Line 4644: IF (MSC_ATP_PVT.G_ITEM_INFO_REC.instance_id IS NULL) OR

4640: msc_sch_wb.atp_debug('p_plan_id := ' || p_plan_id);
4641: msc_sch_wb.atp_debug('p_inventory_item_id := ' || p_inventory_item_id);
4642: msc_sch_wb.atp_debug('p_organization_id := ' || p_organization_id);
4643: END IF;
4644: IF (MSC_ATP_PVT.G_ITEM_INFO_REC.instance_id IS NULL) OR
4645: (MSC_ATP_PVT.G_ITEM_INFO_REC.organization_id IS NULL) OR
4646: (MSC_ATP_PVT.G_ITEM_INFO_REC.sr_inv_item_id IS NULL) OR
4647: (MSC_ATP_PVT.G_ITEM_INFO_REC.instance_id <> p_instance_id) OR
4648: (MSC_ATP_PVT.G_ITEM_INFO_REC.organization_id <> p_organization_id) OR

Line 4645: (MSC_ATP_PVT.G_ITEM_INFO_REC.organization_id IS NULL) OR

4641: msc_sch_wb.atp_debug('p_inventory_item_id := ' || p_inventory_item_id);
4642: msc_sch_wb.atp_debug('p_organization_id := ' || p_organization_id);
4643: END IF;
4644: IF (MSC_ATP_PVT.G_ITEM_INFO_REC.instance_id IS NULL) OR
4645: (MSC_ATP_PVT.G_ITEM_INFO_REC.organization_id IS NULL) OR
4646: (MSC_ATP_PVT.G_ITEM_INFO_REC.sr_inv_item_id IS NULL) OR
4647: (MSC_ATP_PVT.G_ITEM_INFO_REC.instance_id <> p_instance_id) OR
4648: (MSC_ATP_PVT.G_ITEM_INFO_REC.organization_id <> p_organization_id) OR
4649: (MSC_ATP_PVT.G_ITEM_INFO_REC.sr_inv_item_id <> p_inventory_item_id)

Line 4646: (MSC_ATP_PVT.G_ITEM_INFO_REC.sr_inv_item_id IS NULL) OR

4642: msc_sch_wb.atp_debug('p_organization_id := ' || p_organization_id);
4643: END IF;
4644: IF (MSC_ATP_PVT.G_ITEM_INFO_REC.instance_id IS NULL) OR
4645: (MSC_ATP_PVT.G_ITEM_INFO_REC.organization_id IS NULL) OR
4646: (MSC_ATP_PVT.G_ITEM_INFO_REC.sr_inv_item_id IS NULL) OR
4647: (MSC_ATP_PVT.G_ITEM_INFO_REC.instance_id <> p_instance_id) OR
4648: (MSC_ATP_PVT.G_ITEM_INFO_REC.organization_id <> p_organization_id) OR
4649: (MSC_ATP_PVT.G_ITEM_INFO_REC.sr_inv_item_id <> p_inventory_item_id)
4650: ---3917625: read the item attributes if plan chnages

Line 4647: (MSC_ATP_PVT.G_ITEM_INFO_REC.instance_id <> p_instance_id) OR

4643: END IF;
4644: IF (MSC_ATP_PVT.G_ITEM_INFO_REC.instance_id IS NULL) OR
4645: (MSC_ATP_PVT.G_ITEM_INFO_REC.organization_id IS NULL) OR
4646: (MSC_ATP_PVT.G_ITEM_INFO_REC.sr_inv_item_id IS NULL) OR
4647: (MSC_ATP_PVT.G_ITEM_INFO_REC.instance_id <> p_instance_id) OR
4648: (MSC_ATP_PVT.G_ITEM_INFO_REC.organization_id <> p_organization_id) OR
4649: (MSC_ATP_PVT.G_ITEM_INFO_REC.sr_inv_item_id <> p_inventory_item_id)
4650: ---3917625: read the item attributes if plan chnages
4651: OR (NVL(MSC_ATP_PVT.G_ITEM_INFO_REC.plan_id, -12345) <> p_plan_id) THEN

Line 4648: (MSC_ATP_PVT.G_ITEM_INFO_REC.organization_id <> p_organization_id) OR

4644: IF (MSC_ATP_PVT.G_ITEM_INFO_REC.instance_id IS NULL) OR
4645: (MSC_ATP_PVT.G_ITEM_INFO_REC.organization_id IS NULL) OR
4646: (MSC_ATP_PVT.G_ITEM_INFO_REC.sr_inv_item_id IS NULL) OR
4647: (MSC_ATP_PVT.G_ITEM_INFO_REC.instance_id <> p_instance_id) OR
4648: (MSC_ATP_PVT.G_ITEM_INFO_REC.organization_id <> p_organization_id) OR
4649: (MSC_ATP_PVT.G_ITEM_INFO_REC.sr_inv_item_id <> p_inventory_item_id)
4650: ---3917625: read the item attributes if plan chnages
4651: OR (NVL(MSC_ATP_PVT.G_ITEM_INFO_REC.plan_id, -12345) <> p_plan_id) THEN
4652:

Line 4649: (MSC_ATP_PVT.G_ITEM_INFO_REC.sr_inv_item_id <> p_inventory_item_id)

4645: (MSC_ATP_PVT.G_ITEM_INFO_REC.organization_id IS NULL) OR
4646: (MSC_ATP_PVT.G_ITEM_INFO_REC.sr_inv_item_id IS NULL) OR
4647: (MSC_ATP_PVT.G_ITEM_INFO_REC.instance_id <> p_instance_id) OR
4648: (MSC_ATP_PVT.G_ITEM_INFO_REC.organization_id <> p_organization_id) OR
4649: (MSC_ATP_PVT.G_ITEM_INFO_REC.sr_inv_item_id <> p_inventory_item_id)
4650: ---3917625: read the item attributes if plan chnages
4651: OR (NVL(MSC_ATP_PVT.G_ITEM_INFO_REC.plan_id, -12345) <> p_plan_id) THEN
4652:
4653:

Line 4651: OR (NVL(MSC_ATP_PVT.G_ITEM_INFO_REC.plan_id, -12345) <> p_plan_id) THEN

4647: (MSC_ATP_PVT.G_ITEM_INFO_REC.instance_id <> p_instance_id) OR
4648: (MSC_ATP_PVT.G_ITEM_INFO_REC.organization_id <> p_organization_id) OR
4649: (MSC_ATP_PVT.G_ITEM_INFO_REC.sr_inv_item_id <> p_inventory_item_id)
4650: ---3917625: read the item attributes if plan chnages
4651: OR (NVL(MSC_ATP_PVT.G_ITEM_INFO_REC.plan_id, -12345) <> p_plan_id) THEN
4652:
4653:
4654: msc_sch_wb.atp_debug('Item/Org/instance/plan info has changed. Recalculate item attributes');
4655: l_item_attribute_rec.parent_repl_ord_flag := p_item_attribute_rec.parent_repl_ord_flag;

Line 4665: MSC_ATP_PVT.G_ITEM_INFO_REC := l_item_attribute_rec;

4661:
4662: GET_ITEM_ATTRIBUTES(p_instance_id, p_plan_id, p_inventory_item_id,
4663: p_organization_id, l_item_attribute_rec);
4664:
4665: MSC_ATP_PVT.G_ITEM_INFO_REC := l_item_attribute_rec;
4666:
4667:
4668: END IF;
4669:

Line 4672: MSC_ATP_PVT.G_ITEM_INFO_REC.atp_flag);

4668: END IF;
4669:
4670: IF PG_DEBUG in ('Y', 'C') THEN
4671: msc_sch_wb.atp_debug('get_global_item_info ATP flag is '||
4672: MSC_ATP_PVT.G_ITEM_INFO_REC.atp_flag);
4673: END IF;
4674:
4675: END get_global_item_info;
4676:

Line 4685: p_plan_info_rec MSC_ATP_PVT.plan_info_rec;

4681: p_demand_class IN VARCHAR2,
4682: p_parent_plan_id IN NUMBER DEFAULT NULL, --bug3510475
4683: p_time_phased_atp IN VARCHAR2 := 'N' ) IS -- time_phased_atp
4684:
4685: p_plan_info_rec MSC_ATP_PVT.plan_info_rec;
4686:
4687: BEGIN
4688: IF PG_DEBUG in ('Y', 'C') THEN
4689: msc_sch_wb.atp_debug('In get_global_plan_info core');

Line 4690: msc_sch_wb.atp_debug('g__inv_id := ' || MSC_ATP_PVT.G_ITEM_INFO_REC.sr_inv_item_id);

4686:
4687: BEGIN
4688: IF PG_DEBUG in ('Y', 'C') THEN
4689: msc_sch_wb.atp_debug('In get_global_plan_info core');
4690: msc_sch_wb.atp_debug('g__inv_id := ' || MSC_ATP_PVT.G_ITEM_INFO_REC.sr_inv_item_id);
4691: msc_sch_wb.atp_debug('p_inv_id := ' || p_inventory_item_id);
4692: msc_sch_wb.atp_debug('g_instance_id := ' || MSC_ATP_PVT.G_ITEM_INFO_REC.instance_id);
4693: msc_sch_wb.atp_debug('p_instance_id := ' || p_instance_id);
4694: msc_sch_wb.atp_debug('g_org_id := ' || MSC_ATP_PVT.G_ITEM_INFO_REC.organization_id);

Line 4692: msc_sch_wb.atp_debug('g_instance_id := ' || MSC_ATP_PVT.G_ITEM_INFO_REC.instance_id);

4688: IF PG_DEBUG in ('Y', 'C') THEN
4689: msc_sch_wb.atp_debug('In get_global_plan_info core');
4690: msc_sch_wb.atp_debug('g__inv_id := ' || MSC_ATP_PVT.G_ITEM_INFO_REC.sr_inv_item_id);
4691: msc_sch_wb.atp_debug('p_inv_id := ' || p_inventory_item_id);
4692: msc_sch_wb.atp_debug('g_instance_id := ' || MSC_ATP_PVT.G_ITEM_INFO_REC.instance_id);
4693: msc_sch_wb.atp_debug('p_instance_id := ' || p_instance_id);
4694: msc_sch_wb.atp_debug('g_org_id := ' || MSC_ATP_PVT.G_ITEM_INFO_REC.organization_id);
4695: msc_sch_wb.atp_debug('p_org_id := ' || p_organization_id);
4696: msc_sch_wb.atp_debug('g_plan_id := ' || MSC_ATP_PVT.G_PLAN_INFO_REC.plan_id);

Line 4694: msc_sch_wb.atp_debug('g_org_id := ' || MSC_ATP_PVT.G_ITEM_INFO_REC.organization_id);

4690: msc_sch_wb.atp_debug('g__inv_id := ' || MSC_ATP_PVT.G_ITEM_INFO_REC.sr_inv_item_id);
4691: msc_sch_wb.atp_debug('p_inv_id := ' || p_inventory_item_id);
4692: msc_sch_wb.atp_debug('g_instance_id := ' || MSC_ATP_PVT.G_ITEM_INFO_REC.instance_id);
4693: msc_sch_wb.atp_debug('p_instance_id := ' || p_instance_id);
4694: msc_sch_wb.atp_debug('g_org_id := ' || MSC_ATP_PVT.G_ITEM_INFO_REC.organization_id);
4695: msc_sch_wb.atp_debug('p_org_id := ' || p_organization_id);
4696: msc_sch_wb.atp_debug('g_plan_id := ' || MSC_ATP_PVT.G_PLAN_INFO_REC.plan_id);
4697: END IF;
4698:

Line 4696: msc_sch_wb.atp_debug('g_plan_id := ' || MSC_ATP_PVT.G_PLAN_INFO_REC.plan_id);

4692: msc_sch_wb.atp_debug('g_instance_id := ' || MSC_ATP_PVT.G_ITEM_INFO_REC.instance_id);
4693: msc_sch_wb.atp_debug('p_instance_id := ' || p_instance_id);
4694: msc_sch_wb.atp_debug('g_org_id := ' || MSC_ATP_PVT.G_ITEM_INFO_REC.organization_id);
4695: msc_sch_wb.atp_debug('p_org_id := ' || p_organization_id);
4696: msc_sch_wb.atp_debug('g_plan_id := ' || MSC_ATP_PVT.G_PLAN_INFO_REC.plan_id);
4697: END IF;
4698:
4699: IF (MSC_ATP_PVT.G_ITEM_INFO_REC.sr_inv_item_id IS NULL) OR
4700: (MSC_ATP_PVT.G_ITEM_INFO_REC.instance_id <> p_instance_id) OR

Line 4699: IF (MSC_ATP_PVT.G_ITEM_INFO_REC.sr_inv_item_id IS NULL) OR

4695: msc_sch_wb.atp_debug('p_org_id := ' || p_organization_id);
4696: msc_sch_wb.atp_debug('g_plan_id := ' || MSC_ATP_PVT.G_PLAN_INFO_REC.plan_id);
4697: END IF;
4698:
4699: IF (MSC_ATP_PVT.G_ITEM_INFO_REC.sr_inv_item_id IS NULL) OR
4700: (MSC_ATP_PVT.G_ITEM_INFO_REC.instance_id <> p_instance_id) OR
4701: (MSC_ATP_PVT.G_ITEM_INFO_REC.organization_id <> p_organization_id) OR
4702: (MSC_ATP_PVT.G_ITEM_INFO_REC.sr_inv_item_id <> p_inventory_item_id) OR
4703: -- If Item information does not match

Line 4700: (MSC_ATP_PVT.G_ITEM_INFO_REC.instance_id <> p_instance_id) OR

4696: msc_sch_wb.atp_debug('g_plan_id := ' || MSC_ATP_PVT.G_PLAN_INFO_REC.plan_id);
4697: END IF;
4698:
4699: IF (MSC_ATP_PVT.G_ITEM_INFO_REC.sr_inv_item_id IS NULL) OR
4700: (MSC_ATP_PVT.G_ITEM_INFO_REC.instance_id <> p_instance_id) OR
4701: (MSC_ATP_PVT.G_ITEM_INFO_REC.organization_id <> p_organization_id) OR
4702: (MSC_ATP_PVT.G_ITEM_INFO_REC.sr_inv_item_id <> p_inventory_item_id) OR
4703: -- If Item information does not match
4704: (MSC_ATP_PVT.G_PLAN_INFO_REC.plan_id IS NULL) OR

Line 4701: (MSC_ATP_PVT.G_ITEM_INFO_REC.organization_id <> p_organization_id) OR

4697: END IF;
4698:
4699: IF (MSC_ATP_PVT.G_ITEM_INFO_REC.sr_inv_item_id IS NULL) OR
4700: (MSC_ATP_PVT.G_ITEM_INFO_REC.instance_id <> p_instance_id) OR
4701: (MSC_ATP_PVT.G_ITEM_INFO_REC.organization_id <> p_organization_id) OR
4702: (MSC_ATP_PVT.G_ITEM_INFO_REC.sr_inv_item_id <> p_inventory_item_id) OR
4703: -- If Item information does not match
4704: (MSC_ATP_PVT.G_PLAN_INFO_REC.plan_id IS NULL) OR
4705: (MSC_ATP_PVT.G_PLAN_INFO_REC.sr_instance_id <> p_instance_id) OR

Line 4702: (MSC_ATP_PVT.G_ITEM_INFO_REC.sr_inv_item_id <> p_inventory_item_id) OR

4698:
4699: IF (MSC_ATP_PVT.G_ITEM_INFO_REC.sr_inv_item_id IS NULL) OR
4700: (MSC_ATP_PVT.G_ITEM_INFO_REC.instance_id <> p_instance_id) OR
4701: (MSC_ATP_PVT.G_ITEM_INFO_REC.organization_id <> p_organization_id) OR
4702: (MSC_ATP_PVT.G_ITEM_INFO_REC.sr_inv_item_id <> p_inventory_item_id) OR
4703: -- If Item information does not match
4704: (MSC_ATP_PVT.G_PLAN_INFO_REC.plan_id IS NULL) OR
4705: (MSC_ATP_PVT.G_PLAN_INFO_REC.sr_instance_id <> p_instance_id) OR
4706: (MSC_ATP_PVT.G_PLAN_INFO_REC.organization_id <> p_organization_id) THEN

Line 4704: (MSC_ATP_PVT.G_PLAN_INFO_REC.plan_id IS NULL) OR

4700: (MSC_ATP_PVT.G_ITEM_INFO_REC.instance_id <> p_instance_id) OR
4701: (MSC_ATP_PVT.G_ITEM_INFO_REC.organization_id <> p_organization_id) OR
4702: (MSC_ATP_PVT.G_ITEM_INFO_REC.sr_inv_item_id <> p_inventory_item_id) OR
4703: -- If Item information does not match
4704: (MSC_ATP_PVT.G_PLAN_INFO_REC.plan_id IS NULL) OR
4705: (MSC_ATP_PVT.G_PLAN_INFO_REC.sr_instance_id <> p_instance_id) OR
4706: (MSC_ATP_PVT.G_PLAN_INFO_REC.organization_id <> p_organization_id) THEN
4707: -- Or If the Plan Information does not match then obtain the plan info.
4708:

Line 4705: (MSC_ATP_PVT.G_PLAN_INFO_REC.sr_instance_id <> p_instance_id) OR

4701: (MSC_ATP_PVT.G_ITEM_INFO_REC.organization_id <> p_organization_id) OR
4702: (MSC_ATP_PVT.G_ITEM_INFO_REC.sr_inv_item_id <> p_inventory_item_id) OR
4703: -- If Item information does not match
4704: (MSC_ATP_PVT.G_PLAN_INFO_REC.plan_id IS NULL) OR
4705: (MSC_ATP_PVT.G_PLAN_INFO_REC.sr_instance_id <> p_instance_id) OR
4706: (MSC_ATP_PVT.G_PLAN_INFO_REC.organization_id <> p_organization_id) THEN
4707: -- Or If the Plan Information does not match then obtain the plan info.
4708:
4709: --bug3510475

Line 4706: (MSC_ATP_PVT.G_PLAN_INFO_REC.organization_id <> p_organization_id) THEN

4702: (MSC_ATP_PVT.G_ITEM_INFO_REC.sr_inv_item_id <> p_inventory_item_id) OR
4703: -- If Item information does not match
4704: (MSC_ATP_PVT.G_PLAN_INFO_REC.plan_id IS NULL) OR
4705: (MSC_ATP_PVT.G_PLAN_INFO_REC.sr_instance_id <> p_instance_id) OR
4706: (MSC_ATP_PVT.G_PLAN_INFO_REC.organization_id <> p_organization_id) THEN
4707: -- Or If the Plan Information does not match then obtain the plan info.
4708:
4709: --bug3510475
4710: Get_Plan_Info(p_instance_id, p_inventory_item_id,

Line 4712: MSC_ATP_PVT.G_PLAN_INFO_REC := p_plan_info_rec;

4708:
4709: --bug3510475
4710: Get_Plan_Info(p_instance_id, p_inventory_item_id,
4711: p_organization_id, p_demand_class, p_plan_info_rec,p_parent_plan_id,p_time_phased_atp); -- time_phased_atp
4712: MSC_ATP_PVT.G_PLAN_INFO_REC := p_plan_info_rec;
4713:
4714: END IF;
4715:
4716: IF PG_DEBUG in ('Y', 'C') THEN

Line 4718: MSC_ATP_PVT.G_PLAN_INFO_REC.plan_name);

4714: END IF;
4715:
4716: IF PG_DEBUG in ('Y', 'C') THEN
4717: msc_sch_wb.atp_debug('get_global_plan_info Plan name is '||
4718: MSC_ATP_PVT.G_PLAN_INFO_REC.plan_name);
4719: msc_sch_wb.atp_debug('get_global_plan_info Argument Organization ID is '||
4720: p_organization_id);
4721: msc_sch_wb.atp_debug('get_global_plan_info Plan owning organization is '||
4722: MSC_ATP_PVT.G_PLAN_INFO_REC.organization_id);

Line 4722: MSC_ATP_PVT.G_PLAN_INFO_REC.organization_id);

4718: MSC_ATP_PVT.G_PLAN_INFO_REC.plan_name);
4719: msc_sch_wb.atp_debug('get_global_plan_info Argument Organization ID is '||
4720: p_organization_id);
4721: msc_sch_wb.atp_debug('get_global_plan_info Plan owning organization is '||
4722: MSC_ATP_PVT.G_PLAN_INFO_REC.organization_id);
4723: END IF;
4724:
4725: END get_global_plan_info;
4726:

Line 4790: msc_sch_wb.atp_debug('get_infinite_time_fence_date: MSC_ATP_PVT.G_INF_SUP_TF_PAD ' || MSC_ATP_PVT.G_INF_SUP_TF_PAD);

4786: -- Read the Profile option to pad the user defined days
4787: -- to infinite Supply fence.
4788: IF PG_DEBUG in ('Y', 'C') THEN
4789: msc_sch_wb.atp_debug('get_infinite_time_fence_date: Profile value for Infinite Supply Pad');
4790: msc_sch_wb.atp_debug('get_infinite_time_fence_date: MSC_ATP_PVT.G_INF_SUP_TF_PAD ' || MSC_ATP_PVT.G_INF_SUP_TF_PAD);
4791: END IF;
4792: -- Bug 3036513 If resource_id is NULL get the infinite_time_fence_date
4793: -- for just the item.
4794: IF (p_resource_id IS NULL) THEN

Line 4824: 1, ceil(i.cumulative_total_lead_time) + MSC_ATP_PVT.G_INF_SUP_TF_PAD,

4820: -- Add Infinite Supply Time Fence PAD
4821: --bug3609031 adding ceil
4822: AND c2.seq_num = c1.next_seq_num +
4823: DECODE(r.infinite_supply_fence_code,
4824: 1, ceil(i.cumulative_total_lead_time) + MSC_ATP_PVT.G_INF_SUP_TF_PAD,
4825: 2, ceil(i.cum_manufacturing_lead_time) + MSC_ATP_PVT.G_INF_SUP_TF_PAD,
4826: 3, DECODE(NVL(ceil(i.preprocessing_lead_time),-1)+
4827: NVL(ceil(i.full_lead_time),-1)+
4828: NVL(ceil(i.postprocessing_lead_time),-1),-3,

Line 4825: 2, ceil(i.cum_manufacturing_lead_time) + MSC_ATP_PVT.G_INF_SUP_TF_PAD,

4821: --bug3609031 adding ceil
4822: AND c2.seq_num = c1.next_seq_num +
4823: DECODE(r.infinite_supply_fence_code,
4824: 1, ceil(i.cumulative_total_lead_time) + MSC_ATP_PVT.G_INF_SUP_TF_PAD,
4825: 2, ceil(i.cum_manufacturing_lead_time) + MSC_ATP_PVT.G_INF_SUP_TF_PAD,
4826: 3, DECODE(NVL(ceil(i.preprocessing_lead_time),-1)+
4827: NVL(ceil(i.full_lead_time),-1)+
4828: NVL(ceil(i.postprocessing_lead_time),-1),-3,
4829: NULL, -- All are NULL so return NULL.

Line 4833: + MSC_ATP_PVT.G_INF_SUP_TF_PAD),

4829: NULL, -- All are NULL so return NULL.
4830: NVL(ceil(i.preprocessing_lead_time),0)+ -- Otherwise
4831: NVL(ceil(i.full_lead_time),0) + -- evaluate to
4832: NVL(ceil(i.postprocessing_lead_time),0) -- NON NULL
4833: + MSC_ATP_PVT.G_INF_SUP_TF_PAD),
4834: -- Bugs 1986353, 2004479.
4835: 4, r.infinite_supply_time_fence)
4836: -- End Bug 2877340, 2746213
4837: AND c2.calendar_code = c1.calendar_code

Line 7893: G_set_status := MSC_ATP_PVT.ALLSUCCESS;

7889: END IF;
7890: -- 2834932
7891: G_set_nonoverride_flag := 'N';
7892: G_set_override_flag := 'N';
7893: G_set_status := MSC_ATP_PVT.ALLSUCCESS;
7894: G_is_ship_set := p_set.ship_set_name(p_start) is not null;
7895: G_override_date := null;
7896: G_ship_LAD_set := null;
7897: G_arr_LAD_set := null;

Line 7917: x_line_status := NVL(p_set.error_code(i), MSC_ATP_PVT.ALLSUCCESS);

7913: IF PG_DEBUG in ('Y', 'C') THEN
7914: msc_sch_wb.atp_debug('********** Begin Process_Set_Line **********');
7915: END IF;
7916:
7917: x_line_status := NVL(p_set.error_code(i), MSC_ATP_PVT.ALLSUCCESS);
7918:
7919: IF p_set.requested_ship_date(i) is NOT null THEN
7920: l_request_date_ln := p_set.requested_ship_date(i);
7921: ELSE

Line 7966: IF p_set.Error_Code(i) = MSC_ATP_PVT.ATP_NOT_APPL THEN

7962: nvl(G_ship_EAD_set, p_set.earliest_acceptable_date(i)));
7963:
7964: /* Bug 3365376: LAD should be considered for Non-atpable items as well.
7965: -- nonatpable items..move LAD back to sysdate of curr LAD is before sysdate
7966: IF p_set.Error_Code(i) = MSC_ATP_PVT.ATP_NOT_APPL THEN
7967: l_ship_LAD_ln := null;
7968: l_arr_LAD_ln := null;
7969: END IF;
7970: */

Line 7986: AND p_set.error_code(i) = MSC_ATP_PVT.ATP_REQ_DATE_FAIL

7982:
7983: -- set line status
7984: -- dsting 2797410
7985: IF nvl(p_set.override_flag(i), 'N') = 'Y'
7986: AND p_set.error_code(i) = MSC_ATP_PVT.ATP_REQ_DATE_FAIL
7987: THEN
7988: x_line_status := MSC_ATP_PVT.ALLSUCCESS;
7989:
7990: --bug 3365376: We should check pass/fail status for Non atpbale lines as well

Line 7988: x_line_status := MSC_ATP_PVT.ALLSUCCESS;

7984: -- dsting 2797410
7985: IF nvl(p_set.override_flag(i), 'N') = 'Y'
7986: AND p_set.error_code(i) = MSC_ATP_PVT.ATP_REQ_DATE_FAIL
7987: THEN
7988: x_line_status := MSC_ATP_PVT.ALLSUCCESS;
7989:
7990: --bug 3365376: We should check pass/fail status for Non atpbale lines as well
7991: /* ELSIF p_set.error_code(i) = MSC_ATP_PVT.ATP_NOT_APPL
7992: OR p_set.error_code(i) = MSC_ATP_PVT.PDS_TO_ODS_SWITCH

Line 7991: /* ELSIF p_set.error_code(i) = MSC_ATP_PVT.ATP_NOT_APPL

7987: THEN
7988: x_line_status := MSC_ATP_PVT.ALLSUCCESS;
7989:
7990: --bug 3365376: We should check pass/fail status for Non atpbale lines as well
7991: /* ELSIF p_set.error_code(i) = MSC_ATP_PVT.ATP_NOT_APPL
7992: OR p_set.error_code(i) = MSC_ATP_PVT.PDS_TO_ODS_SWITCH
7993: */
7994: ELSIF p_set.error_code(i) = MSC_ATP_PVT.PDS_TO_ODS_SWITCH
7995: THEN

Line 7992: OR p_set.error_code(i) = MSC_ATP_PVT.PDS_TO_ODS_SWITCH

7988: x_line_status := MSC_ATP_PVT.ALLSUCCESS;
7989:
7990: --bug 3365376: We should check pass/fail status for Non atpbale lines as well
7991: /* ELSIF p_set.error_code(i) = MSC_ATP_PVT.ATP_NOT_APPL
7992: OR p_set.error_code(i) = MSC_ATP_PVT.PDS_TO_ODS_SWITCH
7993: */
7994: ELSIF p_set.error_code(i) = MSC_ATP_PVT.PDS_TO_ODS_SWITCH
7995: THEN
7996: x_line_status := MSC_ATP_PVT.ALLSUCCESS;

Line 7994: ELSIF p_set.error_code(i) = MSC_ATP_PVT.PDS_TO_ODS_SWITCH

7990: --bug 3365376: We should check pass/fail status for Non atpbale lines as well
7991: /* ELSIF p_set.error_code(i) = MSC_ATP_PVT.ATP_NOT_APPL
7992: OR p_set.error_code(i) = MSC_ATP_PVT.PDS_TO_ODS_SWITCH
7993: */
7994: ELSIF p_set.error_code(i) = MSC_ATP_PVT.PDS_TO_ODS_SWITCH
7995: THEN
7996: x_line_status := MSC_ATP_PVT.ALLSUCCESS;
7997: ELSIF p_set.error_code(i) = MSC_ATP_PVT.ATP_REQ_DATE_FAIL
7998: --bug 3365376

Line 7996: x_line_status := MSC_ATP_PVT.ALLSUCCESS;

7992: OR p_set.error_code(i) = MSC_ATP_PVT.PDS_TO_ODS_SWITCH
7993: */
7994: ELSIF p_set.error_code(i) = MSC_ATP_PVT.PDS_TO_ODS_SWITCH
7995: THEN
7996: x_line_status := MSC_ATP_PVT.ALLSUCCESS;
7997: ELSIF p_set.error_code(i) = MSC_ATP_PVT.ATP_REQ_DATE_FAIL
7998: --bug 3365376
7999: OR p_set.error_code(i) = MSC_ATP_PVT.ATP_NOT_APPL
8000: THEN

Line 7997: ELSIF p_set.error_code(i) = MSC_ATP_PVT.ATP_REQ_DATE_FAIL

7993: */
7994: ELSIF p_set.error_code(i) = MSC_ATP_PVT.PDS_TO_ODS_SWITCH
7995: THEN
7996: x_line_status := MSC_ATP_PVT.ALLSUCCESS;
7997: ELSIF p_set.error_code(i) = MSC_ATP_PVT.ATP_REQ_DATE_FAIL
7998: --bug 3365376
7999: OR p_set.error_code(i) = MSC_ATP_PVT.ATP_NOT_APPL
8000: THEN
8001: IF TRUNC(p_set.ship_date(i)) > TRUNC(l_ship_LAD_ln)

Line 7999: OR p_set.error_code(i) = MSC_ATP_PVT.ATP_NOT_APPL

7995: THEN
7996: x_line_status := MSC_ATP_PVT.ALLSUCCESS;
7997: ELSIF p_set.error_code(i) = MSC_ATP_PVT.ATP_REQ_DATE_FAIL
7998: --bug 3365376
7999: OR p_set.error_code(i) = MSC_ATP_PVT.ATP_NOT_APPL
8000: THEN
8001: IF TRUNC(p_set.ship_date(i)) > TRUNC(l_ship_LAD_ln)
8002: or TRUNC(p_set.arrival_date(i)) > TRUNC(l_arr_LAD_ln)
8003: THEN

Line 8004: x_line_status := MSC_ATP_PVT.ATP_ACCEPT_FAIL;

8000: THEN
8001: IF TRUNC(p_set.ship_date(i)) > TRUNC(l_ship_LAD_ln)
8002: or TRUNC(p_set.arrival_date(i)) > TRUNC(l_arr_LAD_ln)
8003: THEN
8004: x_line_status := MSC_ATP_PVT.ATP_ACCEPT_FAIL;
8005: ELSE
8006: x_line_status := MSC_ATP_PVT.ALLSUCCESS;
8007: END IF;
8008: END IF;

Line 8006: x_line_status := MSC_ATP_PVT.ALLSUCCESS;

8002: or TRUNC(p_set.arrival_date(i)) > TRUNC(l_arr_LAD_ln)
8003: THEN
8004: x_line_status := MSC_ATP_PVT.ATP_ACCEPT_FAIL;
8005: ELSE
8006: x_line_status := MSC_ATP_PVT.ALLSUCCESS;
8007: END IF;
8008: END IF;
8009: IF p_set.Action(i) <> MSC_ATP_PVT.ATPQUERY AND
8010: (p_set.Error_Code(i) = MSC_ATP_PVT.ATP_NOT_APPL OR

Line 8009: IF p_set.Action(i) <> MSC_ATP_PVT.ATPQUERY AND

8005: ELSE
8006: x_line_status := MSC_ATP_PVT.ALLSUCCESS;
8007: END IF;
8008: END IF;
8009: IF p_set.Action(i) <> MSC_ATP_PVT.ATPQUERY AND
8010: (p_set.Error_Code(i) = MSC_ATP_PVT.ATP_NOT_APPL OR
8011: p_set.error_code(i) = MSC_ATP_PVT.PDS_TO_ODS_SWITCH)
8012: THEN
8013: p_set.Error_Code(i) := MSC_ATP_PVT.ALLSUCCESS;

Line 8010: (p_set.Error_Code(i) = MSC_ATP_PVT.ATP_NOT_APPL OR

8006: x_line_status := MSC_ATP_PVT.ALLSUCCESS;
8007: END IF;
8008: END IF;
8009: IF p_set.Action(i) <> MSC_ATP_PVT.ATPQUERY AND
8010: (p_set.Error_Code(i) = MSC_ATP_PVT.ATP_NOT_APPL OR
8011: p_set.error_code(i) = MSC_ATP_PVT.PDS_TO_ODS_SWITCH)
8012: THEN
8013: p_set.Error_Code(i) := MSC_ATP_PVT.ALLSUCCESS;
8014: END IF;

Line 8011: p_set.error_code(i) = MSC_ATP_PVT.PDS_TO_ODS_SWITCH)

8007: END IF;
8008: END IF;
8009: IF p_set.Action(i) <> MSC_ATP_PVT.ATPQUERY AND
8010: (p_set.Error_Code(i) = MSC_ATP_PVT.ATP_NOT_APPL OR
8011: p_set.error_code(i) = MSC_ATP_PVT.PDS_TO_ODS_SWITCH)
8012: THEN
8013: p_set.Error_Code(i) := MSC_ATP_PVT.ALLSUCCESS;
8014: END IF;
8015:

Line 8013: p_set.Error_Code(i) := MSC_ATP_PVT.ALLSUCCESS;

8009: IF p_set.Action(i) <> MSC_ATP_PVT.ATPQUERY AND
8010: (p_set.Error_Code(i) = MSC_ATP_PVT.ATP_NOT_APPL OR
8011: p_set.error_code(i) = MSC_ATP_PVT.PDS_TO_ODS_SWITCH)
8012: THEN
8013: p_set.Error_Code(i) := MSC_ATP_PVT.ALLSUCCESS;
8014: END IF;
8015:
8016: IF p_set.requested_ship_date(i) is NOT null THEN
8017: G_ship_LAD_set := LEAST(NVL(G_ship_LAD_set, l_ship_LAD_ln),

Line 8029: IF x_line_status not in (MSC_ATP_PVT.ALLSUCCESS,

8025: NVL(p_set.ship_date(i), G_latest_ship_date_set));
8026: G_latest_arr_date_set := GREATEST(NVL(G_latest_arr_date_set, p_set.arrival_date(i)),
8027: NVL(p_set.arrival_date(i), G_latest_arr_date_set));
8028:
8029: IF x_line_status not in (MSC_ATP_PVT.ALLSUCCESS,
8030: MSC_ATP_PVT.ATP_ACCEPT_FAIL)
8031: THEN
8032: G_set_status := x_line_status;
8033: ELSIF G_set_status = MSC_ATP_PVT.ALLSUCCESS THEN

Line 8030: MSC_ATP_PVT.ATP_ACCEPT_FAIL)

8026: G_latest_arr_date_set := GREATEST(NVL(G_latest_arr_date_set, p_set.arrival_date(i)),
8027: NVL(p_set.arrival_date(i), G_latest_arr_date_set));
8028:
8029: IF x_line_status not in (MSC_ATP_PVT.ALLSUCCESS,
8030: MSC_ATP_PVT.ATP_ACCEPT_FAIL)
8031: THEN
8032: G_set_status := x_line_status;
8033: ELSIF G_set_status = MSC_ATP_PVT.ALLSUCCESS THEN
8034: IF TRUNC(G_latest_ship_date_set) > TRUNC(G_ship_LAD_set)

Line 8033: ELSIF G_set_status = MSC_ATP_PVT.ALLSUCCESS THEN

8029: IF x_line_status not in (MSC_ATP_PVT.ALLSUCCESS,
8030: MSC_ATP_PVT.ATP_ACCEPT_FAIL)
8031: THEN
8032: G_set_status := x_line_status;
8033: ELSIF G_set_status = MSC_ATP_PVT.ALLSUCCESS THEN
8034: IF TRUNC(G_latest_ship_date_set) > TRUNC(G_ship_LAD_set)
8035: OR TRUNC(G_latest_arr_date_set) > TRUNC(G_arr_LAD_set)
8036: OR (G_is_ship_set AND TRUNC(G_override_date) < TRUNC(G_ship_EAD_set)) -- xxx dsting hack
8037: THEN

Line 8038: G_set_status := MSC_ATP_PVT.GROUPEL_ERROR;

8034: IF TRUNC(G_latest_ship_date_set) > TRUNC(G_ship_LAD_set)
8035: OR TRUNC(G_latest_arr_date_set) > TRUNC(G_arr_LAD_set)
8036: OR (G_is_ship_set AND TRUNC(G_override_date) < TRUNC(G_ship_EAD_set)) -- xxx dsting hack
8037: THEN
8038: G_set_status := MSC_ATP_PVT.GROUPEL_ERROR;
8039: END IF;
8040: END IF;
8041: IF MSC_ATP_PVT.G_ATP_ITEM_PRESENT_IN_SET = 'N' and p_set.atp_flag(i) <> 'N' or p_set.atp_components_flag(i) <> 'N' THEN
8042: MSC_ATP_PVT.G_ATP_ITEM_PRESENT_IN_SET := 'Y';

Line 8041: IF MSC_ATP_PVT.G_ATP_ITEM_PRESENT_IN_SET = 'N' and p_set.atp_flag(i) <> 'N' or p_set.atp_components_flag(i) <> 'N' THEN

8037: THEN
8038: G_set_status := MSC_ATP_PVT.GROUPEL_ERROR;
8039: END IF;
8040: END IF;
8041: IF MSC_ATP_PVT.G_ATP_ITEM_PRESENT_IN_SET = 'N' and p_set.atp_flag(i) <> 'N' or p_set.atp_components_flag(i) <> 'N' THEN
8042: MSC_ATP_PVT.G_ATP_ITEM_PRESENT_IN_SET := 'Y';
8043: msc_sch_wb.atp_debug('CHANGED THE ITEM PRESENT FLAG');
8044: END IF;
8045: IF PG_DEBUG in ('Y', 'C') THEN

Line 8042: MSC_ATP_PVT.G_ATP_ITEM_PRESENT_IN_SET := 'Y';

8038: G_set_status := MSC_ATP_PVT.GROUPEL_ERROR;
8039: END IF;
8040: END IF;
8041: IF MSC_ATP_PVT.G_ATP_ITEM_PRESENT_IN_SET = 'N' and p_set.atp_flag(i) <> 'N' or p_set.atp_components_flag(i) <> 'N' THEN
8042: MSC_ATP_PVT.G_ATP_ITEM_PRESENT_IN_SET := 'Y';
8043: msc_sch_wb.atp_debug('CHANGED THE ITEM PRESENT FLAG');
8044: END IF;
8045: IF PG_DEBUG in ('Y', 'C') THEN
8046: msc_sch_wb.atp_debug('line_status: ' || x_line_status);

Line 8088: IF G_set_status = MSC_ATP_PVT.ATP_REQ_QTY_FAIL THEN

8084: ELSE
8085: l_group_date := G_latest_arr_date_set; --4460369
8086: END IF;
8087:
8088: IF G_set_status = MSC_ATP_PVT.ATP_REQ_QTY_FAIL THEN
8089: l_group_date := null;
8090: END IF;
8091:
8092: -- 2834932 dsting

Line 8126: p_set.error_code(l_start) := MSC_ATP_PVT.NO_MATCHING_CAL_DATE;

8122: END IF;
8123: /* ship_rec_cal changes end */
8124:
8125: IF l_group_work_date is null THEN
8126: p_set.error_code(l_start) := MSC_ATP_PVT.NO_MATCHING_CAL_DATE;
8127: raise NO_DATA_FOUND;
8128: END IF;
8129:
8130: IF TRUNC(l_group_date) <> TRUNC(l_group_work_date) THEN

Line 8132: G_set_status := MSC_ATP_PVT.ATP_OVERRIDE_DATE_FAIL;

8128: END IF;
8129:
8130: IF TRUNC(l_group_date) <> TRUNC(l_group_work_date) THEN
8131: l_status_flag := G_NONWORKING_DAY;
8132: G_set_status := MSC_ATP_PVT.ATP_OVERRIDE_DATE_FAIL;
8133: ELSE
8134: l_status_flag := null;
8135: END IF;
8136: l_group_date := l_group_work_date; --4460369

Line 8205: /*IF MSC_ATP_PVT.G_RETAIN_TIME_NON_ATP = 'N' or MSC_ATP_PVT.G_ATP_ITEM_PRESENT_IN_SET = 'Y' THEN --4460369

8201:
8202: G_latest_ship_date_set := GREATEST(G_latest_ship_date_set, p_set.group_ship_date(i));
8203: G_latest_arr_date_set := GREATEST(G_latest_arr_date_set, p_set.group_arrival_date(i));
8204:
8205: /*IF MSC_ATP_PVT.G_RETAIN_TIME_NON_ATP = 'N' or MSC_ATP_PVT.G_ATP_ITEM_PRESENT_IN_SET = 'Y' THEN --4460369
8206: IF p_set.requested_ship_date(i) is not null then
8207: p_set.group_ship_date(i) := trunc(p_set.group_ship_date(i)) + MSC_ATP_PVT.G_END_OF_DAY;
8208: ELSE
8209: p_set.group_arrival_date(i) := trunc(p_set.group_arrival_date(i)) + MSC_ATP_PVT.G_END_OF_DAY;

Line 8207: p_set.group_ship_date(i) := trunc(p_set.group_ship_date(i)) + MSC_ATP_PVT.G_END_OF_DAY;

8203: G_latest_arr_date_set := GREATEST(G_latest_arr_date_set, p_set.group_arrival_date(i));
8204:
8205: /*IF MSC_ATP_PVT.G_RETAIN_TIME_NON_ATP = 'N' or MSC_ATP_PVT.G_ATP_ITEM_PRESENT_IN_SET = 'Y' THEN --4460369
8206: IF p_set.requested_ship_date(i) is not null then
8207: p_set.group_ship_date(i) := trunc(p_set.group_ship_date(i)) + MSC_ATP_PVT.G_END_OF_DAY;
8208: ELSE
8209: p_set.group_arrival_date(i) := trunc(p_set.group_arrival_date(i)) + MSC_ATP_PVT.G_END_OF_DAY;
8210: END IF;
8211: END IF; --4460369*/ --4967040

Line 8209: p_set.group_arrival_date(i) := trunc(p_set.group_arrival_date(i)) + MSC_ATP_PVT.G_END_OF_DAY;

8205: /*IF MSC_ATP_PVT.G_RETAIN_TIME_NON_ATP = 'N' or MSC_ATP_PVT.G_ATP_ITEM_PRESENT_IN_SET = 'Y' THEN --4460369
8206: IF p_set.requested_ship_date(i) is not null then
8207: p_set.group_ship_date(i) := trunc(p_set.group_ship_date(i)) + MSC_ATP_PVT.G_END_OF_DAY;
8208: ELSE
8209: p_set.group_arrival_date(i) := trunc(p_set.group_arrival_date(i)) + MSC_ATP_PVT.G_END_OF_DAY;
8210: END IF;
8211: END IF; --4460369*/ --4967040
8212:
8213: IF PG_DEBUG in ('Y', 'C') THEN

Line 8224: IF G_set_status = MSC_ATP_PVT.ALLSUCCESS THEN

8220: end loop;
8221: -- 2834932 dsting. split the group date and error code loops
8222:
8223: -- one final check to see if and dates pushed beyond LAD
8224: IF G_set_status = MSC_ATP_PVT.ALLSUCCESS THEN
8225: IF TRUNC(G_latest_ship_date_set) > TRUNC(G_ship_LAD_set)
8226: OR TRUNC(G_latest_arr_date_set) > TRUNC(G_arr_LAD_set)
8227: THEN
8228: G_set_status := MSC_ATP_PVT.GROUPEL_ERROR;

Line 8228: G_set_status := MSC_ATP_PVT.GROUPEL_ERROR;

8224: IF G_set_status = MSC_ATP_PVT.ALLSUCCESS THEN
8225: IF TRUNC(G_latest_ship_date_set) > TRUNC(G_ship_LAD_set)
8226: OR TRUNC(G_latest_arr_date_set) > TRUNC(G_arr_LAD_set)
8227: THEN
8228: G_set_status := MSC_ATP_PVT.GROUPEL_ERROR;
8229: END IF;
8230: END IF;
8231:
8232: --

Line 8239: if G_set_status <> MSC_ATP_PVT.ALLSUCCESS then

8235: -- ATP_OVERRIDE_DATE_FAIL
8236: -- ATP_ACCEPT_FAIL
8237: -- GROUPEL_ERROR
8238: --
8239: if G_set_status <> MSC_ATP_PVT.ALLSUCCESS then
8240: for i in l_start..l_end loop
8241: if G_is_ship_set then
8242: l_line_date := p_set.ship_date(i);
8243: -- 2834932 dsting

Line 8250: IF p_set.error_code(i) = MSC_ATP_PVT.ALLSUCCESS THEN

8246: THEN
8247: IF PG_DEBUG in ('Y', 'C') THEN
8248: msc_sch_wb.atp_debug('Override date is nonworking day');
8249: END IF;
8250: IF p_set.error_code(i) = MSC_ATP_PVT.ALLSUCCESS THEN
8251: p_set.error_code(i) := MSC_ATP_PVT.ATP_OVERRIDE_DATE_FAIL;
8252: END IF;
8253: END IF;
8254: else

Line 8251: p_set.error_code(i) := MSC_ATP_PVT.ATP_OVERRIDE_DATE_FAIL;

8247: IF PG_DEBUG in ('Y', 'C') THEN
8248: msc_sch_wb.atp_debug('Override date is nonworking day');
8249: END IF;
8250: IF p_set.error_code(i) = MSC_ATP_PVT.ALLSUCCESS THEN
8251: p_set.error_code(i) := MSC_ATP_PVT.ATP_OVERRIDE_DATE_FAIL;
8252: END IF;
8253: END IF;
8254: else
8255: l_line_date := p_set.arrival_date(i);

Line 8260: p_set.Error_Code(i) := MSC_ATP_PVT.ATP_MULTI_OVERRIDE_DATES;

8256: end if;
8257:
8258: IF (NVL(p_set.Override_Flag(i), 'N') = 'Y') THEN
8259: IF TRUNC(G_override_date) <> TRUNC(l_line_date) THEN
8260: p_set.Error_Code(i) := MSC_ATP_PVT.ATP_MULTI_OVERRIDE_DATES;
8261: IF PG_DEBUG in ('Y', 'C') THEN
8262: msc_sch_wb.atp_debug('stmt18 - Multiple lines overridden to diff dates');
8263: END IF;
8264: END IF;

Line 8270: p_set.Error_Code(i) := MSC_ATP_PVT.ATP_OVERRIDE_DATE_FAIL;

8266: IF TRUNC(G_override_date) < TRUNC(l_line_date) THEN
8267: IF PG_DEBUG in ('Y', 'C') THEN
8268: msc_sch_wb.atp_debug('stmt19 - Unable to Meet Overridden dates');
8269: END IF;
8270: p_set.Error_Code(i) := MSC_ATP_PVT.ATP_OVERRIDE_DATE_FAIL;
8271: ELSIF TRUNC(p_set.ship_date(i)) > TRUNC(G_ship_LAD_set)
8272: OR TRUNC(p_set.arrival_date(i)) > TRUNC(G_arr_LAD_set)
8273: THEN
8274: p_set.Error_Code(i) := MSC_ATP_PVT.ATP_ACCEPT_FAIL;

Line 8274: p_set.Error_Code(i) := MSC_ATP_PVT.ATP_ACCEPT_FAIL;

8270: p_set.Error_Code(i) := MSC_ATP_PVT.ATP_OVERRIDE_DATE_FAIL;
8271: ELSIF TRUNC(p_set.ship_date(i)) > TRUNC(G_ship_LAD_set)
8272: OR TRUNC(p_set.arrival_date(i)) > TRUNC(G_arr_LAD_set)
8273: THEN
8274: p_set.Error_Code(i) := MSC_ATP_PVT.ATP_ACCEPT_FAIL;
8275: IF PG_DEBUG in ('Y', 'C') THEN
8276: msc_sch_wb.atp_debug('stmt19 - Unable to Meet LAD');
8277: END IF;
8278: END IF;

Line 8281: IF NVL(p_set.Error_Code(i), MSC_ATP_PVT.ALLSUCCESS)

8277: END IF;
8278: END IF;
8279: END IF;
8280:
8281: IF NVL(p_set.Error_Code(i), MSC_ATP_PVT.ALLSUCCESS)
8282: --bug 3365376: Popluate error also when we have atp not appl or PDS to ODS switch
8283: --= MSC_ATP_PVT.ALLSUCCESS
8284: IN (MSC_ATP_PVT.ALLSUCCESS, MSC_ATP_PVT.ATP_NOT_APPL, MSC_ATP_PVT.PDS_TO_ODS_SWITCH)
8285: THEN

Line 8283: --= MSC_ATP_PVT.ALLSUCCESS

8279: END IF;
8280:
8281: IF NVL(p_set.Error_Code(i), MSC_ATP_PVT.ALLSUCCESS)
8282: --bug 3365376: Popluate error also when we have atp not appl or PDS to ODS switch
8283: --= MSC_ATP_PVT.ALLSUCCESS
8284: IN (MSC_ATP_PVT.ALLSUCCESS, MSC_ATP_PVT.ATP_NOT_APPL, MSC_ATP_PVT.PDS_TO_ODS_SWITCH)
8285: THEN
8286: p_set.Error_Code(i) := MSC_ATP_PVT.GROUPEL_ERROR;
8287: IF PG_DEBUG in ('Y', 'C') THEN

Line 8284: IN (MSC_ATP_PVT.ALLSUCCESS, MSC_ATP_PVT.ATP_NOT_APPL, MSC_ATP_PVT.PDS_TO_ODS_SWITCH)

8280:
8281: IF NVL(p_set.Error_Code(i), MSC_ATP_PVT.ALLSUCCESS)
8282: --bug 3365376: Popluate error also when we have atp not appl or PDS to ODS switch
8283: --= MSC_ATP_PVT.ALLSUCCESS
8284: IN (MSC_ATP_PVT.ALLSUCCESS, MSC_ATP_PVT.ATP_NOT_APPL, MSC_ATP_PVT.PDS_TO_ODS_SWITCH)
8285: THEN
8286: p_set.Error_Code(i) := MSC_ATP_PVT.GROUPEL_ERROR;
8287: IF PG_DEBUG in ('Y', 'C') THEN
8288: msc_sch_wb.atp_debug('GROUPEL_ERROR');

Line 8286: p_set.Error_Code(i) := MSC_ATP_PVT.GROUPEL_ERROR;

8282: --bug 3365376: Popluate error also when we have atp not appl or PDS to ODS switch
8283: --= MSC_ATP_PVT.ALLSUCCESS
8284: IN (MSC_ATP_PVT.ALLSUCCESS, MSC_ATP_PVT.ATP_NOT_APPL, MSC_ATP_PVT.PDS_TO_ODS_SWITCH)
8285: THEN
8286: p_set.Error_Code(i) := MSC_ATP_PVT.GROUPEL_ERROR;
8287: IF PG_DEBUG in ('Y', 'C') THEN
8288: msc_sch_wb.atp_debug('GROUPEL_ERROR');
8289: END IF;
8290: END IF;

Line 8306: l_plan_info_rec MSC_ATP_PVT.plan_info_rec;

8302: PROCEDURE Update_Set_SD_Dates(
8303: p_set IN OUT NOCOPY MRP_ATP_PUB.ATP_Rec_Typ,
8304: p_arrival_set IN mrp_atp_pub.date_arr
8305: ) IS
8306: l_plan_info_rec MSC_ATP_PVT.plan_info_rec;
8307: l_plan_id NUMBER;
8308: l_demand_pegging_id NUMBER;
8309: l_sd_date DATE;
8310: --ship_rec_cal

Line 8312: l_ship_arrival_date_rec MSC_ATP_PVT.ship_arrival_date_rec_typ;

8308: l_demand_pegging_id NUMBER;
8309: l_sd_date DATE;
8310: --ship_rec_cal
8311: l_order_date_type NUMBER;
8312: l_ship_arrival_date_rec MSC_ATP_PVT.ship_arrival_date_rec_typ;
8313: l_return_status VARCHAR2(1);
8314: BEGIN
8315: IF PG_DEBUG in ('Y', 'C') THEN
8316: msc_sch_wb.atp_debug('Begin Update_Set_SD_Dates');

Line 8324: IF (p_set.Action(m)<> MSC_ATP_PVT.ATPQUERY and p_set.quantity_ordered(m) <> 0) THEN -- xxxx

8320: IF PG_DEBUG in ('Y', 'C') THEN
8321: msc_sch_wb.atp_debug('m = ' || m);
8322: END IF;
8323:
8324: IF (p_set.Action(m)<> MSC_ATP_PVT.ATPQUERY and p_set.quantity_ordered(m) <> 0) THEN -- xxxx
8325: /* --bug4281663 commented and initialized below
8326: IF MSC_ATP_PVT.G_INV_CTP = 4 THEN
8327: -- New procedure for obtaining plan data : Supplier Capacity Lead Time proj.
8328: -- (SCLT)

Line 8326: IF MSC_ATP_PVT.G_INV_CTP = 4 THEN

8322: END IF;
8323:
8324: IF (p_set.Action(m)<> MSC_ATP_PVT.ATPQUERY and p_set.quantity_ordered(m) <> 0) THEN -- xxxx
8325: /* --bug4281663 commented and initialized below
8326: IF MSC_ATP_PVT.G_INV_CTP = 4 THEN
8327: -- New procedure for obtaining plan data : Supplier Capacity Lead Time proj.
8328: -- (SCLT)
8329: MSC_ATP_PROC.get_global_plan_info(p_set.instance_id(m),
8330: p_set.inventory_item_id(m),

Line 8335: l_plan_info_rec := MSC_ATP_PVT.G_PLAN_INFO_REC;

8331: -- 2832497 dsting
8332: p_set.source_organization_id(m),
8333: p_set.demand_class(m));
8334:
8335: l_plan_info_rec := MSC_ATP_PVT.G_PLAN_INFO_REC;
8336: -- End New procedure for obtaining plan data : Supplier Capacity Lead Time proj.
8337:
8338: l_plan_id := l_plan_info_rec.plan_id;
8339: IF p_set.attribute_07.Exists(m) THEN

Line 8350: l_demand_pegging_id := MSC_ATP_PVT.G_DEMAND_PEGGING_ID;

8346: END IF;
8347: */
8348: --bug4281663 Using the plan_id passed instead of calling get_global_plan_info
8349: l_plan_id := p_set.plan_id(m);
8350: l_demand_pegging_id := MSC_ATP_PVT.G_DEMAND_PEGGING_ID;
8351: IF PG_DEBUG in ('Y', 'C') THEN
8352: msc_sch_wb.atp_debug(' l_demand_pegging_id := ' || l_demand_pegging_id);
8353: msc_sch_wb.atp_debug(' l_plan_id := ' || l_plan_id);
8354: END IF;

Line 8356: MSC_ATP_PVT.G_DEMAND_PEGGING_ID := p_set.end_pegging_id(m);

8352: msc_sch_wb.atp_debug(' l_demand_pegging_id := ' || l_demand_pegging_id);
8353: msc_sch_wb.atp_debug(' l_plan_id := ' || l_plan_id);
8354: END IF;
8355: -- xxxx
8356: MSC_ATP_PVT.G_DEMAND_PEGGING_ID := p_set.end_pegging_id(m);
8357: IF PG_DEBUG in ('Y', 'C') THEN
8358: msc_sch_wb.atp_debug(' G_DEMAND_PEGGING_ID := ' || MSC_ATP_PVT.G_DEMAND_PEGGING_ID);
8359: msc_sch_wb.atp_debug(' G_DEMAND_CLASS_ATP_FLAG := ' || MSC_ATP_PVT.G_DEMAND_CLASS_ATP_FLAG(m));
8360: msc_sch_wb.atp_debug(' G_REQ_ATP_DATE := ' || MSC_ATP_PVT.G_REQ_ATP_DATE(m));

Line 8358: msc_sch_wb.atp_debug(' G_DEMAND_PEGGING_ID := ' || MSC_ATP_PVT.G_DEMAND_PEGGING_ID);

8354: END IF;
8355: -- xxxx
8356: MSC_ATP_PVT.G_DEMAND_PEGGING_ID := p_set.end_pegging_id(m);
8357: IF PG_DEBUG in ('Y', 'C') THEN
8358: msc_sch_wb.atp_debug(' G_DEMAND_PEGGING_ID := ' || MSC_ATP_PVT.G_DEMAND_PEGGING_ID);
8359: msc_sch_wb.atp_debug(' G_DEMAND_CLASS_ATP_FLAG := ' || MSC_ATP_PVT.G_DEMAND_CLASS_ATP_FLAG(m));
8360: msc_sch_wb.atp_debug(' G_REQ_ATP_DATE := ' || MSC_ATP_PVT.G_REQ_ATP_DATE(m));
8361: msc_sch_wb.atp_debug(' G_REQ_DATE_QTY := ' || MSC_ATP_PVT.G_REQ_DATE_QTY(m));
8362: --bug4281663 Added more debug statements

Line 8359: msc_sch_wb.atp_debug(' G_DEMAND_CLASS_ATP_FLAG := ' || MSC_ATP_PVT.G_DEMAND_CLASS_ATP_FLAG(m));

8355: -- xxxx
8356: MSC_ATP_PVT.G_DEMAND_PEGGING_ID := p_set.end_pegging_id(m);
8357: IF PG_DEBUG in ('Y', 'C') THEN
8358: msc_sch_wb.atp_debug(' G_DEMAND_PEGGING_ID := ' || MSC_ATP_PVT.G_DEMAND_PEGGING_ID);
8359: msc_sch_wb.atp_debug(' G_DEMAND_CLASS_ATP_FLAG := ' || MSC_ATP_PVT.G_DEMAND_CLASS_ATP_FLAG(m));
8360: msc_sch_wb.atp_debug(' G_REQ_ATP_DATE := ' || MSC_ATP_PVT.G_REQ_ATP_DATE(m));
8361: msc_sch_wb.atp_debug(' G_REQ_DATE_QTY := ' || MSC_ATP_PVT.G_REQ_DATE_QTY(m));
8362: --bug4281663 Added more debug statements
8363: msc_sch_wb.atp_debug(' p_set.ship_date(m) := ' || p_set.ship_date(m));

Line 8360: msc_sch_wb.atp_debug(' G_REQ_ATP_DATE := ' || MSC_ATP_PVT.G_REQ_ATP_DATE(m));

8356: MSC_ATP_PVT.G_DEMAND_PEGGING_ID := p_set.end_pegging_id(m);
8357: IF PG_DEBUG in ('Y', 'C') THEN
8358: msc_sch_wb.atp_debug(' G_DEMAND_PEGGING_ID := ' || MSC_ATP_PVT.G_DEMAND_PEGGING_ID);
8359: msc_sch_wb.atp_debug(' G_DEMAND_CLASS_ATP_FLAG := ' || MSC_ATP_PVT.G_DEMAND_CLASS_ATP_FLAG(m));
8360: msc_sch_wb.atp_debug(' G_REQ_ATP_DATE := ' || MSC_ATP_PVT.G_REQ_ATP_DATE(m));
8361: msc_sch_wb.atp_debug(' G_REQ_DATE_QTY := ' || MSC_ATP_PVT.G_REQ_DATE_QTY(m));
8362: --bug4281663 Added more debug statements
8363: msc_sch_wb.atp_debug(' p_set.ship_date(m) := ' || p_set.ship_date(m));
8364: msc_sch_wb.atp_debug(' p_set.group_ship_date(m) := ' || p_set.group_ship_date(m));

Line 8361: msc_sch_wb.atp_debug(' G_REQ_DATE_QTY := ' || MSC_ATP_PVT.G_REQ_DATE_QTY(m));

8357: IF PG_DEBUG in ('Y', 'C') THEN
8358: msc_sch_wb.atp_debug(' G_DEMAND_PEGGING_ID := ' || MSC_ATP_PVT.G_DEMAND_PEGGING_ID);
8359: msc_sch_wb.atp_debug(' G_DEMAND_CLASS_ATP_FLAG := ' || MSC_ATP_PVT.G_DEMAND_CLASS_ATP_FLAG(m));
8360: msc_sch_wb.atp_debug(' G_REQ_ATP_DATE := ' || MSC_ATP_PVT.G_REQ_ATP_DATE(m));
8361: msc_sch_wb.atp_debug(' G_REQ_DATE_QTY := ' || MSC_ATP_PVT.G_REQ_DATE_QTY(m));
8362: --bug4281663 Added more debug statements
8363: msc_sch_wb.atp_debug(' p_set.ship_date(m) := ' || p_set.ship_date(m));
8364: msc_sch_wb.atp_debug(' p_set.group_ship_date(m) := ' || p_set.group_ship_date(m));
8365: END IF;

Line 8401: MSC_ATP_PVT.G_DEMAND_CLASS_ATP_FLAG(m),

8397: END IF;
8398:
8399: MSC_ATP_DB_UTILS.Update_SD_Date(p_set.Identifier(m),
8400: p_set.instance_id(m), l_sd_date, l_plan_id,null, -- dsting setproc
8401: MSC_ATP_PVT.G_DEMAND_CLASS_ATP_FLAG(m),
8402: MSC_ATP_PVT.G_REQ_ATP_DATE(m),
8403: MSC_ATP_PVT.G_REQ_DATE_QTY(m), -- Bug 1501787
8404: l_sd_date, -- Bug 2795053-reopen
8405: null, -- For time_phased_atp

Line 8402: MSC_ATP_PVT.G_REQ_ATP_DATE(m),

8398:
8399: MSC_ATP_DB_UTILS.Update_SD_Date(p_set.Identifier(m),
8400: p_set.instance_id(m), l_sd_date, l_plan_id,null, -- dsting setproc
8401: MSC_ATP_PVT.G_DEMAND_CLASS_ATP_FLAG(m),
8402: MSC_ATP_PVT.G_REQ_ATP_DATE(m),
8403: MSC_ATP_PVT.G_REQ_DATE_QTY(m), -- Bug 1501787
8404: l_sd_date, -- Bug 2795053-reopen
8405: null, -- For time_phased_atp
8406: p_set.atf_date(m), -- For time_phased_atp

Line 8403: MSC_ATP_PVT.G_REQ_DATE_QTY(m), -- Bug 1501787

8399: MSC_ATP_DB_UTILS.Update_SD_Date(p_set.Identifier(m),
8400: p_set.instance_id(m), l_sd_date, l_plan_id,null, -- dsting setproc
8401: MSC_ATP_PVT.G_DEMAND_CLASS_ATP_FLAG(m),
8402: MSC_ATP_PVT.G_REQ_ATP_DATE(m),
8403: MSC_ATP_PVT.G_REQ_DATE_QTY(m), -- Bug 1501787
8404: l_sd_date, -- Bug 2795053-reopen
8405: null, -- For time_phased_atp
8406: p_set.atf_date(m), -- For time_phased_atp
8407: null, -- For time_phased_atp

Line 8417: MSC_ATP_PVT.G_DEMAND_PEGGING_ID := l_demand_pegging_id;

8413: p_set.override_flag(m),
8414: p_arrival_set(m),null --time_phased_atp --bug3397904
8415: );
8416:
8417: MSC_ATP_PVT.G_DEMAND_PEGGING_ID := l_demand_pegging_id;
8418: ELSE
8419:
8420: /* ship_rec_cal changes begin
8421: flush sch arrival date, lat acceptable date, order date type in pds*/

Line 8431: MSC_ATP_PVT.G_DEMAND_PEGGING_ID := p_set.end_pegging_id(m);

8427: l_ship_arrival_date_rec.arrival_set_name := p_set.arrival_set_name(m);
8428: l_ship_arrival_date_rec.ship_set_name := p_set.ship_set_name(m);
8429: l_ship_arrival_date_rec.atp_override_flag := p_set.override_flag(m);
8430: l_ship_arrival_date_rec.request_arrival_date := p_arrival_set(m);
8431: MSC_ATP_PVT.G_DEMAND_PEGGING_ID := p_set.end_pegging_id(m);
8432: /* Read demand_id from madt*/
8433: BEGIN
8434: SELECT identifier3
8435: INTO l_ship_arrival_date_rec.demand_id

Line 8437: WHERE pegging_id = MSC_ATP_PVT.G_DEMAND_PEGGING_ID

8433: BEGIN
8434: SELECT identifier3
8435: INTO l_ship_arrival_date_rec.demand_id
8436: FROM mrp_atp_details_temp
8437: WHERE pegging_id = MSC_ATP_PVT.G_DEMAND_PEGGING_ID
8438: AND session_id = MSC_ATP_PVT.G_SESSION_ID
8439: AND record_type = 3;
8440: EXCEPTION
8441: WHEN OTHERS THEN

Line 8438: AND session_id = MSC_ATP_PVT.G_SESSION_ID

8434: SELECT identifier3
8435: INTO l_ship_arrival_date_rec.demand_id
8436: FROM mrp_atp_details_temp
8437: WHERE pegging_id = MSC_ATP_PVT.G_DEMAND_PEGGING_ID
8438: AND session_id = MSC_ATP_PVT.G_SESSION_ID
8439: AND record_type = 3;
8440: EXCEPTION
8441: WHEN OTHERS THEN
8442: l_ship_arrival_date_rec.demand_id := null;

Line 8457: IF (MSC_ATP_PVT.G_INV_CTP = 4) THEN

8453: END IF;
8454: IF l_ship_arrival_date_rec.demand_id is not null THEN
8455: --bug4281663 used plan id to determine ods or pds
8456: /*
8457: IF (MSC_ATP_PVT.G_INV_CTP = 4) THEN
8458: MSC_ATP_DB_UTILS.Flush_Data_In_Pds(l_ship_arrival_date_rec, l_return_status);
8459: ELSE
8460: MSC_ATP_DB_UTILS.Flush_Data_In_Ods(l_ship_arrival_date_rec, l_return_status);
8461: END IF;

Line 8924: MSC_ATP_PVT.UNDO,

8920: MSC_ATP_DB_UTILS.Remove_Invalid_SD_Rec(
8921: peg_ids(i),
8922: p_instance_id,
8923: p_plan_id,
8924: MSC_ATP_PVT.UNDO,
8925: dmd_class_flag(i),
8926: l_return_sts);
8927: end loop;
8928: END cleanup_set;

Line 8976: AND TRUNC(effectivity_date) <= TRUNC(GREATEST(p_new_schedule_date, sysdate, MSC_ATP_PVT.G_PTF_DATE))

8972: DECODE(NVL(maximum_quantity,0),0,99999999,maximum_quantity)
8973: /* rajjain 3008611
8974: * effective date should be greater than or equal to greatest of PTF date, sysdate and start date
8975: * disable date should be less than or equal to greatest of PTF date, sysdate and start date
8976: AND TRUNC(effectivity_date) <= TRUNC(GREATEST(p_new_schedule_date, sysdate, MSC_ATP_PVT.G_PTF_DATE))
8977: AND TRUNC(NVL(disable_date,GREATEST(p_new_schedule_date, sysdate, MSC_ATP_PVT.G_PTF_DATE)+1))
8978: > TRUNC(GREATEST(p_new_schedule_date, sysdate, MSC_ATP_PVT.G_PTF_DATE))
8979: ORDER BY preference */
8980:

Line 8977: AND TRUNC(NVL(disable_date,GREATEST(p_new_schedule_date, sysdate, MSC_ATP_PVT.G_PTF_DATE)+1))

8973: /* rajjain 3008611
8974: * effective date should be greater than or equal to greatest of PTF date, sysdate and start date
8975: * disable date should be less than or equal to greatest of PTF date, sysdate and start date
8976: AND TRUNC(effectivity_date) <= TRUNC(GREATEST(p_new_schedule_date, sysdate, MSC_ATP_PVT.G_PTF_DATE))
8977: AND TRUNC(NVL(disable_date,GREATEST(p_new_schedule_date, sysdate, MSC_ATP_PVT.G_PTF_DATE)+1))
8978: > TRUNC(GREATEST(p_new_schedule_date, sysdate, MSC_ATP_PVT.G_PTF_DATE))
8979: ORDER BY preference */
8980:
8981: --4570421 --bug 10139262

Line 8978: > TRUNC(GREATEST(p_new_schedule_date, sysdate, MSC_ATP_PVT.G_PTF_DATE))

8974: * effective date should be greater than or equal to greatest of PTF date, sysdate and start date
8975: * disable date should be less than or equal to greatest of PTF date, sysdate and start date
8976: AND TRUNC(effectivity_date) <= TRUNC(GREATEST(p_new_schedule_date, sysdate, MSC_ATP_PVT.G_PTF_DATE))
8977: AND TRUNC(NVL(disable_date,GREATEST(p_new_schedule_date, sysdate, MSC_ATP_PVT.G_PTF_DATE)+1))
8978: > TRUNC(GREATEST(p_new_schedule_date, sysdate, MSC_ATP_PVT.G_PTF_DATE))
8979: ORDER BY preference */
8980:
8981: --4570421 --bug 10139262
8982: SELECT /*+ leading(eff) INDEX(eff MSC_PROCESS_EFFECTIVITY_U2) */

Line 8991: AND TRUNC(eff.effectivity_date) <= TRUNC(GREATEST(p_new_schedule_date, sysdate, MSC_ATP_PVT.G_PTF_DATE))

8987: AND eff.item_id = p_item_id
8988: AND eff.sr_instance_id = p_sr_instance_id
8989: AND p_requested_quantity BETWEEN NVL(eff.minimum_quantity,0) AND
8990: DECODE(NVL(eff.maximum_quantity,0),0,99999999,maximum_quantity)
8991: AND TRUNC(eff.effectivity_date) <= TRUNC(GREATEST(p_new_schedule_date, sysdate, MSC_ATP_PVT.G_PTF_DATE))
8992: AND TRUNC(NVL(eff.disable_date,GREATEST(p_new_schedule_date, sysdate, MSC_ATP_PVT.G_PTF_DATE)+1))
8993: > TRUNC(GREATEST(p_new_schedule_date, sysdate, MSC_ATP_PVT.G_PTF_DATE))
8994: --4570421
8995: and eff.plan_id = op.plan_id(+)

Line 8992: AND TRUNC(NVL(eff.disable_date,GREATEST(p_new_schedule_date, sysdate, MSC_ATP_PVT.G_PTF_DATE)+1))

8988: AND eff.sr_instance_id = p_sr_instance_id
8989: AND p_requested_quantity BETWEEN NVL(eff.minimum_quantity,0) AND
8990: DECODE(NVL(eff.maximum_quantity,0),0,99999999,maximum_quantity)
8991: AND TRUNC(eff.effectivity_date) <= TRUNC(GREATEST(p_new_schedule_date, sysdate, MSC_ATP_PVT.G_PTF_DATE))
8992: AND TRUNC(NVL(eff.disable_date,GREATEST(p_new_schedule_date, sysdate, MSC_ATP_PVT.G_PTF_DATE)+1))
8993: > TRUNC(GREATEST(p_new_schedule_date, sysdate, MSC_ATP_PVT.G_PTF_DATE))
8994: --4570421
8995: and eff.plan_id = op.plan_id(+)
8996: AND eff.sr_instance_id = op.sr_instance_id(+)

Line 8993: > TRUNC(GREATEST(p_new_schedule_date, sysdate, MSC_ATP_PVT.G_PTF_DATE))

8989: AND p_requested_quantity BETWEEN NVL(eff.minimum_quantity,0) AND
8990: DECODE(NVL(eff.maximum_quantity,0),0,99999999,maximum_quantity)
8991: AND TRUNC(eff.effectivity_date) <= TRUNC(GREATEST(p_new_schedule_date, sysdate, MSC_ATP_PVT.G_PTF_DATE))
8992: AND TRUNC(NVL(eff.disable_date,GREATEST(p_new_schedule_date, sysdate, MSC_ATP_PVT.G_PTF_DATE)+1))
8993: > TRUNC(GREATEST(p_new_schedule_date, sysdate, MSC_ATP_PVT.G_PTF_DATE))
8994: --4570421
8995: and eff.plan_id = op.plan_id(+)
8996: AND eff.sr_instance_id = op.sr_instance_id(+)
8997: and eff.routing_sequence_id = op.routing_sequence_id(+)

Line 8998: AND TRUNC(op.effectivity_date(+)) <= TRUNC(GREATEST(p_new_schedule_date, sysdate, MSC_ATP_PVT.G_PTF_DATE))

8994: --4570421
8995: and eff.plan_id = op.plan_id(+)
8996: AND eff.sr_instance_id = op.sr_instance_id(+)
8997: and eff.routing_sequence_id = op.routing_sequence_id(+)
8998: AND TRUNC(op.effectivity_date(+)) <= TRUNC(GREATEST(p_new_schedule_date, sysdate, MSC_ATP_PVT.G_PTF_DATE))
8999: AND TRUNC(NVL(op.disable_date(+),GREATEST(p_new_schedule_date, sysdate, MSC_ATP_PVT.G_PTF_DATE)+1))
9000: > TRUNC(GREATEST(p_new_schedule_date, sysdate, MSC_ATP_PVT.G_PTF_DATE)) --4570421
9001: ORDER BY eff.preference, op.operation_seq_num
9002: ) a

Line 8999: AND TRUNC(NVL(op.disable_date(+),GREATEST(p_new_schedule_date, sysdate, MSC_ATP_PVT.G_PTF_DATE)+1))

8995: and eff.plan_id = op.plan_id(+)
8996: AND eff.sr_instance_id = op.sr_instance_id(+)
8997: and eff.routing_sequence_id = op.routing_sequence_id(+)
8998: AND TRUNC(op.effectivity_date(+)) <= TRUNC(GREATEST(p_new_schedule_date, sysdate, MSC_ATP_PVT.G_PTF_DATE))
8999: AND TRUNC(NVL(op.disable_date(+),GREATEST(p_new_schedule_date, sysdate, MSC_ATP_PVT.G_PTF_DATE)+1))
9000: > TRUNC(GREATEST(p_new_schedule_date, sysdate, MSC_ATP_PVT.G_PTF_DATE)) --4570421
9001: ORDER BY eff.preference, op.operation_seq_num
9002: ) a
9003: where rownum = 1;

Line 9000: > TRUNC(GREATEST(p_new_schedule_date, sysdate, MSC_ATP_PVT.G_PTF_DATE)) --4570421

8996: AND eff.sr_instance_id = op.sr_instance_id(+)
8997: and eff.routing_sequence_id = op.routing_sequence_id(+)
8998: AND TRUNC(op.effectivity_date(+)) <= TRUNC(GREATEST(p_new_schedule_date, sysdate, MSC_ATP_PVT.G_PTF_DATE))
8999: AND TRUNC(NVL(op.disable_date(+),GREATEST(p_new_schedule_date, sysdate, MSC_ATP_PVT.G_PTF_DATE)+1))
9000: > TRUNC(GREATEST(p_new_schedule_date, sysdate, MSC_ATP_PVT.G_PTF_DATE)) --4570421
9001: ORDER BY eff.preference, op.operation_seq_num
9002: ) a
9003: where rownum = 1;
9004:

Line 9051: MSC_ATP_PVT.G_SESSION_ID, -- p_session_id

9047:
9048: MSC_SATP_FUNC.Get_Regions(NULL, -- p_customer_site_id
9049: p_calling_module, -- p_calling_module
9050: p_instance_id, -- p_instance_id
9051: MSC_ATP_PVT.G_SESSION_ID, -- p_session_id
9052: NULL, -- p_dblink
9053: x_return_status, -- x_return_status
9054: NULL, -- p_location_id
9055: NULL, -- p_location_source