DBA Data[Home] [Help]

APPS.MSC_ATP_PROC dependencies on FND_API

Line 212: x_return_status := FND_API.G_RET_STS_SUCCESS;

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

Line 290: x_return_status := FND_API.G_RET_STS_ERROR;

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

Line 338: x_return_status := FND_API.G_RET_STS_SUCCESS;

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

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

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

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

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

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

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

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

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

Line 632: x_return_status := FND_API.G_RET_STS_ERROR;

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

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

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

Line 810: x_return_status := FND_API.G_RET_STS_ERROR;

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

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

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

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

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

Line 1550: x_return_status := FND_API.G_RET_STS_ERROR;

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

Line 1740: x_return_status := FND_API.G_RET_STS_SUCCESS;

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

Line 2205: x_return_status := FND_API.G_RET_STS_SUCCESS;

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

Line 4988: x_return_status := FND_API.G_RET_STS_SUCCESS;

4984: msc_sch_wb.atp_debug ('To Instance : ' || p_to_instance_id );
4985: msc_sch_wb.atp_debug ('Session ID : ' || p_session_id);
4986: msc_sch_wb.atp_debug ('Calling Module : ' || p_calling_module);
4987: END IF;
4988: x_return_status := FND_API.G_RET_STS_SUCCESS;
4989:
4990: -- Call Get Regions to pipulate Region level data
4991:
4992: MSC_SATP_FUNC.Get_Regions (

Line 5051: x_return_status := FND_API.G_RET_STS_ERROR;

5047: NULL
5048: );
5049:
5050: if (l_from_location_id is NULL) then
5051: x_return_status := FND_API.G_RET_STS_ERROR;
5052: IF PG_DEBUG in ('Y', 'C') THEN
5053: msc_sch_wb.atp_debug ('Cannot map data to locations ');
5054: END IF;
5055: return;

Line 5213: x_return_status := FND_API.G_RET_STS_ERROR;

5209: if (l_from_location_id is NULL) then
5210: IF PG_DEBUG in ('Y', 'C') THEN
5211: msc_sch_wb.atp_debug ('From location is NULL');
5212: END IF;
5213: x_return_status := FND_API.G_RET_STS_ERROR;
5214: return;
5215: end if;
5216:
5217: IF PG_DEBUG in ('Y', 'C') THEN

Line 5364: x_return_status := FND_API.G_RET_STS_SUCCESS;

5360: msc_sch_wb.atp_debug ('Session ID : ' || p_session_id );
5361: msc_sch_wb.atp_debug ('Ship Method : ' || x_ship_method);
5362: end if;
5363:
5364: x_return_status := FND_API.G_RET_STS_SUCCESS;
5365:
5366: l_to_location_id := -1;
5367:
5368: -- Map customer site ID to location ID using PO (HR) data.

Line 5418: x_return_status := FND_API.G_RET_STS_ERROR;

5414: msc_sch_wb.atp_debug (' Lead Time : ' || x_intransit_time);
5415: end if;
5416:
5417: IF x_intransit_time < 0 THEN
5418: x_return_status := FND_API.G_RET_STS_ERROR;
5419: END IF;
5420:
5421: END ATP_Shipping_Lead_Time;
5422:

Line 5473: x_return_status := FND_API.G_RET_STS_SUCCESS;

