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 89: x_atp_period.Total_Supply_Quantity(j) := MSC_ATP_PVT.INFINITE_NUMBER;

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

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

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

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

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

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

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

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

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

Line 440: x_return_status := MSC_ATP_PVT.G_ITEM_NOT_COLL;

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

Line 450: x_return_status := MSC_ATP_PVT.G_ITEM_ID_NULL;

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

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

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

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

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

Line 514: x_return_status := MSC_ATP_PVT.G_ITEM_NOT_COLL;

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

Line 523: x_return_status := MSC_ATP_PVT.G_ITEM_ID_NULL;

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

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

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

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

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

Line 579: x_return_status := MSC_ATP_PVT.G_ITEM_NOT_COLL;

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

Line 588: x_return_status := MSC_ATP_PVT.G_ITEM_ID_NULL;

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

Line 2238: l_plan_info_rec MSC_ATP_PVT.plan_info_rec;

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

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

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

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

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

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

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

Line 2615: --MSC_ATP_PVT.G_PLAN_SUBST_FLAG,

2611: x_plan_info_rec.plan_name,
2612: x_plan_info_rec.plan_id,
2613: --l_summary_flag,
2614: x_plan_info_rec.summary_flag,
2615: --MSC_ATP_PVT.G_PLAN_SUBST_FLAG,
2616: x_plan_info_rec.subst_flag,
2617: x_plan_info_rec.copy_plan_id,
2618: l_plan_info_rec.assignment_set_id,
2619: l_plan_info_rec.plan_name,

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

2658: and plans.plan_id = plans2.copy_plan_id (+);
2659:
2660:
2661: IF PG_DEBUG in ('Y', 'C') THEN
2662: msc_sch_wb.atp_debug('G_SYNC_ATP_CHECK := '|| MSC_ATP_PVT.G_SYNC_ATP_CHECK);
2663: msc_sch_wb.atp_debug (' ---- ');
2664: msc_sch_wb.atp_debug ('Query Output : Old Plan ID : ' || x_plan_info_rec.plan_id);
2665: msc_sch_wb.atp_debug (' plan name: : ' || x_plan_info_rec.plan_name) ;
2666: msc_sch_wb.atp_debug (' assign_set_id : ' || x_plan_info_rec.assignment_set_id) ;

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

2707: -- ATP4drp changes end
2708: msc_sch_wb.atp_debug (' ---- ');
2709: END IF;
2710:
2711: if (NVL(MSC_ATP_PVT.G_SYNC_ATP_CHECK, 'N') = 'Y') then
2712: -- this is a sync call
2713: l_using_new_plan := 1;
2714: if PG_DEBUG in ('Y','C') then
2715: msc_sch_wb.atp_debug ('Sync process. Switching plan to '|| l_plan_info_rec.plan_id);

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

2744: END IF;
2745:
2746: -- Assign global and local variables
2747: l_summary_flag := x_plan_info_rec.summary_flag;
2748: MSC_ATP_PVT.G_PLAN_SUBST_FLAG := x_plan_info_rec.subst_flag;
2749:
2750: if PG_DEBUG in ('Y','C') then
2751: msc_sch_wb.atp_debug ('Plan_ID after processing switches is : ' || x_plan_info_rec.plan_id);
2752: end if;

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

2752: end if;
2753:
2754: -- ATP4drp
2755: IF NVL(x_plan_info_rec.plan_type, 1) = 5 THEN -- DRP plan then re-set variables
2756: MSC_ATP_PVT.G_ALLOCATED_ATP := 'N';
2757: l_time_phased_atp := 'N';
2758: IF PG_DEBUG in ('Y','C') then
2759: msc_sch_wb.atp_debug('----- ATP4drp Specific Debug Messages -----');
2760: msc_sch_wb.atp_debug('DRP Plan, re-setting variables');

Line 2763: MSC_ATP_PVT.G_ALLOCATED_ATP := MSC_ATP_PVT.G_ORIG_ALLOC_ATP;

2759: msc_sch_wb.atp_debug('----- ATP4drp Specific Debug Messages -----');
2760: msc_sch_wb.atp_debug('DRP Plan, re-setting variables');
2761: END IF;
2762: ELSE
2763: MSC_ATP_PVT.G_ALLOCATED_ATP := MSC_ATP_PVT.G_ORIG_ALLOC_ATP;
2764: l_time_phased_atp := p_time_phased_atp;
2765: END IF;
2766: IF PG_DEBUG in ('Y','C') then
2767: msc_sch_wb.atp_debug('Value of MSC_ATP_PVT.G_ALLOCATED_ATP :' || MSC_ATP_PVT.G_ALLOCATED_ATP);

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

2763: MSC_ATP_PVT.G_ALLOCATED_ATP := MSC_ATP_PVT.G_ORIG_ALLOC_ATP;
2764: l_time_phased_atp := p_time_phased_atp;
2765: END IF;
2766: IF PG_DEBUG in ('Y','C') then
2767: msc_sch_wb.atp_debug('Value of MSC_ATP_PVT.G_ALLOCATED_ATP :' || MSC_ATP_PVT.G_ALLOCATED_ATP);
2768: msc_sch_wb.atp_debug('Value of l_time_phased_atp :' || l_time_phased_atp);
2769: msc_sch_wb.atp_debug('Value of p_time_phased_atp :' || p_time_phased_atp);
2770: END IF;
2771: -- End ATP4drp

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

2770: END IF;
2771: -- End ATP4drp
2772: IF x_plan_info_rec.plan_id > 0 THEN
2773:
2774: IF ((MSC_ATP_PVT.G_INV_CTP = 4) AND
2775: (MSC_ATP_PVT.G_ALLOCATED_ATP = 'Y') AND
2776: (MSC_ATP_PVT.G_HIERARCHY_PROFILE = 1) AND
2777: (MSC_ATP_PVT.G_ALLOCATION_METHOD = 1)) THEN
2778:

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

2771: -- End ATP4drp
2772: IF x_plan_info_rec.plan_id > 0 THEN
2773:
2774: IF ((MSC_ATP_PVT.G_INV_CTP = 4) AND
2775: (MSC_ATP_PVT.G_ALLOCATED_ATP = 'Y') AND
2776: (MSC_ATP_PVT.G_HIERARCHY_PROFILE = 1) AND
2777: (MSC_ATP_PVT.G_ALLOCATION_METHOD = 1)) THEN
2778:
2779: IF l_summary_flag = MSC_POST_PRO.G_SF_SUMMARY_NOT_RUN THEN -- Summary / pre-allocation was never run.

Line 2776: (MSC_ATP_PVT.G_HIERARCHY_PROFILE = 1) AND

2772: IF x_plan_info_rec.plan_id > 0 THEN
2773:
2774: IF ((MSC_ATP_PVT.G_INV_CTP = 4) AND
2775: (MSC_ATP_PVT.G_ALLOCATED_ATP = 'Y') AND
2776: (MSC_ATP_PVT.G_HIERARCHY_PROFILE = 1) AND
2777: (MSC_ATP_PVT.G_ALLOCATION_METHOD = 1)) THEN
2778:
2779: IF l_summary_flag = MSC_POST_PRO.G_SF_SUMMARY_NOT_RUN THEN -- Summary / pre-allocation was never run.
2780: x_plan_info_rec.plan_id := -200;

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

2773:
2774: IF ((MSC_ATP_PVT.G_INV_CTP = 4) AND
2775: (MSC_ATP_PVT.G_ALLOCATED_ATP = 'Y') AND
2776: (MSC_ATP_PVT.G_HIERARCHY_PROFILE = 1) AND
2777: (MSC_ATP_PVT.G_ALLOCATION_METHOD = 1)) THEN
2778:
2779: IF l_summary_flag = MSC_POST_PRO.G_SF_SUMMARY_NOT_RUN THEN -- Summary / pre-allocation was never run.
2780: x_plan_info_rec.plan_id := -200;
2781: if PG_DEBUG in ('Y','C') then

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

2789: END IF;
2790: -- Summary enhancement: Do not reset summary flag so that copy SOs can be created
2791: -- this check will be made again just before building period data to decide whether summary should be used
2792: /*
2793: ELSIF NVL(MSC_ATP_PVT.G_SUMMARY_FLAG, 'N') = 'Y' THEN
2794: IF l_summary_flag = 1 THEN
2795: -- set the summary flag
2796: MSC_ATP_PVT.G_SUMMARY_FLAG := 'N';
2797: if PG_DEBUG in ('Y','C') then

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

2792: /*
2793: ELSIF NVL(MSC_ATP_PVT.G_SUMMARY_FLAG, 'N') = 'Y' THEN
2794: IF l_summary_flag = 1 THEN
2795: -- set the summary flag
2796: MSC_ATP_PVT.G_SUMMARY_FLAG := 'N';
2797: if PG_DEBUG in ('Y','C') then
2798: msc_sch_wb.atp_debug('Switch from summary to details tables');
2799: end if;
2800: ELSIF l_summary_flag = 2 THEN*/

Line 3147: (MSC_ATP_PVT.G_SESSION_ID,

3143: , last_updated_by
3144: , last_update_login
3145: )
3146: VALUES
3147: (MSC_ATP_PVT.G_SESSION_ID,
3148: MSC_ATP_PVT.G_ORDER_LINE_ID,
3149: msc_full_pegging_s.nextval,
3150: p_parent_pegging_id,
3151: 1,

Line 3148: MSC_ATP_PVT.G_ORDER_LINE_ID,

3144: , last_update_login
3145: )
3146: VALUES
3147: (MSC_ATP_PVT.G_SESSION_ID,
3148: MSC_ATP_PVT.G_ORDER_LINE_ID,
3149: msc_full_pegging_s.nextval,
3150: p_parent_pegging_id,
3151: 1,
3152: 4,

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

3170: 2,
3171: l_coproducts_rec.quantity(rec_count),
3172: 2,
3173: p_request_date,
3174: NVL(MSC_ATP_PVT.G_DEMAND_PEGGING_ID, msc_full_pegging_s.currval),
3175: null,
3176: null, -- 1527660
3177: null,
3178: null,

Line 3181: MSC_ATP_PVT.G_SUMMARY_FLAG

3177: null,
3178: null,
3179: null,
3180: null,
3181: MSC_ATP_PVT.G_SUMMARY_FLAG
3182: -- dsting 2535568 purge temp table fix
3183: , sysdate -- creation_date
3184: , FND_GLOBAL.USER_ID -- created_by
3185: , sysdate -- last_update_date

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

3484: IF l_return_status <> 'S' THEN
3485: x_error_mesg := l_return_status;
3486: IF PG_DEBUG in ('Y', 'C') THEN
3487: msc_sch_wb.atp_debug('get_Supply_Sources: ' ||
3488: ' Error in call to msc_atp_pvt.atp_sources ');
3489: END IF;
3490: RETURN ;
3491: ELSE
3492: IF PG_DEBUG in ('Y', 'C') THEN

Line 4269: p_item_attribute_rec IN OUT NoCopy MSC_ATP_PVT.item_attribute_rec)

4265: PROCEDURE GET_ITEM_ATTRIBUTES (p_instance_id IN NUMBER,
4266: p_plan_id IN NUMBER,
4267: p_inventory_item_id IN NUMBER,
4268: p_organization_id IN NUMBER,
4269: p_item_attribute_rec IN OUT NoCopy MSC_ATP_PVT.item_attribute_rec)
4270: AS
4271:
4272: l_atp_flag VARCHAR2(1);
4273: l_bom_item_type NUMBER;

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

