[Home] [Help]
27:
28:
29: BEGIN
30: -- initialize API returm status to success
31: x_return_status := FND_API.G_RET_STS_SUCCESS;
32:
33: IF x_dblink IS NOT NULL THEN
34: l_dynstring := '@'||x_dblink;
35: END IF;
112: msc_sch_wb.atp_debug('ATP Invalid Objects Found in put_Into_temp_table ');
113: msc_sch_wb.atp_debug('put_into_temp_table: ' || ' Error in MSCUATPB.pls '||substr(sqlerrm,1,100));
114: END IF;
115: x_msg_data := substr(sqlerrm,1,100);
116: x_return_status := FND_API.G_RET_STS_ERROR;
117: -- IF l_dynstring is null THEN
118: -- ROLLBACK;
119: -- END IF;
120: RAISE MSC_ATP_PUB.ATP_INVALID_OBJECTS_FOUND;
124: IF PG_DEBUG in ('Y', 'C') THEN
125: msc_sch_wb.atp_debug('put_into_temp_table: ' || ' Error in MSCUATPB.pls '||substr(sqlerrm,1,100));
126: END IF;
127: x_msg_data := substr(sqlerrm,1,100);
128: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
129:
130: -- Bug 2458308 : krajan
131: -- Commented out rollbacks
132: -- IF l_dynstring is null THEN
131: -- Commented out rollbacks
132: -- IF l_dynstring is null THEN
133: -- ROLLBACK;
134: -- END IF;
135: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
136:
137: END put_into_temp_table;
138:
139:
168: msc_sch_wb.atp_debug('get_from_temp_table: ' || 'Entering get from temp table');
169: msc_sch_wb.atp_debug('get_from_temp_table: ' || 'p_details_falg := ' || p_details_flag);
170: END IF;
171: -- initialize API returm status to success
172: x_return_status := FND_API.G_RET_STS_SUCCESS;
173:
174: IF x_dblink IS NOT NULL THEN
175: l_dynstring := '@'||x_dblink;
176: END IF;
831:
832: EXCEPTION
833:
834: WHEN MSC_ATP_PUB.ATP_INVALID_OBJECTS_FOUND THEN
835: x_return_status := FND_API.G_RET_STS_ERROR;
836: IF PG_DEBUG in ('Y', 'C') THEN
837: msc_sch_wb.atp_debug('error in get_from_temp_table' || sqlerrm);
838: msc_sch_wb.atp_debug('get_from_temp_table: ' || 'Invalid Objects found');
839: END IF;
839: END IF;
840: RAISE MSC_ATP_PUB.ATP_INVALID_OBJECTS_FOUND;
841:
842: WHEN OTHERS THEN
843: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
844: IF PG_DEBUG in ('Y', 'C') THEN
845: msc_sch_wb.atp_debug('error in get_from_temp_table' || sqlerrm);
846: END IF;
847: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
843: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
844: IF PG_DEBUG in ('Y', 'C') THEN
845: msc_sch_wb.atp_debug('error in get_from_temp_table' || sqlerrm);
846: END IF;
847: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
848:
849: END get_from_temp_table;
850:
851: FUNCTION Call_ATP_11(
1031: || to_char(x_atp_rec_out.Requested_Date_Quantity(1)) );
1032: END IF;
1033:
1034:
1035: IF x_return_status <> FND_API.g_ret_sts_success THEN
1036: FOR j IN 1..x_atp_rec_out.Inventory_Item_Id.COUNT loop
1037: UPDATE mtl_demand_interface set
1038: LAST_UPDATE_DATE = SYSDATE,
1039: Error_Code = X_atp_rec_out.error_code(j),
1291: IF PG_DEBUG in ('Y', 'C') THEN
1292: msc_sch_wb.atp_debug('****Begin put_into_bom_temp_table ****');
1293: END IF;
1294: -- initialize API returm status to success
1295: x_return_status := FND_API.G_RET_STS_SUCCESS;
1296:
1297: IF p_dblink IS NOT NULL THEN
1298: l_dynstring := '@'||p_dblink;
1299: END IF;
1450: IF PG_DEBUG in ('Y', 'C') THEN
1451: msc_sch_wb.atp_debug(' Error in put_into_bom_temp_table '||substr(sqlerrm,1,100));
1452: END IF;
1453: x_msg_data := substr(sqlerrm,1,100);
1454: x_return_status := FND_API.G_RET_STS_ERROR;
1455: END put_into_bom_temp_table;
1456:
1457:
1458: PROCEDURE Put_Period_Data (
3944: IF PG_DEBUG in ('Y', 'C') THEN
3945: msc_sch_wb.atp_debug('Error Occured while transfering the data accros db link');
3946: msc_sch_wb.atp_debug('errro := ' ||SQLERRM);
3947: END IF;
3948: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3949:
3950: END Transfer_Scheduling_data;
3951:
3952: /* Bug 5598066: Function to Truncate demand to 6 decimal places.