DBA Data[Home] [Help]

APPS.MSC_ATP_PVT dependencies on MSC_ATP_SUBST

Line 167: l_item_substitute_rec MSC_ATP_SUBST.Item_Info_Rec_Typ;

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

Line 168: l_null_item_sub_rec MSC_ATP_SUBST.Item_Info_Rec_Typ;

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

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

2756: IF MSC_ATP_PVT.G_INV_CTP = 4 AND
2757: NVL(MSC_ATP_PVT.G_PLAN_SUBST_FLAG, 2) = 1 THEN
2758: IF PG_DEBUG in ('Y', 'C') THEN
2759: msc_sch_wb.atp_debug('Schedule: ' || 'count := ' || l_item_substitute_rec.inventory_item_id.count);
2760: msc_sch_wb.atp_debug('Schedule: ' || 'G_CREATE_SUPPLY_FLAG := ' || MSC_ATP_SUBST.G_CREATE_SUPPLY_FLAG);
2761: msc_sch_wb.atp_debug('Schedule: ' || 'get item attributes for the top item');
2762: END IF;
2763:
2764: -- check if one and only one of the requested_ship_date and

Line 2849: MSC_ATP_SUBST.Get_Item_Substitutes(l_inventory_item_id,

2845: time_phased_atp
2846: In non-time-phased PF Atp cases there won't be any end item substitution
2847: so no need to call Get_Item_Substitutes but we want to do breadth first search*/
2848: IF l_pf_atp <> 'Y' THEN
2849: MSC_ATP_SUBST.Get_Item_Substitutes(l_inventory_item_id,
2850: l_item_substitute_rec,
2851: p_instance_id,
2852: l_plan_id,
2853: l_atp_rec.customer_id,

Line 2893: IF MSC_ATP_SUBST.G_CREATE_SUPPLY_FLAG = 702

2889: END IF;
2890:
2891: IF MSC_ATP_PVT.G_SUBSTITUTION_FLAG = 'Y' THEN
2892:
2893: IF MSC_ATP_SUBST.G_CREATE_SUPPLY_FLAG = 702
2894: AND l_item_substitute_rec.inventory_item_id.count = 0 THEN
2895: l_create_supply_on_orig_item := 1;
2896: ELSE
2897: -- Modular re-use of info.

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

2909: l_count := l_item_substitute_rec.inventory_item_id.count;
2910: IF PG_DEBUG in ('Y', 'C') THEN
2911: msc_sch_wb.atp_debug('Schedule: ' || 'l_count := ' || l_count);
2912: END IF;
2913: MSC_ATP_SUBST.Extend_Item_Info_Rec_Typ(l_item_substitute_rec, l_return_status);
2914: IF PG_DEBUG in ('Y', 'C') THEN
2915: msc_sch_wb.atp_debug('Schedule: ' || 'After extending Item info');
2916: END IF;
2917: l_count := l_item_substitute_rec.inventory_item_id.count;

Line 3015: MSC_ATP_SUBST.ATP_Check_SUBST(l_atp_rec,

3011:
3012: --bug 4568088: pass original request date
3013: l_atp_rec.original_request_date := l_atp_table.original_request_date(i); --plan by request date
3014:
3015: MSC_ATP_SUBST.ATP_Check_SUBST(l_atp_rec,
3016: l_item_substitute_rec,
3017: l_requested_ship_date,
3018: l_plan_id,
3019: l_level,

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

7125: /* time_phased_atp changes end */
7126:
7127: --subst
7128: IF MSC_ATP_PVT.G_SUBSTITUTION_FLAG = 'Y' and NVL(p_atp_record.original_item_flag, 2) = 1 and
7129: MSC_ATP_SUBST.G_REQ_ITEM_SR_INV_ID <> p_atp_record.inventory_item_id THEN
7130: -- if it a subst item then we consider subst window
7131: l_substitution_window := C_ITEM_INFO_REC.substitution_window;
7132: ELSE
7133: -- If it is an original item or a bom item then we do not consider window

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

15672: IF PG_DEBUG in ('Y', 'C') THEN
15673: msc_sch_wb.atp_debug('diag_atp l_pegging_id ' || l_pegging_id);
15674: msc_sch_wb.atp_debug('last good pegging ' || l_last_good_pegging_id);
15675: msc_sch_wb.atp_debug('net_demand ' || l_net_demand);
15676: msc_sch_wb.atp_debug('subst last good pegging ' || MSC_ATP_SUBST.G_TOP_LAST_PO_PEGGING);
15677: END IF;
15678:
15679: IF MSC_ATP_PVT.G_SUBSTITUTION_FLAG = 'Y'
15680: AND l_last_good_pegging_id is NULL

Line 15681: AND MSC_ATP_SUBST.G_TOP_LAST_PO_PEGGING is not null

15677: END IF;
15678:
15679: IF MSC_ATP_PVT.G_SUBSTITUTION_FLAG = 'Y'
15680: AND l_last_good_pegging_id is NULL
15681: AND MSC_ATP_SUBST.G_TOP_LAST_PO_PEGGING is not null
15682: AND p_atp_record.top_tier_org_flag = 1
15683: THEN
15684: l_last_good_pegging_id := MSC_ATP_SUBST.G_TOP_LAST_PO_PEGGING;
15685: l_subst_existing_PO_qty := MSC_ATP_SUBST.G_TOP_LAST_PO_QTY;

Line 15684: l_last_good_pegging_id := MSC_ATP_SUBST.G_TOP_LAST_PO_PEGGING;

15680: AND l_last_good_pegging_id is NULL
15681: AND MSC_ATP_SUBST.G_TOP_LAST_PO_PEGGING is not null
15682: AND p_atp_record.top_tier_org_flag = 1
15683: THEN
15684: l_last_good_pegging_id := MSC_ATP_SUBST.G_TOP_LAST_PO_PEGGING;
15685: l_subst_existing_PO_qty := MSC_ATP_SUBST.G_TOP_LAST_PO_QTY;
15686: ELSE
15687: l_subst_existing_PO_qty := 0;
15688: END IF;

Line 15685: l_subst_existing_PO_qty := MSC_ATP_SUBST.G_TOP_LAST_PO_QTY;

15681: AND MSC_ATP_SUBST.G_TOP_LAST_PO_PEGGING is not null
15682: AND p_atp_record.top_tier_org_flag = 1
15683: THEN
15684: l_last_good_pegging_id := MSC_ATP_SUBST.G_TOP_LAST_PO_PEGGING;
15685: l_subst_existing_PO_qty := MSC_ATP_SUBST.G_TOP_LAST_PO_QTY;
15686: ELSE
15687: l_subst_existing_PO_qty := 0;
15688: END IF;
15689: