DBA Data[Home] [Help]

APPS.MSC_ATP_DB_UTILS dependencies on FND_API

Line 509: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

505: x_demand_id,
506: p_atp_rec.refresh_number,
507: l_return_status
508: );
509: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
510: IF PG_DEBUG in ('Y', 'C') THEN
511: msc_sch_wb.atp_debug('Add_Mat_Demand: ' || 'Error occured in procedure Add_PF_Bucketed_Demands');
512: END IF;
513: RAISE FND_API.G_EXC_ERROR;

Line 513: RAISE FND_API.G_EXC_ERROR;

509: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
510: IF PG_DEBUG in ('Y', 'C') THEN
511: msc_sch_wb.atp_debug('Add_Mat_Demand: ' || 'Error occured in procedure Add_PF_Bucketed_Demands');
512: END IF;
513: RAISE FND_API.G_EXC_ERROR;
514: END IF;
515:
516: -- Allocated ATP Based on Planning Details -- Agilent changes Begin
517: ELSIF ((MSC_ATP_PVT.G_INV_CTP = 4) AND

Line 663: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

659:
660: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
661: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME , 'Add_Mat_Demand');
662: END IF;
663: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
664: END Add_Mat_Demand;
665:
666:
667: PROCEDURE Add_Pegging(

Line 978: x_return_status := FND_API.G_RET_STS_SUCCESS;

974: msc_sch_wb.atp_debug('Add_Planned_Order: ' || 'p_order_date := ' || p_order_date);
975: msc_sch_wb.atp_debug('Add_Planned_Order: ' || 'p_intransit_lead_time := ' || p_intransit_lead_time);
976: END IF;
977:
978: x_return_status := FND_API.G_RET_STS_SUCCESS;
979:
980: --bug 3766179: Code to create planned order is moved to add_supplies
981: l_supply_rec.instance_id := p_instance_id;
982: l_supply_rec.plan_id := p_plan_id;

Line 1067: x_return_status := FND_API.G_RET_STS_SUCCESS;

1063: msc_sch_wb.atp_debug('Add_Resource_Demand: ' || 'p_unadj_resource_hours := ' || p_unadj_resource_hours); --5093604
1064: msc_sch_wb.atp_debug('Add_Resource_Demand: ' || 'p_touch_time := ' || p_touch_time); --5093604
1065: END IF;
1066:
1067: x_return_status := FND_API.G_RET_STS_SUCCESS;
1068:
1069: -- Insert demand into msc_resource_requirements
1070: INSERT into msc_resource_requirements
1071: (plan_id,

Line 2064: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

2060:
2061: IF PG_DEBUG in ('Y', 'C') THEN
2062: msc_sch_wb.atp_debug('Delete_Row :' || sqlcode || ': ' || sqlerrm);
2063: END IF;
2064: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2065:
2066: END Delete_Row;
2067:
2068:

Line 2123: x_return_status := FND_API.G_RET_STS_SUCCESS;

2119: END IF;
2120:
2121: -- for ods, just need to remove the record from msc_sales_orders
2122: -- initialize API return status to success
2123: x_return_status := FND_API.G_RET_STS_SUCCESS;
2124:
2125: -- rajjain 05/19/2003 bug 2959840
2126: msc_sch_wb.atp_debug('Remove_Invalid_SD_Rec: ' || 'Reset all the global variables ');
2127: -- Begin ATP4drp Allocation not supported for DRP plans.

Line 2827: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

2823: p_quantity,
2824: l_atf_date,
2825: l_return_status
2826: );
2827: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2828: IF PG_DEBUG in ('Y', 'C') THEN
2829: msc_sch_wb.atp_debug('Update_Planned_Order: ' || 'Error occured in procedure Update_PF_Rollup_Supplies');
2830: END IF;
2831: RAISE FND_API.G_EXC_ERROR;

Line 2831: RAISE FND_API.G_EXC_ERROR;

2827: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2828: IF PG_DEBUG in ('Y', 'C') THEN
2829: msc_sch_wb.atp_debug('Update_Planned_Order: ' || 'Error occured in procedure Update_PF_Rollup_Supplies');
2830: END IF;
2831: RAISE FND_API.G_EXC_ERROR;
2832: END IF;
2833:
2834: -- Allocated ATP Based on Planning Details -- Agilent changes Begin
2835: ELSIF ((MSC_ATP_PVT.G_INV_CTP = 4) AND

Line 3072: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

3068: l_po_qty,
3069: l_sd_qty,
3070: l_return_status
3071: );
3072: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
3073: IF PG_DEBUG in ('Y', 'C') THEN
3074: msc_sch_wb.atp_debug('Update_Planned_Order: ' || 'Error occured in procedure Update_PF_Bucketed_Demands');
3075: END IF;
3076: RAISE FND_API.G_EXC_ERROR;

Line 3076: RAISE FND_API.G_EXC_ERROR;

3072: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
3073: IF PG_DEBUG in ('Y', 'C') THEN
3074: msc_sch_wb.atp_debug('Update_Planned_Order: ' || 'Error occured in procedure Update_PF_Bucketed_Demands');
3075: END IF;
3076: RAISE FND_API.G_EXC_ERROR;
3077: END IF;
3078:
3079: -- Allocated ATP Based on Planning Details -- Agilent changes Begin
3080: ELSIF ((MSC_ATP_PVT.G_INV_CTP = 4) AND

Line 3492: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

3488: l_return_status,
3489: p_bkwd_pass_atf_date_qty, --bug3397904
3490: p_atp_rec -- For bug 3226083
3491: );
3492: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
3493: IF PG_DEBUG in ('Y', 'C') THEN
3494: msc_sch_wb.atp_debug('Update_SD_Date: ' || 'Error occured in procedure Move_PF_Bucketed_Demands');
3495: END IF;
3496: RAISE FND_API.G_EXC_ERROR;

Line 3496: RAISE FND_API.G_EXC_ERROR;

3492: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
3493: IF PG_DEBUG in ('Y', 'C') THEN
3494: msc_sch_wb.atp_debug('Update_SD_Date: ' || 'Error occured in procedure Move_PF_Bucketed_Demands');
3495: END IF;
3496: RAISE FND_API.G_EXC_ERROR;
3497: END IF;
3498: -- time_phased_atp changes end
3499:
3500: -- Allocated ATP Based on Planning Details -- Agilent changes Begin

Line 3649: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

3645: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
3646: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME , 'Update_SD_Date');
3647: END IF;
3648:
3649: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3650: END Update_SD_Date;
3651:
3652:
3653: -- NGOEL 7/26/2001, Bug 1661545, if scheduling was unsuccessful, make sure that old demand record is

Line 3989: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

3985: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
3986: FND_MSG_PUB.Add_Exc_Msg (G_PKG_NAME , 'Undo_Delete_Row');
3987: END IF;
3988:
3989: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3990:
3991: END Undo_Delete_Row;
3992:
3993: PROCEDURE DELETE_SUMMARY_ROW (p_identifier IN NUMBER,

Line 4666: x_return_status := FND_API.G_RET_STS_SUCCESS;

4662: IF PG_DEBUG in ('Y', 'C') THEN
4663: msc_sch_wb.atp_debug(' ******** Delete_Copy_Demand Begin *************');
4664: END IF;
4665:
4666: x_return_status := FND_API.G_RET_STS_SUCCESS;
4667:
4668: msc_sch_wb.atp_debug('Delete_Copy_Demand : ' || 'p_copy_demand_ids.COUNT : ' || p_copy_demand_ids.COUNT);
4669:
4670: IF p_copy_demand_ids.COUNT > 0 THEN

Line 4711: x_return_status := FND_API.G_RET_STS_ERROR;

4707: END IF;
4708:
4709: EXCEPTION
4710: WHEN OTHERS THEN
4711: x_return_status := FND_API.G_RET_STS_ERROR;
4712: END Delete_Copy_Demand;
4713:
4714: -- New procedure added for ship_rec_cal project
4715: PROCEDURE Flush_Data_In_Pds(

Line 4722: x_return_status := FND_API.G_RET_STS_SUCCESS;

4718: )
4719: IS
4720:
4721: BEGIN
4722: x_return_status := FND_API.G_RET_STS_SUCCESS;
4723:
4724: IF PG_DEBUG in ('Y', 'C') THEN
4725: msc_sch_wb.atp_debug(' ******** Flush_Data_In_Pds Begin *************');
4726: msc_sch_wb.atp_debug('Flush_Data_In_Pds : ' || 'sch arrival date: ' || p_ship_arrival_date_rec.scheduled_arrival_date);

Line 4755: x_return_status := FND_API.G_RET_STS_ERROR;

4751:
4752: EXCEPTION
4753: WHEN OTHERS THEN
4754: msc_sch_wb.atp_debug('Flush_Data_In_Pds : '||sqlerrm);
4755: x_return_status := FND_API.G_RET_STS_ERROR;
4756:
4757: END Flush_Data_In_Pds;
4758:
4759: -- New procedure added for plan by request date project

Line 4767: x_return_status := FND_API.G_RET_STS_SUCCESS;

4763: )
4764: IS
4765:
4766: BEGIN
4767: x_return_status := FND_API.G_RET_STS_SUCCESS;
4768:
4769:
4770: IF PG_DEBUG in ('Y', 'C') THEN
4771: msc_sch_wb.atp_debug(' ******** Flush_Data_In_Ods Begin *************');

Line 4800: x_return_status := FND_API.G_RET_STS_ERROR;

4796:
4797: EXCEPTION
4798: WHEN OTHERS THEN
4799: msc_sch_wb.atp_debug('Flush_Data_In_Ods : '||sqlerrm);
4800: x_return_status := FND_API.G_RET_STS_ERROR;
4801:
4802: END Flush_Data_In_Ods;
4803:
4804: --bug 3766179: add new procedure to add supplies irrespective of supply type

Line 4834: p_supply_rec_type.return_status := FND_API.G_RET_STS_SUCCESS;

4830: msc_sch_wb.atp_debug('Add_Supplies: ' || 'p_order_date := ' || p_supply_rec_type.order_date);
4831: msc_sch_wb.atp_debug('Add_Supplies: ' || 'p_intransit_lead_time := ' || p_supply_rec_type.intransit_lead_time); --4127630
4832: END IF;
4833:
4834: p_supply_rec_type.return_status := FND_API.G_RET_STS_SUCCESS;
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';

Line 4963: IF p_supply_rec_type.return_status <> FND_API.G_RET_STS_SUCCESS THEN

4959: p_supply_rec_type.atf_date,
4960: p_supply_rec_type.refresh_number,
4961: p_supply_rec_type.return_status
4962: );
4963: IF p_supply_rec_type.return_status <> FND_API.G_RET_STS_SUCCESS THEN
4964: IF PG_DEBUG in ('Y', 'C') THEN
4965: msc_sch_wb.atp_debug('Add_Supplies: ' || 'Error occured in procedure Add_PF_Rollup_Supplies');
4966: END IF;
4967: RAISE FND_API.G_EXC_ERROR;

Line 4967: RAISE FND_API.G_EXC_ERROR;

4963: IF p_supply_rec_type.return_status <> FND_API.G_RET_STS_SUCCESS THEN
4964: IF PG_DEBUG in ('Y', 'C') THEN
4965: msc_sch_wb.atp_debug('Add_Supplies: ' || 'Error occured in procedure Add_PF_Rollup_Supplies');
4966: END IF;
4967: RAISE FND_API.G_EXC_ERROR;
4968: END IF;
4969:
4970: -- Allocated ATP Based on Planning Details -- Agilent changes Begin
4971: ELSIF ((MSC_ATP_PVT.G_INV_CTP = 4) AND

Line 5149: x_return_status := FND_API.G_RET_STS_SUCCESS;

5145: IF PG_DEBUG in ('Y', 'C') THEN
5146: msc_sch_wb.atp_debug('*** Begin Call_delete_row ***');
5147: END IF;
5148:
5149: x_return_status := FND_API.G_RET_STS_SUCCESS;
5150:
5151: l_demand_ids.Extend(p_atp_table.action.count);
5152: l_inv_item_ids.extend(p_atp_table.action.count);
5153: x_delete_atp_rec.error_code.extend(p_atp_table.action.count);

Line 5239: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

5235: IF PG_DEBUG in ('Y', 'C') THEN
5236: msc_sch_wb.atp_debug('Call_delete_row: l_return_status:= ' || l_return_status);
5237: END IF;
5238:
5239: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
5240: IF PG_DEBUG in ('Y', 'C') THEN
5241: msc_sch_wb.atp_debug('Call_delete_row: ' || 'ATP Downtime during Re-schedule');
5242: END IF;
5243: x_return_status := FND_API.G_RET_STS_ERROR;

Line 5243: x_return_status := FND_API.G_RET_STS_ERROR;

5239: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
5240: IF PG_DEBUG in ('Y', 'C') THEN
5241: msc_sch_wb.atp_debug('Call_delete_row: ' || 'ATP Downtime during Re-schedule');
5242: END IF;
5243: x_return_status := FND_API.G_RET_STS_ERROR;
5244: return; -- Return in case of error in get_pf_plan_info, no point in proceding further.
5245: END IF;
5246: /* time_phased_atp changes end*/
5247: IF PG_DEBUG in ('Y', 'C') THEN