DBA Data[Home] [Help]

APPS.MSC_ATP_PVT dependencies on MSC_ATP_SUBST

Line 165: l_item_substitute_rec MSC_ATP_SUBST.Item_Info_Rec_Typ;

161: l_pf_item_id MRP_ATP_PUB.number_arr:=MRP_ATP_PUB.number_arr();
162: --l_old_org_id MRP_ATP_PUB.number_arr:=MRP_ATP_PUB.number_arr();
163:
164: ---subst
165: l_item_substitute_rec MSC_ATP_SUBST.Item_Info_Rec_Typ;
166: l_null_item_sub_rec MSC_ATP_SUBST.Item_Info_Rec_Typ;
167: l_item_attribute_rec MSC_ATP_PVT.item_attribute_rec;
168: l_pre_pro_lt number;
169: l_post_pro_lt number;

Line 166: l_null_item_sub_rec MSC_ATP_SUBST.Item_Info_Rec_Typ;

162: --l_old_org_id MRP_ATP_PUB.number_arr:=MRP_ATP_PUB.number_arr();
163:
164: ---subst
165: l_item_substitute_rec MSC_ATP_SUBST.Item_Info_Rec_Typ;
166: l_null_item_sub_rec MSC_ATP_SUBST.Item_Info_Rec_Typ;
167: l_item_attribute_rec MSC_ATP_PVT.item_attribute_rec;
168: l_pre_pro_lt number;
169: l_post_pro_lt number;
170: l_fixed_lt number;

Line 2502: msc_sch_wb.atp_debug('Schedule: ' || 'G_CREATE_SUPPLY_FLAG := ' || MSC_ATP_SUBST.G_CREATE_SUPPLY_FLAG);

2498: IF MSC_ATP_PVT.G_INV_CTP = 4 AND
2499: NVL(MSC_ATP_PVT.G_PLAN_SUBST_FLAG, 2) = 1 THEN
2500: IF PG_DEBUG in ('Y', 'C') THEN
2501: msc_sch_wb.atp_debug('Schedule: ' || 'count := ' || l_item_substitute_rec.inventory_item_id.count);
2502: msc_sch_wb.atp_debug('Schedule: ' || 'G_CREATE_SUPPLY_FLAG := ' || MSC_ATP_SUBST.G_CREATE_SUPPLY_FLAG);
2503: msc_sch_wb.atp_debug('Schedule: ' || 'get item attributes for the top item');
2504: END IF;
2505:
2506: -- check if one and only one of the requested_ship_date and