5469: msc_sch_wb.atp_debug('Get_Sources_Info: '|| 'p_ship_set_item_count ' || p_ship_set_item_count);
5470: END IF;
5471:
5472: -- Initialize return status and sysdate.
5473: x_return_status := FND_API.G_RET_STS_SUCCESS;
5474: SELECT TRUNC(sysdate) INTO l_sysdate FROM dual;
5475:
5476: SELECT
5477: DECODE(MSRA.ASSIGNMENT_TYPE,

Line 5513: x_return_status := FND_API.G_RET_STS_ERROR;

5509: IF PG_DEBUG in ('Y', 'C') THEN
5510: msc_sch_wb.atp_debug('Get_Sources_Info: '|| 'Checking assignment set id indicates no sources can be found.');
5511: msc_sch_wb.atp_debug('Get_Sources_Info: '|| 'So, not searching in any level. Returning from here itself');
5512: END IF;
5513: x_return_status := FND_API.G_RET_STS_ERROR;
5514: return;
5515: ELSE
5516: IF PG_DEBUG in ('Y', 'C') THEN
5517: FOR l_counter in 1..l_dist_level_type.COUNT LOOP

Line 5608: x_return_status := FND_API.G_RET_STS_ERROR;

5604: IF l_counter = l_dist_level_type.LAST THEN
5605: IF PG_DEBUG in ('Y', 'C') THEN
5606: msc_sch_wb.atp_debug('Get_Sources_Info: '|| 'Could not find sources for the item in the entire search');
5607: END IF;
5608: x_return_status := FND_API.G_RET_STS_ERROR;
5609: return;
5610: ELSE
5611: IF PG_DEBUG in ('Y', 'C') THEN
5612: msc_sch_wb.atp_debug('Get_Sources_Info: '|| 'No sources found at level 1. Continuing search..');

Line 5731: x_return_status := FND_API.G_RET_STS_ERROR;

5727: IF l_counter = l_dist_level_type.LAST THEN
5728: IF PG_DEBUG in ('Y', 'C') THEN
5729: msc_sch_wb.atp_debug('Get_Sources_Info: '|| 'Could not find sources for the item in the entire search');
5730: END IF;
5731: x_return_status := FND_API.G_RET_STS_ERROR;
5732: return;
5733: ELSE
5734: IF PG_DEBUG in ('Y', 'C') THEN
5735: msc_sch_wb.atp_debug('Get_Sources_Info: '|| 'No sources found at level 2. Continuing search..');

Line 5815: x_return_status := FND_API.G_RET_STS_ERROR;

5811: IF l_counter = l_dist_level_type.LAST THEN
5812: IF PG_DEBUG in ('Y', 'C') THEN
5813: msc_sch_wb.atp_debug('Get_Sources_Info: '|| 'Could not find sources for the item in the entire search');
5814: END IF;
5815: x_return_status := FND_API.G_RET_STS_ERROR;
5816: return;
5817: ELSE
5818: IF PG_DEBUG in ('Y', 'C') THEN
5819: msc_sch_wb.atp_debug('Get_Sources_Info: '|| 'No sources found at level 3. Continuing search..');

Line 5898: x_return_status := FND_API.G_RET_STS_ERROR;

5894: IF l_counter = l_dist_level_type.LAST THEN
5895: IF PG_DEBUG in ('Y', 'C') THEN
5896: msc_sch_wb.atp_debug('Get_Sources_Info: '|| 'Could not find sources for the item in the entire search');
5897: END IF;
5898: x_return_status := FND_API.G_RET_STS_ERROR;
5899: return;
5900: ELSE
5901: IF PG_DEBUG in ('Y', 'C') THEN
5902: msc_sch_wb.atp_debug('Get_Sources_Info: '|| 'No sources found at level 4. Continuing search..');

Line 6020: x_return_status := FND_API.G_RET_STS_ERROR;

6016: IF l_counter = l_dist_level_type.LAST THEN
6017: IF PG_DEBUG in ('Y', 'C') THEN
6018: msc_sch_wb.atp_debug('Get_Sources_Info: '|| 'Could not find sources for the item in the entire search');
6019: END IF;
6020: x_return_status := FND_API.G_RET_STS_ERROR;
6021: return;
6022: ELSE
6023: IF PG_DEBUG in ('Y', 'C') THEN
6024: msc_sch_wb.atp_debug('Get_Sources_Info: '|| 'No sources found at level 5. Continuing search..');

Line 6104: x_return_status := FND_API.G_RET_STS_ERROR;

6100: IF l_counter = l_dist_level_type.LAST THEN
6101: IF PG_DEBUG in ('Y', 'C') THEN
6102: msc_sch_wb.atp_debug('Get_Sources_Info: '|| 'Could not find sources for the item in the entire search');
6103: END IF;
6104: x_return_status := FND_API.G_RET_STS_ERROR;
6105: return;
6106: ELSE
6107: IF PG_DEBUG in ('Y', 'C') THEN
6108: msc_sch_wb.atp_debug('Get_Sources_Info: '|| 'No sources found at level 6. Continuing search..');

Line 6186: x_return_status := FND_API.G_RET_STS_ERROR;

6182: IF l_counter = l_dist_level_type.LAST THEN
6183: IF PG_DEBUG in ('Y', 'C') THEN
6184: msc_sch_wb.atp_debug('Get_Sources_Info: '|| 'Could not find sources for the item in the entire search');
6185: END IF;
6186: x_return_status := FND_API.G_RET_STS_ERROR;
6187: return;
6188: ELSE
6189: IF PG_DEBUG in ('Y', 'C') THEN
6190: msc_sch_wb.atp_debug('Get_Sources_Info: '|| 'No sources found at level 7. Continuing search..');

Line 6306: x_return_status := FND_API.G_RET_STS_ERROR;

6302: IF l_counter = l_dist_level_type.LAST THEN
6303: IF PG_DEBUG in ('Y', 'C') THEN
6304: msc_sch_wb.atp_debug('Get_Sources_Info: '|| 'Could not find sources for the item in the entire search');
6305: END IF;
6306: x_return_status := FND_API.G_RET_STS_ERROR;
6307: return;
6308: ELSE
6309: IF PG_DEBUG in ('Y', 'C') THEN
6310: msc_sch_wb.atp_debug('Get_Sources_Info: '|| 'No sources found at level 8. Continuing search..');

Line 6391: x_return_status := FND_API.G_RET_STS_ERROR;

6387: IF l_counter = l_dist_level_type.LAST THEN
6388: IF PG_DEBUG in ('Y', 'C') THEN
6389: msc_sch_wb.atp_debug('Get_Sources_Info: '|| 'Could not find sources for the item in the entire search');
6390: END IF;
6391: x_return_status := FND_API.G_RET_STS_ERROR;
6392: return;
6393: END IF;
6394: END IF;
6395:

Line 6539: x_return_status := FND_API.G_RET_STS_ERROR;

6535: -- No common sources found
6536: IF PG_DEBUG in ('Y', 'C') THEN
6537: msc_sch_wb.atp_debug('Get_Sources_Info: '|| 'No common sources for all the ship set items.');
6538: END IF;
6539: x_return_status := FND_API.G_RET_STS_ERROR;
6540: return;
6541: END IF; -- common sources
6542:
6543: END IF; -- all items of ship set

Line 6551: x_return_status := FND_API.G_RET_STS_ERROR;

6547: IF l_counter = l_dist_level_type.LAST THEN
6548: IF PG_DEBUG in ('Y', 'C') THEN
6549: msc_sch_wb.atp_debug('Get_Sources_Info: '|| 'All items in ship set could not be found in the entire search.');
6550: END IF;
6551: x_return_status := FND_API.G_RET_STS_ERROR;
6552: return;
6553: ELSE
6554: IF PG_DEBUG in ('Y', 'C') THEN
6555: msc_sch_wb.atp_debug('Get_Sources_Info: '|| 'Some more search left. Continuing');

Line 6742: x_return_status := FND_API.G_RET_STS_ERROR;

6738: ELSE
6739: IF PG_DEBUG in ('Y', 'C') THEN
6740: msc_sch_wb.atp_debug('Get_Sources_Info: '|| 'No common sources for the ship set.');
6741: END IF;
6742: x_return_status := FND_API.G_RET_STS_ERROR;
6743: return;
6744: END IF;
6745:
6746: END IF; -- All items in ship set

Line 6755: x_return_status := FND_API.G_RET_STS_ERROR;

6751: IF l_counter = l_dist_level_type.LAST THEN
6752: IF PG_DEBUG in ('Y', 'C') THEN
6753: msc_sch_wb.atp_debug('Get_Sources_Info: '|| 'All items in ship set could not be found in the entire search.');
6754: END IF;
6755: x_return_status := FND_API.G_RET_STS_ERROR;
6756: return;
6757: ELSE
6758: IF PG_DEBUG in ('Y', 'C') THEN
6759: msc_sch_wb.atp_debug('Get_Sources_Info: '|| 'Some more search left. Continuing');

Line 6888: x_return_status := FND_API.G_RET_STS_ERROR;

6884: -- No common sources found
6885: IF PG_DEBUG in ('Y', 'C') THEN
6886: msc_sch_wb.atp_debug('Get_Sources_Info: '|| 'No common sources for all the ship set items.');
6887: END IF;
6888: x_return_status := FND_API.G_RET_STS_ERROR;
6889: return;
6890: END IF; -- common sources
6891:
6892: END IF; -- all items of ship set

Line 6900: x_return_status := FND_API.G_RET_STS_ERROR;

6896: IF l_counter = l_dist_level_type.LAST THEN
6897: IF PG_DEBUG in ('Y', 'C') THEN
6898: msc_sch_wb.atp_debug('Get_Sources_Info: '|| 'All items in ship set could not be found in the entire search.');
6899: END IF;
6900: x_return_status := FND_API.G_RET_STS_ERROR;
6901: return;
6902: ELSE
6903: IF PG_DEBUG in ('Y', 'C') THEN
6904: msc_sch_wb.atp_debug('Get_Sources_Info: '|| 'Some more search left. Continuing');

Line 7031: x_return_status := FND_API.G_RET_STS_ERROR;

7027: -- No common sources found
7028: IF PG_DEBUG in ('Y', 'C') THEN
7029: msc_sch_wb.atp_debug('Get_Sources_Info: '|| 'No common sources for all the ship set items.');
7030: END IF;
7031: x_return_status := FND_API.G_RET_STS_ERROR;
7032: return;
7033: END IF; -- common sources
7034:
7035: END IF; -- all items of ship set

Line 7043: x_return_status := FND_API.G_RET_STS_ERROR;

7039: IF l_counter = l_dist_level_type.LAST THEN
7040: IF PG_DEBUG in ('Y', 'C') THEN
7041: msc_sch_wb.atp_debug('Get_Sources_Info: '|| 'All items in ship set could not be found in the entire search.');
7042: END IF;
7043: x_return_status := FND_API.G_RET_STS_ERROR;
7044: return;
7045: ELSE
7046: IF PG_DEBUG in ('Y', 'C') THEN
7047: msc_sch_wb.atp_debug('Get_Sources_Info: '|| 'Some more search left. Continuing');

Line 7232: x_return_status := FND_API.G_RET_STS_ERROR;

7228: ELSE
7229: IF PG_DEBUG in ('Y', 'C') THEN
7230: msc_sch_wb.atp_debug('Get_Sources_Info: '|| 'No common sources for the ship set.');
7231: END IF;
7232: x_return_status := FND_API.G_RET_STS_ERROR;
7233: return;
7234: END IF;
7235:
7236: END IF; -- All items in ship set

Line 7364: x_return_status := FND_API.G_RET_STS_ERROR;

7360: -- No common sources found
7361: IF PG_DEBUG in ('Y', 'C') THEN
7362: msc_sch_wb.atp_debug('Get_Sources_Info: '|| 'No common sources for all the ship set items.');
7363: END IF;
7364: x_return_status := FND_API.G_RET_STS_ERROR;
7365: return;
7366: END IF; -- common sources
7367:
7368: END IF; -- all items of ship set

Line 7376: x_return_status := FND_API.G_RET_STS_ERROR;

7372: IF l_counter = l_dist_level_type.LAST THEN
7373: IF PG_DEBUG in ('Y', 'C') THEN
7374: msc_sch_wb.atp_debug('Get_Sources_Info: '|| 'All items in ship set could not be found in the entire search.');
7375: END IF;
7376: x_return_status := FND_API.G_RET_STS_ERROR;
7377: return;
7378: ELSE
7379: IF PG_DEBUG in ('Y', 'C') THEN
7380: msc_sch_wb.atp_debug('Get_Sources_Info: '|| 'Some more search left. Continuing');

Line 7506: x_return_status := FND_API.G_RET_STS_ERROR;

7502: -- No common sources found
7503: IF PG_DEBUG in ('Y', 'C') THEN
7504: msc_sch_wb.atp_debug('Get_Sources_Info: '|| 'No common sources for all the ship set items.');
7505: END IF;
7506: x_return_status := FND_API.G_RET_STS_ERROR;
7507: return;
7508: END IF; -- common sources
7509:
7510: END IF; -- all items of ship set

Line 7518: x_return_status := FND_API.G_RET_STS_ERROR;

7514: IF l_counter = l_dist_level_type.LAST THEN
7515: IF PG_DEBUG in ('Y', 'C') THEN
7516: msc_sch_wb.atp_debug('Get_Sources_Info: '|| 'All items in ship set could not be found in the entire search.');
7517: END IF;
7518: x_return_status := FND_API.G_RET_STS_ERROR;
7519: return;
7520: ELSE
7521: IF PG_DEBUG in ('Y', 'C') THEN
7522: msc_sch_wb.atp_debug('Get_Sources_Info: '|| 'Some more search left. Continuing');

Line 7704: x_return_status := FND_API.G_RET_STS_ERROR;

7700: ELSE
7701: IF PG_DEBUG in ('Y', 'C') THEN
7702: msc_sch_wb.atp_debug('Get_Sources_Info: '|| 'No common sources for the ship set.');
7703: END IF;
7704: x_return_status := FND_API.G_RET_STS_ERROR;
7705: return;
7706: END IF;
7707:
7708: END IF; -- All items in ship set

Line 7835: x_return_status := FND_API.G_RET_STS_ERROR;

7831: -- No common sources found
7832: IF PG_DEBUG in ('Y', 'C') THEN
7833: msc_sch_wb.atp_debug('Get_Sources_Info: '|| 'No common sources for all the ship set items.');
7834: END IF;
7835: x_return_status := FND_API.G_RET_STS_ERROR;
7836: return;
7837: END IF; -- common sources
7838:
7839: END IF; -- all items of ship set

Line 7847: x_return_status := FND_API.G_RET_STS_ERROR;

7843: IF l_counter = l_dist_level_type.LAST THEN
7844: IF PG_DEBUG in ('Y', 'C') THEN
7845: msc_sch_wb.atp_debug('Get_Sources_Info: '|| 'All items in ship set could not be found in the entire search.');
7846: END IF;
7847: x_return_status := FND_API.G_RET_STS_ERROR;
7848: return;
7849: END IF;
7850:
7851: END IF; -- l_dist_level_type

Line 7862: x_return_status := FND_API.G_RET_STS_ERROR;

7858: msc_sch_wb.atp_debug('End of Get_Sources Info procedure');
7859: END IF;
7860: EXCEPTION
7861: WHEN OTHERS THEN
7862: x_return_status := FND_API.G_RET_STS_ERROR;
7863: return;
7864:
7865: END Get_Sources_Info;
7866:

Line 8459: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

8455: MSC_ATP_DB_UTILS.Flush_Data_In_Pds(l_ship_arrival_date_rec, l_return_status);
8456: END IF;
8457: END IF;
8458:
8459: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
8460: IF PG_DEBUG in ('Y', 'C') THEN
8461: msc_sch_wb.atp_debug('Update_Set_SD_Dates: ' || 'Error in call to Flush_Data_In_Pds procedure ');
8462: END IF;
8463: RAISE FND_API.G_EXC_ERROR;

Line 8463: RAISE FND_API.G_EXC_ERROR;

8459: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
8460: IF PG_DEBUG in ('Y', 'C') THEN
8461: msc_sch_wb.atp_debug('Update_Set_SD_Dates: ' || 'Error in call to Flush_Data_In_Pds procedure ');
8462: END IF;
8463: RAISE FND_API.G_EXC_ERROR;
8464: END IF;
8465:
8466: /* ship_rec_cal changes end */
8467: END IF;

Line 8947: x_return_status := FND_API.G_RET_STS_SUCCESS;

8943: msc_sch_wb.atp_debug('Get_Process_Effectivity: ' || 'p_requested_quantity = '|| p_requested_quantity);
8944: END IF;
8945:
8946: -- initialize API return status to success
8947: x_return_status := FND_API.G_RET_STS_SUCCESS;
8948:
8949: SELECT a.process_sequence_id,a.routing_sequence_id, a.bill_sequence_id, a.operation_sequence_id --4570421
8950: INTO x_process_seq_id,x_routing_seq_id,x_bill_seq_id, x_op_seq_id
8951: FROM

Line 9009: x_return_status := FND_API.G_RET_STS_ERROR;

9005: msc_sch_wb.atp_debug('Get_Process_Effectivity: ' || 'sqlcode: ' || sqlcode);
9006: x_process_seq_id := null;
9007: x_routing_seq_id := null;
9008: x_bill_seq_id := null;
9009: x_return_status := FND_API.G_RET_STS_ERROR;
9010: END get_process_effectivity;
9011:
9012: -- supplier intransit LT
9013: PROCEDURE Get_Supplier_Regions (p_vendor_site_id IN NUMBER,

Line 9025: x_return_status := FND_API.G_RET_STS_SUCCESS;

9021: msc_sch_wb.atp_debug('*************** Get_Supplier_Regions Begin *************');
9022: msc_sch_wb.atp_debug('Get_Supplier_Regions :' || 'p_vendor_site_id := ' || p_vendor_site_id);
9023: END IF;
9024:
9025: x_return_status := FND_API.G_RET_STS_SUCCESS;
9026:
9027: FOR l_counter IN 1..G_VENDOR_SITE_ID.COUNT LOOP
9028: IF MSC_ATP_PROC.G_VENDOR_SITE_ID(l_counter) = p_vendor_site_id THEN
9029: msc_sch_wb.atp_debug('Get_Supplier_Regions :' || 'Data for site ' || p_vendor_site_id ||

Line 9056: x_return_status := FND_API.G_RET_STS_ERROR;

9052: WHEN OTHERS THEN
9053: IF PG_DEBUG in ('Y', 'C') THEN
9054: msc_sch_wb.atp_debug('Get_Supplier_Regions: ' || 'sqlcode: ' || sqlcode);
9055: END IF;
9056: x_return_status := FND_API.G_RET_STS_ERROR;
9057: END Get_Supplier_Regions;
9058:
9059:
9060: -- supplier intransit LT

Line 9112: x_return_status := FND_API.G_RET_STS_SUCCESS;

9108: l_calling_module NUMBER;
9109: l_return_status VARCHAR2(1);
9110: BEGIN
9111: -- initialize API return status to success
9112: x_return_status := FND_API.G_RET_STS_SUCCESS;
9113:
9114: msc_sch_wb.set_session_id(p_session_id);
9115: IF PG_DEBUG in ('Y', 'C') THEN
9116: msc_sch_wb.atp_debug('***************Begin ATP_Intransit_LT *****************');

Line 9135: x_return_status := FND_API.G_RET_STS_ERROR;

9131: IF p_src_dest = 1 THEN
9132: IF PG_DEBUG in ('Y', 'C') THEN
9133: msc_sch_wb.atp_debug('ATP_Intransit_LT: ' || 'Invalid parameter - supp-org not supported from source');
9134: END IF;
9135: x_return_status := FND_API.G_RET_STS_ERROR;
9136: ELSE
9137: IF PG_DEBUG in ('Y', 'C') THEN
9138: msc_sch_wb.atp_debug('ATP_Intransit_LT: ' || ': supp-org case');
9139: END IF;

Line 9259: x_return_status := FND_API.G_RET_STS_ERROR;

9255: WHEN OTHERS THEN
9256: IF PG_DEBUG in ('Y', 'C') THEN
9257: msc_sch_wb.atp_debug('ATP_Intransit_LT: ' || 'Error code:' || to_char(sqlcode));
9258: END IF;
9259: x_return_status := FND_API.G_RET_STS_ERROR;
9260: END ATP_Intransit_LT;
9261:
9262: END MSC_ATP_PROC;