4285: msc_sch_wb.atp_debug('GET_ITEM_ATTRIBUTES: ' || 'sr_inventory_item_id = '||p_inventory_item_id);
4286: msc_sch_wb.atp_debug('GET_ITEM_ATTRIBUTES: ' || 'organization_id = '||p_organization_id);
4287: msc_sch_wb.atp_debug('GET_ITEM_ATTRIBUTES: ' || 'plan_id = '||p_plan_id);
4288: msc_sch_wb.atp_debug('GET_ITEM_ATTRIBUTES: ' || 'sr_instance_id = '||p_instance_id);
4289: msc_sch_wb.atp_debug('GET_ITEM_ATTRIBUTES: ' || 'G_ORDER_LINE_ID = '||MSC_ATP_PVT.G_ORDER_LINE_ID);
4290: msc_sch_wb.atp_debug('GET_ITEM_ATTRIBUTES: ' || 'G_ASSEMBLY_LINE_ID = '||MSC_ATP_PVT.G_ASSEMBLY_LINE_ID);
4291: msc_sch_wb.atp_debug('GET_ITEM_ATTRIBUTES: ' || 'G_COMP_LINE_ID = '||MSC_ATP_PVT.G_COMP_LINE_ID);
4292: msc_sch_wb.atp_debug('GET_ITEM_ATTRIBUTES: ' || 'G_INV_CTP = '||MSC_ATP_PVT.G_INV_CTP);
4293: msc_sch_wb.atp_debug('GET_ITEM_ATTRIBUTES: ' || 'parent_repl_ord_flag := ' ||

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

4286: msc_sch_wb.atp_debug('GET_ITEM_ATTRIBUTES: ' || 'organization_id = '||p_organization_id);
4287: msc_sch_wb.atp_debug('GET_ITEM_ATTRIBUTES: ' || 'plan_id = '||p_plan_id);
4288: msc_sch_wb.atp_debug('GET_ITEM_ATTRIBUTES: ' || 'sr_instance_id = '||p_instance_id);
4289: msc_sch_wb.atp_debug('GET_ITEM_ATTRIBUTES: ' || 'G_ORDER_LINE_ID = '||MSC_ATP_PVT.G_ORDER_LINE_ID);
4290: msc_sch_wb.atp_debug('GET_ITEM_ATTRIBUTES: ' || 'G_ASSEMBLY_LINE_ID = '||MSC_ATP_PVT.G_ASSEMBLY_LINE_ID);
4291: msc_sch_wb.atp_debug('GET_ITEM_ATTRIBUTES: ' || 'G_COMP_LINE_ID = '||MSC_ATP_PVT.G_COMP_LINE_ID);
4292: msc_sch_wb.atp_debug('GET_ITEM_ATTRIBUTES: ' || 'G_INV_CTP = '||MSC_ATP_PVT.G_INV_CTP);
4293: msc_sch_wb.atp_debug('GET_ITEM_ATTRIBUTES: ' || 'parent_repl_ord_flag := ' ||
4294: p_item_attribute_rec.parent_repl_ord_flag);

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

4287: msc_sch_wb.atp_debug('GET_ITEM_ATTRIBUTES: ' || 'plan_id = '||p_plan_id);
4288: msc_sch_wb.atp_debug('GET_ITEM_ATTRIBUTES: ' || 'sr_instance_id = '||p_instance_id);
4289: msc_sch_wb.atp_debug('GET_ITEM_ATTRIBUTES: ' || 'G_ORDER_LINE_ID = '||MSC_ATP_PVT.G_ORDER_LINE_ID);
4290: msc_sch_wb.atp_debug('GET_ITEM_ATTRIBUTES: ' || 'G_ASSEMBLY_LINE_ID = '||MSC_ATP_PVT.G_ASSEMBLY_LINE_ID);
4291: msc_sch_wb.atp_debug('GET_ITEM_ATTRIBUTES: ' || 'G_COMP_LINE_ID = '||MSC_ATP_PVT.G_COMP_LINE_ID);
4292: msc_sch_wb.atp_debug('GET_ITEM_ATTRIBUTES: ' || 'G_INV_CTP = '||MSC_ATP_PVT.G_INV_CTP);
4293: msc_sch_wb.atp_debug('GET_ITEM_ATTRIBUTES: ' || 'parent_repl_ord_flag := ' ||
4294: p_item_attribute_rec.parent_repl_ord_flag);
4295: msc_sch_wb.atp_debug('GET_ITEM_ATTRIBUTES: ' || 'parent_bom_item_type := ' ||

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

4288: msc_sch_wb.atp_debug('GET_ITEM_ATTRIBUTES: ' || 'sr_instance_id = '||p_instance_id);
4289: msc_sch_wb.atp_debug('GET_ITEM_ATTRIBUTES: ' || 'G_ORDER_LINE_ID = '||MSC_ATP_PVT.G_ORDER_LINE_ID);
4290: msc_sch_wb.atp_debug('GET_ITEM_ATTRIBUTES: ' || 'G_ASSEMBLY_LINE_ID = '||MSC_ATP_PVT.G_ASSEMBLY_LINE_ID);
4291: msc_sch_wb.atp_debug('GET_ITEM_ATTRIBUTES: ' || 'G_COMP_LINE_ID = '||MSC_ATP_PVT.G_COMP_LINE_ID);
4292: msc_sch_wb.atp_debug('GET_ITEM_ATTRIBUTES: ' || 'G_INV_CTP = '||MSC_ATP_PVT.G_INV_CTP);
4293: msc_sch_wb.atp_debug('GET_ITEM_ATTRIBUTES: ' || 'parent_repl_ord_flag := ' ||
4294: p_item_attribute_rec.parent_repl_ord_flag);
4295: msc_sch_wb.atp_debug('GET_ITEM_ATTRIBUTES: ' || 'parent_bom_item_type := ' ||
4296: p_item_attribute_rec.parent_bom_item_type);

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

4362: msc_sch_wb.atp_debug('GET_ITEM_ATTRIBUTES: ' || 'Lowest Level Source = ' || p_item_attribute_rec.lowest_level_src);
4363: END IF;
4364:
4365: -- ATP4drp re-set component flag for DRP plans
4366: IF NVL(MSC_ATP_PVT.G_PLAN_INFO_REC.plan_type, 1) = 5 THEN
4367: IF l_atp_comp_flag = 'C' THEN
4368: l_atp_comp_flag := 'Y';
4369: ELSIF l_atp_comp_flag = 'R' THEN
4370: l_atp_comp_flag := 'N';

Line 4401: ELSIF MSC_ATP_PVT.G_INV_CTP = 5 THEN

4397: --We treat PTO option class and model as non-atpable
4398: l_atp_flag := 'N';
4399: l_atp_comp_flag := 'N';
4400:
4401: ELSIF MSC_ATP_PVT.G_INV_CTP = 5 THEN
4402: IF ((l_bom_item_type = 1 or l_bom_item_type = 4) and l_replenish_flag = 'Y') AND
4403: p_item_attribute_rec.parent_pegging_id is null THEN
4404: --If ATO model or ATO item then we may need to explode it.
4405: If l_atp_comp_flag = 'C' THEN

Line 4485: MSC_ATP_PVT.G_SR_INVENTORY_ITEM_ID := NULL;

4481: END IF;
4482:
4483:
4484: END IF;
4485: MSC_ATP_PVT.G_SR_INVENTORY_ITEM_ID := NULL;
4486: p_item_attribute_rec.atp_flag := l_atp_flag;
4487: p_item_attribute_rec.atp_comp_flag := l_atp_comp_flag;
4488:
4489: --s_cto_rearch

Line 4512: MSC_ATP_PVT.G_SR_INVENTORY_ITEM_ID := p_inventory_item_id;

4508: WHEN NO_DATA_FOUND THEN
4509: p_item_attribute_rec.instance_id := null;
4510: p_item_attribute_rec.organization_id := null;
4511: p_item_attribute_rec.sr_inv_item_id := null;
4512: MSC_ATP_PVT.G_SR_INVENTORY_ITEM_ID := p_inventory_item_id;
4513: p_item_attribute_rec.atp_flag := 'N';
4514: p_item_attribute_rec.atp_comp_flag := 'N';
4515: p_item_attribute_rec.pre_pro_lt := 0;
4516: p_item_attribute_rec.fixed_lt := 0;

Line 4532: x_org_attribute_rec OUT NoCopy MSC_ATP_PVT.org_attribute_rec)

4528:
4529: PROCEDURE GET_ORG_ATTRIBUTES (
4530: p_instance_id IN NUMBER,
4531: p_organization_id IN NUMBER,
4532: x_org_attribute_rec OUT NoCopy MSC_ATP_PVT.org_attribute_rec)
4533: IS
4534: BEGIN
4535:
4536: IF PG_DEBUG in ('Y', 'C') THEN

Line 4592: x_org_attribute_rec MSC_ATP_PVT.org_attribute_rec;

4588: PROCEDURE get_global_org_info (
4589: p_instance_id IN NUMBER,
4590: p_organization_id IN NUMBER) IS
4591:
4592: x_org_attribute_rec MSC_ATP_PVT.org_attribute_rec;
4593:
4594: BEGIN
4595:
4596: IF PG_DEBUG in ('Y', 'C') THEN

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

4596: IF PG_DEBUG in ('Y', 'C') THEN
4597: msc_sch_wb.atp_debug('In get_global_org_info core');
4598: END IF;
4599:
4600: IF (MSC_ATP_PVT.G_ORG_INFO_REC.instance_id IS NULL) OR
4601: (MSC_ATP_PVT.G_ORG_INFO_REC.organization_id IS NULL) OR
4602: (MSC_ATP_PVT.G_ORG_INFO_REC.instance_id <> p_instance_id) OR
4603: (MSC_ATP_PVT.G_ORG_INFO_REC.organization_id <> p_organization_id) THEN
4604:

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

4597: msc_sch_wb.atp_debug('In get_global_org_info core');
4598: END IF;
4599:
4600: IF (MSC_ATP_PVT.G_ORG_INFO_REC.instance_id IS NULL) OR
4601: (MSC_ATP_PVT.G_ORG_INFO_REC.organization_id IS NULL) OR
4602: (MSC_ATP_PVT.G_ORG_INFO_REC.instance_id <> p_instance_id) OR
4603: (MSC_ATP_PVT.G_ORG_INFO_REC.organization_id <> p_organization_id) THEN
4604:
4605: GET_ORG_ATTRIBUTES(p_instance_id, p_organization_id, x_org_attribute_rec);

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

4598: END IF;
4599:
4600: IF (MSC_ATP_PVT.G_ORG_INFO_REC.instance_id IS NULL) OR
4601: (MSC_ATP_PVT.G_ORG_INFO_REC.organization_id IS NULL) OR
4602: (MSC_ATP_PVT.G_ORG_INFO_REC.instance_id <> p_instance_id) OR
4603: (MSC_ATP_PVT.G_ORG_INFO_REC.organization_id <> p_organization_id) THEN
4604:
4605: GET_ORG_ATTRIBUTES(p_instance_id, p_organization_id, x_org_attribute_rec);
4606:

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

4599:
4600: IF (MSC_ATP_PVT.G_ORG_INFO_REC.instance_id IS NULL) OR
4601: (MSC_ATP_PVT.G_ORG_INFO_REC.organization_id IS NULL) OR
4602: (MSC_ATP_PVT.G_ORG_INFO_REC.instance_id <> p_instance_id) OR
4603: (MSC_ATP_PVT.G_ORG_INFO_REC.organization_id <> p_organization_id) THEN
4604:
4605: GET_ORG_ATTRIBUTES(p_instance_id, p_organization_id, x_org_attribute_rec);
4606:
4607: MSC_ATP_PVT.G_ORG_INFO_REC := x_org_attribute_rec;

Line 4607: MSC_ATP_PVT.G_ORG_INFO_REC := x_org_attribute_rec;

4603: (MSC_ATP_PVT.G_ORG_INFO_REC.organization_id <> p_organization_id) THEN
4604:
4605: GET_ORG_ATTRIBUTES(p_instance_id, p_organization_id, x_org_attribute_rec);
4606:
4607: MSC_ATP_PVT.G_ORG_INFO_REC := x_org_attribute_rec;
4608:
4609: END IF;
4610:
4611: END get_global_org_info;

Line 4617: p_item_attribute_rec IN MSC_ATP_PVT.item_attribute_rec ) IS

4613: PROCEDURE get_global_item_info (p_instance_id IN NUMBER,
4614: p_plan_id IN NUMBER,
4615: p_inventory_item_id IN NUMBER,
4616: p_organization_id IN NUMBER,
4617: p_item_attribute_rec IN MSC_ATP_PVT.item_attribute_rec ) IS
4618:
4619: l_item_attribute_rec MSC_ATP_PVT.item_attribute_rec;
4620:
4621: BEGIN

Line 4619: l_item_attribute_rec MSC_ATP_PVT.item_attribute_rec;

4615: p_inventory_item_id IN NUMBER,
4616: p_organization_id IN NUMBER,
4617: p_item_attribute_rec IN MSC_ATP_PVT.item_attribute_rec ) IS
4618:
4619: l_item_attribute_rec MSC_ATP_PVT.item_attribute_rec;
4620:
4621: BEGIN
4622:
4623: IF PG_DEBUG in ('Y', 'C') THEN

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

4631: msc_sch_wb.atp_debug('p_plan_id := ' || p_plan_id);
4632: msc_sch_wb.atp_debug('p_inventory_item_id := ' || p_inventory_item_id);
4633: msc_sch_wb.atp_debug('p_organization_id := ' || p_organization_id);
4634: END IF;
4635: IF (MSC_ATP_PVT.G_ITEM_INFO_REC.instance_id IS NULL) OR
4636: (MSC_ATP_PVT.G_ITEM_INFO_REC.organization_id IS NULL) OR
4637: (MSC_ATP_PVT.G_ITEM_INFO_REC.sr_inv_item_id IS NULL) OR
4638: (MSC_ATP_PVT.G_ITEM_INFO_REC.instance_id <> p_instance_id) OR
4639: (MSC_ATP_PVT.G_ITEM_INFO_REC.organization_id <> p_organization_id) OR

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

4632: msc_sch_wb.atp_debug('p_inventory_item_id := ' || p_inventory_item_id);
4633: msc_sch_wb.atp_debug('p_organization_id := ' || p_organization_id);
4634: END IF;
4635: IF (MSC_ATP_PVT.G_ITEM_INFO_REC.instance_id IS NULL) OR
4636: (MSC_ATP_PVT.G_ITEM_INFO_REC.organization_id IS NULL) OR
4637: (MSC_ATP_PVT.G_ITEM_INFO_REC.sr_inv_item_id IS NULL) OR
4638: (MSC_ATP_PVT.G_ITEM_INFO_REC.instance_id <> p_instance_id) OR
4639: (MSC_ATP_PVT.G_ITEM_INFO_REC.organization_id <> p_organization_id) OR
4640: (MSC_ATP_PVT.G_ITEM_INFO_REC.sr_inv_item_id <> p_inventory_item_id)

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

4633: msc_sch_wb.atp_debug('p_organization_id := ' || p_organization_id);
4634: END IF;
4635: IF (MSC_ATP_PVT.G_ITEM_INFO_REC.instance_id IS NULL) OR
4636: (MSC_ATP_PVT.G_ITEM_INFO_REC.organization_id IS NULL) OR
4637: (MSC_ATP_PVT.G_ITEM_INFO_REC.sr_inv_item_id IS NULL) OR
4638: (MSC_ATP_PVT.G_ITEM_INFO_REC.instance_id <> p_instance_id) OR
4639: (MSC_ATP_PVT.G_ITEM_INFO_REC.organization_id <> p_organization_id) OR
4640: (MSC_ATP_PVT.G_ITEM_INFO_REC.sr_inv_item_id <> p_inventory_item_id)
4641: ---3917625: read the item attributes if plan chnages

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

4634: END IF;
4635: IF (MSC_ATP_PVT.G_ITEM_INFO_REC.instance_id IS NULL) OR
4636: (MSC_ATP_PVT.G_ITEM_INFO_REC.organization_id IS NULL) OR
4637: (MSC_ATP_PVT.G_ITEM_INFO_REC.sr_inv_item_id IS NULL) OR
4638: (MSC_ATP_PVT.G_ITEM_INFO_REC.instance_id <> p_instance_id) OR
4639: (MSC_ATP_PVT.G_ITEM_INFO_REC.organization_id <> p_organization_id) OR
4640: (MSC_ATP_PVT.G_ITEM_INFO_REC.sr_inv_item_id <> p_inventory_item_id)
4641: ---3917625: read the item attributes if plan chnages
4642: OR (NVL(MSC_ATP_PVT.G_ITEM_INFO_REC.plan_id, -12345) <> p_plan_id) THEN

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

4635: IF (MSC_ATP_PVT.G_ITEM_INFO_REC.instance_id IS NULL) OR
4636: (MSC_ATP_PVT.G_ITEM_INFO_REC.organization_id IS NULL) OR
4637: (MSC_ATP_PVT.G_ITEM_INFO_REC.sr_inv_item_id IS NULL) OR
4638: (MSC_ATP_PVT.G_ITEM_INFO_REC.instance_id <> p_instance_id) OR
4639: (MSC_ATP_PVT.G_ITEM_INFO_REC.organization_id <> p_organization_id) OR
4640: (MSC_ATP_PVT.G_ITEM_INFO_REC.sr_inv_item_id <> p_inventory_item_id)
4641: ---3917625: read the item attributes if plan chnages
4642: OR (NVL(MSC_ATP_PVT.G_ITEM_INFO_REC.plan_id, -12345) <> p_plan_id) THEN
4643:

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

4636: (MSC_ATP_PVT.G_ITEM_INFO_REC.organization_id IS NULL) OR
4637: (MSC_ATP_PVT.G_ITEM_INFO_REC.sr_inv_item_id IS NULL) OR
4638: (MSC_ATP_PVT.G_ITEM_INFO_REC.instance_id <> p_instance_id) OR
4639: (MSC_ATP_PVT.G_ITEM_INFO_REC.organization_id <> p_organization_id) OR
4640: (MSC_ATP_PVT.G_ITEM_INFO_REC.sr_inv_item_id <> p_inventory_item_id)
4641: ---3917625: read the item attributes if plan chnages
4642: OR (NVL(MSC_ATP_PVT.G_ITEM_INFO_REC.plan_id, -12345) <> p_plan_id) THEN
4643:
4644:

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

4638: (MSC_ATP_PVT.G_ITEM_INFO_REC.instance_id <> p_instance_id) OR
4639: (MSC_ATP_PVT.G_ITEM_INFO_REC.organization_id <> p_organization_id) OR
4640: (MSC_ATP_PVT.G_ITEM_INFO_REC.sr_inv_item_id <> p_inventory_item_id)
4641: ---3917625: read the item attributes if plan chnages
4642: OR (NVL(MSC_ATP_PVT.G_ITEM_INFO_REC.plan_id, -12345) <> p_plan_id) THEN
4643:
4644:
4645: msc_sch_wb.atp_debug('Item/Org/instance/plan info has changed. Recalculate item attributes');
4646: l_item_attribute_rec.parent_repl_ord_flag := p_item_attribute_rec.parent_repl_ord_flag;

Line 4656: MSC_ATP_PVT.G_ITEM_INFO_REC := l_item_attribute_rec;

4652:
4653: GET_ITEM_ATTRIBUTES(p_instance_id, p_plan_id, p_inventory_item_id,
4654: p_organization_id, l_item_attribute_rec);
4655:
4656: MSC_ATP_PVT.G_ITEM_INFO_REC := l_item_attribute_rec;
4657:
4658:
4659: END IF;
4660:

Line 4663: MSC_ATP_PVT.G_ITEM_INFO_REC.atp_flag);

4659: END IF;
4660:
4661: IF PG_DEBUG in ('Y', 'C') THEN
4662: msc_sch_wb.atp_debug('get_global_item_info ATP flag is '||
4663: MSC_ATP_PVT.G_ITEM_INFO_REC.atp_flag);
4664: END IF;
4665:
4666: END get_global_item_info;
4667:

Line 4676: p_plan_info_rec MSC_ATP_PVT.plan_info_rec;

4672: p_demand_class IN VARCHAR2,
4673: p_parent_plan_id IN NUMBER DEFAULT NULL, --bug3510475
4674: p_time_phased_atp IN VARCHAR2 := 'N' ) IS -- time_phased_atp
4675:
4676: p_plan_info_rec MSC_ATP_PVT.plan_info_rec;
4677:
4678: BEGIN
4679: IF PG_DEBUG in ('Y', 'C') THEN
4680: msc_sch_wb.atp_debug('In get_global_plan_info core');

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

4677:
4678: BEGIN
4679: IF PG_DEBUG in ('Y', 'C') THEN
4680: msc_sch_wb.atp_debug('In get_global_plan_info core');
4681: msc_sch_wb.atp_debug('g__inv_id := ' || MSC_ATP_PVT.G_ITEM_INFO_REC.sr_inv_item_id);
4682: msc_sch_wb.atp_debug('p_inv_id := ' || p_inventory_item_id);
4683: msc_sch_wb.atp_debug('g_instance_id := ' || MSC_ATP_PVT.G_ITEM_INFO_REC.instance_id);
4684: msc_sch_wb.atp_debug('p_instance_id := ' || p_instance_id);
4685: msc_sch_wb.atp_debug('g_org_id := ' || MSC_ATP_PVT.G_ITEM_INFO_REC.organization_id);

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

4679: IF PG_DEBUG in ('Y', 'C') THEN
4680: msc_sch_wb.atp_debug('In get_global_plan_info core');
4681: msc_sch_wb.atp_debug('g__inv_id := ' || MSC_ATP_PVT.G_ITEM_INFO_REC.sr_inv_item_id);
4682: msc_sch_wb.atp_debug('p_inv_id := ' || p_inventory_item_id);
4683: msc_sch_wb.atp_debug('g_instance_id := ' || MSC_ATP_PVT.G_ITEM_INFO_REC.instance_id);
4684: msc_sch_wb.atp_debug('p_instance_id := ' || p_instance_id);
4685: msc_sch_wb.atp_debug('g_org_id := ' || MSC_ATP_PVT.G_ITEM_INFO_REC.organization_id);
4686: msc_sch_wb.atp_debug('p_org_id := ' || p_organization_id);
4687: msc_sch_wb.atp_debug('g_plan_id := ' || MSC_ATP_PVT.G_PLAN_INFO_REC.plan_id);

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

4681: msc_sch_wb.atp_debug('g__inv_id := ' || MSC_ATP_PVT.G_ITEM_INFO_REC.sr_inv_item_id);
4682: msc_sch_wb.atp_debug('p_inv_id := ' || p_inventory_item_id);
4683: msc_sch_wb.atp_debug('g_instance_id := ' || MSC_ATP_PVT.G_ITEM_INFO_REC.instance_id);
4684: msc_sch_wb.atp_debug('p_instance_id := ' || p_instance_id);
4685: msc_sch_wb.atp_debug('g_org_id := ' || MSC_ATP_PVT.G_ITEM_INFO_REC.organization_id);
4686: msc_sch_wb.atp_debug('p_org_id := ' || p_organization_id);
4687: msc_sch_wb.atp_debug('g_plan_id := ' || MSC_ATP_PVT.G_PLAN_INFO_REC.plan_id);
4688: END IF;
4689:

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

4683: msc_sch_wb.atp_debug('g_instance_id := ' || MSC_ATP_PVT.G_ITEM_INFO_REC.instance_id);
4684: msc_sch_wb.atp_debug('p_instance_id := ' || p_instance_id);
4685: msc_sch_wb.atp_debug('g_org_id := ' || MSC_ATP_PVT.G_ITEM_INFO_REC.organization_id);
4686: msc_sch_wb.atp_debug('p_org_id := ' || p_organization_id);
4687: msc_sch_wb.atp_debug('g_plan_id := ' || MSC_ATP_PVT.G_PLAN_INFO_REC.plan_id);
4688: END IF;
4689:
4690: IF (MSC_ATP_PVT.G_ITEM_INFO_REC.sr_inv_item_id IS NULL) OR
4691: (MSC_ATP_PVT.G_ITEM_INFO_REC.instance_id <> p_instance_id) OR

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

4686: msc_sch_wb.atp_debug('p_org_id := ' || p_organization_id);
4687: msc_sch_wb.atp_debug('g_plan_id := ' || MSC_ATP_PVT.G_PLAN_INFO_REC.plan_id);
4688: END IF;
4689:
4690: IF (MSC_ATP_PVT.G_ITEM_INFO_REC.sr_inv_item_id IS NULL) OR
4691: (MSC_ATP_PVT.G_ITEM_INFO_REC.instance_id <> p_instance_id) OR
4692: (MSC_ATP_PVT.G_ITEM_INFO_REC.organization_id <> p_organization_id) OR
4693: (MSC_ATP_PVT.G_ITEM_INFO_REC.sr_inv_item_id <> p_inventory_item_id) OR
4694: -- If Item information does not match

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

4687: msc_sch_wb.atp_debug('g_plan_id := ' || MSC_ATP_PVT.G_PLAN_INFO_REC.plan_id);
4688: END IF;
4689:
4690: IF (MSC_ATP_PVT.G_ITEM_INFO_REC.sr_inv_item_id IS NULL) OR
4691: (MSC_ATP_PVT.G_ITEM_INFO_REC.instance_id <> p_instance_id) OR
4692: (MSC_ATP_PVT.G_ITEM_INFO_REC.organization_id <> p_organization_id) OR
4693: (MSC_ATP_PVT.G_ITEM_INFO_REC.sr_inv_item_id <> p_inventory_item_id) OR
4694: -- If Item information does not match
4695: (MSC_ATP_PVT.G_PLAN_INFO_REC.plan_id IS NULL) OR

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

4688: END IF;
4689:
4690: IF (MSC_ATP_PVT.G_ITEM_INFO_REC.sr_inv_item_id IS NULL) OR
4691: (MSC_ATP_PVT.G_ITEM_INFO_REC.instance_id <> p_instance_id) OR
4692: (MSC_ATP_PVT.G_ITEM_INFO_REC.organization_id <> p_organization_id) OR
4693: (MSC_ATP_PVT.G_ITEM_INFO_REC.sr_inv_item_id <> p_inventory_item_id) OR
4694: -- If Item information does not match
4695: (MSC_ATP_PVT.G_PLAN_INFO_REC.plan_id IS NULL) OR
4696: (MSC_ATP_PVT.G_PLAN_INFO_REC.sr_instance_id <> p_instance_id) OR

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

4689:
4690: IF (MSC_ATP_PVT.G_ITEM_INFO_REC.sr_inv_item_id IS NULL) OR
4691: (MSC_ATP_PVT.G_ITEM_INFO_REC.instance_id <> p_instance_id) OR
4692: (MSC_ATP_PVT.G_ITEM_INFO_REC.organization_id <> p_organization_id) OR
4693: (MSC_ATP_PVT.G_ITEM_INFO_REC.sr_inv_item_id <> p_inventory_item_id) OR
4694: -- If Item information does not match
4695: (MSC_ATP_PVT.G_PLAN_INFO_REC.plan_id IS NULL) OR
4696: (MSC_ATP_PVT.G_PLAN_INFO_REC.sr_instance_id <> p_instance_id) OR
4697: (MSC_ATP_PVT.G_PLAN_INFO_REC.organization_id <> p_organization_id) THEN

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

4691: (MSC_ATP_PVT.G_ITEM_INFO_REC.instance_id <> p_instance_id) OR
4692: (MSC_ATP_PVT.G_ITEM_INFO_REC.organization_id <> p_organization_id) OR
4693: (MSC_ATP_PVT.G_ITEM_INFO_REC.sr_inv_item_id <> p_inventory_item_id) OR
4694: -- If Item information does not match
4695: (MSC_ATP_PVT.G_PLAN_INFO_REC.plan_id IS NULL) OR
4696: (MSC_ATP_PVT.G_PLAN_INFO_REC.sr_instance_id <> p_instance_id) OR
4697: (MSC_ATP_PVT.G_PLAN_INFO_REC.organization_id <> p_organization_id) THEN
4698: -- Or If the Plan Information does not match then obtain the plan info.
4699:

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

4692: (MSC_ATP_PVT.G_ITEM_INFO_REC.organization_id <> p_organization_id) OR
4693: (MSC_ATP_PVT.G_ITEM_INFO_REC.sr_inv_item_id <> p_inventory_item_id) OR
4694: -- If Item information does not match
4695: (MSC_ATP_PVT.G_PLAN_INFO_REC.plan_id IS NULL) OR
4696: (MSC_ATP_PVT.G_PLAN_INFO_REC.sr_instance_id <> p_instance_id) OR
4697: (MSC_ATP_PVT.G_PLAN_INFO_REC.organization_id <> p_organization_id) THEN
4698: -- Or If the Plan Information does not match then obtain the plan info.
4699:
4700: --bug3510475

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

4693: (MSC_ATP_PVT.G_ITEM_INFO_REC.sr_inv_item_id <> p_inventory_item_id) OR
4694: -- If Item information does not match
4695: (MSC_ATP_PVT.G_PLAN_INFO_REC.plan_id IS NULL) OR
4696: (MSC_ATP_PVT.G_PLAN_INFO_REC.sr_instance_id <> p_instance_id) OR
4697: (MSC_ATP_PVT.G_PLAN_INFO_REC.organization_id <> p_organization_id) THEN
4698: -- Or If the Plan Information does not match then obtain the plan info.
4699:
4700: --bug3510475
4701: Get_Plan_Info(p_instance_id, p_inventory_item_id,

Line 4703: MSC_ATP_PVT.G_PLAN_INFO_REC := p_plan_info_rec;

4699:
4700: --bug3510475
4701: Get_Plan_Info(p_instance_id, p_inventory_item_id,
4702: p_organization_id, p_demand_class, p_plan_info_rec,p_parent_plan_id,p_time_phased_atp); -- time_phased_atp
4703: MSC_ATP_PVT.G_PLAN_INFO_REC := p_plan_info_rec;
4704:
4705: END IF;
4706:
4707: IF PG_DEBUG in ('Y', 'C') THEN

Line 4709: MSC_ATP_PVT.G_PLAN_INFO_REC.plan_name);

4705: END IF;
4706:
4707: IF PG_DEBUG in ('Y', 'C') THEN
4708: msc_sch_wb.atp_debug('get_global_plan_info Plan name is '||
4709: MSC_ATP_PVT.G_PLAN_INFO_REC.plan_name);
4710: msc_sch_wb.atp_debug('get_global_plan_info Argument Organization ID is '||
4711: p_organization_id);
4712: msc_sch_wb.atp_debug('get_global_plan_info Plan owning organization is '||
4713: MSC_ATP_PVT.G_PLAN_INFO_REC.organization_id);

Line 4713: MSC_ATP_PVT.G_PLAN_INFO_REC.organization_id);

4709: MSC_ATP_PVT.G_PLAN_INFO_REC.plan_name);
4710: msc_sch_wb.atp_debug('get_global_plan_info Argument Organization ID is '||
4711: p_organization_id);
4712: msc_sch_wb.atp_debug('get_global_plan_info Plan owning organization is '||
4713: MSC_ATP_PVT.G_PLAN_INFO_REC.organization_id);
4714: END IF;
4715:
4716: END get_global_plan_info;
4717:

Line 4781: 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);

4777: -- Read the Profile option to pad the user defined days
4778: -- to infinite Supply fence.
4779: IF PG_DEBUG in ('Y', 'C') THEN
4780: msc_sch_wb.atp_debug('get_infinite_time_fence_date: Profile value for Infinite Supply Pad');
4781: 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);
4782: END IF;
4783: -- Bug 3036513 If resource_id is NULL get the infinite_time_fence_date
4784: -- for just the item.
4785: IF (p_resource_id IS NULL) THEN

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

4811: -- Add Infinite Supply Time Fence PAD
4812: --bug3609031 adding ceil
4813: AND c2.seq_num = c1.next_seq_num +
4814: DECODE(r.infinite_supply_fence_code,
4815: 1, ceil(i.cumulative_total_lead_time) + MSC_ATP_PVT.G_INF_SUP_TF_PAD,
4816: 2, ceil(i.cum_manufacturing_lead_time) + MSC_ATP_PVT.G_INF_SUP_TF_PAD,
4817: 3, DECODE(NVL(ceil(i.preprocessing_lead_time),-1)+
4818: NVL(ceil(i.full_lead_time),-1)+
4819: NVL(ceil(i.postprocessing_lead_time),-1),-3,

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

4812: --bug3609031 adding ceil
4813: AND c2.seq_num = c1.next_seq_num +
4814: DECODE(r.infinite_supply_fence_code,
4815: 1, ceil(i.cumulative_total_lead_time) + MSC_ATP_PVT.G_INF_SUP_TF_PAD,
4816: 2, ceil(i.cum_manufacturing_lead_time) + MSC_ATP_PVT.G_INF_SUP_TF_PAD,
4817: 3, DECODE(NVL(ceil(i.preprocessing_lead_time),-1)+
4818: NVL(ceil(i.full_lead_time),-1)+
4819: NVL(ceil(i.postprocessing_lead_time),-1),-3,
4820: NULL, -- All are NULL so return NULL.

Line 4824: + MSC_ATP_PVT.G_INF_SUP_TF_PAD),

4820: NULL, -- All are NULL so return NULL.
4821: NVL(ceil(i.preprocessing_lead_time),0)+ -- Otherwise
4822: NVL(ceil(i.full_lead_time),0) + -- evaluate to
4823: NVL(ceil(i.postprocessing_lead_time),0) -- NON NULL
4824: + MSC_ATP_PVT.G_INF_SUP_TF_PAD),
4825: -- Bugs 1986353, 2004479.
4826: 4, r.infinite_supply_time_fence)
4827: -- End Bug 2877340, 2746213
4828: AND c2.calendar_code = c1.calendar_code

Line 7882: G_set_status := MSC_ATP_PVT.ALLSUCCESS;

7878: END IF;
7879: -- 2834932
7880: G_set_nonoverride_flag := 'N';
7881: G_set_override_flag := 'N';
7882: G_set_status := MSC_ATP_PVT.ALLSUCCESS;
7883: G_is_ship_set := p_set.ship_set_name(p_start) is not null;
7884: G_override_date := null;
7885: G_ship_LAD_set := null;
7886: G_arr_LAD_set := null;

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

7902: IF PG_DEBUG in ('Y', 'C') THEN
7903: msc_sch_wb.atp_debug('********** Begin Process_Set_Line **********');
7904: END IF;
7905:
7906: x_line_status := NVL(p_set.error_code(i), MSC_ATP_PVT.ALLSUCCESS);
7907:
7908: IF p_set.requested_ship_date(i) is NOT null THEN
7909: l_request_date_ln := p_set.requested_ship_date(i);
7910: ELSE

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

7951: nvl(G_ship_EAD_set, p_set.earliest_acceptable_date(i)));
7952:
7953: /* Bug 3365376: LAD should be considered for Non-atpable items as well.
7954: -- nonatpable items..move LAD back to sysdate of curr LAD is before sysdate
7955: IF p_set.Error_Code(i) = MSC_ATP_PVT.ATP_NOT_APPL THEN
7956: l_ship_LAD_ln := null;
7957: l_arr_LAD_ln := null;
7958: END IF;
7959: */

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

7971:
7972: -- set line status
7973: -- dsting 2797410
7974: IF nvl(p_set.override_flag(i), 'N') = 'Y'
7975: AND p_set.error_code(i) = MSC_ATP_PVT.ATP_REQ_DATE_FAIL
7976: THEN
7977: x_line_status := MSC_ATP_PVT.ALLSUCCESS;
7978:
7979: --bug 3365376: We should check pass/fail status for Non atpbale lines as well

Line 7977: x_line_status := MSC_ATP_PVT.ALLSUCCESS;

7973: -- dsting 2797410
7974: IF nvl(p_set.override_flag(i), 'N') = 'Y'
7975: AND p_set.error_code(i) = MSC_ATP_PVT.ATP_REQ_DATE_FAIL
7976: THEN
7977: x_line_status := MSC_ATP_PVT.ALLSUCCESS;
7978:
7979: --bug 3365376: We should check pass/fail status for Non atpbale lines as well
7980: /* ELSIF p_set.error_code(i) = MSC_ATP_PVT.ATP_NOT_APPL
7981: OR p_set.error_code(i) = MSC_ATP_PVT.PDS_TO_ODS_SWITCH

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

7976: THEN
7977: x_line_status := MSC_ATP_PVT.ALLSUCCESS;
7978:
7979: --bug 3365376: We should check pass/fail status for Non atpbale lines as well
7980: /* ELSIF p_set.error_code(i) = MSC_ATP_PVT.ATP_NOT_APPL
7981: OR p_set.error_code(i) = MSC_ATP_PVT.PDS_TO_ODS_SWITCH
7982: */
7983: ELSIF p_set.error_code(i) = MSC_ATP_PVT.PDS_TO_ODS_SWITCH
7984: THEN

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

7977: x_line_status := MSC_ATP_PVT.ALLSUCCESS;
7978:
7979: --bug 3365376: We should check pass/fail status for Non atpbale lines as well
7980: /* ELSIF p_set.error_code(i) = MSC_ATP_PVT.ATP_NOT_APPL
7981: OR p_set.error_code(i) = MSC_ATP_PVT.PDS_TO_ODS_SWITCH
7982: */
7983: ELSIF p_set.error_code(i) = MSC_ATP_PVT.PDS_TO_ODS_SWITCH
7984: THEN
7985: x_line_status := MSC_ATP_PVT.ALLSUCCESS;

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

7979: --bug 3365376: We should check pass/fail status for Non atpbale lines as well
7980: /* ELSIF p_set.error_code(i) = MSC_ATP_PVT.ATP_NOT_APPL
7981: OR p_set.error_code(i) = MSC_ATP_PVT.PDS_TO_ODS_SWITCH
7982: */
7983: ELSIF p_set.error_code(i) = MSC_ATP_PVT.PDS_TO_ODS_SWITCH
7984: THEN
7985: x_line_status := MSC_ATP_PVT.ALLSUCCESS;
7986: ELSIF p_set.error_code(i) = MSC_ATP_PVT.ATP_REQ_DATE_FAIL
7987: --bug 3365376

Line 7985: x_line_status := MSC_ATP_PVT.ALLSUCCESS;

7981: OR p_set.error_code(i) = MSC_ATP_PVT.PDS_TO_ODS_SWITCH
7982: */
7983: ELSIF p_set.error_code(i) = MSC_ATP_PVT.PDS_TO_ODS_SWITCH
7984: THEN
7985: x_line_status := MSC_ATP_PVT.ALLSUCCESS;
7986: ELSIF p_set.error_code(i) = MSC_ATP_PVT.ATP_REQ_DATE_FAIL
7987: --bug 3365376
7988: OR p_set.error_code(i) = MSC_ATP_PVT.ATP_NOT_APPL
7989: THEN

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

7982: */
7983: ELSIF p_set.error_code(i) = MSC_ATP_PVT.PDS_TO_ODS_SWITCH
7984: THEN
7985: x_line_status := MSC_ATP_PVT.ALLSUCCESS;
7986: ELSIF p_set.error_code(i) = MSC_ATP_PVT.ATP_REQ_DATE_FAIL
7987: --bug 3365376
7988: OR p_set.error_code(i) = MSC_ATP_PVT.ATP_NOT_APPL
7989: THEN
7990: IF TRUNC(p_set.ship_date(i)) > TRUNC(l_ship_LAD_ln)

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

7984: THEN
7985: x_line_status := MSC_ATP_PVT.ALLSUCCESS;
7986: ELSIF p_set.error_code(i) = MSC_ATP_PVT.ATP_REQ_DATE_FAIL
7987: --bug 3365376
7988: OR p_set.error_code(i) = MSC_ATP_PVT.ATP_NOT_APPL
7989: THEN
7990: IF TRUNC(p_set.ship_date(i)) > TRUNC(l_ship_LAD_ln)
7991: or TRUNC(p_set.arrival_date(i)) > TRUNC(l_arr_LAD_ln)
7992: THEN

Line 7993: x_line_status := MSC_ATP_PVT.ATP_ACCEPT_FAIL;

7989: THEN
7990: IF TRUNC(p_set.ship_date(i)) > TRUNC(l_ship_LAD_ln)
7991: or TRUNC(p_set.arrival_date(i)) > TRUNC(l_arr_LAD_ln)
7992: THEN
7993: x_line_status := MSC_ATP_PVT.ATP_ACCEPT_FAIL;
7994: ELSE
7995: x_line_status := MSC_ATP_PVT.ALLSUCCESS;
7996: END IF;
7997: END IF;

Line 7995: x_line_status := MSC_ATP_PVT.ALLSUCCESS;

7991: or TRUNC(p_set.arrival_date(i)) > TRUNC(l_arr_LAD_ln)
7992: THEN
7993: x_line_status := MSC_ATP_PVT.ATP_ACCEPT_FAIL;
7994: ELSE
7995: x_line_status := MSC_ATP_PVT.ALLSUCCESS;
7996: END IF;
7997: END IF;
7998: IF p_set.Action(i) <> MSC_ATP_PVT.ATPQUERY AND
7999: (p_set.Error_Code(i) = MSC_ATP_PVT.ATP_NOT_APPL OR

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

7994: ELSE
7995: x_line_status := MSC_ATP_PVT.ALLSUCCESS;
7996: END IF;
7997: END IF;
7998: IF p_set.Action(i) <> MSC_ATP_PVT.ATPQUERY AND
7999: (p_set.Error_Code(i) = MSC_ATP_PVT.ATP_NOT_APPL OR
8000: p_set.error_code(i) = MSC_ATP_PVT.PDS_TO_ODS_SWITCH)
8001: THEN
8002: p_set.Error_Code(i) := MSC_ATP_PVT.ALLSUCCESS;

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

7995: x_line_status := MSC_ATP_PVT.ALLSUCCESS;
7996: END IF;
7997: END IF;
7998: IF p_set.Action(i) <> MSC_ATP_PVT.ATPQUERY AND
7999: (p_set.Error_Code(i) = MSC_ATP_PVT.ATP_NOT_APPL OR
8000: p_set.error_code(i) = MSC_ATP_PVT.PDS_TO_ODS_SWITCH)
8001: THEN
8002: p_set.Error_Code(i) := MSC_ATP_PVT.ALLSUCCESS;
8003: END IF;

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

7996: END IF;
7997: END IF;
7998: IF p_set.Action(i) <> MSC_ATP_PVT.ATPQUERY AND
7999: (p_set.Error_Code(i) = MSC_ATP_PVT.ATP_NOT_APPL OR
8000: p_set.error_code(i) = MSC_ATP_PVT.PDS_TO_ODS_SWITCH)
8001: THEN
8002: p_set.Error_Code(i) := MSC_ATP_PVT.ALLSUCCESS;
8003: END IF;
8004:

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

7998: IF p_set.Action(i) <> MSC_ATP_PVT.ATPQUERY AND
7999: (p_set.Error_Code(i) = MSC_ATP_PVT.ATP_NOT_APPL OR
8000: p_set.error_code(i) = MSC_ATP_PVT.PDS_TO_ODS_SWITCH)
8001: THEN
8002: p_set.Error_Code(i) := MSC_ATP_PVT.ALLSUCCESS;
8003: END IF;
8004:
8005: IF p_set.requested_ship_date(i) is NOT null THEN
8006: G_ship_LAD_set := LEAST(NVL(G_ship_LAD_set, l_ship_LAD_ln),

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

8014: NVL(p_set.ship_date(i), G_latest_ship_date_set));
8015: G_latest_arr_date_set := GREATEST(NVL(G_latest_arr_date_set, p_set.arrival_date(i)),
8016: NVL(p_set.arrival_date(i), G_latest_arr_date_set));
8017:
8018: IF x_line_status not in (MSC_ATP_PVT.ALLSUCCESS,
8019: MSC_ATP_PVT.ATP_ACCEPT_FAIL)
8020: THEN
8021: G_set_status := x_line_status;
8022: ELSIF G_set_status = MSC_ATP_PVT.ALLSUCCESS THEN

Line 8019: MSC_ATP_PVT.ATP_ACCEPT_FAIL)

8015: G_latest_arr_date_set := GREATEST(NVL(G_latest_arr_date_set, p_set.arrival_date(i)),
8016: NVL(p_set.arrival_date(i), G_latest_arr_date_set));
8017:
8018: IF x_line_status not in (MSC_ATP_PVT.ALLSUCCESS,
8019: MSC_ATP_PVT.ATP_ACCEPT_FAIL)
8020: THEN
8021: G_set_status := x_line_status;
8022: ELSIF G_set_status = MSC_ATP_PVT.ALLSUCCESS THEN
8023: IF TRUNC(G_latest_ship_date_set) > TRUNC(G_ship_LAD_set)

Line 8022: ELSIF G_set_status = MSC_ATP_PVT.ALLSUCCESS THEN

8018: IF x_line_status not in (MSC_ATP_PVT.ALLSUCCESS,
8019: MSC_ATP_PVT.ATP_ACCEPT_FAIL)
8020: THEN
8021: G_set_status := x_line_status;
8022: ELSIF G_set_status = MSC_ATP_PVT.ALLSUCCESS THEN
8023: IF TRUNC(G_latest_ship_date_set) > TRUNC(G_ship_LAD_set)
8024: OR TRUNC(G_latest_arr_date_set) > TRUNC(G_arr_LAD_set)
8025: OR (G_is_ship_set AND TRUNC(G_override_date) < TRUNC(G_ship_EAD_set)) -- xxx dsting hack
8026: THEN

Line 8027: G_set_status := MSC_ATP_PVT.GROUPEL_ERROR;

8023: IF TRUNC(G_latest_ship_date_set) > TRUNC(G_ship_LAD_set)
8024: OR TRUNC(G_latest_arr_date_set) > TRUNC(G_arr_LAD_set)
8025: OR (G_is_ship_set AND TRUNC(G_override_date) < TRUNC(G_ship_EAD_set)) -- xxx dsting hack
8026: THEN
8027: G_set_status := MSC_ATP_PVT.GROUPEL_ERROR;
8028: END IF;
8029: END IF;
8030: 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
8031: MSC_ATP_PVT.G_ATP_ITEM_PRESENT_IN_SET := 'Y';

Line 8030: 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

8026: THEN
8027: G_set_status := MSC_ATP_PVT.GROUPEL_ERROR;
8028: END IF;
8029: END IF;
8030: 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
8031: MSC_ATP_PVT.G_ATP_ITEM_PRESENT_IN_SET := 'Y';
8032: msc_sch_wb.atp_debug('CHANGED THE ITEM PRESENT FLAG');
8033: END IF;
8034: IF PG_DEBUG in ('Y', 'C') THEN

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

8027: G_set_status := MSC_ATP_PVT.GROUPEL_ERROR;
8028: END IF;
8029: END IF;
8030: 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
8031: MSC_ATP_PVT.G_ATP_ITEM_PRESENT_IN_SET := 'Y';
8032: msc_sch_wb.atp_debug('CHANGED THE ITEM PRESENT FLAG');
8033: END IF;
8034: IF PG_DEBUG in ('Y', 'C') THEN
8035: msc_sch_wb.atp_debug('line_status: ' || x_line_status);

Line 8077: IF G_set_status = MSC_ATP_PVT.ATP_REQ_QTY_FAIL THEN

8073: ELSE
8074: l_group_date := G_latest_arr_date_set; --4460369
8075: END IF;
8076:
8077: IF G_set_status = MSC_ATP_PVT.ATP_REQ_QTY_FAIL THEN
8078: l_group_date := null;
8079: END IF;
8080:
8081: -- 2834932 dsting

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

8111: END IF;
8112: /* ship_rec_cal changes end */
8113:
8114: IF l_group_work_date is null THEN
8115: p_set.error_code(l_start) := MSC_ATP_PVT.NO_MATCHING_CAL_DATE;
8116: raise NO_DATA_FOUND;
8117: END IF;
8118:
8119: IF TRUNC(l_group_date) <> TRUNC(l_group_work_date) THEN

Line 8121: G_set_status := MSC_ATP_PVT.ATP_OVERRIDE_DATE_FAIL;

8117: END IF;
8118:
8119: IF TRUNC(l_group_date) <> TRUNC(l_group_work_date) THEN
8120: l_status_flag := G_NONWORKING_DAY;
8121: G_set_status := MSC_ATP_PVT.ATP_OVERRIDE_DATE_FAIL;
8122: ELSE
8123: l_status_flag := null;
8124: END IF;
8125: l_group_date := l_group_work_date; --4460369

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

8190:
8191: G_latest_ship_date_set := GREATEST(G_latest_ship_date_set, p_set.group_ship_date(i));
8192: G_latest_arr_date_set := GREATEST(G_latest_arr_date_set, p_set.group_arrival_date(i));
8193:
8194: /*IF MSC_ATP_PVT.G_RETAIN_TIME_NON_ATP = 'N' or MSC_ATP_PVT.G_ATP_ITEM_PRESENT_IN_SET = 'Y' THEN --4460369
8195: IF p_set.requested_ship_date(i) is not null then
8196: p_set.group_ship_date(i) := trunc(p_set.group_ship_date(i)) + MSC_ATP_PVT.G_END_OF_DAY;
8197: ELSE
8198: p_set.group_arrival_date(i) := trunc(p_set.group_arrival_date(i)) + MSC_ATP_PVT.G_END_OF_DAY;

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

8192: G_latest_arr_date_set := GREATEST(G_latest_arr_date_set, p_set.group_arrival_date(i));
8193:
8194: /*IF MSC_ATP_PVT.G_RETAIN_TIME_NON_ATP = 'N' or MSC_ATP_PVT.G_ATP_ITEM_PRESENT_IN_SET = 'Y' THEN --4460369
8195: IF p_set.requested_ship_date(i) is not null then
8196: p_set.group_ship_date(i) := trunc(p_set.group_ship_date(i)) + MSC_ATP_PVT.G_END_OF_DAY;
8197: ELSE
8198: p_set.group_arrival_date(i) := trunc(p_set.group_arrival_date(i)) + MSC_ATP_PVT.G_END_OF_DAY;
8199: END IF;
8200: END IF; --4460369*/ --4967040

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

8194: /*IF MSC_ATP_PVT.G_RETAIN_TIME_NON_ATP = 'N' or MSC_ATP_PVT.G_ATP_ITEM_PRESENT_IN_SET = 'Y' THEN --4460369
8195: IF p_set.requested_ship_date(i) is not null then
8196: p_set.group_ship_date(i) := trunc(p_set.group_ship_date(i)) + MSC_ATP_PVT.G_END_OF_DAY;
8197: ELSE
8198: p_set.group_arrival_date(i) := trunc(p_set.group_arrival_date(i)) + MSC_ATP_PVT.G_END_OF_DAY;
8199: END IF;
8200: END IF; --4460369*/ --4967040
8201:
8202: IF PG_DEBUG in ('Y', 'C') THEN

Line 8213: IF G_set_status = MSC_ATP_PVT.ALLSUCCESS THEN

8209: end loop;
8210: -- 2834932 dsting. split the group date and error code loops
8211:
8212: -- one final check to see if and dates pushed beyond LAD
8213: IF G_set_status = MSC_ATP_PVT.ALLSUCCESS THEN
8214: IF TRUNC(G_latest_ship_date_set) > TRUNC(G_ship_LAD_set)
8215: OR TRUNC(G_latest_arr_date_set) > TRUNC(G_arr_LAD_set)
8216: THEN
8217: G_set_status := MSC_ATP_PVT.GROUPEL_ERROR;

Line 8217: G_set_status := MSC_ATP_PVT.GROUPEL_ERROR;

8213: IF G_set_status = MSC_ATP_PVT.ALLSUCCESS THEN
8214: IF TRUNC(G_latest_ship_date_set) > TRUNC(G_ship_LAD_set)
8215: OR TRUNC(G_latest_arr_date_set) > TRUNC(G_arr_LAD_set)
8216: THEN
8217: G_set_status := MSC_ATP_PVT.GROUPEL_ERROR;
8218: END IF;
8219: END IF;
8220:
8221: --

Line 8228: if G_set_status <> MSC_ATP_PVT.ALLSUCCESS then

8224: -- ATP_OVERRIDE_DATE_FAIL
8225: -- ATP_ACCEPT_FAIL
8226: -- GROUPEL_ERROR
8227: --
8228: if G_set_status <> MSC_ATP_PVT.ALLSUCCESS then
8229: for i in l_start..l_end loop
8230: if G_is_ship_set then
8231: l_line_date := p_set.ship_date(i);
8232: -- 2834932 dsting

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

8235: THEN
8236: IF PG_DEBUG in ('Y', 'C') THEN
8237: msc_sch_wb.atp_debug('Override date is nonworking day');
8238: END IF;
8239: IF p_set.error_code(i) = MSC_ATP_PVT.ALLSUCCESS THEN
8240: p_set.error_code(i) := MSC_ATP_PVT.ATP_OVERRIDE_DATE_FAIL;
8241: END IF;
8242: END IF;
8243: else

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

8236: IF PG_DEBUG in ('Y', 'C') THEN
8237: msc_sch_wb.atp_debug('Override date is nonworking day');
8238: END IF;
8239: IF p_set.error_code(i) = MSC_ATP_PVT.ALLSUCCESS THEN
8240: p_set.error_code(i) := MSC_ATP_PVT.ATP_OVERRIDE_DATE_FAIL;
8241: END IF;
8242: END IF;
8243: else
8244: l_line_date := p_set.arrival_date(i);

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

8245: end if;
8246:
8247: IF (NVL(p_set.Override_Flag(i), 'N') = 'Y') THEN
8248: IF TRUNC(G_override_date) <> TRUNC(l_line_date) THEN
8249: p_set.Error_Code(i) := MSC_ATP_PVT.ATP_MULTI_OVERRIDE_DATES;
8250: IF PG_DEBUG in ('Y', 'C') THEN
8251: msc_sch_wb.atp_debug('stmt18 - Multiple lines overridden to diff dates');
8252: END IF;
8253: END IF;

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

8255: IF TRUNC(G_override_date) < TRUNC(l_line_date) THEN
8256: IF PG_DEBUG in ('Y', 'C') THEN
8257: msc_sch_wb.atp_debug('stmt19 - Unable to Meet Overridden dates');
8258: END IF;
8259: p_set.Error_Code(i) := MSC_ATP_PVT.ATP_OVERRIDE_DATE_FAIL;
8260: ELSIF TRUNC(p_set.ship_date(i)) > TRUNC(G_ship_LAD_set)
8261: OR TRUNC(p_set.arrival_date(i)) > TRUNC(G_arr_LAD_set)
8262: THEN
8263: p_set.Error_Code(i) := MSC_ATP_PVT.ATP_ACCEPT_FAIL;

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

8259: p_set.Error_Code(i) := MSC_ATP_PVT.ATP_OVERRIDE_DATE_FAIL;
8260: ELSIF TRUNC(p_set.ship_date(i)) > TRUNC(G_ship_LAD_set)
8261: OR TRUNC(p_set.arrival_date(i)) > TRUNC(G_arr_LAD_set)
8262: THEN
8263: p_set.Error_Code(i) := MSC_ATP_PVT.ATP_ACCEPT_FAIL;
8264: IF PG_DEBUG in ('Y', 'C') THEN
8265: msc_sch_wb.atp_debug('stmt19 - Unable to Meet LAD');
8266: END IF;
8267: END IF;

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

8266: END IF;
8267: END IF;
8268: END IF;
8269:
8270: IF NVL(p_set.Error_Code(i), MSC_ATP_PVT.ALLSUCCESS)
8271: --bug 3365376: Popluate error also when we have atp not appl or PDS to ODS switch
8272: --= MSC_ATP_PVT.ALLSUCCESS
8273: IN (MSC_ATP_PVT.ALLSUCCESS, MSC_ATP_PVT.ATP_NOT_APPL, MSC_ATP_PVT.PDS_TO_ODS_SWITCH)
8274: THEN

Line 8272: --= MSC_ATP_PVT.ALLSUCCESS

8268: END IF;
8269:
8270: IF NVL(p_set.Error_Code(i), MSC_ATP_PVT.ALLSUCCESS)
8271: --bug 3365376: Popluate error also when we have atp not appl or PDS to ODS switch
8272: --= MSC_ATP_PVT.ALLSUCCESS
8273: IN (MSC_ATP_PVT.ALLSUCCESS, MSC_ATP_PVT.ATP_NOT_APPL, MSC_ATP_PVT.PDS_TO_ODS_SWITCH)
8274: THEN
8275: p_set.Error_Code(i) := MSC_ATP_PVT.GROUPEL_ERROR;
8276: IF PG_DEBUG in ('Y', 'C') THEN

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

8269:
8270: IF NVL(p_set.Error_Code(i), MSC_ATP_PVT.ALLSUCCESS)
8271: --bug 3365376: Popluate error also when we have atp not appl or PDS to ODS switch
8272: --= MSC_ATP_PVT.ALLSUCCESS
8273: IN (MSC_ATP_PVT.ALLSUCCESS, MSC_ATP_PVT.ATP_NOT_APPL, MSC_ATP_PVT.PDS_TO_ODS_SWITCH)
8274: THEN
8275: p_set.Error_Code(i) := MSC_ATP_PVT.GROUPEL_ERROR;
8276: IF PG_DEBUG in ('Y', 'C') THEN
8277: msc_sch_wb.atp_debug('GROUPEL_ERROR');

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

8271: --bug 3365376: Popluate error also when we have atp not appl or PDS to ODS switch
8272: --= MSC_ATP_PVT.ALLSUCCESS
8273: IN (MSC_ATP_PVT.ALLSUCCESS, MSC_ATP_PVT.ATP_NOT_APPL, MSC_ATP_PVT.PDS_TO_ODS_SWITCH)
8274: THEN
8275: p_set.Error_Code(i) := MSC_ATP_PVT.GROUPEL_ERROR;
8276: IF PG_DEBUG in ('Y', 'C') THEN
8277: msc_sch_wb.atp_debug('GROUPEL_ERROR');
8278: END IF;
8279: END IF;

Line 8295: l_plan_info_rec MSC_ATP_PVT.plan_info_rec;

8291: PROCEDURE Update_Set_SD_Dates(
8292: p_set IN OUT NOCOPY MRP_ATP_PUB.ATP_Rec_Typ,
8293: p_arrival_set IN mrp_atp_pub.date_arr
8294: ) IS
8295: l_plan_info_rec MSC_ATP_PVT.plan_info_rec;
8296: l_plan_id NUMBER;
8297: l_demand_pegging_id NUMBER;
8298: l_sd_date DATE;
8299: --ship_rec_cal

Line 8301: l_ship_arrival_date_rec MSC_ATP_PVT.ship_arrival_date_rec_typ;

8297: l_demand_pegging_id NUMBER;
8298: l_sd_date DATE;
8299: --ship_rec_cal
8300: l_order_date_type NUMBER;
8301: l_ship_arrival_date_rec MSC_ATP_PVT.ship_arrival_date_rec_typ;
8302: l_return_status VARCHAR2(1);
8303: BEGIN
8304: IF PG_DEBUG in ('Y', 'C') THEN
8305: msc_sch_wb.atp_debug('Begin Update_Set_SD_Dates');

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

8309: IF PG_DEBUG in ('Y', 'C') THEN
8310: msc_sch_wb.atp_debug('m = ' || m);
8311: END IF;
8312:
8313: IF (p_set.Action(m)<> MSC_ATP_PVT.ATPQUERY and p_set.quantity_ordered(m) <> 0) THEN -- xxxx
8314: /* --bug4281663 commented and initialized below
8315: IF MSC_ATP_PVT.G_INV_CTP = 4 THEN
8316: -- New procedure for obtaining plan data : Supplier Capacity Lead Time proj.
8317: -- (SCLT)

Line 8315: IF MSC_ATP_PVT.G_INV_CTP = 4 THEN

8311: END IF;
8312:
8313: IF (p_set.Action(m)<> MSC_ATP_PVT.ATPQUERY and p_set.quantity_ordered(m) <> 0) THEN -- xxxx
8314: /* --bug4281663 commented and initialized below
8315: IF MSC_ATP_PVT.G_INV_CTP = 4 THEN
8316: -- New procedure for obtaining plan data : Supplier Capacity Lead Time proj.
8317: -- (SCLT)
8318: MSC_ATP_PROC.get_global_plan_info(p_set.instance_id(m),
8319: p_set.inventory_item_id(m),

Line 8324: l_plan_info_rec := MSC_ATP_PVT.G_PLAN_INFO_REC;

8320: -- 2832497 dsting
8321: p_set.source_organization_id(m),
8322: p_set.demand_class(m));
8323:
8324: l_plan_info_rec := MSC_ATP_PVT.G_PLAN_INFO_REC;
8325: -- End New procedure for obtaining plan data : Supplier Capacity Lead Time proj.
8326:
8327: l_plan_id := l_plan_info_rec.plan_id;
8328: IF p_set.attribute_07.Exists(m) THEN

Line 8339: l_demand_pegging_id := MSC_ATP_PVT.G_DEMAND_PEGGING_ID;

8335: END IF;
8336: */
8337: --bug4281663 Using the plan_id passed instead of calling get_global_plan_info
8338: l_plan_id := p_set.plan_id(m);
8339: l_demand_pegging_id := MSC_ATP_PVT.G_DEMAND_PEGGING_ID;
8340: IF PG_DEBUG in ('Y', 'C') THEN
8341: msc_sch_wb.atp_debug(' l_demand_pegging_id := ' || l_demand_pegging_id);
8342: msc_sch_wb.atp_debug(' l_plan_id := ' || l_plan_id);
8343: END IF;

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

8341: msc_sch_wb.atp_debug(' l_demand_pegging_id := ' || l_demand_pegging_id);
8342: msc_sch_wb.atp_debug(' l_plan_id := ' || l_plan_id);
8343: END IF;
8344: -- xxxx
8345: MSC_ATP_PVT.G_DEMAND_PEGGING_ID := p_set.end_pegging_id(m);
8346: IF PG_DEBUG in ('Y', 'C') THEN
8347: msc_sch_wb.atp_debug(' G_DEMAND_PEGGING_ID := ' || MSC_ATP_PVT.G_DEMAND_PEGGING_ID);
8348: msc_sch_wb.atp_debug(' G_DEMAND_CLASS_ATP_FLAG := ' || MSC_ATP_PVT.G_DEMAND_CLASS_ATP_FLAG(m));
8349: msc_sch_wb.atp_debug(' G_REQ_ATP_DATE := ' || MSC_ATP_PVT.G_REQ_ATP_DATE(m));

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

8343: END IF;
8344: -- xxxx
8345: MSC_ATP_PVT.G_DEMAND_PEGGING_ID := p_set.end_pegging_id(m);
8346: IF PG_DEBUG in ('Y', 'C') THEN
8347: msc_sch_wb.atp_debug(' G_DEMAND_PEGGING_ID := ' || MSC_ATP_PVT.G_DEMAND_PEGGING_ID);
8348: msc_sch_wb.atp_debug(' G_DEMAND_CLASS_ATP_FLAG := ' || MSC_ATP_PVT.G_DEMAND_CLASS_ATP_FLAG(m));
8349: msc_sch_wb.atp_debug(' G_REQ_ATP_DATE := ' || MSC_ATP_PVT.G_REQ_ATP_DATE(m));
8350: msc_sch_wb.atp_debug(' G_REQ_DATE_QTY := ' || MSC_ATP_PVT.G_REQ_DATE_QTY(m));
8351: --bug4281663 Added more debug statements

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

8344: -- xxxx
8345: MSC_ATP_PVT.G_DEMAND_PEGGING_ID := p_set.end_pegging_id(m);
8346: IF PG_DEBUG in ('Y', 'C') THEN
8347: msc_sch_wb.atp_debug(' G_DEMAND_PEGGING_ID := ' || MSC_ATP_PVT.G_DEMAND_PEGGING_ID);
8348: msc_sch_wb.atp_debug(' G_DEMAND_CLASS_ATP_FLAG := ' || MSC_ATP_PVT.G_DEMAND_CLASS_ATP_FLAG(m));
8349: msc_sch_wb.atp_debug(' G_REQ_ATP_DATE := ' || MSC_ATP_PVT.G_REQ_ATP_DATE(m));
8350: msc_sch_wb.atp_debug(' G_REQ_DATE_QTY := ' || MSC_ATP_PVT.G_REQ_DATE_QTY(m));
8351: --bug4281663 Added more debug statements
8352: msc_sch_wb.atp_debug(' p_set.ship_date(m) := ' || p_set.ship_date(m));

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

8345: MSC_ATP_PVT.G_DEMAND_PEGGING_ID := p_set.end_pegging_id(m);
8346: IF PG_DEBUG in ('Y', 'C') THEN
8347: msc_sch_wb.atp_debug(' G_DEMAND_PEGGING_ID := ' || MSC_ATP_PVT.G_DEMAND_PEGGING_ID);
8348: msc_sch_wb.atp_debug(' G_DEMAND_CLASS_ATP_FLAG := ' || MSC_ATP_PVT.G_DEMAND_CLASS_ATP_FLAG(m));
8349: msc_sch_wb.atp_debug(' G_REQ_ATP_DATE := ' || MSC_ATP_PVT.G_REQ_ATP_DATE(m));
8350: msc_sch_wb.atp_debug(' G_REQ_DATE_QTY := ' || MSC_ATP_PVT.G_REQ_DATE_QTY(m));
8351: --bug4281663 Added more debug statements
8352: msc_sch_wb.atp_debug(' p_set.ship_date(m) := ' || p_set.ship_date(m));
8353: msc_sch_wb.atp_debug(' p_set.group_ship_date(m) := ' || p_set.group_ship_date(m));

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

8346: IF PG_DEBUG in ('Y', 'C') THEN
8347: msc_sch_wb.atp_debug(' G_DEMAND_PEGGING_ID := ' || MSC_ATP_PVT.G_DEMAND_PEGGING_ID);
8348: msc_sch_wb.atp_debug(' G_DEMAND_CLASS_ATP_FLAG := ' || MSC_ATP_PVT.G_DEMAND_CLASS_ATP_FLAG(m));
8349: msc_sch_wb.atp_debug(' G_REQ_ATP_DATE := ' || MSC_ATP_PVT.G_REQ_ATP_DATE(m));
8350: msc_sch_wb.atp_debug(' G_REQ_DATE_QTY := ' || MSC_ATP_PVT.G_REQ_DATE_QTY(m));
8351: --bug4281663 Added more debug statements
8352: msc_sch_wb.atp_debug(' p_set.ship_date(m) := ' || p_set.ship_date(m));
8353: msc_sch_wb.atp_debug(' p_set.group_ship_date(m) := ' || p_set.group_ship_date(m));
8354: END IF;

Line 8390: MSC_ATP_PVT.G_DEMAND_CLASS_ATP_FLAG(m),