Line 2591: MSC_ATP_SUBST.Get_Item_Substitutes(l_inventory_item_id,

2587: time_phased_atp
2588: In non-time-phased PF Atp cases there won't be any end item substitution
2589: so no need to call Get_Item_Substitutes but we want to do breadth first search*/
2590: IF l_pf_atp <> 'Y' THEN
2591: MSC_ATP_SUBST.Get_Item_Substitutes(l_inventory_item_id,
2592: l_item_substitute_rec,
2593: p_instance_id,
2594: l_plan_id,
2595: l_atp_rec.customer_id,

Line 2635: IF MSC_ATP_SUBST.G_CREATE_SUPPLY_FLAG = 702

2631: END IF;
2632:
2633: IF MSC_ATP_PVT.G_SUBSTITUTION_FLAG = 'Y' THEN
2634:
2635: IF MSC_ATP_SUBST.G_CREATE_SUPPLY_FLAG = 702
2636: AND l_item_substitute_rec.inventory_item_id.count = 0 THEN
2637: l_create_supply_on_orig_item := 1;
2638: ELSE
2639: -- Modular re-use of info.

Line 2655: MSC_ATP_SUBST.Extend_Item_Info_Rec_Typ(l_item_substitute_rec, l_return_status);

2651: l_count := l_item_substitute_rec.inventory_item_id.count;
2652: IF PG_DEBUG in ('Y', 'C') THEN
2653: msc_sch_wb.atp_debug('Schedule: ' || 'l_count := ' || l_count);
2654: END IF;
2655: MSC_ATP_SUBST.Extend_Item_Info_Rec_Typ(l_item_substitute_rec, l_return_status);
2656: IF PG_DEBUG in ('Y', 'C') THEN
2657: msc_sch_wb.atp_debug('Schedule: ' || 'After extending Item info');
2658: END IF;
2659: l_count := l_item_substitute_rec.inventory_item_id.count;

Line 2756: MSC_ATP_SUBST.ATP_Check_SUBST(l_atp_rec,

2752:
2753: --bug 4568088: pass original request date
2754: l_atp_rec.original_request_date := l_atp_table.original_request_date(i); --plan by request date
2755:
2756: MSC_ATP_SUBST.ATP_Check_SUBST(l_atp_rec,
2757: l_item_substitute_rec,
2758: l_requested_ship_date,
2759: l_plan_id,
2760: l_level,

Line 6495: MSC_ATP_SUBST.G_REQ_ITEM_SR_INV_ID <> p_atp_record.inventory_item_id THEN

6491: /* time_phased_atp changes end */
6492:
6493: --subst
6494: IF MSC_ATP_PVT.G_SUBSTITUTION_FLAG = 'Y' and NVL(p_atp_record.original_item_flag, 2) = 1 and
6495: MSC_ATP_SUBST.G_REQ_ITEM_SR_INV_ID <> p_atp_record.inventory_item_id THEN
6496: -- if it a subst item then we consider subst window
6497: l_substitution_window := C_ITEM_INFO_REC.substitution_window;
6498: ELSE
6499: -- If it is an original item or a bom item then we do not consider window

Line 14834: msc_sch_wb.atp_debug('subst last good pegging ' || MSC_ATP_SUBST.G_TOP_LAST_PO_PEGGING);

14830: IF PG_DEBUG in ('Y', 'C') THEN
14831: msc_sch_wb.atp_debug('diag_atp l_pegging_id ' || l_pegging_id);
14832: msc_sch_wb.atp_debug('last good pegging ' || l_last_good_pegging_id);
14833: msc_sch_wb.atp_debug('net_demand ' || l_net_demand);
14834: msc_sch_wb.atp_debug('subst last good pegging ' || MSC_ATP_SUBST.G_TOP_LAST_PO_PEGGING);
14835: END IF;
14836:
14837: IF MSC_ATP_PVT.G_SUBSTITUTION_FLAG = 'Y'
14838: AND l_last_good_pegging_id is NULL

Line 14839: AND MSC_ATP_SUBST.G_TOP_LAST_PO_PEGGING is not null

14835: END IF;
14836:
14837: IF MSC_ATP_PVT.G_SUBSTITUTION_FLAG = 'Y'
14838: AND l_last_good_pegging_id is NULL
14839: AND MSC_ATP_SUBST.G_TOP_LAST_PO_PEGGING is not null
14840: AND p_atp_record.top_tier_org_flag = 1
14841: THEN
14842: l_last_good_pegging_id := MSC_ATP_SUBST.G_TOP_LAST_PO_PEGGING;
14843: l_subst_existing_PO_qty := MSC_ATP_SUBST.G_TOP_LAST_PO_QTY;

Line 14842: l_last_good_pegging_id := MSC_ATP_SUBST.G_TOP_LAST_PO_PEGGING;

14838: AND l_last_good_pegging_id is NULL
14839: AND MSC_ATP_SUBST.G_TOP_LAST_PO_PEGGING is not null
14840: AND p_atp_record.top_tier_org_flag = 1
14841: THEN
14842: l_last_good_pegging_id := MSC_ATP_SUBST.G_TOP_LAST_PO_PEGGING;
14843: l_subst_existing_PO_qty := MSC_ATP_SUBST.G_TOP_LAST_PO_QTY;
14844: ELSE
14845: l_subst_existing_PO_qty := 0;
14846: END IF;

Line 14843: l_subst_existing_PO_qty := MSC_ATP_SUBST.G_TOP_LAST_PO_QTY;

14839: AND MSC_ATP_SUBST.G_TOP_LAST_PO_PEGGING is not null
14840: AND p_atp_record.top_tier_org_flag = 1
14841: THEN
14842: l_last_good_pegging_id := MSC_ATP_SUBST.G_TOP_LAST_PO_PEGGING;
14843: l_subst_existing_PO_qty := MSC_ATP_SUBST.G_TOP_LAST_PO_QTY;
14844: ELSE
14845: l_subst_existing_PO_qty := 0;
14846: END IF;
14847: