[Home] [Help]
2187:
2188: IF NVL(c1.inventory_item_id, -1) > 0 THEN
2189:
2190: -- delete the planned order that we may have enterred.
2191: DELETE FROM MSC_SUPPLIES
2192: WHERE transaction_id = c1.identifier3
2193: AND plan_id = c1.identifier2
2194: returning inventory_item_id, sr_instance_id,new_order_quantity, organization_id, supplier_id, supplier_site_id
2195: into l_inventory_item_id, l_instance_id, l_sd_qty, l_organization_id, l_supplier_id, l_supplier_site_id;
2744: END IF;
2745:
2746: --s_cto_rearch
2747: IF MSC_ATP_PVT.G_INV_CTP = 4 THEN
2748: DELETE from msc_supplies
2749: WHERE plan_id = p_plan_id
2750: AND transaction_id = l_transaction_id;
2751: END IF;
2752: --e_cto_rearch
2751: END IF;
2752: --e_cto_rearch
2753:
2754: IF PG_DEBUG in ('Y', 'C') THEN
2755: msc_sch_wb.atp_debug('Update_Planned_Order: ' || 'after msc_supplies');
2756: END IF;
2757: ELSE
2758:
2759: -- dsting diag_atp.
2767:
2768: -- For bug 2259824, move the supply to the end of day
2769: --s_cto_rearch:
2770: IF MSC_ATP_PVT.G_INV_CTP = 4 THEN
2771: UPDATE msc_supplies
2772: SET new_schedule_date = TRUNC(NVL(p_date, new_schedule_date)) + MSC_ATP_PVT.G_END_OF_DAY ,
2773: new_order_quantity = NVL(p_quantity, new_order_quantity),
2774: -- rajjain 02/19/2003 Bug 2788302 Begin
2775: supplier_id = Decode(p_supplier_id,
4380: msc_sch_wb.atp_debug('Add_Stealing_Supply_Details: ' || 'p_ship_date = ' ||to_char(p_ship_date));
4381: msc_sch_wb.atp_debug('Add_Stealing_Supply_Details: ' || 'p_refresh_number = ' ||p_refresh_number);
4382: END IF;
4383:
4384: SELECT msc_supplies_s.nextval into p_transaction_id from dual;
4385:
4386: IF PG_DEBUG in ('Y', 'C') THEN
4387: msc_sch_wb.atp_debug('Add_Stealing_Supply_Details: ' || 'before insert into msc_alloc_supplies-Stealing Info');
4388: END IF;
4835:
4836: -- time_phased_atp changes begin
4837: IF (p_supply_rec_type.inventory_item_id <> p_supply_rec_type.request_item_id) and p_supply_rec_type.atf_date is not null THEN
4838: l_time_phased_atp := 'Y';
4839: /* In time phased atp scenarios add planned order in msc_supplies for member item*/
4840: l_insert_item_id := p_supply_rec_type.request_item_id;
4841: IF PG_DEBUG in ('Y', 'C') THEN
4842: msc_sch_wb.atp_debug('Add_Planned_Order: ' || 'Time Phased ATP = ' || l_time_phased_atp);
4843: END IF;
4844: ELSE
4845: l_insert_item_id := p_supply_rec_type.inventory_item_id;
4846: END IF;
4847: IF PG_DEBUG in ('Y', 'C') THEN
4848: msc_sch_wb.atp_debug('Add_Supplies: ' || 'Insert planned order in msc_supplies for ' || l_insert_item_id);
4849: END IF;
4850: -- time_phased_atp changes end
4851:
4852: -- Insert updated quantity as a Planned Order in msc_supplies
4848: msc_sch_wb.atp_debug('Add_Supplies: ' || 'Insert planned order in msc_supplies for ' || l_insert_item_id);
4849: END IF;
4850: -- time_phased_atp changes end
4851:
4852: -- Insert updated quantity as a Planned Order in msc_supplies
4853: INSERT into MSC_SUPPLIES
4854: (plan_id,
4855: transaction_id,
4856: organization_id,
4849: END IF;
4850: -- time_phased_atp changes end
4851:
4852: -- Insert updated quantity as a Planned Order in msc_supplies
4853: INSERT into MSC_SUPPLIES
4854: (plan_id,
4855: transaction_id,
4856: organization_id,
4857: sr_instance_id,
4892: disposition_id,
4893: INTRANSIT_LEAD_TIME --4127630
4894: )
4895: VALUES (p_supply_rec_type.plan_id,
4896: msc_supplies_s.nextval,
4897: p_supply_rec_type.organization_id,
4898: p_supply_rec_type.instance_id,
4899: l_insert_item_id, -- for time_phased_atp
4900: sysdate,