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_PVT dependencies on MSC_ATP_DB_UTILS

Line 661: MSC_ATP_DB_UTILS.call_delete_row (

657: -- Call_delete_row will take care of calling delete_row for the line/set.
658: -- The input to this procedure is p_atp_table.
659: -- l_delete_atp_rec will contain array to be used to call undo_delete_row.
660: -- l_delete_atp_rec also contains offset records.
661: MSC_ATP_DB_UTILS.call_delete_row (
662: p_instance_id,
663: p_atp_table,
664: p_refresh_number,
665: l_delete_atp_rec,

Line 3628: MSC_ATP_DB_UTILS.Remove_Invalid_SD_Rec(

3624: FOR i in 1..MSC_ATP_PVT.G_PEGGING_FOR_SET.COUNT LOOP
3625: IF PG_DEBUG in ('Y', 'C') THEN
3626: msc_sch_wb.atp_debug('Schedule: ' || 'in the loop');
3627: END IF;
3628: MSC_ATP_DB_UTILS.Remove_Invalid_SD_Rec(
3629: MSC_ATP_PVT.G_PEGGING_FOR_SET(i) ,
3630: p_instance_id,
3631: l_plan_id,
3632: UNDO,

Line 3680: MSC_ATP_DB_UTILS.Update_SD_Date(l_atp_rec.demand_source_line ,

3676: l_atp_insert_rec.inventory_item_id := l_pf_dest_id;
3677: l_atp_insert_rec.request_item_id := l_mem_dest_id;
3678: l_atp_insert_rec.origination_type := 30;
3679:
3680: MSC_ATP_DB_UTILS.Update_SD_Date(l_atp_rec.demand_source_line ,
3681: p_instance_id,
3682: l_sd_date,
3683: l_plan_id,
3684: l_sd_qty,

Line 3796: MSC_ATP_DB_UTILS.Flush_Data_In_Pds(l_ship_arrival_date_rec, l_return_status);

3792: l_ship_arrival_date_rec.order_date_type := 1;
3793: END IF;
3794: IF l_ship_arrival_date_rec.demand_id is not null THEN
3795: IF (G_INV_CTP = 4)THEN
3796: MSC_ATP_DB_UTILS.Flush_Data_In_Pds(l_ship_arrival_date_rec, l_return_status);
3797: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
3798: IF PG_DEBUG in ('Y', 'C') THEN
3799: msc_sch_wb.atp_debug('Schedule: ' || 'Error in call to Flush_Data_In_Pds procedure ');
3800: END IF;

Line 3803: MSC_ATP_DB_UTILS.Flush_Data_In_Ods(l_ship_arrival_date_rec, l_return_status);

3799: msc_sch_wb.atp_debug('Schedule: ' || 'Error in call to Flush_Data_In_Pds procedure ');
3800: END IF;
3801: END IF;
3802: ELSE
3803: MSC_ATP_DB_UTILS.Flush_Data_In_Ods(l_ship_arrival_date_rec, l_return_status);
3804: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
3805: IF PG_DEBUG in ('Y', 'C') THEN
3806: msc_sch_wb.atp_debug('Schedule: ' || 'Error in call to Flush_Data_In_Ods procedure ');
3807: END IF;

Line 3923: MSC_ATP_DB_UTILS.Update_SD_Date(l_atp_rec.demand_source_line ,

3919: l_atp_insert_rec.inventory_item_id := l_pf_dest_id;
3920: l_atp_insert_rec.request_item_id := l_mem_dest_id;
3921: l_atp_insert_rec.origination_type := 30;
3922:
3923: MSC_ATP_DB_UTILS.Update_SD_Date(l_atp_rec.demand_source_line ,
3924: p_instance_id,
3925: l_atp_rec.ship_date,
3926: --s_cto_rearch do not honor atp_lead time
3927: /*

Line 3999: MSC_ATP_DB_UTILS.Remove_Invalid_SD_Rec(

3995: END IF;
3996:
3997: IF j > 1 THEN
3998: FOR l_peg_count in k..l_fst_src_pegging_ids.count loop
3999: MSC_ATP_DB_UTILS.Remove_Invalid_SD_Rec(
4000: l_fst_src_pegging_ids(l_peg_count),
4001: null,
4002: l_plan_id,
4003: UNDO,

Line 4115: MSC_ATP_DB_UTILS.Remove_Invalid_SD_Rec(

4111: FOR i in 1..MSC_ATP_PVT.G_PEGGING_FOR_SET.COUNT LOOP
4112: IF PG_DEBUG in ('Y', 'C') THEN
4113: msc_sch_wb.atp_debug('Schedule: ' || 'in the loop');
4114: END IF;
4115: MSC_ATP_DB_UTILS.Remove_Invalid_SD_Rec(
4116: MSC_ATP_PVT.G_PEGGING_FOR_SET(i) ,
4117: p_instance_id,
4118: l_plan_id,
4119: UNDO,

Line 4181: MSC_ATP_DB_UTILS.Update_SD_Date(p_atp_table.Identifier(m),

4177: ELSE
4178: l_order_date_type := 1;
4179: END IF;
4180:
4181: MSC_ATP_DB_UTILS.Update_SD_Date(p_atp_table.Identifier(m),
4182: p_instance_id, l_group_date, l_temp_plan_id,null,
4183: MSC_ATP_PVT.G_DEMAND_CLASS_ATP_FLAG(i),
4184: MSC_ATP_PVT.G_REQ_ATP_DATE(i),
4185: MSC_ATP_PVT.G_REQ_DATE_QTY(i), -- Bug 1501787

Line 4219: MSC_ATP_DB_UTILS.Remove_Invalid_SD_Rec(

4215: FOR i in 1..MSC_ATP_PVT.G_PEGGING_FOR_SET.COUNT LOOP
4216: IF PG_DEBUG in ('Y', 'C') THEN
4217: msc_sch_wb.atp_debug('Schedule: ' || 'in the loop');
4218: END IF;
4219: MSC_ATP_DB_UTILS.Remove_Invalid_SD_Rec(
4220: MSC_ATP_PVT.G_PEGGING_FOR_SET(i) ,
4221: p_instance_id,
4222: l_plan_id,
4223: UNDO,

Line 4270: MSC_ATP_DB_UTILS.Remove_Invalid_SD_Rec(

4266: (l_arrival_count > 1 AND k = l_arrival_count) OR
4267: (l_ship_count > 1 AND i = l_ship_count) ) THEN
4268:
4269: FOR i in 1..MSC_ATP_PVT.G_PEGGING_FOR_SET.COUNT LOOP
4270: MSC_ATP_DB_UTILS.Remove_Invalid_SD_Rec(
4271: MSC_ATP_PVT.G_PEGGING_FOR_SET(i) ,
4272: p_instance_id,
4273: l_plan_id,
4274: UNDO,

Line 4304: MSC_ATP_DB_UTILS.Remove_Invalid_SD_Rec(

4300: FOR i in 1..MSC_ATP_PVT.G_PEGGING_FOR_SET.COUNT LOOP
4301: IF PG_DEBUG in ('Y', 'C') THEN
4302: msc_sch_wb.atp_debug('Schedule: ' || 'in the loop');
4303: END IF;
4304: MSC_ATP_DB_UTILS.Remove_Invalid_SD_Rec(
4305: MSC_ATP_PVT.G_PEGGING_FOR_SET(i) ,
4306: p_instance_id,
4307: l_plan_id,
4308: UNDO,

Line 4828: MSC_ATP_DB_UTILS.Remove_Invalid_SD_Rec(

4824: FOR i in 1..MSC_ATP_PVT.G_PEGGING_FOR_SET.COUNT LOOP
4825: IF PG_DEBUG in ('Y', 'C') THEN
4826: msc_sch_wb.atp_debug('Schedule: ' || 'in the loop');
4827: END IF;
4828: MSC_ATP_DB_UTILS.Remove_Invalid_SD_Rec(
4829: MSC_ATP_PVT.G_PEGGING_FOR_SET(i) ,
4830: p_instance_id,
4831: l_plan_id,
4832: UNDO,

Line 4909: MSC_ATP_DB_UTILS.Undo_Delete_Row(l_delete_atp_rec.del_identifiers,

4905: msc_sch_wb.atp_debug('Schedule: ' || 'rajjain - Single call to Undo_Delete_Row');
4906: END IF;
4907:
4908: -- rajjain single call to Undo_Delete_Row procedure --3720018
4909: MSC_ATP_DB_UTILS.Undo_Delete_Row(l_delete_atp_rec.del_identifiers,
4910: l_delete_atp_rec.del_plan_ids,
4911: p_instance_id,
4912: --subst
4913: l_delete_atp_rec.del_demand_ids,

Line 5324: MSC_ATP_DB_UTILS.Remove_Invalid_SD_Rec(MSC_ATP_PVT.G_PEGGING_FOR_SET(i), p_instance_id,

5320: FOR i in 1..MSC_ATP_PVT.G_PEGGING_FOR_SET.COUNT LOOP
5321: IF PG_DEBUG in ('Y', 'C') THEN
5322: msc_sch_wb.atp_debug('Schedule: ' || 'in the loop, i:='||i);
5323: END IF;
5324: MSC_ATP_DB_UTILS.Remove_Invalid_SD_Rec(MSC_ATP_PVT.G_PEGGING_FOR_SET(i), p_instance_id,
5325: l_plan_id, UNDO, MSC_ATP_PVT.G_DEMAND_CLASS_ATP_FLAG(i),l_return_status);
5326: END LOOP;
5327:
5328: -- 2902265

Line 5366: MSC_ATP_DB_UTILS.Undo_Delete_Row(l_delete_atp_rec.del_identifiers,

5362: END IF;
5363:
5364: -- rajjain single call to Undo_Delete_Row procedure
5365: --3720018,changes to refer all the records from l_delete_atp_rec
5366: MSC_ATP_DB_UTILS.Undo_Delete_Row(l_delete_atp_rec.del_identifiers,
5367: l_delete_atp_rec.del_plan_ids,
5368: p_instance_id,
5369: --subst
5370: l_delete_atp_rec.del_demand_ids,

Line 5475: MSC_ATP_DB_UTILS.Remove_Invalid_SD_Rec(l_tmp_pegging_id, null,

5471: IF (NVL(l_tmp_pegging_id,-1) <> -1) THEN
5472: IF PG_DEBUG in ('Y', 'C') THEN
5473: msc_sch_wb.atp_debug('Schedule: ' || 'Now deleting- calling remove invalid SD REC');
5474: END IF;
5475: MSC_ATP_DB_UTILS.Remove_Invalid_SD_Rec(l_tmp_pegging_id, null,
5476: l_plan_id, UNDO, 1,l_return_status);
5477: END IF;
5478:
5479: END LOOP;

Line 5506: MSC_ATP_DB_UTILS.Undo_Delete_Row(l_delete_atp_rec.del_identifiers,

5502: msc_sch_wb.atp_debug('Schedule: ' || 'single call to Undo_Delete_Row');
5503: END IF;
5504: -- rajjain single call to Undo_Delete_Row procedure
5505: --3720018,changes to refer all the records from l_delete_atp_rec
5506: MSC_ATP_DB_UTILS.Undo_Delete_Row(l_delete_atp_rec.del_identifiers,
5507: l_delete_atp_rec.del_plan_ids,
5508: p_instance_id,
5509: --subst
5510: l_delete_atp_rec.del_demand_ids,

Line 5626: MSC_ATP_DB_UTILS.Remove_Invalid_SD_Rec(l_tmp_pegging_id, null,

5622: IF (NVL(l_tmp_pegging_id, -1) <> -1) THEN
5623: IF PG_DEBUG in ('Y', 'C') THEN
5624: msc_sch_wb.atp_debug('Schedule: ' || 'Now deleting- calling remove invalid SD REC');
5625: END IF;
5626: MSC_ATP_DB_UTILS.Remove_Invalid_SD_Rec(l_tmp_pegging_id, null,
5627: l_plan_id, UNDO, 1,l_return_status);
5628: END IF;
5629: END LOOP;
5630:

Line 5655: MSC_ATP_DB_UTILS.Undo_Delete_Row(l_delete_atp_rec.del_identifiers,

5651: msc_sch_wb.atp_debug('Schedule: ' || 'rajjain - Single call to Undo_Delete_Row');
5652: END IF;
5653: -- rajjain single call to Undo_Delete_Row procedure
5654: --3720018,changes to refer all the records from l_delete_atp_rec
5655: MSC_ATP_DB_UTILS.Undo_Delete_Row(l_delete_atp_rec.del_identifiers,
5656: l_delete_atp_rec.del_plan_ids,
5657: p_instance_id,
5658: --subst
5659: l_delete_atp_rec.del_demand_ids,

Line 5780: MSC_ATP_DB_UTILS.Remove_Invalid_SD_Rec(l_tmp_pegging_id, null,

5776: IF (NVL(l_tmp_pegging_id,-1) <> -1) THEN
5777: IF PG_DEBUG in ('Y', 'C') THEN
5778: msc_sch_wb.atp_debug('Schedule: ' || 'Now deleting- calling remove invalid SD REC');
5779: END IF;
5780: MSC_ATP_DB_UTILS.Remove_Invalid_SD_Rec(l_tmp_pegging_id, null,
5781: l_plan_id, UNDO, 1,l_return_status);
5782: END IF;
5783: END LOOP;
5784: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN

Line 5807: MSC_ATP_DB_UTILS.Undo_Delete_Row(l_delete_atp_rec.del_identifiers,

5803: msc_sch_wb.atp_debug('Schedule: ' || 'rajjain - Single call to Undo_Delete_Row');
5804: END IF;
5805: -- rajjain single call to Undo_Delete_Row procedure
5806: --3720018,changes to refer all the records from l_delete_atp_rec
5807: MSC_ATP_DB_UTILS.Undo_Delete_Row(l_delete_atp_rec.del_identifiers,
5808: l_delete_atp_rec.del_plan_ids,
5809: p_instance_id,
5810: --subst
5811: l_delete_atp_rec.del_demand_ids,

Line 5952: MSC_ATP_DB_UTILS.Remove_Invalid_SD_Rec(l_tmp_pegging_id, null,

5948: IF (NVL(l_tmp_pegging_id,-1) <> -1) THEN
5949: IF PG_DEBUG in ('Y', 'C') THEN
5950: msc_sch_wb.atp_debug('Schedule: ' || 'Now deleting- calling remove invalid SD REC');
5951: END IF;
5952: MSC_ATP_DB_UTILS.Remove_Invalid_SD_Rec(l_tmp_pegging_id, null,
5953: l_plan_id, UNDO, 1,l_return_status);
5954: END IF;
5955: END LOOP;
5956: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN

Line 5979: MSC_ATP_DB_UTILS.Undo_Delete_Row(l_delete_atp_rec.del_identifiers,

5975: msc_sch_wb.atp_debug('Schedule: ' || 'rajjain - Single call to Undo_Delete_Row');
5976: END IF;
5977: -- rajjain single call to Undo_Delete_Row procedure
5978: --3720018,changes to refer all the records from l_delete_atp_rec
5979: MSC_ATP_DB_UTILS.Undo_Delete_Row(l_delete_atp_rec.del_identifiers,
5980: l_delete_atp_rec.del_plan_ids,
5981: p_instance_id,
5982: --subst
5983: l_delete_atp_rec.del_demand_ids,

Line 6277: l_supply_rec MSC_ATP_DB_UTILS.supply_rec_typ;

6273: l_order_line_id NUMBER := NULL;
6274: l_location_id NUMBER := NULL;
6275:
6276: -- ATP4drp Declare a variable for creating Planned Arrival.
6277: l_supply_rec MSC_ATP_DB_UTILS.supply_rec_typ;
6278: -- End ATP4drp
6279:
6280: --bug 4394904
6281: l_infinite_time_fence DATE;

Line 7054: MSC_ATP_DB_UTILS.Add_Mat_Demand(l_atp_insert_rec,

7050:
7051: l_atp_insert_rec.session_id:= MSC_ATP_PVT.G_SESSION_ID;
7052: l_atp_insert_rec.delivery_lead_time := l_delivery_lead_time;
7053:
7054: MSC_ATP_DB_UTILS.Add_Mat_Demand(l_atp_insert_rec,
7055: p_plan_id,
7056: l_demand_class_flag,
7057: l_demand_id);
7058: IF PG_DEBUG in ('Y', 'C') THEN

Line 7256: MSC_ATP_DB_UTILS.Add_Mat_Demand(l_atp_insert_rec,

7252: END IF;
7253: l_atp_insert_rec.session_id:= MSC_ATP_PVT.G_SESSION_ID;
7254: l_atp_insert_rec.delivery_lead_time := l_delivery_lead_time;
7255:
7256: MSC_ATP_DB_UTILS.Add_Mat_Demand(l_atp_insert_rec,
7257: p_plan_id,
7258: l_demand_class_flag,
7259: l_demand_id);
7260:

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

7347: l_pegging_rec.component_yield_factor := p_atp_record.component_yield_factor; --4570421
7348: l_pegging_rec.usage := p_atp_record.usage_qty; --4775920
7349: l_pegging_rec.organization_type := p_atp_record.organization_type; --4775920
7350:
7351: MSC_ATP_DB_UTILS.Add_Pegging(l_pegging_rec, l_pegging_id);
7352:
7353: END IF;
7354: END IF;
7355: IF PG_DEBUG in ('Y', 'C') THEN

Line 8000: MSC_ATP_DB_UTILS.Add_Mat_Demand(l_atp_insert_rec,

7996: AND NVL(p_atp_record.parent_item_id, p_atp_record.inventory_item_id)
7997: = p_atp_record.inventory_item_id
7998: AND NVL(MSC_ATP_PVT.G_PLAN_INFO_REC.plan_type,1) = 5) THEN --5067205
7999:
8000: MSC_ATP_DB_UTILS.Add_Mat_Demand(l_atp_insert_rec,
8001: p_plan_id,
8002: l_demand_class_flag,
8003: l_demand_id);
8004: END IF;

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

8117: l_pegging_rec.component_yield_factor := p_atp_record.component_yield_factor; --4570421
8118: l_pegging_rec.usage := p_atp_record.usage_qty; --4775920
8119: l_pegging_rec.organization_type := p_atp_record.organization_type; --4775920
8120:
8121: MSC_ATP_DB_UTILS.Add_Pegging(l_pegging_rec, l_pegging_id);
8122:
8123: IF p_search = 1 AND p_parent_pegging_id is null THEN
8124: MSC_ATP_PVT.G_DEMAND_PEGGING_ID := l_pegging_id;
8125: END IF;

Line 8344: MSC_ATP_DB_UTILS.Add_Pegging(l_pegging_rec, l_atp_pegging_id);

8340: l_pegging_rec.component_yield_factor := p_atp_record.component_yield_factor; --4570421
8341: l_pegging_rec.usage := p_atp_record.usage_qty; --4775920
8342: l_pegging_rec.organization_type := p_atp_record.organization_type; --4775920
8343:
8344: MSC_ATP_DB_UTILS.Add_Pegging(l_pegging_rec, l_atp_pegging_id);
8345:
8346: -- Add pegging_id to the l_atp_period and l_atp_supply_demand
8347:
8348: FOR i in 1..l_atp_period.Level.COUNT LOOP

Line 8361: MSC_ATP_DB_UTILS.move_SD_temp_into_mrp_details(l_atp_pegging_id,

8357: l_atp_supply_demand.End_Pegging_Id(i) := MSC_ATP_PVT.G_DEMAND_PEGGING_ID;
8358: END LOOP;
8359: */
8360: IF p_atp_record.insert_flag <> 0 THEN
8361: MSC_ATP_DB_UTILS.move_SD_temp_into_mrp_details(l_atp_pegging_id,
8362: MSC_ATP_PVT.G_DEMAND_PEGGING_ID);
8363: END IF;
8364:
8365:

Line 8495: MSC_ATP_DB_UTILS.delete_pegging( l_atp_pegging_id);

8491: END IF;
8492: IF ( ( MSC_ATP_PVT.G_ORG_INFO_REC.org_type = MSC_ATP_PVT.DISCRETE_ORG AND p_atp_record.scaling_type = 2) OR
8493: (MSC_ATP_PVT.G_ORG_INFO_REC.org_type = MSC_ATP_PVT.OPM_ORG AND p_atp_record.scaling_type IN (0,2))) AND l_net_demand = 0 then
8494: -- Delete the supply pegging of the main component, if substitute can satisfy the lot-size.
8495: MSC_ATP_DB_UTILS.delete_pegging( l_atp_pegging_id);
8496: END IF;
8497:
8498: IF MSC_ATP_PVT.G_DIAGNOSTIC_ATP =1 THEN
8499: IF ((p_search = 1) and (l_atp_comp_flag = 'N') and

Line 8533: MSC_ATP_DB_UTILS.Update_Pegging(l_pegging_id,

8529: IF PG_DEBUG in ('Y', 'C') THEN
8530: msc_sch_wb.atp_debug('ATP_Check: ' || 'Update POD for Primary Component');
8531: END IF;
8532: IF NVL(MSC_ATP_PVT.G_DIAGNOSTIC_ATP,2) <> 1 THEN
8533: MSC_ATP_DB_UTILS.Update_Pegging(l_pegging_id,
8534: null,
8535: p_atp_record.quantity_ordered-
8536: l_sub_requested_date_quantity );
8537: END IF;

Line 9394: MSC_ATP_DB_UTILS.INSERT_SUMMARY_SD_ROW(p_plan_id,

9390: IF SQL%NOTFOUND THEN
9391: IF PG_DEBUG in ('Y', 'C') THEN
9392: msc_sch_wb.atp_debug('ATP_Check: ' || 'insert demand on new date');
9393: END IF;
9394: MSC_ATP_DB_UTILS.INSERT_SUMMARY_SD_ROW(p_plan_id,
9395: p_atp_record.instance_id,
9396: p_atp_record.organization_id,
9397: l_inventory_item_id,
9398: l_atp_date_this_level,

Line 9525: MSC_ATP_DB_UTILS.Add_Pegging(l_pegging_rec, l_atp_pegging_id);

9521: l_pegging_rec.component_yield_factor := p_atp_record.component_yield_factor; --4570421
9522: l_pegging_rec.usage := p_atp_record.usage_qty; --4775920
9523: l_pegging_rec.organization_type := p_atp_record.organization_type; --4775920
9524:
9525: MSC_ATP_DB_UTILS.Add_Pegging(l_pegging_rec, l_atp_pegging_id);
9526: END IF;
9527:
9528: -- 1250141: we need to populate the details
9529: -- 1300692: we only populate the details for

Line 9574: MSC_ATP_DB_UTILS.move_SD_temp_into_mrp_details(l_atp_pegging_id,

9570: MSC_ATP_PVT.G_DEMAND_PEGGING_ID;
9571: END LOOP;
9572:
9573: IF p_atp_record.insert_flag <> 0 THEN
9574: MSC_ATP_DB_UTILS.move_SD_temp_into_mrp_details(l_atp_pegging_id,
9575: MSC_ATP_PVT.G_DEMAND_PEGGING_ID);
9576: END IF;
9577:
9578: MSC_ATP_PROC.Details_Output(l_atp_period,

Line 9938: MSC_ATP_DB_UTILS.Add_Pegging(l_pegging_rec, l_future_pegging_id);

9934: l_pegging_rec.component_yield_factor := p_atp_record.component_yield_factor; --4570421
9935: l_pegging_rec.usage := p_atp_record.usage_qty; --4775920
9936: l_pegging_rec.organization_type := p_atp_record.organization_type; --4775920
9937:
9938: MSC_ATP_DB_UTILS.Add_Pegging(l_pegging_rec, l_future_pegging_id);
9939:
9940: -- bug 1225478
9941: FOR i in 1..l_future_atp_period.Level.COUNT LOOP
9942: l_future_atp_period.Pegging_Id(i) := l_future_pegging_id;

Line 9954: MSC_ATP_DB_UTILS.move_SD_temp_into_mrp_details(l_future_pegging_id,

9950: l_future_atp_supply_demand.End_Pegging_Id(i) := MSC_ATP_PVT.G_DEMAND_PEGGING_ID;
9951: END LOOP;
9952: */
9953: IF p_atp_record.insert_flag <> 0 THEN
9954: MSC_ATP_DB_UTILS.move_SD_temp_into_mrp_details(l_future_pegging_id,
9955: MSC_ATP_PVT.G_DEMAND_PEGGING_ID);
9956: END IF;
9957:
9958: END IF; --IF (MSC_ATP_PVT.G_ALLOCATION_METHOD = 1) THEN

Line 11818: MSC_ATP_DB_UTILS.ADD_Supplies(l_supply_rec);

11814: l_supply_rec.record_source := 2; -- ATP created
11815: l_supply_rec.supply_type := 51; --- planned arrival
11816: l_supply_rec.intransit_lead_time := l_atp_rec.delivery_lead_time; --4127630
11817:
11818: MSC_ATP_DB_UTILS.ADD_Supplies(l_supply_rec);
11819: -- Asssign the output to local variables.
11820: l_transaction_id := l_supply_rec.transaction_id;
11821: l_return_status := l_supply_rec.return_status;
11822: IF PG_DEBUG in ('Y', 'C') THEN

Line 11830: MSC_ATP_DB_UTILS.Add_Planned_Order(

11826: msc_sch_wb.atp_debug('ATP_Check: ' || 'Return Status l_return_status: ' || l_return_status);
11827: END IF;
11828: ELSE -- Create Planned Order otherwise.
11829:
11830: MSC_ATP_DB_UTILS.Add_Planned_Order(
11831: p_atp_record.instance_id,
11832: p_plan_id,
11833: PF_ITEM_INFO_REC.dest_inv_item_id,
11834: p_atp_record.organization_id,

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

12090: l_pegging_rec.component_yield_factor := p_atp_record.component_yield_factor; --4570421
12091: l_pegging_rec.usage := p_atp_record.usage_qty; --4775920
12092: l_pegging_rec.organization_type := p_atp_record.organization_type; --4775920
12093:
12094: MSC_ATP_DB_UTILS.Add_Pegging(l_pegging_rec, l_pegging_id);
12095: -- END IF;
12096:
12097: --- now chnage back the summary flag for new plan
12098: MSC_ATP_PVT.G_SUMMARY_FLAG := l_new_summary_flag;

Line 12555: MSC_ATP_DB_UTILS.Update_Planned_Order(l_pegging_id,

12551: msc_sch_wb.atp_debug('pegging id: ' || l_parent_pegging_id);
12552: END IF;
12553: END IF;
12554:
12555: MSC_ATP_DB_UTILS.Update_Planned_Order(l_pegging_id,
12556: p_plan_id,
12557: p_atp_record.ship_date,
12558: 0,
12559: l_atp_rec.supplier_id,

Line 12616: MSC_ATP_DB_UTILS.Remove_Invalid_Future_SD(l_atp_pegging_tab);

12612:
12613: -- Planned Pegging based AATP, l_atp_pegging_tab populated in
12614: -- MSC_AATP_REQ.Get_Forward_Material_Atp
12615:
12616: MSC_ATP_DB_UTILS.Remove_Invalid_Future_SD(l_atp_pegging_tab);
12617: l_atp_pegging_tab := MRP_ATP_PUB.Number_Arr(); --bug3581151
12618:
12619: ELSE -- IF l_atp_pegging_tab.COUNT > 0 THEN
12620: MSC_ATP_DB_UTILS.Update_Planned_Order(l_future_pegging_id,

Line 12620: MSC_ATP_DB_UTILS.Update_Planned_Order(l_future_pegging_id,

12616: MSC_ATP_DB_UTILS.Remove_Invalid_Future_SD(l_atp_pegging_tab);
12617: l_atp_pegging_tab := MRP_ATP_PUB.Number_Arr(); --bug3581151
12618:
12619: ELSE -- IF l_atp_pegging_tab.COUNT > 0 THEN
12620: MSC_ATP_DB_UTILS.Update_Planned_Order(l_future_pegging_id,
12621: p_plan_id,
12622: p_atp_record.ship_date,
12623: 0,
12624: l_atp_rec.supplier_id,

Line 12677: MSC_ATP_DB_UTILS.Update_Planned_Order(l_pegging_id,

12673: msc_sch_wb.atp_debug('l_PO_qty: ' ||l_PO_qty);
12674: msc_sch_wb.atp_debug('l_conversion_rate:' || l_conversion_rate);
12675: END IF;
12676:
12677: MSC_ATP_DB_UTILS.Update_Planned_Order(l_pegging_id,
12678: p_plan_id,
12679: --bug 2798667: The ATO components are sourced on l_ship_date
12680: --p_atp_record.ship_date,
12681: l_ship_date,

Line 12754: MSC_ATP_DB_UTILS.Update_Planned_Order(l_pegging_id,

12750: msc_sch_wb.atp_debug('l_PO_qty: ' || l_PO_qty);
12751: msc_sch_wb.atp_debug('l_prim_uom_req_date_qty: ' || l_prim_uom_req_date_qty);
12752: END IF;
12753:
12754: MSC_ATP_DB_UTILS.Update_Planned_Order(l_pegging_id,
12755: p_plan_id,
12756: null,
12757: -- dsting 2754446
12758: -- least(greatest(l_atp_rec.requested_date_quantity, 0),

Line 12786: MSC_ATP_DB_UTILS.Update_Pegging(l_pegging_id, null,

12782: END IF;
12783: /* ELSE
12784:
12785: l_last_good_pegging_id := l_pegging_id;
12786: MSC_ATP_DB_UTILS.Update_Pegging(l_pegging_id, null,
12787: least(greatest(l_atp_rec.requested_date_quantity, 0)));
12788: END IF;
12789: */
12790: --5230396, updating planned order for diag ATP too in Buy case.

Line 12797: MSC_ATP_DB_UTILS.Update_Planned_Order(l_pegging_id,

12793: msc_sch_wb.atp_debug('l_PO_qty: ' || l_PO_qty);
12794: msc_sch_wb.atp_debug('l_prim_uom_req_date_qty: ' || l_prim_uom_req_date_qty);
12795: END IF;
12796:
12797: MSC_ATP_DB_UTILS.Update_Planned_Order(l_pegging_id,
12798: p_plan_id,
12799: null,
12800: -- dsting 2754446
12801: -- least(greatest(l_atp_rec.requested_date_quantity, 0),

Line 13278: MSC_ATP_DB_UTILS.Add_Planned_Order(

13274: END IF;
13275: END IF;
13276: --s_cto_rearch
13277: IF MSC_ATP_PVT.G_INV_CTP = 4 THEN
13278: MSC_ATP_DB_UTILS.Add_Planned_Order(
13279: p_atp_record.instance_id,
13280: p_plan_id,
13281: PF_ITEM_INFO_REC.dest_inv_item_id,
13282: p_atp_record.organization_id,

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

13444: l_pegging_rec.component_yield_factor := p_atp_record.component_yield_factor; --4570421
13445: l_pegging_rec.usage := p_atp_record.usage_qty; --4775920
13446: l_pegging_rec.organization_type := p_atp_record.organization_type; --4775920
13447:
13448: MSC_ATP_DB_UTILS.Add_Pegging(l_pegging_rec, l_pegging_id);
13449:
13450: -- dsting diag_atp last good peggingfor make
13451: IF l_pegging_rec.constraint_type IS NULL THEN
13452: IF PG_DEBUG in ('Y', 'C') THEN

Line 13740: MSC_ATP_DB_UTILS.Update_Pegging(l_pegging_id, null, l_avail_PO_qty); -- 2869830

13736: l_last_good_pegging_id := l_pegging_id;
13737: IF l_sources.source_type.next(j) IS NULL
13738: AND MSC_ATP_PVT.G_DIAGNOSTIC_ATP = 1
13739: THEN
13740: MSC_ATP_DB_UTILS.Update_Pegging(l_pegging_id, null, l_avail_PO_qty); -- 2869830
13741: -- MSC_ATP_DB_UTILS.Update_Pegging(l_pegging_id, null, l_avail_assembly_qty);
13742: ELSE
13743: MSC_ATP_DB_UTILS.Update_Planned_Order(l_pegging_id,
13744: p_plan_id,

Line 13741: -- MSC_ATP_DB_UTILS.Update_Pegging(l_pegging_id, null, l_avail_assembly_qty);

13737: IF l_sources.source_type.next(j) IS NULL
13738: AND MSC_ATP_PVT.G_DIAGNOSTIC_ATP = 1
13739: THEN
13740: MSC_ATP_DB_UTILS.Update_Pegging(l_pegging_id, null, l_avail_PO_qty); -- 2869830
13741: -- MSC_ATP_DB_UTILS.Update_Pegging(l_pegging_id, null, l_avail_assembly_qty);
13742: ELSE
13743: MSC_ATP_DB_UTILS.Update_Planned_Order(l_pegging_id,
13744: p_plan_id,
13745: null,

Line 13743: MSC_ATP_DB_UTILS.Update_Planned_Order(l_pegging_id,

13739: THEN
13740: MSC_ATP_DB_UTILS.Update_Pegging(l_pegging_id, null, l_avail_PO_qty); -- 2869830
13741: -- MSC_ATP_DB_UTILS.Update_Pegging(l_pegging_id, null, l_avail_assembly_qty);
13742: ELSE
13743: MSC_ATP_DB_UTILS.Update_Planned_Order(l_pegging_id,
13744: p_plan_id,
13745: null,
13746: l_avail_PO_qty, -- 2869830
13747: --l_avail_assembly_qty,

Line 13792: MSC_ATP_DB_UTILS.Remove_Invalid_SD_Rec(

13788: -- bug 1277418: now clean up the data.
13789: -- if l_avail_assembly_qty >0, we need to
13790: -- to keep the planned order.
13791:
13792: MSC_ATP_DB_UTILS.Remove_Invalid_SD_Rec(
13793: l_pegging_id ,
13794: p_atp_record.instance_id,
13795: p_plan_id,
13796: INVALID,

Line 13806: MSC_ATP_DB_UTILS.Update_Planned_Order(l_pegging_id,

13802: msc_sch_wb.atp_debug('ATP_Check: ' || 'l_pegging_id = '||l_pegging_id);
13803: END IF;
13804:
13805: -- update/delete the planned order record.
13806: MSC_ATP_DB_UTILS.Update_Planned_Order(l_pegging_id,
13807: p_plan_id,
13808: null,
13809: l_avail_PO_qty,
13810: --l_avail_assembly_qty,

Line 14035: MSC_ATP_DB_UTILS.Update_Planned_Order(l_pegging_id,

14031: x_atp_supply_demand,
14032: l_return_status);
14033: ELSE
14034:
14035: MSC_ATP_DB_UTILS.Update_Planned_Order(l_pegging_id,
14036: p_plan_id,
14037: null,
14038: 0,
14039: null,

Line 14054: MSC_ATP_DB_UTILS.Update_Planned_Order(l_pegging_id,

14050: END IF;
14051: ELSE
14052: -- bug 1277418: now clean up the data.
14053: -- we remove the whole planned order
14054: MSC_ATP_DB_UTILS.Update_Planned_Order(l_pegging_id,
14055: p_plan_id,
14056: null,
14057: 0,
14058: null,

Line 14473: MSC_ATP_DB_UTILS.Update_Planned_Order(l_pegging_id,

14469: msc_sch_wb.atp_debug('ATP_Check: ' || 'single level results is better than multi-level');
14470: END IF;
14471:
14472:
14473: MSC_ATP_DB_UTILS.Update_Planned_Order(l_pegging_id,
14474: p_plan_id,
14475: p_atp_record.ship_date,
14476: 0,
14477: null,

Line 14511: MSC_ATP_DB_UTILS.Remove_Invalid_Future_SD(l_atp_pegging_tab);

14507:
14508: -- Planned Pegging based AATP, l_atp_pegging_tab populated in
14509: -- MSC_AATP_REQ.Get_Forward_Material_Atp
14510:
14511: MSC_ATP_DB_UTILS.Remove_Invalid_Future_SD(l_atp_pegging_tab);
14512: l_atp_pegging_tab := MRP_ATP_PUB.Number_Arr(); --bug3581151
14513:
14514: ELSE -- IF l_atp_pegging_tab.COUNT > 0 THEN
14515:

Line 14516: MSC_ATP_DB_UTILS.Update_Planned_Order(l_future_pegging_id,

14512: l_atp_pegging_tab := MRP_ATP_PUB.Number_Arr(); --bug3581151
14513:
14514: ELSE -- IF l_atp_pegging_tab.COUNT > 0 THEN
14515:
14516: MSC_ATP_DB_UTILS.Update_Planned_Order(l_future_pegging_id,
14517: p_plan_id,
14518: p_atp_record.ship_date,
14519: 0,
14520: null,

Line 14615: MSC_ATP_DB_UTILS.Update_Planned_Order(l_pegging_id,

14611: msc_sch_wb.atp_debug('ATP_Check: ' || 'l_start_date := ' || l_start_date);
14612: END IF;
14613: -- end bug 3755704
14614:
14615: MSC_ATP_DB_UTILS.Update_Planned_Order(l_pegging_id,
14616: p_plan_id,
14617: --bug 2798667: this should be l_temp_date
14618: --p_atp_record.ship_date,
14619: l_temp_date,

Line 14709: MSC_ATP_DB_UTILS.Update_Pegging( l_substitutes_rec.pegging_id(l_index),

14705: END IF;
14706:
14707:
14708: IF NVL(MSC_ATP_PVT.G_DIAGNOSTIC_ATP,2) <> 1 THEN
14709: MSC_ATP_DB_UTILS.Update_Pegging( l_substitutes_rec.pegging_id(l_index),
14710: null,
14711: l_atp_ctp_qty );
14712: END IF;
14713:

Line 14735: MSC_ATP_DB_UTILS.Add_Mat_Demand(l_atp_insert_rec,

14731: l_atp_insert_rec.refresh_number := p_refresh_number;
14732: l_atp_insert_rec.order_number := p_atp_record.order_number;
14733: l_atp_insert_rec.origination_type := 1;
14734:
14735: MSC_ATP_DB_UTILS.Add_Mat_Demand(l_atp_insert_rec,
14736: l_plan_id,
14737: 0,
14738: l_demand_id);
14739: IF PG_DEBUG in ('Y', 'C') THEN

Line 14753: MSC_ATP_DB_UTILS.Update_Pegging( l_substitutes_rec.pegging_id(l_index),

14749: AND record_type = 3;
14750:
14751: ELSE
14752: IF NVL(MSC_ATP_PVT.G_DIAGNOSTIC_ATP,2) <> 1 THEN
14753: MSC_ATP_DB_UTILS.Update_Pegging( l_substitutes_rec.pegging_id(l_index),
14754: null,
14755: l_atp_ctp_qty );
14756: END IF;
14757: update msc_demands

Line 14871: MSC_ATP_DB_UTILS.Update_Planned_Order(l_last_good_pegging_id,

14867: msc_sch_wb.atp_debug('trunc of l_subst_existing_PO_qty '||l_subst_existing_PO_qty);
14868: END IF;
14869: END IF;
14870:
14871: MSC_ATP_DB_UTILS.Update_Planned_Order(l_last_good_pegging_id,
14872: p_plan_id,
14873: null,
14874: l_net_demand + l_subst_existing_PO_qty,
14875: null,

Line 15099: MSC_ATP_DB_UTILS.Update_Pegging(l_parent_pegging_id,

15095: WHERE session_id = MSC_ATP_PVT.G_SESSION_ID
15096: AND pegging_id = l_parent_pegging_id
15097: AND record_type = 3;
15098:
15099: MSC_ATP_DB_UTILS.Update_Pegging(l_parent_pegging_id,
15100: null,
15101: (l_peg_qty - l_net_demand));
15102:
15103: IF PG_DEBUG in ('Y', 'C') THEN

Line 15383: MSC_ATP_DB_UTILS.INSERT_SUMMARY_SD_ROW(p_plan_id,

15379: msc_sch_wb.atp_debug('ATP_Check: ' || 'ship_date := ' || p_atp_record.ship_date);
15380: msc_sch_wb.atp_debug('ATP_Check: ' || 'quantity_ordered := ' || p_atp_record.quantity_ordered);
15381: END IF;
15382: BEGIN
15383: MSC_ATP_DB_UTILS.INSERT_SUMMARY_SD_ROW(p_plan_id,
15384: p_atp_record.instance_id,
15385: p_atp_record.organization_id,
15386: l_inventory_item_id,
15387: p_atp_record.ship_date,

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

15769: l_pegging_rec.component_yield_factor := p_atp_record.component_yield_factor; --4570421
15770: l_pegging_rec.usage := p_atp_record.usage_qty; --4775920
15771: l_pegging_rec.organization_type := p_atp_record.organization_type; --4775920
15772:
15773: MSC_ATP_DB_UTILS.Add_Pegging(l_pegging_rec, l_pegging_id);
15774:
15775: -- add pegging info for the supply
15776:
15777: l_pegging_rec.session_id:= MSC_ATP_PVT.G_SESSION_ID;

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

15858: l_pegging_rec.component_yield_factor := p_atp_record.component_yield_factor; --4570421
15859: l_pegging_rec.usage := p_atp_record.usage_qty; --4775920
15860: l_pegging_rec.organization_type := p_atp_record.organization_type; --4775920
15861:
15862: MSC_ATP_DB_UTILS.Add_Pegging(l_pegging_rec, l_pegging_id);
15863:
15864: ---- summary
15865: --- Create record into summary table for this supplier
15866: -- Code to update summary records removed for summary enhancement

Line 16068: MSC_ATP_DB_UTILS.move_SD_temp_into_mrp_details(l_pegging_id,

16064: msc_sch_wb.atp_debug('ATP_Check: ' || 'in get_res_requirements we are here 2');
16065: END IF;
16066:
16067: IF p_atp_record.insert_flag <> 0 THEN
16068: MSC_ATP_DB_UTILS.move_SD_temp_into_mrp_details(l_pegging_id,
16069: MSC_ATP_PVT.G_DEMAND_PEGGING_ID);
16070: END IF;
16071:
16072: END IF;

Line 16438: MSC_ATP_DB_UTILS.call_delete_row (

16434:
16435: -- Call_delete_row will take care of calling delete_row for the whole request.
16436: -- The input to this procedure is p_atp_table.
16437: -- l_delete_atp_rec will contain array to be used to call undo_delete_row.
16438: MSC_ATP_DB_UTILS.call_delete_row (
16439: p_instance_id,
16440: p_atp_table,
16441: p_refresh_number,
16442: l_delete_atp_rec,

Line 17451: MSC_ATP_DB_UTILS.Remove_Invalid_SD_Rec(l_atp_output_table.end_pegging_id(k),

17447: l_atp_output_table.arrival_Date(k)))))) THEN
17448:
17449: l_atp_output_table.Error_Code(k) := ATP_ACCEPT_FAIL;
17450:
17451: MSC_ATP_DB_UTILS.Remove_Invalid_SD_Rec(l_atp_output_table.end_pegging_id(k),
17452: l_atp_output_table.instance_id(k),
17453: l_atp_output_table.plan_id(k),
17454: MSC_ATP_PVT.UNDO,
17455: 2,--p_dc_flag

Line 17580: MSC_ATP_DB_UTILS.Remove_Invalid_SD_Rec(

17576: END IF;
17577: IF ( x_atp_table.Action(1) = ATPQUERY ) THEN
17578: IF ( MSC_ATP_PVT.G_REMOVE_REQUEST_LEVEL_REC.REMOVE_PEGGING_ID_REQUEST IS NOT NULL AND MSC_ATP_PVT.G_REMOVE_REQUEST_LEVEL_REC.REMOVE_PEGGING_ID_REQUEST.Count > 0) THEN
17579: FOR m in 1..MSC_ATP_PVT.G_REMOVE_REQUEST_LEVEL_REC.REMOVE_PEGGING_ID_REQUEST.COUNT LOOP
17580: MSC_ATP_DB_UTILS.Remove_Invalid_SD_Rec(
17581: MSC_ATP_PVT.G_REMOVE_REQUEST_LEVEL_REC.REMOVE_PEGGING_ID_REQUEST(m),
17582: p_instance_id,
17583: MSC_ATP_PVT.G_REMOVE_REQUEST_LEVEL_REC.REMOVE_PLAN_ID_REQUEST (m),
17584: UNDO,

Line 17613: MSC_ATP_DB_UTILS.Remove_Invalid_SD_Rec(

17609: END IF;
17610:
17611: IF ( MSC_ATP_PVT.G_REMOVE_REQUEST_LEVEL_REC.REMOVE_PEGGING_ID_REQUEST IS NOT NULL AND MSC_ATP_PVT.G_REMOVE_REQUEST_LEVEL_REC.REMOVE_PEGGING_ID_REQUEST.Count > 0) THEN
17612: FOR m in 1..MSC_ATP_PVT.G_REMOVE_REQUEST_LEVEL_REC.REMOVE_PEGGING_ID_REQUEST.COUNT LOOP
17613: MSC_ATP_DB_UTILS.Remove_Invalid_SD_Rec(
17614: MSC_ATP_PVT.G_REMOVE_REQUEST_LEVEL_REC.REMOVE_PEGGING_ID_REQUEST(m) ,
17615: p_instance_id,
17616: MSC_ATP_PVT.G_REMOVE_REQUEST_LEVEL_REC.REMOVE_PLAN_ID_REQUEST(m),
17617: UNDO,

Line 17627: MSC_ATP_DB_UTILS.Undo_Delete_Row(

17623: ((NVL(p_atp_table.calling_module(1), -99) = -99) AND
17624: (l_global_availability = 'Y')) THEN --3720018
17625: IF (l_delete_atp_rec.del_demand_ids IS NOT NULL AND l_delete_atp_rec.del_demand_ids.Count > 0) OR
17626: (l_delete_atp_rec.del_ods_demand_ids IS NOT NULL AND l_delete_atp_rec.del_ods_demand_ids.Count > 0) THEN
17627: MSC_ATP_DB_UTILS.Undo_Delete_Row(
17628: l_delete_atp_rec.del_identifiers,
17629: l_delete_atp_rec.del_plan_ids,
17630: p_instance_id,
17631: l_delete_atp_rec.del_demand_ids,

Line 17686: MSC_ATP_DB_UTILS.Delete_Copy_Demand(MSC_ATP_PVT.G_COPY_DEMAND_ID,

17682: END IF;
17683:
17684: -- Summary enhancement - Delete the copy demands that were created in this transaction if refresh number has moved.
17685: IF MSC_ATP_PVT.G_SUMMARY_FLAG = 'Y' THEN --bug4291375 Delete_Copy_Demand should be called when summary is ON.
17686: MSC_ATP_DB_UTILS.Delete_Copy_Demand(MSC_ATP_PVT.G_COPY_DEMAND_ID,
17687: MSC_ATP_PVT.G_COPY_DEMAND_PLAN_ID,
17688: G_TIME_PHASED_SET,
17689: l_return_status);
17690: END IF;