8386: END IF;
8387:
8388: MSC_ATP_DB_UTILS.Update_SD_Date(p_set.Identifier(m),
8389: p_set.instance_id(m), l_sd_date, l_plan_id,null, -- dsting setproc
8390: MSC_ATP_PVT.G_DEMAND_CLASS_ATP_FLAG(m),
8391: MSC_ATP_PVT.G_REQ_ATP_DATE(m),
8392: MSC_ATP_PVT.G_REQ_DATE_QTY(m), -- Bug 1501787
8393: l_sd_date, -- Bug 2795053-reopen
8394: null, -- For time_phased_atp

Line 8391: MSC_ATP_PVT.G_REQ_ATP_DATE(m),

8387:
8388: MSC_ATP_DB_UTILS.Update_SD_Date(p_set.Identifier(m),
8389: p_set.instance_id(m), l_sd_date, l_plan_id,null, -- dsting setproc
8390: MSC_ATP_PVT.G_DEMAND_CLASS_ATP_FLAG(m),
8391: MSC_ATP_PVT.G_REQ_ATP_DATE(m),
8392: MSC_ATP_PVT.G_REQ_DATE_QTY(m), -- Bug 1501787
8393: l_sd_date, -- Bug 2795053-reopen
8394: null, -- For time_phased_atp
8395: p_set.atf_date(m), -- For time_phased_atp

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

8388: MSC_ATP_DB_UTILS.Update_SD_Date(p_set.Identifier(m),
8389: p_set.instance_id(m), l_sd_date, l_plan_id,null, -- dsting setproc
8390: MSC_ATP_PVT.G_DEMAND_CLASS_ATP_FLAG(m),
8391: MSC_ATP_PVT.G_REQ_ATP_DATE(m),
8392: MSC_ATP_PVT.G_REQ_DATE_QTY(m), -- Bug 1501787
8393: l_sd_date, -- Bug 2795053-reopen
8394: null, -- For time_phased_atp
8395: p_set.atf_date(m), -- For time_phased_atp
8396: null, -- For time_phased_atp

Line 8406: MSC_ATP_PVT.G_DEMAND_PEGGING_ID := l_demand_pegging_id;

8402: p_set.override_flag(m),
8403: p_arrival_set(m),null --time_phased_atp --bug3397904
8404: );
8405:
8406: MSC_ATP_PVT.G_DEMAND_PEGGING_ID := l_demand_pegging_id;
8407: ELSE
8408:
8409: /* ship_rec_cal changes begin
8410: flush sch arrival date, lat acceptable date, order date type in pds*/

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

8416: l_ship_arrival_date_rec.arrival_set_name := p_set.arrival_set_name(m);
8417: l_ship_arrival_date_rec.ship_set_name := p_set.ship_set_name(m);
8418: l_ship_arrival_date_rec.atp_override_flag := p_set.override_flag(m);
8419: l_ship_arrival_date_rec.request_arrival_date := p_arrival_set(m);
8420: MSC_ATP_PVT.G_DEMAND_PEGGING_ID := p_set.end_pegging_id(m);
8421: /* Read demand_id from madt*/
8422: BEGIN
8423: SELECT identifier3
8424: INTO l_ship_arrival_date_rec.demand_id

Line 8426: WHERE pegging_id = MSC_ATP_PVT.G_DEMAND_PEGGING_ID

8422: BEGIN
8423: SELECT identifier3
8424: INTO l_ship_arrival_date_rec.demand_id
8425: FROM mrp_atp_details_temp
8426: WHERE pegging_id = MSC_ATP_PVT.G_DEMAND_PEGGING_ID
8427: AND session_id = MSC_ATP_PVT.G_SESSION_ID
8428: AND record_type = 3;
8429: EXCEPTION
8430: WHEN OTHERS THEN

Line 8427: AND session_id = MSC_ATP_PVT.G_SESSION_ID

8423: SELECT identifier3
8424: INTO l_ship_arrival_date_rec.demand_id
8425: FROM mrp_atp_details_temp
8426: WHERE pegging_id = MSC_ATP_PVT.G_DEMAND_PEGGING_ID
8427: AND session_id = MSC_ATP_PVT.G_SESSION_ID
8428: AND record_type = 3;
8429: EXCEPTION
8430: WHEN OTHERS THEN
8431: l_ship_arrival_date_rec.demand_id := null;

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

8442: END IF;
8443: IF l_ship_arrival_date_rec.demand_id is not null THEN
8444: --bug4281663 used plan id to determine ods or pds
8445: /*
8446: IF (MSC_ATP_PVT.G_INV_CTP = 4) THEN
8447: MSC_ATP_DB_UTILS.Flush_Data_In_Pds(l_ship_arrival_date_rec, l_return_status);
8448: ELSE
8449: MSC_ATP_DB_UTILS.Flush_Data_In_Ods(l_ship_arrival_date_rec, l_return_status);
8450: END IF;

Line 8913: MSC_ATP_PVT.UNDO,

8909: MSC_ATP_DB_UTILS.Remove_Invalid_SD_Rec(
8910: peg_ids(i),
8911: p_instance_id,
8912: p_plan_id,
8913: MSC_ATP_PVT.UNDO,
8914: dmd_class_flag(i),
8915: l_return_sts);
8916: end loop;
8917: END cleanup_set;

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

8961: DECODE(NVL(maximum_quantity,0),0,99999999,maximum_quantity)
8962: /* rajjain 3008611
8963: * effective date should be greater than or equal to greatest of PTF date, sysdate and start date
8964: * disable date should be less than or equal to greatest of PTF date, sysdate and start date
8965: AND TRUNC(effectivity_date) <= TRUNC(GREATEST(p_new_schedule_date, sysdate, MSC_ATP_PVT.G_PTF_DATE))
8966: AND TRUNC(NVL(disable_date,GREATEST(p_new_schedule_date, sysdate, MSC_ATP_PVT.G_PTF_DATE)+1))
8967: > TRUNC(GREATEST(p_new_schedule_date, sysdate, MSC_ATP_PVT.G_PTF_DATE))
8968: ORDER BY preference */
8969: --4570421

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

8962: /* rajjain 3008611
8963: * effective date should be greater than or equal to greatest of PTF date, sysdate and start date
8964: * disable date should be less than or equal to greatest of PTF date, sysdate and start date
8965: AND TRUNC(effectivity_date) <= TRUNC(GREATEST(p_new_schedule_date, sysdate, MSC_ATP_PVT.G_PTF_DATE))
8966: AND TRUNC(NVL(disable_date,GREATEST(p_new_schedule_date, sysdate, MSC_ATP_PVT.G_PTF_DATE)+1))
8967: > TRUNC(GREATEST(p_new_schedule_date, sysdate, MSC_ATP_PVT.G_PTF_DATE))
8968: ORDER BY preference */
8969: --4570421
8970: SELECT eff.process_sequence_id, eff.routing_sequence_id, eff.bill_sequence_id, op.operation_sequence_id

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

8963: * effective date should be greater than or equal to greatest of PTF date, sysdate and start date
8964: * disable date should be less than or equal to greatest of PTF date, sysdate and start date
8965: AND TRUNC(effectivity_date) <= TRUNC(GREATEST(p_new_schedule_date, sysdate, MSC_ATP_PVT.G_PTF_DATE))
8966: AND TRUNC(NVL(disable_date,GREATEST(p_new_schedule_date, sysdate, MSC_ATP_PVT.G_PTF_DATE)+1))
8967: > TRUNC(GREATEST(p_new_schedule_date, sysdate, MSC_ATP_PVT.G_PTF_DATE))
8968: ORDER BY preference */
8969: --4570421
8970: SELECT eff.process_sequence_id, eff.routing_sequence_id, eff.bill_sequence_id, op.operation_sequence_id
8971: FROM msc_process_effectivity eff, msc_routing_operations op

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

8974: AND eff.item_id = p_item_id
8975: AND eff.sr_instance_id = p_sr_instance_id
8976: AND p_requested_quantity BETWEEN NVL(eff.minimum_quantity,0) AND
8977: DECODE(NVL(eff.maximum_quantity,0),0,99999999,maximum_quantity)
8978: AND TRUNC(eff.effectivity_date) <= TRUNC(GREATEST(p_new_schedule_date, sysdate, MSC_ATP_PVT.G_PTF_DATE))
8979: AND TRUNC(NVL(eff.disable_date,GREATEST(p_new_schedule_date, sysdate, MSC_ATP_PVT.G_PTF_DATE)+1))
8980: > TRUNC(GREATEST(p_new_schedule_date, sysdate, MSC_ATP_PVT.G_PTF_DATE))
8981: --4570421
8982: and eff.plan_id = op.plan_id(+)

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

8975: AND eff.sr_instance_id = p_sr_instance_id
8976: AND p_requested_quantity BETWEEN NVL(eff.minimum_quantity,0) AND
8977: DECODE(NVL(eff.maximum_quantity,0),0,99999999,maximum_quantity)
8978: AND TRUNC(eff.effectivity_date) <= TRUNC(GREATEST(p_new_schedule_date, sysdate, MSC_ATP_PVT.G_PTF_DATE))
8979: AND TRUNC(NVL(eff.disable_date,GREATEST(p_new_schedule_date, sysdate, MSC_ATP_PVT.G_PTF_DATE)+1))
8980: > TRUNC(GREATEST(p_new_schedule_date, sysdate, MSC_ATP_PVT.G_PTF_DATE))
8981: --4570421
8982: and eff.plan_id = op.plan_id(+)
8983: AND eff.sr_instance_id = op.sr_instance_id(+)

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

8976: AND p_requested_quantity BETWEEN NVL(eff.minimum_quantity,0) AND
8977: DECODE(NVL(eff.maximum_quantity,0),0,99999999,maximum_quantity)
8978: AND TRUNC(eff.effectivity_date) <= TRUNC(GREATEST(p_new_schedule_date, sysdate, MSC_ATP_PVT.G_PTF_DATE))
8979: AND TRUNC(NVL(eff.disable_date,GREATEST(p_new_schedule_date, sysdate, MSC_ATP_PVT.G_PTF_DATE)+1))
8980: > TRUNC(GREATEST(p_new_schedule_date, sysdate, MSC_ATP_PVT.G_PTF_DATE))
8981: --4570421
8982: and eff.plan_id = op.plan_id(+)
8983: AND eff.sr_instance_id = op.sr_instance_id(+)
8984: and eff.routing_sequence_id = op.routing_sequence_id(+)

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

8981: --4570421
8982: and eff.plan_id = op.plan_id(+)
8983: AND eff.sr_instance_id = op.sr_instance_id(+)
8984: and eff.routing_sequence_id = op.routing_sequence_id(+)
8985: AND TRUNC(op.effectivity_date(+)) <= TRUNC(GREATEST(p_new_schedule_date, sysdate, MSC_ATP_PVT.G_PTF_DATE))
8986: AND TRUNC(NVL(op.disable_date(+),GREATEST(p_new_schedule_date, sysdate, MSC_ATP_PVT.G_PTF_DATE)+1))
8987: > TRUNC(GREATEST(p_new_schedule_date, sysdate, MSC_ATP_PVT.G_PTF_DATE)) --4570421
8988: ORDER BY eff.preference, op.operation_seq_num
8989: ) a

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

8982: and eff.plan_id = op.plan_id(+)
8983: AND eff.sr_instance_id = op.sr_instance_id(+)
8984: and eff.routing_sequence_id = op.routing_sequence_id(+)
8985: AND TRUNC(op.effectivity_date(+)) <= TRUNC(GREATEST(p_new_schedule_date, sysdate, MSC_ATP_PVT.G_PTF_DATE))
8986: AND TRUNC(NVL(op.disable_date(+),GREATEST(p_new_schedule_date, sysdate, MSC_ATP_PVT.G_PTF_DATE)+1))
8987: > TRUNC(GREATEST(p_new_schedule_date, sysdate, MSC_ATP_PVT.G_PTF_DATE)) --4570421
8988: ORDER BY eff.preference, op.operation_seq_num
8989: ) a
8990: where rownum = 1;

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

8983: AND eff.sr_instance_id = op.sr_instance_id(+)
8984: and eff.routing_sequence_id = op.routing_sequence_id(+)
8985: AND TRUNC(op.effectivity_date(+)) <= TRUNC(GREATEST(p_new_schedule_date, sysdate, MSC_ATP_PVT.G_PTF_DATE))
8986: AND TRUNC(NVL(op.disable_date(+),GREATEST(p_new_schedule_date, sysdate, MSC_ATP_PVT.G_PTF_DATE)+1))
8987: > TRUNC(GREATEST(p_new_schedule_date, sysdate, MSC_ATP_PVT.G_PTF_DATE)) --4570421
8988: ORDER BY eff.preference, op.operation_seq_num
8989: ) a
8990: where rownum = 1;
8991:

Line 9038: MSC_ATP_PVT.G_SESSION_ID, -- p_session_id

9034:
9035: MSC_SATP_FUNC.Get_Regions(NULL, -- p_customer_site_id
9036: p_calling_module, -- p_calling_module
9037: p_instance_id, -- p_instance_id
9038: MSC_ATP_PVT.G_SESSION_ID, -- p_session_id
9039: NULL, -- p_dblink
9040: x_return_status, -- x_return_status
9041: NULL, -- p_location_id
9042: NULL, -- p_location_source