DBA Data[Home] [Help]

APPS.MSC_ATP_SUBST dependencies on MSC_ATP_DB_UTILS

Line 737: l_supply_rec MSC_ATP_DB_UTILS.supply_rec_typ;

733: l_ptf_enabled NUMBER;
734: l_trunc_sysdate DATE := TRUNC(sysdate); --bug3578083
735:
736: -- ATP4drp Declare a variable for creating Planned Arrival.
737: l_supply_rec MSC_ATP_DB_UTILS.supply_rec_typ;
738: -- End ATP4drp
739: -- ALLOC ATP CHANGES, 12973673
740: l_alloc_atp VARCHAR2(1);
741:

Line 1550: MSC_ATP_DB_UTILS.Add_Mat_Demand(l_atp_insert_rec,

1546: --bug 4568088: Pass original_request date
1547: l_atp_insert_rec.original_request_ship_date := nvl(p_atp_record.original_request_date,
1548: l_atp_insert_rec.requested_ship_date);
1549: --MSC_ATP_SUBST.Add_Mat_Demand(l_atp_insert_rec,
1550: MSC_ATP_DB_UTILS.Add_Mat_Demand(l_atp_insert_rec,
1551: l_plan_id,
1552: l_demand_class_flag,
1553: l_demand_id);
1554: -- time_phased_atp changes end

Line 1593: MSC_ATP_DB_UTILS.move_SD_temp_into_mrp_details(l_pegging_id,

1589: l_atp_period.End_Pegging_Id(i) := org_availability_info.demand_pegging_id(1);
1590: END LOOP;
1591:
1592: IF p_atp_record.insert_flag <> 0 THEN
1593: MSC_ATP_DB_UTILS.move_SD_temp_into_mrp_details(l_pegging_id,
1594: org_availability_info.demand_pegging_id(1));
1595: END IF;
1596:
1597: --- now add period and supply details

Line 2360: MSC_ATP_DB_UTILS.Add_Pegging(l_pegging_rec, l_pegging_id);

2356: l_pegging_rec.receiving_cal_code := l_receiving_cal_code;
2357: l_pegging_rec.intransit_cal_code := l_intransit_cal_code;
2358: l_pegging_rec.manufacturing_cal_code := l_manufacturing_cal_code;
2359:
2360: MSC_ATP_DB_UTILS.Add_Pegging(l_pegging_rec, l_pegging_id);
2361: ELSE
2362: --- we fail the PTF date test
2363: IF PG_DEBUG in ('Y', 'C') THEN
2364: msc_sch_wb.atp_debug('ATP_Check_Subst: ' || 'Fail the PTF test, dont add org to list of org to be visited');

Line 2549: MSC_ATP_DB_UTILS.ADD_Supplies(l_supply_rec);

2545: l_supply_rec.record_source := 2; -- ATP created
2546: l_supply_rec.supply_type := 51; --- planned arrival
2547: l_supply_rec.intransit_lead_time := org_availability_info.lead_time(j); --4127630
2548:
2549: MSC_ATP_DB_UTILS.ADD_Supplies(l_supply_rec);
2550: -- Asssign the output to local variables.
2551: l_transaction_id := l_supply_rec.transaction_id;
2552: l_return_status := l_supply_rec.return_status;
2553: IF PG_DEBUG in ('Y', 'C') THEN

Line 2568: MSC_ATP_DB_UTILS.Add_Planned_Order (

2564: IF PG_DEBUG in ('Y', 'C') THEN
2565: msc_sch_wb.atp_debug('ATP_Check_Subst: ' || 'Add planned order');
2566: END IF;
2567:
2568: MSC_ATP_DB_UTILS.Add_Planned_Order (
2569: p_atp_record.instance_id,
2570: org_availability_info.plan_id(l_parent_index),
2571: org_availability_info.family_dest_id(l_parent_index), -- For time_phased_atp
2572: org_availability_info.organization_id(l_parent_index),

Line 2913: MSC_ATP_DB_UTILS.ADD_Supplies(l_supply_rec);

2909: l_supply_rec.record_source := 2; -- ATP created
2910: l_supply_rec.supply_type := 51; --- planned arrival
2911: l_supply_rec.intransit_lead_time := org_availability_info.lead_time(j); --4127630
2912:
2913: MSC_ATP_DB_UTILS.ADD_Supplies(l_supply_rec);
2914: -- Asssign the output to local variables.
2915: l_transaction_id := l_supply_rec.transaction_id;
2916: l_return_status := l_supply_rec.return_status;
2917: IF PG_DEBUG in ('Y', 'C') THEN

Line 2931: MSC_ATP_DB_UTILS.Add_Planned_Order(

2927: ELSE -- Create Planned Order otherwise.
2928: IF PG_DEBUG in ('Y', 'C') THEN
2929: msc_sch_wb.atp_debug('ATP_Check_Subst: ' || 'Add planned order');
2930: END IF;
2931: MSC_ATP_DB_UTILS.Add_Planned_Order(
2932: p_atp_record.instance_id,
2933: org_availability_info.plan_id(l_parent_index),
2934: org_availability_info.family_dest_id(l_parent_index), -- For time_phased_atp
2935: org_availability_info.organization_id(l_parent_index),

Line 3020: MSC_ATP_DB_UTILS.ADD_Supplies(l_supply_rec);

3016: l_supply_rec.record_source := 2; -- ATP created
3017: l_supply_rec.supply_type := 51; --- planned arrival
3018: l_supply_rec.intransit_lead_time := org_availability_info.lead_time(j); --4127630
3019:
3020: MSC_ATP_DB_UTILS.ADD_Supplies(l_supply_rec);
3021: -- Asssign the output to local variables.
3022: l_transaction_id := l_supply_rec.transaction_id;
3023: l_return_status := l_supply_rec.return_status;
3024: IF PG_DEBUG in ('Y', 'C') THEN

Line 3032: MSC_ATP_DB_UTILS.Add_Planned_Order(

3028: msc_sch_wb.atp_debug('ATP_Check_Subst: ' || 'Return Status l_return_status: ' || l_return_status);
3029: END IF;
3030:
3031: ELSE -- Create Planned Order otherwise.
3032: MSC_ATP_DB_UTILS.Add_Planned_Order(
3033: p_atp_record.instance_id,
3034: org_availability_info.plan_id(l_parent_index),
3035: org_availability_info.family_dest_id(j), -- For time_phased_atp
3036: org_availability_info.organization_id(j),

Line 3285: MSC_ATP_DB_UTILS.Remove_Invalid_SD_Rec(

3281: item_availability_info.sr_inventory_item_id(i) = MSC_ATP_SUBST.G_REQ_ITEM_SR_INV_ID) THEN
3282: IF PG_DEBUG in ('Y', 'C') THEN
3283: msc_sch_wb.atp_debug('ATP_Check_Subst: ' || 'remove demands for item ' || item_availability_info.item_name(i));
3284: END IF;
3285: MSC_ATP_DB_UTILS.Remove_Invalid_SD_Rec(
3286: item_availability_info.End_pegging_id(i),
3287: null,
3288: item_availability_info.plan_id(i),
3289: MSC_ATP_PVT.UNDO,

Line 3729: MSC_ATP_DB_UTILS.Remove_Invalid_SD_Rec(

3725: IF PG_DEBUG in ('Y', 'C') THEN
3726: msc_sch_wb.atp_debug('ATP_Check_Subst: ' || 'Remove Pegging for item := ' || item_availability_info.inventory_item_id(i));
3727: END IF;
3728:
3729: MSC_ATP_DB_UTILS.Remove_Invalid_SD_Rec(
3730: item_availability_info.End_pegging_id(j),
3731: null,
3732: item_availability_info.plan_id(j),
3733: MSC_ATP_PVT.UNDO,

Line 3789: MSC_ATP_DB_UTILS.Remove_Invalid_SD_Rec(

3785: l_satisfied_by_subst_flag := 2;
3786: --- remove peggin and supply demand details
3787:
3788:
3789: MSC_ATP_DB_UTILS.Remove_Invalid_SD_Rec(
3790: item_availability_info.End_pegging_id(l_item_count),
3791: null,
3792: item_availability_info.plan_id(l_item_count),
3793: MSC_ATP_PVT.UNDO,

Line 4459: MSC_ATP_DB_UTILS.Remove_Invalid_Future_SD(l_atp_pegging_tab);

4455: IF PG_DEBUG in ('Y', 'C') THEN
4456: msc_sch_wb.atp_debug('ATP_Check_Subst: ' || 'count after recreating := ' || l_atp_pegging_tab.count);
4457: END IF;
4458:
4459: MSC_ATP_DB_UTILS.Remove_Invalid_Future_SD(l_atp_pegging_tab);
4460: END IF;
4461: ELSE
4462:
4463: --- going down is worse than date on this level.

Line 4469: MSC_ATP_DB_UTILS.Remove_Invalid_SD_Rec(

4465: IF PG_DEBUG in ('Y', 'C') THEN
4466: msc_sch_wb.atp_debug('ATP_Check_Subst: ' || 'Staying on this level is OK. We remove pegging for current level');
4467: msc_sch_wb.atp_debug('ATP_Check_Subst: ' || 'G_FUTURE_PEGGING_ID := ' || MSC_ATP_PVT.G_FUTURE_PEGGING_ID);
4468: END IF;
4469: MSC_ATP_DB_UTILS.Remove_Invalid_SD_Rec(
4470: MSC_ATP_PVT.G_FUTURE_PEGGING_ID,
4471: null,
4472: l_plan_id,
4473: MSC_ATP_PVT.UNDO,

Line 4551: MSC_ATP_DB_UTILS.Remove_Invalid_Future_SD(l_atp_pegging_tab);

4547: IF PG_DEBUG in ('Y', 'C') THEN
4548: msc_sch_wb.atp_debug('ATP_Check_Subst: ' || 'count after recreating := ' || l_atp_pegging_tab.count);
4549: END IF;
4550:
4551: MSC_ATP_DB_UTILS.Remove_Invalid_Future_SD(l_atp_pegging_tab);
4552: END IF;
4553:
4554: --- remove pegging and supply demand details for original item
4555: MSC_ATP_DB_UTILS.Remove_Invalid_SD_Rec(

Line 4555: MSC_ATP_DB_UTILS.Remove_Invalid_SD_Rec(

4551: MSC_ATP_DB_UTILS.Remove_Invalid_Future_SD(l_atp_pegging_tab);
4552: END IF;
4553:
4554: --- remove pegging and supply demand details for original item
4555: MSC_ATP_DB_UTILS.Remove_Invalid_SD_Rec(
4556: item_availability_info.End_pegging_id(l_item_count),
4557: null,
4558: item_availability_info.plan_id(l_item_count),
4559: MSC_ATP_PVT.UNDO,

Line 4816: MSC_ATP_DB_UTILS.Remove_Invalid_Future_SD(l_atp_pegging_tab);

4812: IF PG_DEBUG in ('Y', 'C') THEN
4813: msc_sch_wb.atp_debug('ATP_Check_Subst: ' || 'count after recreating := ' || l_atp_pegging_tab.count);
4814: END IF;
4815:
4816: MSC_ATP_DB_UTILS.Remove_Invalid_Future_SD(l_atp_pegging_tab);
4817: END IF;
4818:
4819: MSC_ATP_DB_UTILS.Remove_Invalid_SD_Rec(
4820: item_availability_info.End_pegging_id(j),

Line 4819: MSC_ATP_DB_UTILS.Remove_Invalid_SD_Rec(

4815:
4816: MSC_ATP_DB_UTILS.Remove_Invalid_Future_SD(l_atp_pegging_tab);
4817: END IF;
4818:
4819: MSC_ATP_DB_UTILS.Remove_Invalid_SD_Rec(
4820: item_availability_info.End_pegging_id(j),
4821: null,
4822: item_availability_info.plan_id(j),
4823: MSC_ATP_PVT.UNDO,

Line 4912: MSC_ATP_DB_UTILS.Remove_Invalid_SD_Rec(item_availability_info.end_pegging_id(i),

4908: msc_sch_wb.atp_debug('ATP_Check_Subst: ' || 'delete demand for item ' || item_availability_info.item_name(i)
4909: || ' ' || item_availability_info.sr_inventory_item_id(i));
4910: END IF;
4911:
4912: MSC_ATP_DB_UTILS.Remove_Invalid_SD_Rec(item_availability_info.end_pegging_id(i),
4913: null,
4914: item_availability_info.plan_id(i),
4915: MSC_ATP_PVT.UNDO,
4916: null,