DBA Data[Home] [Help]

APPS.OE_ORDER_PURGE_PVT dependencies on FND_API

Line 1310: l_return_status VARCHAR2(1) := FND_API.G_TRUE;

1306: , p_expiration_date IN DATE DEFAULT NULL
1307: )
1308: IS
1309:
1310: l_return_status VARCHAR2(1) := FND_API.G_TRUE;
1311: l_error_message VARCHAR2(2000);
1312: l_temp_mesg VARCHAR2(2000);
1313: l_is_purgable VARCHAR2(1);
1314: l_order_type_name VARCHAR2(30);

Line 1345: IF l_return_status = FND_API.G_TRUE THEN

1341:
1342: IF OE_CODE_CONTROL.Get_Code_Release_Level >= '110510'
1343: AND nvl(l_transaction_phase_code,'F')='N' THEN
1344:
1345: IF l_return_status = FND_API.G_TRUE THEN
1346:
1347: FND_MESSAGE.SET_NAME('ONT','OE_PUR_OPEN_QUOTE');
1348: l_temp_mesg := FND_MESSAGE.GET_ENCODED;
1349: FND_MESSAGE.SET_ENCODED(l_temp_mesg);

Line 1356: IF l_return_status = FND_API.G_TRUE THEN

1352:
1353: END IF;
1354:
1355: ELSE
1356: IF l_return_status = FND_API.G_TRUE THEN
1357: FND_MESSAGE.SET_NAME('ONT','OE_PUR_OPEN_ORDER');
1358: l_temp_mesg := FND_MESSAGE.GET_ENCODED;
1359: FND_MESSAGE.SET_ENCODED(l_temp_mesg);
1360: l_error_message := FND_MESSAGE.GET;

Line 1366: IF l_return_status = FND_API.G_TRUE THEN

1362: l_return_status := OE_ORDER_PURGE_PVT.Check_Open_Orders
1363: ( p_header_id);
1364: END IF;
1365:
1366: IF l_return_status = FND_API.G_TRUE THEN
1367:
1368: SELECT otl.name
1369: INTO l_order_type_name
1370: FROM oe_transaction_types_tl otl,

Line 1386: IF l_return_status = FND_API.G_TRUE THEN

1382: l_return_status := OE_ORDER_PURGE_PVT.check_open_invoiced_orders
1383: ( TO_CHAR(p_order_number), l_order_type_name );
1384: END IF;
1385:
1386: IF l_return_status = FND_API.G_TRUE THEN
1387: FND_MESSAGE.SET_NAME('ONT','OE_PUR_OPEN_RETURNS');
1388: l_temp_mesg := FND_MESSAGE.GET_ENCODED;
1389: FND_MESSAGE.SET_ENCODED(l_temp_mesg);
1390: l_error_message := FND_MESSAGE.GET;

Line 1395: IF l_return_status = FND_API.G_TRUE THEN

1391: l_return_status := OE_ORDER_PURGE_PVT.check_open_returns
1392: (p_order_number, p_order_type_name);
1393: END IF;
1394:
1395: IF l_return_status = FND_API.G_TRUE THEN
1396: Check_Open_RMA_Receipts(p_header_id,
1397: l_return_status, l_error_message);
1398: END IF;
1399:

Line 1401: IF l_return_status = FND_API.G_TRUE THEN

1397: l_return_status, l_error_message);
1398: END IF;
1399:
1400: -- 3789233
1401: IF l_return_status = FND_API.G_TRUE THEN
1402: FND_MESSAGE.SET_NAME('ONT','OE_PUR_OPEN_DELIVERIES');
1403: l_temp_mesg := FND_MESSAGE.GET_ENCODED;
1404: FND_MESSAGE.SET_ENCODED(l_temp_mesg);
1405: l_error_message := FND_MESSAGE.GET;

Line 1423: l_return_status := FND_API.G_FALSE;

1419: )
1420: )
1421: );
1422: IF l_cnt > 0 THEN
1423: l_return_status := FND_API.G_FALSE;
1424: END IF;
1425: END IF;
1426:
1427: -- Purge Changes for 11i.10

Line 1429: IF l_return_status = FND_API.G_TRUE THEN

1425: END IF;
1426:
1427: -- Purge Changes for 11i.10
1428:
1429: IF l_return_status = FND_API.G_TRUE THEN
1430:
1431: IF PO_CODE_RELEASE_GRP.Current_Release >=
1432: PO_CODE_RELEASE_GRP.PRC_11i_Family_Pack_J AND
1433: OE_CODE_CONTROL.Code_Release_Level >= '110510' THEN

Line 1440: IF l_return_status = FND_API.G_FALSE THEN

1436: OE_ORDER_PURGE_PVT.Check_Open_PO_Reqs_Dropship
1437: (p_header_id => p_header_id
1438: );
1439:
1440: IF l_return_status = FND_API.G_FALSE THEN
1441:
1442: FND_MESSAGE.SET_NAME('ONT','OE_PURGE_OPEN_PO_REQ');
1443: l_temp_mesg := FND_MESSAGE.GET_ENCODED;
1444: FND_MESSAGE.SET_ENCODED(l_temp_mesg);

Line 1453: IF l_return_status = FND_API.G_TRUE THEN

1449: END IF;
1450: END IF;
1451: END IF;
1452:
1453: IF l_return_status = FND_API.G_TRUE THEN
1454: l_error_message := NULL;
1455: l_is_purgable := 'Y' ;
1456: ELSE
1457: l_error_message := l_error_message;

Line 1637: IF l_return_status = FND_API.G_RET_STS_SUCCESS THEN

1633: END;
1634:
1635: BEGIN
1636:
1637: IF l_return_status = FND_API.G_RET_STS_SUCCESS THEN
1638: OE_ORDER_PURGE_PVT.oe_purge_lines
1639: (p_purge_set_id,
1640: l_header_id,
1641: l_return_status

Line 1652: IF l_return_status = FND_API.G_RET_STS_SUCCESS THEN

1648: WHEN OTHERS THEN
1649: NULL;
1650: END;
1651:
1652: IF l_return_status = FND_API.G_RET_STS_SUCCESS THEN
1653:
1654: UPDATE OE_PURGE_ORDERS
1655: SET IS_PURGED = 'Y'
1656: WHERE purge_set_id = p_purge_set_id

Line 1709: l_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1705: -- End of MOAC Changes
1706:
1707: EXCEPTION -- Exception handler to record error
1708: WHEN OTHERS THEN
1709: l_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1710:
1711: IF l_savepoint_est = 'Y' THEN
1712: ROLLBACK TO SAVEPOINT ORDER_HEADER;
1713: END IF;

Line 1760: x_return_status := FND_API.G_FALSE;

1756: l_purge_set_name
1757: ,l_purge_set_purged;
1758:
1759: IF nvl(l_purge_set_purged,'N') = 'Y' THEN
1760: x_return_status := FND_API.G_FALSE;
1761: CLOSE c_purge_set;
1762: RETURN;
1763: ELSE
1764: OPEN c_purge_orders;

Line 1771: x_return_status := FND_API.G_FALSE;

1767: FETCH c_purge_orders INTO l_is_purged;
1768: EXIT WHEN c_purge_orders%NOTFOUND OR
1769: c_purge_orders%NOTFOUND IS NULL;
1770:
1771: x_return_status := FND_API.G_FALSE;
1772: CLOSE c_purge_set;
1773: CLOSE c_purge_orders;
1774: RETURN;
1775:

Line 1791: x_return_status := FND_API.G_TRUE;

1787:
1788: CLOSE c_purge_set;
1789: CLOSE c_purge_orders;
1790:
1791: x_return_status := FND_API.G_TRUE;
1792:
1793: oe_debug_pub.add('Exiting OE_Order_Purge_PVT.Delete_Purge_Set : '||to_char(p_purge_set_id),1);
1794:
1795: END Delete_Purge_Set;

Line 1824: RETURN FND_API.G_FALSE;

1820:
1821: CLOSE c_open_quotes;
1822:
1823: IF (NOT l_record_exists) then
1824: RETURN FND_API.G_FALSE;
1825: END IF;
1826: RETURN FND_API.G_TRUE;
1827: END Check_Open_Quotes;
1828:

Line 1826: RETURN FND_API.G_TRUE;

1822:
1823: IF (NOT l_record_exists) then
1824: RETURN FND_API.G_FALSE;
1825: END IF;
1826: RETURN FND_API.G_TRUE;
1827: END Check_Open_Quotes;
1828:
1829:
1830: FUNCTION Check_Open_Orders

Line 1856: RETURN FND_API.G_FALSE;

1852:
1853: CLOSE c_open_orders;
1854:
1855: IF (NOT l_record_exists) then
1856: RETURN FND_API.G_FALSE;
1857: END IF;
1858:
1859: RETURN FND_API.G_TRUE;
1860:

Line 1859: RETURN FND_API.G_TRUE;

1855: IF (NOT l_record_exists) then
1856: RETURN FND_API.G_FALSE;
1857: END IF;
1858:
1859: RETURN FND_API.G_TRUE;
1860:
1861: END Check_Open_Orders;
1862:
1863: FUNCTION Check_Open_Invoiced_Orders

Line 1893: RETURN FND_API.G_TRUE;

1889: l_records_exists := c_oe_ope_invoice%FOUND;
1890: CLOSE c_oe_ope_invoice;
1891:
1892: IF (NOT l_records_exists) THEN
1893: RETURN FND_API.G_TRUE;
1894: END IF;
1895: RETURN FND_API.G_FALSE;
1896:
1897: EXCEPTION

Line 1895: RETURN FND_API.G_FALSE;

1891:
1892: IF (NOT l_records_exists) THEN
1893: RETURN FND_API.G_TRUE;
1894: END IF;
1895: RETURN FND_API.G_FALSE;
1896:
1897: EXCEPTION
1898: WHEN OTHERS THEN
1899: RETURN FND_API.G_TRUE;

Line 1899: RETURN FND_API.G_TRUE;

1895: RETURN FND_API.G_FALSE;
1896:
1897: EXCEPTION
1898: WHEN OTHERS THEN
1899: RETURN FND_API.G_TRUE;
1900:
1901: END Check_Open_Invoiced_Orders;
1902:
1903: FUNCTION Check_Open_Returns

Line 1941: RETURN FND_API.G_TRUE;

1937: l_records_exists := c_open_returns%FOUND;
1938: CLOSE c_open_returns;
1939:
1940: IF (NOT l_records_exists) THEN
1941: RETURN FND_API.G_TRUE;
1942: END IF;
1943:
1944: RETURN FND_API.G_FALSE;
1945:

Line 1944: RETURN FND_API.G_FALSE;

1940: IF (NOT l_records_exists) THEN
1941: RETURN FND_API.G_TRUE;
1942: END IF;
1943:
1944: RETURN FND_API.G_FALSE;
1945:
1946: EXCEPTION
1947: WHEN OTHERS THEN
1948: RETURN FND_API.G_FALSE;

Line 1948: RETURN FND_API.G_FALSE;

1944: RETURN FND_API.G_FALSE;
1945:
1946: EXCEPTION
1947: WHEN OTHERS THEN
1948: RETURN FND_API.G_FALSE;
1949: END Check_Open_Returns;
1950:
1951: PROCEDURE Check_Open_RMA_Receipts
1952: ( p_header_id IN NUMBER,

Line 1975: x_return_status := FND_API.G_FALSE;

1971: l_return_status,x_message);
1972:
1973: IF l_return_status = 'FALSE' THEN
1974: CLOSE c_return_lines;
1975: x_return_status := FND_API.G_FALSE;
1976: RETURN;
1977: END IF;
1978: END LOOP;
1979:

Line 1981: x_return_status := FND_API.G_TRUE;

1977: END IF;
1978: END LOOP;
1979:
1980: CLOSE c_return_lines;
1981: x_return_status := FND_API.G_TRUE;
1982:
1983: EXCEPTION
1984: WHEN OTHERS THEN
1985: x_return_status := FND_API.G_FALSE;

Line 1985: x_return_status := FND_API.G_FALSE;

1981: x_return_status := FND_API.G_TRUE;
1982:
1983: EXCEPTION
1984: WHEN OTHERS THEN
1985: x_return_status := FND_API.G_FALSE;
1986:
1987: END Check_Open_RMA_Receipts;
1988:
1989: -- Purge Changes for 11i.10

Line 2045: ,p_init_msg_list => FND_API.G_FALSE

2041: END IF;
2042:
2043: PO_OM_INTEGRATION_GRP.Validate_Purge
2044: ( p_api_version => 1.0
2045: ,p_init_msg_list => FND_API.G_FALSE
2046: ,p_commit => FND_API.G_FALSE
2047: ,p_entity => 'PO_LINE_LOCATIONS'
2048: ,p_entity_id_tbl => l_entity_id_tbl
2049: ,x_return_status => l_return_status

Line 2046: ,p_commit => FND_API.G_FALSE

2042:
2043: PO_OM_INTEGRATION_GRP.Validate_Purge
2044: ( p_api_version => 1.0
2045: ,p_init_msg_list => FND_API.G_FALSE
2046: ,p_commit => FND_API.G_FALSE
2047: ,p_entity => 'PO_LINE_LOCATIONS'
2048: ,p_entity_id_tbl => l_entity_id_tbl
2049: ,x_return_status => l_return_status
2050: ,x_msg_count => l_msg_count

Line 2059: IF l_return_status = FND_API.G_RET_STS_SUCCESS THEN

2055: IF l_debug_level > 0 THEN
2056: OE_DEBUG_PUB.Add('After Calling PO Validate_Purge...'||l_return_status,1);
2057: END IF;
2058:
2059: IF l_return_status = FND_API.G_RET_STS_SUCCESS THEN
2060:
2061: FOR J in 1..l_purge_allowed_tbl.COUNT LOOP
2062:
2063: IF l_purge_allowed_tbl(J) = 'N' THEN

Line 2073: RETURN FND_API.G_FALSE;

2069: END IF;
2070:
2071: -- Return False if record Exists
2072:
2073: RETURN FND_API.G_FALSE;
2074:
2075: END IF;
2076:
2077: END LOOP;

Line 2078: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN

2074:
2075: END IF;
2076:
2077: END LOOP;
2078: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2079: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2080: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
2081:
2082: OE_MSG_PUB.Add_Text(l_msg_data);

Line 2079: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

2075: END IF;
2076:
2077: END LOOP;
2078: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2079: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2080: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
2081:
2082: OE_MSG_PUB.Add_Text(l_msg_data);
2083:

Line 2080: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN

2076:
2077: END LOOP;
2078: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2079: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2080: ELSIF l_return_status = FND_API.G_RET_STS_ERROR THEN
2081:
2082: OE_MSG_PUB.Add_Text(l_msg_data);
2083:
2084: IF l_debug_level > 0 THEN

Line 2088: RAISE FND_API.G_EXC_ERROR;

2084: IF l_debug_level > 0 THEN
2085: OE_DEBUG_PUB.Add('Errors from Validate Purge: '||l_msg_data,2) ;
2086: END IF;
2087:
2088: RAISE FND_API.G_EXC_ERROR;
2089: END IF;
2090:
2091:
2092: END IF;

Line 2101: RETURN FND_API.G_TRUE;

2097: END IF;
2098:
2099: -- Return True if record Exists
2100:
2101: RETURN FND_API.G_TRUE;
2102:
2103: EXCEPTION
2104: WHEN FND_API.G_EXC_ERROR THEN
2105: IF l_debug_level > 0 THEN

Line 2104: WHEN FND_API.G_EXC_ERROR THEN

2100:
2101: RETURN FND_API.G_TRUE;
2102:
2103: EXCEPTION
2104: WHEN FND_API.G_EXC_ERROR THEN
2105: IF l_debug_level > 0 THEN
2106: OE_DEBUG_PUB.Add('Exp Error in Check_Open_PO_Reqs_Dropship...',4);
2107: END IF;
2108: RAISE;

Line 2110: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

2106: OE_DEBUG_PUB.Add('Exp Error in Check_Open_PO_Reqs_Dropship...',4);
2107: END IF;
2108: RAISE;
2109:
2110: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2111: IF l_debug_level > 0 THEN
2112: OE_DEBUG_PUB.Add('UnExp Error in Check_Open_PO_Reqs_Dropship...'
2113: ||sqlerrm,4);
2114: END IF;

Line 2137: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;

2133: , p_header_id IN NUMBER
2134: , x_return_status OUT NOCOPY /* file.sql.39 change */ VARCHAR2)
2135: IS
2136:
2137: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
2138: l_error_msg VARCHAR2(240);
2139: CURSOR c_lock_header IS
2140: SELECT header_id -- Lock all rows to be purged
2141: FROM oe_order_headers

Line 2235: IF l_return_status = FND_API.G_RET_STS_SUCCESS THEN

2231: OPEN c_lock_header; -- Lock all rows to be purged
2232:
2233: CLOSE c_lock_header;
2234:
2235: IF l_return_status = FND_API.G_RET_STS_SUCCESS THEN
2236: l_return_status := OE_Order_Purge_PVT.OE_Purge_Header_Adj
2237: (
2238: p_purge_set_id => p_purge_set_id,
2239: p_header_id => p_header_id

Line 2247: IF l_return_status = FND_API.G_RET_STS_SUCCESS THEN

2243: x_return_status := l_return_status;
2244: RETURN;
2245: END IF;
2246:
2247: IF l_return_status = FND_API.G_RET_STS_SUCCESS THEN
2248: l_return_status := OE_Order_Purge_PVT.OE_Purge_Price_Attribs
2249: (
2250: p_purge_set_id => p_purge_set_id,
2251: p_header_id => p_header_id

Line 2259: IF l_return_status = FND_API.G_RET_STS_SUCCESS THEN

2255: x_return_status := l_return_status;
2256: RETURN;
2257: END IF;
2258:
2259: IF l_return_status = FND_API.G_RET_STS_SUCCESS THEN
2260: l_return_status := OE_Order_Purge_PVT.OE_Purge_Order_Sales_Credits
2261: (
2262: p_purge_set_id => p_purge_set_id,
2263: p_header_id => p_header_id

Line 2271: IF l_return_status = FND_API.G_RET_STS_SUCCESS THEN

2267: x_return_status := l_return_status;
2268: RETURN;
2269: END IF;
2270:
2271: IF l_return_status = FND_API.G_RET_STS_SUCCESS THEN
2272: l_return_status := OE_Order_Purge_PVT.OE_Purge_Order_Sets
2273: (
2274: p_purge_set_id => p_purge_set_id,
2275: p_header_id => p_header_id

Line 2283: IF l_return_status = FND_API.G_RET_STS_SUCCESS THEN

2279: x_return_status := l_return_status;
2280: RETURN;
2281: END IF;
2282:
2283: IF l_return_status = FND_API.G_RET_STS_SUCCESS THEN
2284: l_return_status := OE_Order_Purge_PVT.OE_Purge_Order_Holds
2285: (
2286: p_purge_set_id => p_purge_set_id,
2287: p_header_id => p_header_id

Line 2296: IF l_return_status = FND_API.G_RET_STS_SUCCESS THEN

2292: RETURN;
2293: END IF;
2294:
2295: -- purge for multiple payments
2296: IF l_return_status = FND_API.G_RET_STS_SUCCESS THEN
2297: l_return_status := OE_Order_Purge_PVT.OE_Purge_Header_payments
2298: ( p_purge_set_id => p_purge_set_id,
2299: p_header_id => p_header_id
2300: );

Line 2308: IF l_return_status = FND_API.G_RET_STS_SUCCESS THEN

2304: END IF;
2305:
2306: -- Delete the attachments.
2307:
2308: IF l_return_status = FND_API.G_RET_STS_SUCCESS THEN
2309: OE_Atchmt_Util.Delete_Attachments
2310: (
2311: p_entity_code => OE_GLOBALS.G_ENTITY_HEADER,
2312: p_entity_id => p_header_id,

Line 2315: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

2311: p_entity_code => OE_GLOBALS.G_ENTITY_HEADER,
2312: p_entity_id => p_header_id,
2313: x_return_status => l_return_status
2314: );
2315: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2316: oe_debug_pub.add('Attachments delete failed : ');
2317: x_return_status := l_return_status;
2318: RETURN;
2319: END IF;

Line 2330: IF l_return_status = FND_API.G_RET_STS_SUCCESS THEN

2326: -- Delete record from CTO tables
2327:
2328: oe_debug_pub.add('Calling CTOs API ',3);
2329:
2330: IF l_return_status = FND_API.G_RET_STS_SUCCESS THEN
2331: CTO_ORDER_PURGE.Cto_Purge_Tables
2332: (
2333: p_header_id => p_header_id,
2334: x_error_msg => l_error_msg,

Line 2340: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

2336: );
2337:
2338: oe_debug_pub.add('Return from CTOs API : '||l_return_status,3);
2339:
2340: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2341:
2342: x_return_status := l_return_status;
2343: ROLLBACK TO SAVEPOINT ORDER_HEADER;
2344: record_errors( l_return_status

Line 2427: x_return_status := FND_API.G_RET_STS_SUCCESS;

2423: oe_debug_pub.add('deleted header='|| to_char(p_header_id));
2424:
2425: oe_debug_pub.add('Exiting OE_ORDER_PURGE_PVT.OE_Purge_Headers : ');
2426:
2427: x_return_status := FND_API.G_RET_STS_SUCCESS;
2428:
2429: EXCEPTION -- Exception handler to record error
2430:
2431: WHEN OTHERS THEN

Line 2433: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2429: EXCEPTION -- Exception handler to record error
2430:
2431: WHEN OTHERS THEN
2432:
2433: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2434: ROLLBACK TO SAVEPOINT ORDER_HEADER;
2435: record_errors( l_return_status
2436: ,p_purge_set_id
2437: ,p_header_id

Line 2452: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;

2448: , x_return_status OUT NOCOPY /* file.sql.39 change */ VARCHAR2)
2449:
2450: IS
2451:
2452: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
2453: l_line_id NUMBER;
2454: l_lock_line_id NUMBER;
2455: l_order_quantity_uom VARCHAR2(3);
2456: l_is_ota_line BOOLEAN;

Line 2527: IF l_return_status = FND_API.G_RET_STS_SUCCESS THEN

2523: OE_DEBUG_PUB.Add('After Calling Delete_Config',1);
2524: END IF;
2525:
2526:
2527: IF l_return_status = FND_API.G_RET_STS_SUCCESS THEN
2528: l_return_status := OE_Order_Purge_PVT.OE_Purge_Line_Adj
2529: (
2530: p_purge_set_id => p_purge_set_id,
2531: p_header_id => p_header_id,

Line 2540: IF l_return_status = FND_API.G_RET_STS_SUCCESS THEN

2536: x_return_status := l_return_status;
2537: RETURN;
2538: END IF;
2539:
2540: IF l_return_status = FND_API.G_RET_STS_SUCCESS THEN
2541: l_return_status := OE_Order_Purge_PVT.OE_Purge_Line_Sales_Credits
2542: (
2543: p_purge_set_id => p_purge_set_id,
2544: p_header_id => p_header_id,

Line 2553: IF l_return_status = FND_API.G_RET_STS_SUCCESS THEN

2549: x_return_status := l_return_status;
2550: RETURN;
2551: END IF;
2552:
2553: IF l_return_status = FND_API.G_RET_STS_SUCCESS THEN
2554: l_return_status := OE_Order_Purge_PVT.OE_Purge_Line_Sets
2555: (
2556: p_purge_set_id => p_purge_set_id,
2557: p_header_id => p_header_id,

Line 2567: IF l_return_status = FND_API.G_RET_STS_SUCCESS THEN

2563: RETURN;
2564: END IF;
2565:
2566: -- purge for multiple payments.
2567: IF l_return_status = FND_API.G_RET_STS_SUCCESS THEN
2568: l_return_status := OE_Order_Purge_PVT.OE_Purge_Line_payments
2569: ( p_purge_set_id => p_purge_set_id,
2570: p_header_id => p_header_id,
2571: p_line_id => l_line_id

Line 2581: IF l_return_status = FND_API.G_RET_STS_SUCCESS THEN

2577:
2578:
2579: oe_debug_pub.add('Before RMA : ',1);
2580:
2581: IF l_return_status = FND_API.G_RET_STS_SUCCESS THEN
2582: IF l_line_category_code = 'RETURN' THEN
2583:
2584: l_return_status := OE_Purge_RMA_Line_Receipts
2585: ( p_purge_set_id => p_purge_set_id,

Line 2599: IF l_return_status = FND_API.G_RET_STS_SUCCESS THEN

2595: END IF;
2596:
2597: oe_debug_pub.add('Before RMA_LOT : ',1);
2598:
2599: IF l_return_status = FND_API.G_RET_STS_SUCCESS THEN
2600: IF l_line_category_code = 'RETURN' THEN
2601:
2602: l_return_status := OE_Purge_RMA_Line_Lot_Srl
2603: ( p_purge_set_id => p_purge_set_id,

Line 2619: IF l_return_status = FND_API.G_RET_STS_SUCCESS THEN

2615: -- Delete the attachments.
2616:
2617: oe_debug_pub.add('Before before attach : ',1);
2618:
2619: IF l_return_status = FND_API.G_RET_STS_SUCCESS THEN
2620: OE_Atchmt_Util.Delete_Attachments
2621: (
2622: p_entity_code => OE_GLOBALS.G_ENTITY_LINE,
2623: p_entity_id => l_line_id,

Line 2626: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

2622: p_entity_code => OE_GLOBALS.G_ENTITY_LINE,
2623: p_entity_id => l_line_id,
2624: x_return_status => l_return_status
2625: );
2626: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2627: oe_debug_pub.add('Attachments delete failed : ');
2628: x_return_status := l_return_status;
2629: RETURN;
2630: END IF;

Line 2666: if l_return_status <> FND_API.G_RET_STS_SUCCESS then

2662: p_order_quantity_uom => l_order_quantity_uom,
2663: p_daemon_type => 'P',
2664: x_return_status => l_return_status);
2665:
2666: if l_return_status <> FND_API.G_RET_STS_SUCCESS then
2667: null;
2668: end if;
2669: End IF;
2670:

Line 2712: ,p_init_msg_list => FND_API.G_FALSE

2708: OE_DEBUG_PUB.Add('Before Calling PO Purge API ');
2709:
2710: PO_OM_INTEGRATION_GRP.Purge
2711: ( p_api_version => 1.0
2712: ,p_init_msg_list => FND_API.G_FALSE
2713: ,p_commit => FND_API.G_FALSE
2714: ,x_return_status => x_return_status
2715: ,x_msg_count => l_msg_count
2716: ,x_msg_data => l_msg_data

Line 2713: ,p_commit => FND_API.G_FALSE

2709:
2710: PO_OM_INTEGRATION_GRP.Purge
2711: ( p_api_version => 1.0
2712: ,p_init_msg_list => FND_API.G_FALSE
2713: ,p_commit => FND_API.G_FALSE
2714: ,x_return_status => x_return_status
2715: ,x_msg_count => l_msg_count
2716: ,x_msg_data => l_msg_data
2717: ,p_entity => 'PO_LINE_LOCATIONS'

Line 2723: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN

2719: );
2720:
2721: OE_DEBUG_PUB.Add('After Calling PO Purge API '||x_return_status);
2722:
2723: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2724: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2725: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
2726: OE_MSG_PUB.Add_Text(l_msg_data);
2727: OE_DEBUG_PUB.Add('Errors from Purge: '||l_msg_data,2) ;

Line 2724: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

2720:
2721: OE_DEBUG_PUB.Add('After Calling PO Purge API '||x_return_status);
2722:
2723: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2724: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2725: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
2726: OE_MSG_PUB.Add_Text(l_msg_data);
2727: OE_DEBUG_PUB.Add('Errors from Purge: '||l_msg_data,2) ;
2728: RAISE FND_API.G_EXC_ERROR;

Line 2725: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN

2721: OE_DEBUG_PUB.Add('After Calling PO Purge API '||x_return_status);
2722:
2723: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2724: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2725: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
2726: OE_MSG_PUB.Add_Text(l_msg_data);
2727: OE_DEBUG_PUB.Add('Errors from Purge: '||l_msg_data,2) ;
2728: RAISE FND_API.G_EXC_ERROR;
2729: END IF;

Line 2728: RAISE FND_API.G_EXC_ERROR;

2724: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2725: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
2726: OE_MSG_PUB.Add_Text(l_msg_data);
2727: OE_DEBUG_PUB.Add('Errors from Purge: '||l_msg_data,2) ;
2728: RAISE FND_API.G_EXC_ERROR;
2729: END IF;
2730: END IF;
2731:
2732:

Line 2739: x_return_status := FND_API.G_RET_STS_SUCCESS;

2735:
2736: oe_debug_pub.add('deleted lines for header='|| to_char(p_header_id));
2737: oe_debug_pub.add('Exiting OE_ORDER_PURGE_PVT.OE_Purge_Lines : ');
2738:
2739: x_return_status := FND_API.G_RET_STS_SUCCESS;
2740:
2741: EXCEPTION -- Exception handler to record error
2742:
2743: WHEN OTHERS THEN

Line 2744: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2740:
2741: EXCEPTION -- Exception handler to record error
2742:
2743: WHEN OTHERS THEN
2744: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2745: ROLLBACK TO SAVEPOINT ORDER_HEADER;
2746: record_errors( l_return_status
2747: ,p_purge_set_id
2748: ,p_header_id

Line 2795: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;

2791: l_price_adj_assoc_id NUMBER;
2792: l_lock_price_adj_assoc_id NUMBER;
2793: l_price_adj_attrib_id NUMBER;
2794: l_lock_price_adj_attrib_id NUMBER;
2795: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
2796:
2797: BEGIN
2798:
2799: oe_debug_pub.add('Entering OE_ORDER_PURGE_PVT.OE_Purge_Header_Adj : '||to_char(p_header_id));

Line 2871: RETURN FND_API.G_RET_STS_SUCCESS;

2867: CLOSE c_header_adj;
2868:
2869: oe_debug_pub.add('Exiting OE_ORDER_PURGE_PVT.OE_Purge_Header_Adj : ');
2870:
2871: RETURN FND_API.G_RET_STS_SUCCESS;
2872:
2873: EXCEPTION -- Exception handler to record error
2874:
2875: WHEN OTHERS THEN

Line 2876: l_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2872:
2873: EXCEPTION -- Exception handler to record error
2874:
2875: WHEN OTHERS THEN
2876: l_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2877: ROLLBACK TO SAVEPOINT ORDER_HEADER;
2878: record_errors( l_return_status
2879: ,p_purge_set_id
2880: ,p_header_id

Line 2926: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;

2922: l_price_adjustment_id NUMBER;
2923: l_lock_adjustment_id NUMBER;
2924: l_price_adj_assoc_id NUMBER;
2925: l_lock_price_adj_assoc_id NUMBER;
2926: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
2927: l_price_adj_attrib_id NUMBER;
2928: l_lock_price_adj_attrib_id NUMBER;
2929:
2930:

Line 3016: RETURN FND_API.G_RET_STS_SUCCESS;

3012: oe_debug_pub.add('Number of price adjustments deleted : '||to_char(c_line_adj%ROWCOUNT),1);
3013: CLOSE c_line_adj;
3014: oe_debug_pub.add('Exiting OE_ORDER_PURGE_PVT.OE_Purge_Line_Adj : ');
3015:
3016: RETURN FND_API.G_RET_STS_SUCCESS;
3017:
3018: EXCEPTION -- Exception handler to record error
3019:
3020: WHEN OTHERS THEN

Line 3021: l_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

3017:
3018: EXCEPTION -- Exception handler to record error
3019:
3020: WHEN OTHERS THEN
3021: l_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3022: ROLLBACK TO SAVEPOINT ORDER_HEADER;
3023: record_errors( l_return_status
3024: ,p_purge_set_id
3025: ,p_header_id

Line 3049: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;

3045: WHERE HEADER_ID = p_header_id;
3046:
3047: l_order_price_attrib_id NUMBER;
3048: l_lock_price_attrib_id NUMBER;
3049: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
3050:
3051: BEGIN
3052:
3053: oe_debug_pub.add('Entering OE_ORDER_PURGE_PVT.OE_Purge_Price_Attribs : '||to_char(p_header_id));

Line 3079: RETURN FND_API.G_RET_STS_SUCCESS;

3075: CLOSE c_order_price_attribs;
3076:
3077: oe_debug_pub.add('Exiting OE_ORDER_PURGE_PVT.OE_Purge_Price_Attribs : ');
3078:
3079: RETURN FND_API.G_RET_STS_SUCCESS;
3080:
3081: EXCEPTION -- Exception handler to record error
3082:
3083: WHEN OTHERS THEN

Line 3084: l_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

3080:
3081: EXCEPTION -- Exception handler to record error
3082:
3083: WHEN OTHERS THEN
3084: l_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3085: ROLLBACK TO SAVEPOINT ORDER_HEADER;
3086: record_errors( l_return_status
3087: ,p_purge_set_id
3088: ,p_header_id

Line 3111: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;

3107: WHERE HEADER_ID = p_header_id;
3108:
3109: l_sales_credit_id NUMBER;
3110: l_lock_sales_credit_id NUMBER;
3111: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
3112:
3113: BEGIN
3114: oe_debug_pub.add('Entering OE_ORDER_PURGE_PVT.OE_Purge_Order_Sales_Credits : '||to_char(p_header_id));
3115:

Line 3140: RETURN FND_API.G_RET_STS_SUCCESS;

3136: oe_debug_pub.add('Number of order sales credit deleted : '||to_char(c_order_sales_credits%ROWCOUNT),1);
3137: CLOSE c_order_sales_credits;
3138:
3139: oe_debug_pub.add('Exiting OE_ORDER_PURGE_PVT.OE_Purge_Order_Sales_Credits : ');
3140: RETURN FND_API.G_RET_STS_SUCCESS;
3141:
3142: EXCEPTION -- Exception handler to record error
3143:
3144: WHEN OTHERS THEN

Line 3145: l_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

3141:
3142: EXCEPTION -- Exception handler to record error
3143:
3144: WHEN OTHERS THEN
3145: l_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3146: ROLLBACK TO SAVEPOINT ORDER_HEADER;
3147: record_errors( l_return_status
3148: ,p_purge_set_id
3149: ,p_header_id

Line 3173: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;

3169: WHERE LINE_ID = p_line_id;
3170:
3171: l_sales_credit_id NUMBER;
3172: l_lock_sales_credit_id NUMBER;
3173: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
3174:
3175: BEGIN
3176:
3177: oe_debug_pub.add('Entering OE_ORDER_PURGE_PVT.OE_Purge_Line_Sales_Credits : '||to_char(p_line_id));

Line 3202: RETURN FND_API.G_RET_STS_SUCCESS;

3198: oe_debug_pub.add('Number of line sales credit deleted : '||to_char(c_line_sales_credits%ROWCOUNT),1);
3199: CLOSE c_line_sales_credits;
3200:
3201: oe_debug_pub.add('Exiting OE_ORDER_PURGE_PVT.OE_Purge_Line_Sales_Credits : ');
3202: RETURN FND_API.G_RET_STS_SUCCESS;
3203:
3204: EXCEPTION -- Exception handler to record error
3205:
3206: WHEN OTHERS THEN

Line 3207: l_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

3203:
3204: EXCEPTION -- Exception handler to record error
3205:
3206: WHEN OTHERS THEN
3207: l_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3208: ROLLBACK TO SAVEPOINT ORDER_HEADER;
3209: record_errors( l_return_status
3210: ,p_purge_set_id
3211: ,p_header_id

Line 3234: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;

3230: WHERE HEADER_ID = p_header_id;
3231:
3232: l_set_id NUMBER;
3233: l_lock_set_id NUMBER;
3234: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
3235:
3236: BEGIN
3237:
3238: oe_debug_pub.add('Entering OE_ORDER_PURGE_PVT.OE_Purge_Order_Sets : '||to_char(p_header_id));

Line 3263: RETURN FND_API.G_RET_STS_SUCCESS;

3259: oe_debug_pub.add('Number of order sets deleted : '||to_char(c_order_sets%ROWCOUNT),1);
3260: CLOSE c_order_sets;
3261:
3262: oe_debug_pub.add('Exiting OE_ORDER_PURGE_PVT.OE_Purge_Order_Sets : ');
3263: RETURN FND_API.G_RET_STS_SUCCESS;
3264:
3265: EXCEPTION -- Exception handler to record error
3266:
3267: WHEN OTHERS THEN

Line 3268: l_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

3264:
3265: EXCEPTION -- Exception handler to record error
3266:
3267: WHEN OTHERS THEN
3268: l_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3269: ROLLBACK TO SAVEPOINT ORDER_HEADER;
3270: record_errors( l_return_status
3271: ,p_purge_set_id
3272: ,p_header_id

Line 3298: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;

3294: l_set_id NUMBER;
3295: l_line_id NUMBER;
3296: l_lock_line_id NUMBER;
3297: l_lock_set_id NUMBER;
3298: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
3299:
3300: BEGIN
3301: oe_debug_pub.add('Entering OE_ORDER_PURGE_PVT.OE_Purge_Line_Sets : '||to_char(p_line_id));
3302:

Line 3329: RETURN FND_API.G_RET_STS_SUCCESS;

3325: oe_debug_pub.add('Number of Line sets deleted : '||to_char(c_line_sets%ROWCOUNT),1);
3326: CLOSE c_line_sets;
3327:
3328: oe_debug_pub.add('Exiting OE_ORDER_PURGE_PVT.OE_Purge_Line_Sets : ');
3329: RETURN FND_API.G_RET_STS_SUCCESS;
3330:
3331: EXCEPTION -- Exception handler to record error
3332:
3333: WHEN OTHERS THEN

Line 3334: l_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

3330:
3331: EXCEPTION -- Exception handler to record error
3332:
3333: WHEN OTHERS THEN
3334: l_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3335: ROLLBACK TO SAVEPOINT ORDER_HEADER;
3336: record_errors( l_return_status
3337: ,p_purge_set_id
3338: ,p_header_id

Line 3379: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;

3375: l_hold_release_id NUMBER;
3376: l_hold_source_id NUMBER;
3377: l_lock_hold_release_id NUMBER;
3378: l_lock_hold_source_id NUMBER;
3379: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
3380: l_count NUMBER := 0; -- bug 6148214
3381:
3382: BEGIN
3383: oe_debug_pub.add('Entering OE_ORDER_PURGE_PVT.OE_Purge_Order_Hold : '||to_char(p_header_id));

Line 3457: RETURN FND_API.G_RET_STS_SUCCESS;

3453: oe_debug_pub.add('Number of order holds deleted : '||to_char(c_order_holds%ROWCOUNT),1);
3454: CLOSE c_order_holds;
3455:
3456: oe_debug_pub.add('Exiting OE_ORDER_PURGE_PVT.OE_Purge_Order_Holds : ');
3457: RETURN FND_API.G_RET_STS_SUCCESS;
3458:
3459: EXCEPTION -- Exception handler to record error
3460:
3461: WHEN OTHERS THEN

Line 3462: l_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

3458:
3459: EXCEPTION -- Exception handler to record error
3460:
3461: WHEN OTHERS THEN
3462: l_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3463: ROLLBACK TO SAVEPOINT ORDER_HEADER;
3464: record_errors( l_return_status
3465: ,p_purge_set_id
3466: ,p_header_id

Line 3488: RETURN FND_API.G_RET_STS_ERROR;

3484:
3485: RCV_RMA_RCPT_PURGE.Purge_Receipts(p_line_id,l_return_status,l_message);
3486:
3487: IF l_return_status = 'FALSE' THEN
3488: RETURN FND_API.G_RET_STS_ERROR;
3489: END IF;
3490:
3491: oe_debug_pub.add('Exiting OE_ORDER_PURGE_PVT.OE_Purge_RMA_Line_Receipts.');
3492: RETURN FND_API.G_RET_STS_SUCCESS;

Line 3492: RETURN FND_API.G_RET_STS_SUCCESS;

3488: RETURN FND_API.G_RET_STS_ERROR;
3489: END IF;
3490:
3491: oe_debug_pub.add('Exiting OE_ORDER_PURGE_PVT.OE_Purge_RMA_Line_Receipts.');
3492: RETURN FND_API.G_RET_STS_SUCCESS;
3493:
3494: EXCEPTION -- Exception handler to record error
3495: WHEN OTHERS THEN
3496: l_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 3496: l_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

3492: RETURN FND_API.G_RET_STS_SUCCESS;
3493:
3494: EXCEPTION -- Exception handler to record error
3495: WHEN OTHERS THEN
3496: l_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3497: ROLLBACK TO SAVEPOINT ORDER_HEADER;
3498: IF l_message is not null then
3499: record_errors( l_return_status
3500: ,p_purge_set_id

Line 3529: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;

3525: WHERE LINE_ID = p_line_id;
3526:
3527: l_lot_serial_id NUMBER;
3528: l_lock_lot_serial_id NUMBER;
3529: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
3530: l_message VARCHAR2(2000);
3531: BEGIN
3532: oe_debug_pub.add('Entering OE_ORDER_PURGE_PVT.OE_Purge_RMA_Line_Lot_Srl: '||to_char(p_line_id));
3533:

Line 3557: RETURN FND_API.G_RET_STS_SUCCESS;

3553:
3554: CLOSE c_line_lot_serials;
3555:
3556: oe_debug_pub.add('Exiting OE_ORDER_PURGE_PVT.OE_Purge_RMA_Line_Lot_Srl.');
3557: RETURN FND_API.G_RET_STS_SUCCESS;
3558:
3559: EXCEPTION -- Exception handler to record error
3560: WHEN OTHERS THEN
3561: l_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 3561: l_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

3557: RETURN FND_API.G_RET_STS_SUCCESS;
3558:
3559: EXCEPTION -- Exception handler to record error
3560: WHEN OTHERS THEN
3561: l_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3562: ROLLBACK TO SAVEPOINT ORDER_HEADER;
3563: record_errors( l_return_status
3564: ,p_purge_set_id
3565: ,p_header_id

Line 3591: IF p_return_status <> FND_API.G_RET_STS_SUCCESS -- If writting a SQL error

3587: ,IS_PURGED = 'N'
3588: WHERE purge_set_id = p_purge_set_id
3589: AND header_id = p_header_id;
3590:
3591: IF p_return_status <> FND_API.G_RET_STS_SUCCESS -- If writting a SQL error
3592: THEN -- then commit the record
3593: COMMIT; -- else (assume) it is commited by the caller
3594: END IF;
3595:

Line 3608: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;

3604: l_header_id NUMBER;
3605: l_lock_header_id NUMBER;
3606: l_payment_number NUMBER;
3607:
3608: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
3609:
3610: Cursor c_header_pmts IS
3611: Select payment_number
3612: From oe_payments

Line 3632: RETURN FND_API.G_RET_STS_SUCCESS;

3628:
3629: END LOOP;
3630: CLOSE c_header_pmts;
3631:
3632: RETURN FND_API.G_RET_STS_SUCCESS;
3633:
3634: EXCEPTION
3635: WHEN OTHERS THEN
3636: l_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 3636: l_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

3632: RETURN FND_API.G_RET_STS_SUCCESS;
3633:
3634: EXCEPTION
3635: WHEN OTHERS THEN
3636: l_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3637: ROLLBACK TO SAVEPOINT ORDER_HEADER;
3638: record_errors( l_return_status
3639: ,p_purge_set_id
3640: ,p_header_id

Line 3658: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;

3654: l_line_id NUMBER;
3655: l_lock_line_id NUMBER;
3656: l_pmt_count NUMBER;
3657: l_payment_number NUMBER;
3658: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
3659:
3660: cursor c_lock_pmts is
3661: select payment_number
3662: from oe_payments

Line 3682: RETURN FND_API.G_RET_STS_SUCCESS;

3678:
3679: END LOOP;
3680: CLOSE c_lock_pmts;
3681:
3682: RETURN FND_API.G_RET_STS_SUCCESS;
3683:
3684: EXCEPTION
3685: WHEN OTHERS THEN
3686: l_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 3686: l_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

3682: RETURN FND_API.G_RET_STS_SUCCESS;
3683:
3684: EXCEPTION
3685: WHEN OTHERS THEN
3686: l_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3687: ROLLBACK TO SAVEPOINT ORDER_HEADER;
3688: record_errors( l_return_status
3689: ,p_purge_set_id
3690: ,p_line_id

Line 3712: l_return_status VARCHAR2(1) := FND_API.G_TRUE;

3708: , p_error_message OUT NOCOPY VARCHAR2
3709: ) IS
3710:
3711:
3712: l_return_status VARCHAR2(1) := FND_API.G_TRUE;
3713: l_error_message VARCHAR2(2000);
3714: l_temp_mesg VARCHAR2(2000);
3715: l_is_purgable VARCHAR2(1);
3716: l_order_type_name VARCHAR2(30);

Line 3765: IF l_return_status = FND_API.G_TRUE THEN

3761:
3762: IF OE_CODE_CONTROL.Get_Code_Release_Level >= '110510'
3763: AND nvl(l_transaction_phase_code,'F')='N' THEN
3764:
3765: IF l_return_status = FND_API.G_TRUE THEN
3766:
3767: FND_MESSAGE.SET_NAME('ONT','OE_PUR_OPEN_QUOTE');
3768: l_temp_mesg := FND_MESSAGE.GET_ENCODED;
3769: FND_MESSAGE.SET_ENCODED(l_temp_mesg);

Line 3777: IF l_return_status = FND_API.G_TRUE THEN

3773: END IF;
3774:
3775: ELSE
3776:
3777: IF l_return_status = FND_API.G_TRUE THEN
3778: FND_MESSAGE.SET_NAME('ONT','OE_PUR_OPEN_ORDER');
3779: l_temp_mesg := FND_MESSAGE.GET_ENCODED;
3780: FND_MESSAGE.SET_ENCODED(l_temp_mesg);
3781: l_error_message := FND_MESSAGE.GET;

Line 3785: IF l_return_status = FND_API.G_TRUE THEN

3781: l_error_message := FND_MESSAGE.GET;
3782: l_return_status := OE_ORDER_PURGE_PVT.Check_Open_Orders( p_header_id);
3783: END IF;
3784:
3785: IF l_return_status = FND_API.G_TRUE THEN
3786:
3787: SELECT otl.name
3788: INTO l_order_type_name
3789: FROM oe_transaction_types_tl otl,

Line 3806: IF l_return_status = FND_API.G_TRUE THEN

3802: ( TO_CHAR(p_order_number), l_order_type_name );
3803: END IF;
3804:
3805:
3806: IF l_return_status = FND_API.G_TRUE THEN
3807: FND_MESSAGE.SET_NAME('ONT','OE_PUR_OPEN_RETURNS');
3808: l_temp_mesg := FND_MESSAGE.GET_ENCODED;
3809: FND_MESSAGE.SET_ENCODED(l_temp_mesg);
3810: l_error_message := FND_MESSAGE.GET;

Line 3816: IF l_return_status = FND_API.G_TRUE THEN

3812: (p_order_number, p_order_type_name);
3813: END IF;
3814:
3815:
3816: IF l_return_status = FND_API.G_TRUE THEN
3817: Check_Open_RMA_Receipts(p_header_id,l_return_status, l_error_message);
3818: END IF;
3819:
3820:

Line 3822: IF l_return_status = FND_API.G_TRUE THEN

3818: END IF;
3819:
3820:
3821:
3822: IF l_return_status = FND_API.G_TRUE THEN
3823: FND_MESSAGE.SET_NAME('ONT','OE_PUR_OPEN_DELIVERIES');
3824: l_temp_mesg := FND_MESSAGE.GET_ENCODED;
3825: FND_MESSAGE.SET_ENCODED(l_temp_mesg);
3826: l_error_message := FND_MESSAGE.GET;

Line 3844: l_return_status := FND_API.G_FALSE;

3840: )
3841: )
3842: );
3843: IF l_cnt > 0 THEN
3844: l_return_status := FND_API.G_FALSE;
3845: END IF;
3846: END IF;
3847:
3848:

Line 3849: IF l_return_status = FND_API.G_TRUE THEN

3845: END IF;
3846: END IF;
3847:
3848:
3849: IF l_return_status = FND_API.G_TRUE THEN
3850:
3851: IF PO_CODE_RELEASE_GRP.Current_Release >=
3852: PO_CODE_RELEASE_GRP.PRC_11i_Family_Pack_J AND
3853: OE_CODE_CONTROL.Code_Release_Level >= '110510' THEN

Line 3859: IF l_return_status = FND_API.G_FALSE THEN

3855: l_return_status :=
3856: OE_ORDER_PURGE_PVT.Check_Open_PO_Reqs_Dropship
3857: (p_header_id => p_header_id );
3858:
3859: IF l_return_status = FND_API.G_FALSE THEN
3860:
3861: FND_MESSAGE.SET_NAME('ONT','OE_PURGE_OPEN_PO_REQ');
3862: l_temp_mesg := FND_MESSAGE.GET_ENCODED;
3863: FND_MESSAGE.SET_ENCODED(l_temp_mesg);

Line 3873: IF l_return_status = FND_API.G_TRUE THEN

3869: END IF;
3870:
3871: END IF;
3872:
3873: IF l_return_status = FND_API.G_TRUE THEN
3874: p_error_message := NULL;
3875: p_is_purgable := 'Y' ;
3876:
3877: ELSE