DBA Data[Home] [Help]

APPS.MSC_ATP_PROC dependencies on FND_API

Line 213: x_return_status := FND_API.G_RET_STS_SUCCESS;

209: msc_sch_wb.atp_debug('PROCEDURE Get_Alloc_Data_From_Sd_Temp');
210: END IF;
211:
212: -- initialize API return status to success
213: x_return_status := FND_API.G_RET_STS_SUCCESS;
214:
215: SELECT
216: ATP_level
217: ,scenario_id

Line 291: x_return_status := FND_API.G_RET_STS_ERROR;

287: WHEN OTHERS THEN
288: IF PG_DEBUG in ('Y', 'C') THEN
289: msc_sch_wb.atp_debug('Get_Alloc_Data_From_Sd_Temp: ' || 'Error code:' || to_char(sqlcode));
290: END IF;
291: x_return_status := FND_API.G_RET_STS_ERROR;
292:
293: END Get_Alloc_Data_From_Sd_Temp;
294:
295: PROCEDURE Atp_Sources (p_instance_id IN NUMBER,

Line 339: x_return_status := FND_API.G_RET_STS_SUCCESS;

335: IF PG_DEBUG in ('Y', 'C') THEN
336: msc_sch_wb.atp_debug('***** Begin Atp_Sources *********');
337: END IF;
338: -- initialize API return status to success
339: x_return_status := FND_API.G_RET_STS_SUCCESS;
340:
341: IF PG_DEBUG in ('Y', 'C') THEN
342: msc_sch_wb.atp_debug('Atp_Sources: ' || 'p_instance_id = '||p_instance_id);
343: msc_sch_wb.atp_debug('Atp_Sources: ' || 'p_plan_id = '||p_plan_id);

Line 439: --x_return_status := FND_API.G_RET_STS_ERROR;

435: -- If dest inv item id is null return from procedure means this item not collected
436: IF l_dest_ship_set_item_list(l_dest_ship_set_item_list.COUNT) IS NULL THEN
437: --MSC_ATP_PVT.G_SR_INVENTORY_ITEM_ID := p_ship_set_item(i);
438: MSC_ATP_PVT.G_SR_INVENTORY_ITEM_ID := p_item_sourcing_info_rec.sr_inventory_item_id(i);
439: --x_return_status := FND_API.G_RET_STS_ERROR;
440: --return;
441: x_return_status := MSC_ATP_PVT.G_ITEM_NOT_COLL;
442:
443: IF PG_DEBUG in ('Y', 'C') THEN

Line 513: --x_return_status := FND_API.G_RET_STS_ERROR;

509: -- If dest inv item id is null return from procedure means this item not collected
510: IF l_dest_ship_set_item_list(l_dest_ship_set_item_list.COUNT) IS NULL THEN
511: --MSC_ATP_PVT.G_SR_INVENTORY_ITEM_ID := p_ship_set_item(i);
512: MSC_ATP_PVT.G_SR_INVENTORY_ITEM_ID := p_item_sourcing_info_rec.sr_inventory_item_id(i);
513: --x_return_status := FND_API.G_RET_STS_ERROR;
514: --return;
515: x_return_status := MSC_ATP_PVT.G_ITEM_NOT_COLL;
516: IF PG_DEBUG in ('Y', 'C') THEN
517: msc_sch_wb.atp_debug('Atp_Sources: ' || 'Inv Item Id not found for : ' ||

Line 578: --x_return_status := FND_API.G_RET_STS_ERROR;

574: -- If dest inv item id is -1 return from procedure means this item is not collected
575: IF (l_inv_item_id IS NULL) THEN
576: --MSC_ATP_PVT.G_SR_INVENTORY_ITEM_ID := p_inventory_item_id;
577: MSC_ATP_PVT.G_SR_INVENTORY_ITEM_ID := p_item_sourcing_info_rec.sr_inventory_item_id(1);
578: --x_return_status := FND_API.G_RET_STS_ERROR;
579: --return;
580: x_return_status := MSC_ATP_PVT.G_ITEM_NOT_COLL;
581: IF PG_DEBUG in ('Y', 'C') THEN
582: msc_sch_wb.atp_debug('Atp_Sources: ' || 'Inv Item Id not found for : ' ||

Line 628: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN

624: MSC_ATP_PROC.Get_Sources_Info(order_sch_wb.debug_session_id, null, l_customer_id,
625: p_customer_site_id, p_assign_set_id, l_count, x_atp_sources, l_return_status,
626: p_partner_type, p_party_site_id, p_order_line_id ); --2814895
627:
628: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
629: IF PG_DEBUG in ('Y', 'C') THEN
630: msc_sch_wb.atp_debug('Atp_Sources: ' || 'Error occured in procedure Get_Sources_Info');
631: END IF;
632: DELETE MSC_SHIP_SET_TEMP;

Line 633: x_return_status := FND_API.G_RET_STS_ERROR;

629: IF PG_DEBUG in ('Y', 'C') THEN
630: msc_sch_wb.atp_debug('Atp_Sources: ' || 'Error occured in procedure Get_Sources_Info');
631: END IF;
632: DELETE MSC_SHIP_SET_TEMP;
633: x_return_status := FND_API.G_RET_STS_ERROR;
634: return;
635: END IF;
636:
637: --ELSE

Line 807: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN

803: MSC_ATP_PROC.Get_Sources_Info(order_sch_wb.debug_session_id, l_inv_item_id, l_customer_id,
804: p_customer_site_id, p_assign_set_id, null, x_atp_sources, l_return_status,
805: p_partner_type, p_party_site_id, p_order_line_id ); --2814895
806:
807: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
808: IF PG_DEBUG in ('Y', 'C') THEN
809: msc_sch_wb.atp_debug('Atp_Sources: ' || 'Procedure Get_Sources_Info could not find any sources');
810: END IF;
811: x_return_status := FND_API.G_RET_STS_ERROR;

Line 811: x_return_status := FND_API.G_RET_STS_ERROR;

807: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
808: IF PG_DEBUG in ('Y', 'C') THEN
809: msc_sch_wb.atp_debug('Atp_Sources: ' || 'Procedure Get_Sources_Info could not find any sources');
810: END IF;
811: x_return_status := FND_API.G_RET_STS_ERROR;
812: return;
813: END IF;
814:
815:

Line 1544: --x_return_status := FND_API.G_RET_STS_ERROR;

1540: IF PG_DEBUG in ('Y', 'C') THEN
1541: msc_sch_wb.atp_debug('Atp_Sources: ' || 'sqlcode : ' || sqlcode);
1542: msc_sch_wb.atp_debug('Atp_Sources: ' || 'sqlerrm : ' || sqlerrm);
1543: END IF;
1544: --x_return_status := FND_API.G_RET_STS_ERROR;
1545: x_return_status := NVL(x_return_status, FND_API.G_RET_STS_ERROR); -- 4091487
1546: WHEN others THEN
1547: IF PG_DEBUG in ('Y', 'C') THEN
1548: msc_sch_wb.atp_debug('Atp_Sources: ' || 'sqlcode : ' || sqlcode);

Line 1545: x_return_status := NVL(x_return_status, FND_API.G_RET_STS_ERROR); -- 4091487

1541: msc_sch_wb.atp_debug('Atp_Sources: ' || 'sqlcode : ' || sqlcode);
1542: msc_sch_wb.atp_debug('Atp_Sources: ' || 'sqlerrm : ' || sqlerrm);
1543: END IF;
1544: --x_return_status := FND_API.G_RET_STS_ERROR;
1545: x_return_status := NVL(x_return_status, FND_API.G_RET_STS_ERROR); -- 4091487
1546: WHEN others THEN
1547: IF PG_DEBUG in ('Y', 'C') THEN
1548: msc_sch_wb.atp_debug('Atp_Sources: ' || 'sqlcode : ' || sqlcode);
1549: msc_sch_wb.atp_debug('Atp_Sources: ' || 'sqlerrm : ' || sqlerrm);

Line 1551: x_return_status := FND_API.G_RET_STS_ERROR;

1547: IF PG_DEBUG in ('Y', 'C') THEN
1548: msc_sch_wb.atp_debug('Atp_Sources: ' || 'sqlcode : ' || sqlcode);
1549: msc_sch_wb.atp_debug('Atp_Sources: ' || 'sqlerrm : ' || sqlerrm);
1550: END IF;
1551: x_return_status := FND_API.G_RET_STS_ERROR;
1552:
1553:
1554: END Atp_Sources;
1555:

Line 1741: x_return_status := FND_API.G_RET_STS_SUCCESS;

1737: IF PG_DEBUG in ('Y', 'C') THEN
1738: msc_sch_wb.atp_debug('***** Begin Details_Output Procedure *****');
1739: END IF;
1740:
1741: x_return_status := FND_API.G_RET_STS_SUCCESS;
1742:
1743: -- dsting 10/1/02 supply/demand performance enh
1744: -- insert period data into mrp_atp_details_temp to transfer later
1745: -- since bulk binds across dblink are not supported.

Line 2206: x_return_status := FND_API.G_RET_STS_SUCCESS;

2202: IS
2203:
2204: Begin
2205:
2206: x_return_status := FND_API.G_RET_STS_SUCCESS;
2207: p_atp_sources.Organization_Id.EXTEND;
2208: p_atp_sources.Supplier_Id.EXTEND;
2209: p_atp_sources.Supplier_Site_Id.EXTEND;
2210: p_atp_sources.Rank.EXTEND;

Line 4997: x_return_status := FND_API.G_RET_STS_SUCCESS;

4993: msc_sch_wb.atp_debug ('To Instance : ' || p_to_instance_id );
4994: msc_sch_wb.atp_debug ('Session ID : ' || p_session_id);
4995: msc_sch_wb.atp_debug ('Calling Module : ' || p_calling_module);
4996: END IF;
4997: x_return_status := FND_API.G_RET_STS_SUCCESS;
4998:
4999: -- Call Get Regions to pipulate Region level data
5000:
5001: MSC_SATP_FUNC.Get_Regions (

Line 5060: x_return_status := FND_API.G_RET_STS_ERROR;

5056: NULL
5057: );
5058:
5059: if (l_from_location_id is NULL) then
5060: x_return_status := FND_API.G_RET_STS_ERROR;
5061: IF PG_DEBUG in ('Y', 'C') THEN
5062: msc_sch_wb.atp_debug ('Cannot map data to locations ');
5063: END IF;
5064: return;

Line 5222: x_return_status := FND_API.G_RET_STS_ERROR;

5218: if (l_from_location_id is NULL) then
5219: IF PG_DEBUG in ('Y', 'C') THEN
5220: msc_sch_wb.atp_debug ('From location is NULL');
5221: END IF;
5222: x_return_status := FND_API.G_RET_STS_ERROR;
5223: return;
5224: end if;
5225:
5226: IF PG_DEBUG in ('Y', 'C') THEN

Line 5373: x_return_status := FND_API.G_RET_STS_SUCCESS;

5369: msc_sch_wb.atp_debug ('Session ID : ' || p_session_id );
5370: msc_sch_wb.atp_debug ('Ship Method : ' || x_ship_method);
5371: end if;
5372:
5373: x_return_status := FND_API.G_RET_STS_SUCCESS;
5374:
5375: l_to_location_id := -1;
5376:
5377: -- Map customer site ID to location ID using PO (HR) data.

Line 5427: x_return_status := FND_API.G_RET_STS_ERROR;

5423: msc_sch_wb.atp_debug (' Lead Time : ' || x_intransit_time);
5424: end if;
5425:
5426: IF x_intransit_time < 0 THEN
5427: x_return_status := FND_API.G_RET_STS_ERROR;
5428: END IF;
5429:
5430: END ATP_Shipping_Lead_Time;
5431:

Line 5484: x_return_status := FND_API.G_RET_STS_SUCCESS;

5480: msc_sch_wb.atp_debug('Get_Sources_Info: '|| 'p_ship_set_item_count ' || p_ship_set_item_count);
5481: END IF;
5482:
5483: -- Initialize return status and sysdate.
5484: x_return_status := FND_API.G_RET_STS_SUCCESS;
5485: SELECT TRUNC(sysdate) INTO l_sysdate FROM dual;
5486:
5487: SELECT
5488: DECODE(MSRA.ASSIGNMENT_TYPE,

Line 5524: x_return_status := FND_API.G_RET_STS_ERROR;

5520: IF PG_DEBUG in ('Y', 'C') THEN
5521: msc_sch_wb.atp_debug('Get_Sources_Info: '|| 'Checking assignment set id indicates no sources can be found.');
5522: msc_sch_wb.atp_debug('Get_Sources_Info: '|| 'So, not searching in any level. Returning from here itself');
5523: END IF;
5524: x_return_status := FND_API.G_RET_STS_ERROR;
5525: return;
5526: ELSE
5527: IF PG_DEBUG in ('Y', 'C') THEN
5528: FOR l_counter in 1..l_dist_level_type.COUNT LOOP

Line 5619: x_return_status := FND_API.G_RET_STS_ERROR;

5615: IF l_counter = l_dist_level_type.LAST THEN
5616: IF PG_DEBUG in ('Y', 'C') THEN
5617: msc_sch_wb.atp_debug('Get_Sources_Info: '|| 'Could not find sources for the item in the entire search');
5618: END IF;
5619: x_return_status := FND_API.G_RET_STS_ERROR;
5620: return;
5621: ELSE
5622: IF PG_DEBUG in ('Y', 'C') THEN
5623: msc_sch_wb.atp_debug('Get_Sources_Info: '|| 'No sources found at level 1. Continuing search..');

Line 5742: x_return_status := FND_API.G_RET_STS_ERROR;

5738: IF l_counter = l_dist_level_type.LAST THEN
5739: IF PG_DEBUG in ('Y', 'C') THEN
5740: msc_sch_wb.atp_debug('Get_Sources_Info: '|| 'Could not find sources for the item in the entire search');
5741: END IF;
5742: x_return_status := FND_API.G_RET_STS_ERROR;
5743: return;
5744: ELSE
5745: IF PG_DEBUG in ('Y', 'C') THEN
5746: msc_sch_wb.atp_debug('Get_Sources_Info: '|| 'No sources found at level 2. Continuing search..');

Line 5826: x_return_status := FND_API.G_RET_STS_ERROR;

5822: IF l_counter = l_dist_level_type.LAST THEN
5823: IF PG_DEBUG in ('Y', 'C') THEN
5824: msc_sch_wb.atp_debug('Get_Sources_Info: '|| 'Could not find sources for the item in the entire search');
5825: END IF;
5826: x_return_status := FND_API.G_RET_STS_ERROR;
5827: return;
5828: ELSE
5829: IF PG_DEBUG in ('Y', 'C') THEN
5830: msc_sch_wb.atp_debug('Get_Sources_Info: '|| 'No sources found at level 3. Continuing search..');

Line 5909: x_return_status := FND_API.G_RET_STS_ERROR;

5905: IF l_counter = l_dist_level_type.LAST THEN
5906: IF PG_DEBUG in ('Y', 'C') THEN
5907: msc_sch_wb.atp_debug('Get_Sources_Info: '|| 'Could not find sources for the item in the entire search');
5908: END IF;
5909: x_return_status := FND_API.G_RET_STS_ERROR;
5910: return;
5911: ELSE
5912: IF PG_DEBUG in ('Y', 'C') THEN
5913: msc_sch_wb.atp_debug('Get_Sources_Info: '|| 'No sources found at level 4. Continuing search..');

Line 6031: x_return_status := FND_API.G_RET_STS_ERROR;

6027: IF l_counter = l_dist_level_type.LAST THEN
6028: IF PG_DEBUG in ('Y', 'C') THEN
6029: msc_sch_wb.atp_debug('Get_Sources_Info: '|| 'Could not find sources for the item in the entire search');
6030: END IF;
6031: x_return_status := FND_API.G_RET_STS_ERROR;
6032: return;
6033: ELSE
6034: IF PG_DEBUG in ('Y', 'C') THEN
6035: msc_sch_wb.atp_debug('Get_Sources_Info: '|| 'No sources found at level 5. Continuing search..');

Line 6115: x_return_status := FND_API.G_RET_STS_ERROR;

6111: IF l_counter = l_dist_level_type.LAST THEN
6112: IF PG_DEBUG in ('Y', 'C') THEN
6113: msc_sch_wb.atp_debug('Get_Sources_Info: '|| 'Could not find sources for the item in the entire search');
6114: END IF;
6115: x_return_status := FND_API.G_RET_STS_ERROR;
6116: return;
6117: ELSE
6118: IF PG_DEBUG in ('Y', 'C') THEN
6119: msc_sch_wb.atp_debug('Get_Sources_Info: '|| 'No sources found at level 6. Continuing search..');

Line 6197: x_return_status := FND_API.G_RET_STS_ERROR;

6193: IF l_counter = l_dist_level_type.LAST THEN
6194: IF PG_DEBUG in ('Y', 'C') THEN
6195: msc_sch_wb.atp_debug('Get_Sources_Info: '|| 'Could not find sources for the item in the entire search');
6196: END IF;
6197: x_return_status := FND_API.G_RET_STS_ERROR;
6198: return;
6199: ELSE
6200: IF PG_DEBUG in ('Y', 'C') THEN
6201: msc_sch_wb.atp_debug('Get_Sources_Info: '|| 'No sources found at level 7. Continuing search..');

Line 6317: x_return_status := FND_API.G_RET_STS_ERROR;

6313: IF l_counter = l_dist_level_type.LAST THEN
6314: IF PG_DEBUG in ('Y', 'C') THEN
6315: msc_sch_wb.atp_debug('Get_Sources_Info: '|| 'Could not find sources for the item in the entire search');
6316: END IF;
6317: x_return_status := FND_API.G_RET_STS_ERROR;
6318: return;
6319: ELSE
6320: IF PG_DEBUG in ('Y', 'C') THEN
6321: msc_sch_wb.atp_debug('Get_Sources_Info: '|| 'No sources found at level 8. Continuing search..');

Line 6402: x_return_status := FND_API.G_RET_STS_ERROR;

6398: IF l_counter = l_dist_level_type.LAST THEN
6399: IF PG_DEBUG in ('Y', 'C') THEN
6400: msc_sch_wb.atp_debug('Get_Sources_Info: '|| 'Could not find sources for the item in the entire search');
6401: END IF;
6402: x_return_status := FND_API.G_RET_STS_ERROR;
6403: return;
6404: END IF;
6405: END IF;
6406:

Line 6550: x_return_status := FND_API.G_RET_STS_ERROR;

6546: -- No common sources found
6547: IF PG_DEBUG in ('Y', 'C') THEN
6548: msc_sch_wb.atp_debug('Get_Sources_Info: '|| 'No common sources for all the ship set items.');
6549: END IF;
6550: x_return_status := FND_API.G_RET_STS_ERROR;
6551: return;
6552: END IF; -- common sources
6553:
6554: END IF; -- all items of ship set

Line 6562: x_return_status := FND_API.G_RET_STS_ERROR;

6558: IF l_counter = l_dist_level_type.LAST THEN
6559: IF PG_DEBUG in ('Y', 'C') THEN
6560: msc_sch_wb.atp_debug('Get_Sources_Info: '|| 'All items in ship set could not be found in the entire search.');
6561: END IF;
6562: x_return_status := FND_API.G_RET_STS_ERROR;
6563: return;
6564: ELSE
6565: IF PG_DEBUG in ('Y', 'C') THEN
6566: msc_sch_wb.atp_debug('Get_Sources_Info: '|| 'Some more search left. Continuing');

Line 6753: x_return_status := FND_API.G_RET_STS_ERROR;

6749: ELSE
6750: IF PG_DEBUG in ('Y', 'C') THEN
6751: msc_sch_wb.atp_debug('Get_Sources_Info: '|| 'No common sources for the ship set.');
6752: END IF;
6753: x_return_status := FND_API.G_RET_STS_ERROR;
6754: return;
6755: END IF;
6756:
6757: END IF; -- All items in ship set

Line 6766: x_return_status := FND_API.G_RET_STS_ERROR;

6762: IF l_counter = l_dist_level_type.LAST THEN
6763: IF PG_DEBUG in ('Y', 'C') THEN
6764: msc_sch_wb.atp_debug('Get_Sources_Info: '|| 'All items in ship set could not be found in the entire search.');
6765: END IF;
6766: x_return_status := FND_API.G_RET_STS_ERROR;
6767: return;
6768: ELSE
6769: IF PG_DEBUG in ('Y', 'C') THEN
6770: msc_sch_wb.atp_debug('Get_Sources_Info: '|| 'Some more search left. Continuing');

Line 6899: x_return_status := FND_API.G_RET_STS_ERROR;

6895: -- No common sources found
6896: IF PG_DEBUG in ('Y', 'C') THEN
6897: msc_sch_wb.atp_debug('Get_Sources_Info: '|| 'No common sources for all the ship set items.');
6898: END IF;
6899: x_return_status := FND_API.G_RET_STS_ERROR;
6900: return;
6901: END IF; -- common sources
6902:
6903: END IF; -- all items of ship set

Line 6911: x_return_status := FND_API.G_RET_STS_ERROR;

6907: IF l_counter = l_dist_level_type.LAST THEN
6908: IF PG_DEBUG in ('Y', 'C') THEN
6909: msc_sch_wb.atp_debug('Get_Sources_Info: '|| 'All items in ship set could not be found in the entire search.');
6910: END IF;
6911: x_return_status := FND_API.G_RET_STS_ERROR;
6912: return;
6913: ELSE
6914: IF PG_DEBUG in ('Y', 'C') THEN
6915: msc_sch_wb.atp_debug('Get_Sources_Info: '|| 'Some more search left. Continuing');

Line 7042: x_return_status := FND_API.G_RET_STS_ERROR;

7038: -- No common sources found
7039: IF PG_DEBUG in ('Y', 'C') THEN
7040: msc_sch_wb.atp_debug('Get_Sources_Info: '|| 'No common sources for all the ship set items.');
7041: END IF;
7042: x_return_status := FND_API.G_RET_STS_ERROR;
7043: return;
7044: END IF; -- common sources
7045:
7046: END IF; -- all items of ship set

Line 7054: x_return_status := FND_API.G_RET_STS_ERROR;

7050: IF l_counter = l_dist_level_type.LAST THEN
7051: IF PG_DEBUG in ('Y', 'C') THEN
7052: msc_sch_wb.atp_debug('Get_Sources_Info: '|| 'All items in ship set could not be found in the entire search.');
7053: END IF;
7054: x_return_status := FND_API.G_RET_STS_ERROR;
7055: return;
7056: ELSE
7057: IF PG_DEBUG in ('Y', 'C') THEN
7058: msc_sch_wb.atp_debug('Get_Sources_Info: '|| 'Some more search left. Continuing');

Line 7243: x_return_status := FND_API.G_RET_STS_ERROR;

7239: ELSE
7240: IF PG_DEBUG in ('Y', 'C') THEN
7241: msc_sch_wb.atp_debug('Get_Sources_Info: '|| 'No common sources for the ship set.');
7242: END IF;
7243: x_return_status := FND_API.G_RET_STS_ERROR;
7244: return;
7245: END IF;
7246:
7247: END IF; -- All items in ship set

Line 7375: x_return_status := FND_API.G_RET_STS_ERROR;

7371: -- No common sources found
7372: IF PG_DEBUG in ('Y', 'C') THEN
7373: msc_sch_wb.atp_debug('Get_Sources_Info: '|| 'No common sources for all the ship set items.');
7374: END IF;
7375: x_return_status := FND_API.G_RET_STS_ERROR;
7376: return;
7377: END IF; -- common sources
7378:
7379: END IF; -- all items of ship set

Line 7387: x_return_status := FND_API.G_RET_STS_ERROR;

7383: IF l_counter = l_dist_level_type.LAST THEN
7384: IF PG_DEBUG in ('Y', 'C') THEN
7385: msc_sch_wb.atp_debug('Get_Sources_Info: '|| 'All items in ship set could not be found in the entire search.');
7386: END IF;
7387: x_return_status := FND_API.G_RET_STS_ERROR;
7388: return;
7389: ELSE
7390: IF PG_DEBUG in ('Y', 'C') THEN
7391: msc_sch_wb.atp_debug('Get_Sources_Info: '|| 'Some more search left. Continuing');

Line 7517: x_return_status := FND_API.G_RET_STS_ERROR;

7513: -- No common sources found
7514: IF PG_DEBUG in ('Y', 'C') THEN
7515: msc_sch_wb.atp_debug('Get_Sources_Info: '|| 'No common sources for all the ship set items.');
7516: END IF;
7517: x_return_status := FND_API.G_RET_STS_ERROR;
7518: return;
7519: END IF; -- common sources
7520:
7521: END IF; -- all items of ship set

Line 7529: x_return_status := FND_API.G_RET_STS_ERROR;

7525: IF l_counter = l_dist_level_type.LAST THEN
7526: IF PG_DEBUG in ('Y', 'C') THEN
7527: msc_sch_wb.atp_debug('Get_Sources_Info: '|| 'All items in ship set could not be found in the entire search.');
7528: END IF;
7529: x_return_status := FND_API.G_RET_STS_ERROR;
7530: return;
7531: ELSE
7532: IF PG_DEBUG in ('Y', 'C') THEN
7533: msc_sch_wb.atp_debug('Get_Sources_Info: '|| 'Some more search left. Continuing');

Line 7715: x_return_status := FND_API.G_RET_STS_ERROR;

7711: ELSE
7712: IF PG_DEBUG in ('Y', 'C') THEN
7713: msc_sch_wb.atp_debug('Get_Sources_Info: '|| 'No common sources for the ship set.');
7714: END IF;
7715: x_return_status := FND_API.G_RET_STS_ERROR;
7716: return;
7717: END IF;
7718:
7719: END IF; -- All items in ship set

Line 7846: x_return_status := FND_API.G_RET_STS_ERROR;

7842: -- No common sources found
7843: IF PG_DEBUG in ('Y', 'C') THEN
7844: msc_sch_wb.atp_debug('Get_Sources_Info: '|| 'No common sources for all the ship set items.');
7845: END IF;
7846: x_return_status := FND_API.G_RET_STS_ERROR;
7847: return;
7848: END IF; -- common sources
7849:
7850: END IF; -- all items of ship set

Line 7858: x_return_status := FND_API.G_RET_STS_ERROR;

7854: IF l_counter = l_dist_level_type.LAST THEN
7855: IF PG_DEBUG in ('Y', 'C') THEN
7856: msc_sch_wb.atp_debug('Get_Sources_Info: '|| 'All items in ship set could not be found in the entire search.');
7857: END IF;
7858: x_return_status := FND_API.G_RET_STS_ERROR;
7859: return;
7860: END IF;
7861:
7862: END IF; -- l_dist_level_type

Line 7873: x_return_status := FND_API.G_RET_STS_ERROR;

7869: msc_sch_wb.atp_debug('End of Get_Sources Info procedure');
7870: END IF;
7871: EXCEPTION
7872: WHEN OTHERS THEN
7873: x_return_status := FND_API.G_RET_STS_ERROR;
7874: return;
7875:
7876: END Get_Sources_Info;
7877:

Line 8470: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

8466: MSC_ATP_DB_UTILS.Flush_Data_In_Pds(l_ship_arrival_date_rec, l_return_status);
8467: END IF;
8468: END IF;
8469:
8470: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
8471: IF PG_DEBUG in ('Y', 'C') THEN
8472: msc_sch_wb.atp_debug('Update_Set_SD_Dates: ' || 'Error in call to Flush_Data_In_Pds procedure ');
8473: END IF;
8474: RAISE FND_API.G_EXC_ERROR;

Line 8474: RAISE FND_API.G_EXC_ERROR;

8470: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
8471: IF PG_DEBUG in ('Y', 'C') THEN
8472: msc_sch_wb.atp_debug('Update_Set_SD_Dates: ' || 'Error in call to Flush_Data_In_Pds procedure ');
8473: END IF;
8474: RAISE FND_API.G_EXC_ERROR;
8475: END IF;
8476:
8477: /* ship_rec_cal changes end */
8478: END IF;

Line 8958: x_return_status := FND_API.G_RET_STS_SUCCESS;

8954: msc_sch_wb.atp_debug('Get_Process_Effectivity: ' || 'p_requested_quantity = '|| p_requested_quantity);
8955: END IF;
8956:
8957: -- initialize API return status to success
8958: x_return_status := FND_API.G_RET_STS_SUCCESS;
8959:
8960: SELECT a.process_sequence_id,a.routing_sequence_id, a.bill_sequence_id, a.operation_sequence_id --4570421
8961: INTO x_process_seq_id,x_routing_seq_id,x_bill_seq_id, x_op_seq_id
8962: FROM

Line 9022: x_return_status := FND_API.G_RET_STS_ERROR;

9018: msc_sch_wb.atp_debug('Get_Process_Effectivity: ' || 'sqlcode: ' || sqlcode);
9019: x_process_seq_id := null;
9020: x_routing_seq_id := null;
9021: x_bill_seq_id := null;
9022: x_return_status := FND_API.G_RET_STS_ERROR;
9023: END get_process_effectivity;
9024:
9025: -- supplier intransit LT
9026: PROCEDURE Get_Supplier_Regions (p_vendor_site_id IN NUMBER,

Line 9038: x_return_status := FND_API.G_RET_STS_SUCCESS;

9034: msc_sch_wb.atp_debug('*************** Get_Supplier_Regions Begin *************');
9035: msc_sch_wb.atp_debug('Get_Supplier_Regions :' || 'p_vendor_site_id := ' || p_vendor_site_id);
9036: END IF;
9037:
9038: x_return_status := FND_API.G_RET_STS_SUCCESS;
9039:
9040: FOR l_counter IN 1..G_VENDOR_SITE_ID.COUNT LOOP
9041: IF MSC_ATP_PROC.G_VENDOR_SITE_ID(l_counter) = p_vendor_site_id THEN
9042: msc_sch_wb.atp_debug('Get_Supplier_Regions :' || 'Data for site ' || p_vendor_site_id ||

Line 9069: x_return_status := FND_API.G_RET_STS_ERROR;

9065: WHEN OTHERS THEN
9066: IF PG_DEBUG in ('Y', 'C') THEN
9067: msc_sch_wb.atp_debug('Get_Supplier_Regions: ' || 'sqlcode: ' || sqlcode);
9068: END IF;
9069: x_return_status := FND_API.G_RET_STS_ERROR;
9070: END Get_Supplier_Regions;
9071:
9072:
9073: -- supplier intransit LT

Line 9125: x_return_status := FND_API.G_RET_STS_SUCCESS;

9121: l_calling_module NUMBER;
9122: l_return_status VARCHAR2(1);
9123: BEGIN
9124: -- initialize API return status to success
9125: x_return_status := FND_API.G_RET_STS_SUCCESS;
9126:
9127: msc_sch_wb.set_session_id(p_session_id);
9128: IF PG_DEBUG in ('Y', 'C') THEN
9129: msc_sch_wb.atp_debug('***************Begin ATP_Intransit_LT *****************');

Line 9148: x_return_status := FND_API.G_RET_STS_ERROR;

9144: IF p_src_dest = 1 THEN
9145: IF PG_DEBUG in ('Y', 'C') THEN
9146: msc_sch_wb.atp_debug('ATP_Intransit_LT: ' || 'Invalid parameter - supp-org not supported from source');
9147: END IF;
9148: x_return_status := FND_API.G_RET_STS_ERROR;
9149: ELSE
9150: IF PG_DEBUG in ('Y', 'C') THEN
9151: msc_sch_wb.atp_debug('ATP_Intransit_LT: ' || ': supp-org case');
9152: END IF;

Line 9272: x_return_status := FND_API.G_RET_STS_ERROR;

9268: WHEN OTHERS THEN
9269: IF PG_DEBUG in ('Y', 'C') THEN
9270: msc_sch_wb.atp_debug('ATP_Intransit_LT: ' || 'Error code:' || to_char(sqlcode));
9271: END IF;
9272: x_return_status := FND_API.G_RET_STS_ERROR;
9273: END ATP_Intransit_LT;
9274:
9275: END MSC_ATP_PROC;