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 2181: IF l_return_status = FND_API.G_RET_STS_SUCCESS THEN

2177: OPEN c_lock_header; -- Lock all rows to be purged
2178:
2179: CLOSE c_lock_header;
2180:
2181: IF l_return_status = FND_API.G_RET_STS_SUCCESS THEN
2182: l_return_status := OE_Order_Purge_PVT.OE_Purge_Header_Adj
2183: (
2184: p_purge_set_id => p_purge_set_id,
2185: p_header_id => p_header_id

Line 2193: IF l_return_status = FND_API.G_RET_STS_SUCCESS THEN

2189: x_return_status := l_return_status;
2190: RETURN;
2191: END IF;
2192:
2193: IF l_return_status = FND_API.G_RET_STS_SUCCESS THEN
2194: l_return_status := OE_Order_Purge_PVT.OE_Purge_Price_Attribs
2195: (
2196: p_purge_set_id => p_purge_set_id,
2197: p_header_id => p_header_id

Line 2205: IF l_return_status = FND_API.G_RET_STS_SUCCESS THEN

2201: x_return_status := l_return_status;
2202: RETURN;
2203: END IF;
2204:
2205: IF l_return_status = FND_API.G_RET_STS_SUCCESS THEN
2206: l_return_status := OE_Order_Purge_PVT.OE_Purge_Order_Sales_Credits
2207: (
2208: p_purge_set_id => p_purge_set_id,
2209: p_header_id => p_header_id

Line 2217: IF l_return_status = FND_API.G_RET_STS_SUCCESS THEN

2213: x_return_status := l_return_status;
2214: RETURN;
2215: END IF;
2216:
2217: IF l_return_status = FND_API.G_RET_STS_SUCCESS THEN
2218: l_return_status := OE_Order_Purge_PVT.OE_Purge_Order_Sets
2219: (
2220: p_purge_set_id => p_purge_set_id,
2221: p_header_id => p_header_id

Line 2229: IF l_return_status = FND_API.G_RET_STS_SUCCESS THEN

2225: x_return_status := l_return_status;
2226: RETURN;
2227: END IF;
2228:
2229: IF l_return_status = FND_API.G_RET_STS_SUCCESS THEN
2230: l_return_status := OE_Order_Purge_PVT.OE_Purge_Order_Holds
2231: (
2232: p_purge_set_id => p_purge_set_id,
2233: p_header_id => p_header_id

Line 2242: IF l_return_status = FND_API.G_RET_STS_SUCCESS THEN

2238: RETURN;
2239: END IF;
2240:
2241: -- purge for multiple payments
2242: IF l_return_status = FND_API.G_RET_STS_SUCCESS THEN
2243: l_return_status := OE_Order_Purge_PVT.OE_Purge_Header_payments
2244: ( p_purge_set_id => p_purge_set_id,
2245: p_header_id => p_header_id
2246: );

Line 2254: IF l_return_status = FND_API.G_RET_STS_SUCCESS THEN

2250: END IF;
2251:
2252: -- Delete the attachments.
2253:
2254: IF l_return_status = FND_API.G_RET_STS_SUCCESS THEN
2255: OE_Atchmt_Util.Delete_Attachments
2256: (
2257: p_entity_code => OE_GLOBALS.G_ENTITY_HEADER,
2258: p_entity_id => p_header_id,

Line 2261: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

2257: p_entity_code => OE_GLOBALS.G_ENTITY_HEADER,
2258: p_entity_id => p_header_id,
2259: x_return_status => l_return_status
2260: );
2261: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2262: oe_debug_pub.add('Attachments delete failed : ');
2263: x_return_status := l_return_status;
2264: RETURN;
2265: END IF;

Line 2276: IF l_return_status = FND_API.G_RET_STS_SUCCESS THEN

2272: -- Delete record from CTO tables
2273:
2274: oe_debug_pub.add('Calling CTOs API ',3);
2275:
2276: IF l_return_status = FND_API.G_RET_STS_SUCCESS THEN
2277: CTO_ORDER_PURGE.Cto_Purge_Tables
2278: (
2279: p_header_id => p_header_id,
2280: x_error_msg => l_error_msg,

Line 2286: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

2282: );
2283:
2284: oe_debug_pub.add('Return from CTOs API : '||l_return_status,3);
2285:
2286: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2287:
2288: x_return_status := l_return_status;
2289: ROLLBACK TO SAVEPOINT ORDER_HEADER;
2290: record_errors( l_return_status

Line 2373: x_return_status := FND_API.G_RET_STS_SUCCESS;

2369: oe_debug_pub.add('deleted header='|| to_char(p_header_id));
2370:
2371: oe_debug_pub.add('Exiting OE_ORDER_PURGE_PVT.OE_Purge_Headers : ');
2372:
2373: x_return_status := FND_API.G_RET_STS_SUCCESS;
2374:
2375: EXCEPTION -- Exception handler to record error
2376:
2377: WHEN OTHERS THEN

Line 2379: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2375: EXCEPTION -- Exception handler to record error
2376:
2377: WHEN OTHERS THEN
2378:
2379: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2380: ROLLBACK TO SAVEPOINT ORDER_HEADER;
2381: record_errors( l_return_status
2382: ,p_purge_set_id
2383: ,p_header_id

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

2394: , x_return_status OUT NOCOPY /* file.sql.39 change */ VARCHAR2)
2395:
2396: IS
2397:
2398: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
2399: l_line_id NUMBER;
2400: l_lock_line_id NUMBER;
2401: l_order_quantity_uom VARCHAR2(3);
2402: l_is_ota_line BOOLEAN;

Line 2473: IF l_return_status = FND_API.G_RET_STS_SUCCESS THEN

2469: OE_DEBUG_PUB.Add('After Calling Delete_Config',1);
2470: END IF;
2471:
2472:
2473: IF l_return_status = FND_API.G_RET_STS_SUCCESS THEN
2474: l_return_status := OE_Order_Purge_PVT.OE_Purge_Line_Adj
2475: (
2476: p_purge_set_id => p_purge_set_id,
2477: p_header_id => p_header_id,

Line 2486: IF l_return_status = FND_API.G_RET_STS_SUCCESS THEN

2482: x_return_status := l_return_status;
2483: RETURN;
2484: END IF;
2485:
2486: IF l_return_status = FND_API.G_RET_STS_SUCCESS THEN
2487: l_return_status := OE_Order_Purge_PVT.OE_Purge_Line_Sales_Credits
2488: (
2489: p_purge_set_id => p_purge_set_id,
2490: p_header_id => p_header_id,

Line 2499: IF l_return_status = FND_API.G_RET_STS_SUCCESS THEN

2495: x_return_status := l_return_status;
2496: RETURN;
2497: END IF;
2498:
2499: IF l_return_status = FND_API.G_RET_STS_SUCCESS THEN
2500: l_return_status := OE_Order_Purge_PVT.OE_Purge_Line_Sets
2501: (
2502: p_purge_set_id => p_purge_set_id,
2503: p_header_id => p_header_id,

Line 2513: IF l_return_status = FND_API.G_RET_STS_SUCCESS THEN

2509: RETURN;
2510: END IF;
2511:
2512: -- purge for multiple payments.
2513: IF l_return_status = FND_API.G_RET_STS_SUCCESS THEN
2514: l_return_status := OE_Order_Purge_PVT.OE_Purge_Line_payments
2515: ( p_purge_set_id => p_purge_set_id,
2516: p_header_id => p_header_id,
2517: p_line_id => l_line_id

Line 2527: IF l_return_status = FND_API.G_RET_STS_SUCCESS THEN

2523:
2524:
2525: oe_debug_pub.add('Before RMA : ',1);
2526:
2527: IF l_return_status = FND_API.G_RET_STS_SUCCESS THEN
2528: IF l_line_category_code = 'RETURN' THEN
2529:
2530: l_return_status := OE_Purge_RMA_Line_Receipts
2531: ( p_purge_set_id => p_purge_set_id,

Line 2545: IF l_return_status = FND_API.G_RET_STS_SUCCESS THEN

2541: END IF;
2542:
2543: oe_debug_pub.add('Before RMA_LOT : ',1);
2544:
2545: IF l_return_status = FND_API.G_RET_STS_SUCCESS THEN
2546: IF l_line_category_code = 'RETURN' THEN
2547:
2548: l_return_status := OE_Purge_RMA_Line_Lot_Srl
2549: ( p_purge_set_id => p_purge_set_id,

Line 2565: IF l_return_status = FND_API.G_RET_STS_SUCCESS THEN

2561: -- Delete the attachments.
2562:
2563: oe_debug_pub.add('Before before attach : ',1);
2564:
2565: IF l_return_status = FND_API.G_RET_STS_SUCCESS THEN
2566: OE_Atchmt_Util.Delete_Attachments
2567: (
2568: p_entity_code => OE_GLOBALS.G_ENTITY_LINE,
2569: p_entity_id => l_line_id,

Line 2572: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

2568: p_entity_code => OE_GLOBALS.G_ENTITY_LINE,
2569: p_entity_id => l_line_id,
2570: x_return_status => l_return_status
2571: );
2572: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2573: oe_debug_pub.add('Attachments delete failed : ');
2574: x_return_status := l_return_status;
2575: RETURN;
2576: END IF;

Line 2612: if l_return_status <> FND_API.G_RET_STS_SUCCESS then

2608: p_order_quantity_uom => l_order_quantity_uom,
2609: p_daemon_type => 'P',
2610: x_return_status => l_return_status);
2611:
2612: if l_return_status <> FND_API.G_RET_STS_SUCCESS then
2613: null;
2614: end if;
2615: End IF;
2616:

Line 2658: ,p_init_msg_list => FND_API.G_FALSE

2654: OE_DEBUG_PUB.Add('Before Calling PO Purge API ');
2655:
2656: PO_OM_INTEGRATION_GRP.Purge
2657: ( p_api_version => 1.0
2658: ,p_init_msg_list => FND_API.G_FALSE
2659: ,p_commit => FND_API.G_FALSE
2660: ,x_return_status => x_return_status
2661: ,x_msg_count => l_msg_count
2662: ,x_msg_data => l_msg_data

Line 2659: ,p_commit => FND_API.G_FALSE

2655:
2656: PO_OM_INTEGRATION_GRP.Purge
2657: ( p_api_version => 1.0
2658: ,p_init_msg_list => FND_API.G_FALSE
2659: ,p_commit => FND_API.G_FALSE
2660: ,x_return_status => x_return_status
2661: ,x_msg_count => l_msg_count
2662: ,x_msg_data => l_msg_data
2663: ,p_entity => 'PO_LINE_LOCATIONS'

Line 2669: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN

2665: );
2666:
2667: OE_DEBUG_PUB.Add('After Calling PO Purge API '||x_return_status);
2668:
2669: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2670: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2671: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
2672: OE_MSG_PUB.Add_Text(l_msg_data);
2673: OE_DEBUG_PUB.Add('Errors from Purge: '||l_msg_data,2) ;

Line 2670: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

2666:
2667: OE_DEBUG_PUB.Add('After Calling PO Purge API '||x_return_status);
2668:
2669: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2670: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2671: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
2672: OE_MSG_PUB.Add_Text(l_msg_data);
2673: OE_DEBUG_PUB.Add('Errors from Purge: '||l_msg_data,2) ;
2674: RAISE FND_API.G_EXC_ERROR;

Line 2671: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN

2667: OE_DEBUG_PUB.Add('After Calling PO Purge API '||x_return_status);
2668:
2669: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2670: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2671: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
2672: OE_MSG_PUB.Add_Text(l_msg_data);
2673: OE_DEBUG_PUB.Add('Errors from Purge: '||l_msg_data,2) ;
2674: RAISE FND_API.G_EXC_ERROR;
2675: END IF;

Line 2674: RAISE FND_API.G_EXC_ERROR;

2670: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2671: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
2672: OE_MSG_PUB.Add_Text(l_msg_data);
2673: OE_DEBUG_PUB.Add('Errors from Purge: '||l_msg_data,2) ;
2674: RAISE FND_API.G_EXC_ERROR;
2675: END IF;
2676: END IF;
2677:
2678:

Line 2685: x_return_status := FND_API.G_RET_STS_SUCCESS;

2681:
2682: oe_debug_pub.add('deleted lines for header='|| to_char(p_header_id));
2683: oe_debug_pub.add('Exiting OE_ORDER_PURGE_PVT.OE_Purge_Lines : ');
2684:
2685: x_return_status := FND_API.G_RET_STS_SUCCESS;
2686:
2687: EXCEPTION -- Exception handler to record error
2688:
2689: WHEN OTHERS THEN

Line 2690: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2686:
2687: EXCEPTION -- Exception handler to record error
2688:
2689: WHEN OTHERS THEN
2690: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2691: ROLLBACK TO SAVEPOINT ORDER_HEADER;
2692: record_errors( l_return_status
2693: ,p_purge_set_id
2694: ,p_header_id

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

2737: l_price_adj_assoc_id NUMBER;
2738: l_lock_price_adj_assoc_id NUMBER;
2739: l_price_adj_attrib_id NUMBER;
2740: l_lock_price_adj_attrib_id NUMBER;
2741: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
2742:
2743: BEGIN
2744:
2745: oe_debug_pub.add('Entering OE_ORDER_PURGE_PVT.OE_Purge_Header_Adj : '||to_char(p_header_id));

Line 2817: RETURN FND_API.G_RET_STS_SUCCESS;

2813: CLOSE c_header_adj;
2814:
2815: oe_debug_pub.add('Exiting OE_ORDER_PURGE_PVT.OE_Purge_Header_Adj : ');
2816:
2817: RETURN FND_API.G_RET_STS_SUCCESS;
2818:
2819: EXCEPTION -- Exception handler to record error
2820:
2821: WHEN OTHERS THEN

Line 2822: l_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2818:
2819: EXCEPTION -- Exception handler to record error
2820:
2821: WHEN OTHERS THEN
2822: l_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2823: ROLLBACK TO SAVEPOINT ORDER_HEADER;
2824: record_errors( l_return_status
2825: ,p_purge_set_id
2826: ,p_header_id

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

2868: l_price_adjustment_id NUMBER;
2869: l_lock_adjustment_id NUMBER;
2870: l_price_adj_assoc_id NUMBER;
2871: l_lock_price_adj_assoc_id NUMBER;
2872: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
2873: l_price_adj_attrib_id NUMBER;
2874: l_lock_price_adj_attrib_id NUMBER;
2875:
2876:

Line 2962: RETURN FND_API.G_RET_STS_SUCCESS;

2958: oe_debug_pub.add('Number of price adjustments deleted : '||to_char(c_line_adj%ROWCOUNT),1);
2959: CLOSE c_line_adj;
2960: oe_debug_pub.add('Exiting OE_ORDER_PURGE_PVT.OE_Purge_Line_Adj : ');
2961:
2962: RETURN FND_API.G_RET_STS_SUCCESS;
2963:
2964: EXCEPTION -- Exception handler to record error
2965:
2966: WHEN OTHERS THEN

Line 2967: l_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2963:
2964: EXCEPTION -- Exception handler to record error
2965:
2966: WHEN OTHERS THEN
2967: l_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2968: ROLLBACK TO SAVEPOINT ORDER_HEADER;
2969: record_errors( l_return_status
2970: ,p_purge_set_id
2971: ,p_header_id

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

2991: WHERE HEADER_ID = p_header_id;
2992:
2993: l_order_price_attrib_id NUMBER;
2994: l_lock_price_attrib_id NUMBER;
2995: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
2996:
2997: BEGIN
2998:
2999: oe_debug_pub.add('Entering OE_ORDER_PURGE_PVT.OE_Purge_Price_Attribs : '||to_char(p_header_id));

Line 3025: RETURN FND_API.G_RET_STS_SUCCESS;

3021: CLOSE c_order_price_attribs;
3022:
3023: oe_debug_pub.add('Exiting OE_ORDER_PURGE_PVT.OE_Purge_Price_Attribs : ');
3024:
3025: RETURN FND_API.G_RET_STS_SUCCESS;
3026:
3027: EXCEPTION -- Exception handler to record error
3028:
3029: WHEN OTHERS THEN

Line 3030: l_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

3026:
3027: EXCEPTION -- Exception handler to record error
3028:
3029: WHEN OTHERS THEN
3030: l_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3031: ROLLBACK TO SAVEPOINT ORDER_HEADER;
3032: record_errors( l_return_status
3033: ,p_purge_set_id
3034: ,p_header_id

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

3053: WHERE HEADER_ID = p_header_id;
3054:
3055: l_sales_credit_id NUMBER;
3056: l_lock_sales_credit_id NUMBER;
3057: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
3058:
3059: BEGIN
3060: oe_debug_pub.add('Entering OE_ORDER_PURGE_PVT.OE_Purge_Order_Sales_Credits : '||to_char(p_header_id));
3061:

Line 3086: RETURN FND_API.G_RET_STS_SUCCESS;

3082: oe_debug_pub.add('Number of order sales credit deleted : '||to_char(c_order_sales_credits%ROWCOUNT),1);
3083: CLOSE c_order_sales_credits;
3084:
3085: oe_debug_pub.add('Exiting OE_ORDER_PURGE_PVT.OE_Purge_Order_Sales_Credits : ');
3086: RETURN FND_API.G_RET_STS_SUCCESS;
3087:
3088: EXCEPTION -- Exception handler to record error
3089:
3090: WHEN OTHERS THEN

Line 3091: l_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

3087:
3088: EXCEPTION -- Exception handler to record error
3089:
3090: WHEN OTHERS THEN
3091: l_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3092: ROLLBACK TO SAVEPOINT ORDER_HEADER;
3093: record_errors( l_return_status
3094: ,p_purge_set_id
3095: ,p_header_id

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

3115: WHERE LINE_ID = p_line_id;
3116:
3117: l_sales_credit_id NUMBER;
3118: l_lock_sales_credit_id NUMBER;
3119: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
3120:
3121: BEGIN
3122:
3123: oe_debug_pub.add('Entering OE_ORDER_PURGE_PVT.OE_Purge_Line_Sales_Credits : '||to_char(p_line_id));

Line 3148: RETURN FND_API.G_RET_STS_SUCCESS;

3144: oe_debug_pub.add('Number of line sales credit deleted : '||to_char(c_line_sales_credits%ROWCOUNT),1);
3145: CLOSE c_line_sales_credits;
3146:
3147: oe_debug_pub.add('Exiting OE_ORDER_PURGE_PVT.OE_Purge_Line_Sales_Credits : ');
3148: RETURN FND_API.G_RET_STS_SUCCESS;
3149:
3150: EXCEPTION -- Exception handler to record error
3151:
3152: WHEN OTHERS THEN

Line 3153: l_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

3149:
3150: EXCEPTION -- Exception handler to record error
3151:
3152: WHEN OTHERS THEN
3153: l_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3154: ROLLBACK TO SAVEPOINT ORDER_HEADER;
3155: record_errors( l_return_status
3156: ,p_purge_set_id
3157: ,p_header_id

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

3176: WHERE HEADER_ID = p_header_id;
3177:
3178: l_set_id NUMBER;
3179: l_lock_set_id NUMBER;
3180: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
3181:
3182: BEGIN
3183:
3184: oe_debug_pub.add('Entering OE_ORDER_PURGE_PVT.OE_Purge_Order_Sets : '||to_char(p_header_id));

Line 3209: RETURN FND_API.G_RET_STS_SUCCESS;

3205: oe_debug_pub.add('Number of order sets deleted : '||to_char(c_order_sets%ROWCOUNT),1);
3206: CLOSE c_order_sets;
3207:
3208: oe_debug_pub.add('Exiting OE_ORDER_PURGE_PVT.OE_Purge_Order_Sets : ');
3209: RETURN FND_API.G_RET_STS_SUCCESS;
3210:
3211: EXCEPTION -- Exception handler to record error
3212:
3213: WHEN OTHERS THEN

Line 3214: l_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

3210:
3211: EXCEPTION -- Exception handler to record error
3212:
3213: WHEN OTHERS THEN
3214: l_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3215: ROLLBACK TO SAVEPOINT ORDER_HEADER;
3216: record_errors( l_return_status
3217: ,p_purge_set_id
3218: ,p_header_id

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

3240: l_set_id NUMBER;
3241: l_line_id NUMBER;
3242: l_lock_line_id NUMBER;
3243: l_lock_set_id NUMBER;
3244: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
3245:
3246: BEGIN
3247: oe_debug_pub.add('Entering OE_ORDER_PURGE_PVT.OE_Purge_Line_Sets : '||to_char(p_line_id));
3248:

Line 3275: RETURN FND_API.G_RET_STS_SUCCESS;

3271: oe_debug_pub.add('Number of Line sets deleted : '||to_char(c_line_sets%ROWCOUNT),1);
3272: CLOSE c_line_sets;
3273:
3274: oe_debug_pub.add('Exiting OE_ORDER_PURGE_PVT.OE_Purge_Line_Sets : ');
3275: RETURN FND_API.G_RET_STS_SUCCESS;
3276:
3277: EXCEPTION -- Exception handler to record error
3278:
3279: WHEN OTHERS THEN

Line 3280: l_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

3276:
3277: EXCEPTION -- Exception handler to record error
3278:
3279: WHEN OTHERS THEN
3280: l_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3281: ROLLBACK TO SAVEPOINT ORDER_HEADER;
3282: record_errors( l_return_status
3283: ,p_purge_set_id
3284: ,p_header_id

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

3321: l_hold_release_id NUMBER;
3322: l_hold_source_id NUMBER;
3323: l_lock_hold_release_id NUMBER;
3324: l_lock_hold_source_id NUMBER;
3325: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
3326: l_count NUMBER := 0; -- bug 6148214
3327:
3328: BEGIN
3329: oe_debug_pub.add('Entering OE_ORDER_PURGE_PVT.OE_Purge_Order_Hold : '||to_char(p_header_id));

Line 3403: RETURN FND_API.G_RET_STS_SUCCESS;

3399: oe_debug_pub.add('Number of order holds deleted : '||to_char(c_order_holds%ROWCOUNT),1);
3400: CLOSE c_order_holds;
3401:
3402: oe_debug_pub.add('Exiting OE_ORDER_PURGE_PVT.OE_Purge_Order_Holds : ');
3403: RETURN FND_API.G_RET_STS_SUCCESS;
3404:
3405: EXCEPTION -- Exception handler to record error
3406:
3407: WHEN OTHERS THEN

Line 3408: l_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

3404:
3405: EXCEPTION -- Exception handler to record error
3406:
3407: WHEN OTHERS THEN
3408: l_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3409: ROLLBACK TO SAVEPOINT ORDER_HEADER;
3410: record_errors( l_return_status
3411: ,p_purge_set_id
3412: ,p_header_id

Line 3434: RETURN FND_API.G_RET_STS_ERROR;

3430:
3431: RCV_RMA_RCPT_PURGE.Purge_Receipts(p_line_id,l_return_status,l_message);
3432:
3433: IF l_return_status = 'FALSE' THEN
3434: RETURN FND_API.G_RET_STS_ERROR;
3435: END IF;
3436:
3437: oe_debug_pub.add('Exiting OE_ORDER_PURGE_PVT.OE_Purge_RMA_Line_Receipts.');
3438: RETURN FND_API.G_RET_STS_SUCCESS;

Line 3438: RETURN FND_API.G_RET_STS_SUCCESS;

3434: RETURN FND_API.G_RET_STS_ERROR;
3435: END IF;
3436:
3437: oe_debug_pub.add('Exiting OE_ORDER_PURGE_PVT.OE_Purge_RMA_Line_Receipts.');
3438: RETURN FND_API.G_RET_STS_SUCCESS;
3439:
3440: EXCEPTION -- Exception handler to record error
3441: WHEN OTHERS THEN
3442: l_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 3442: l_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

3438: RETURN FND_API.G_RET_STS_SUCCESS;
3439:
3440: EXCEPTION -- Exception handler to record error
3441: WHEN OTHERS THEN
3442: l_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3443: ROLLBACK TO SAVEPOINT ORDER_HEADER;
3444: IF l_message is not null then
3445: record_errors( l_return_status
3446: ,p_purge_set_id

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

3471: WHERE LINE_ID = p_line_id;
3472:
3473: l_lot_serial_id NUMBER;
3474: l_lock_lot_serial_id NUMBER;
3475: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
3476: l_message VARCHAR2(2000);
3477: BEGIN
3478: oe_debug_pub.add('Entering OE_ORDER_PURGE_PVT.OE_Purge_RMA_Line_Lot_Srl: '||to_char(p_line_id));
3479:

Line 3503: RETURN FND_API.G_RET_STS_SUCCESS;

3499:
3500: CLOSE c_line_lot_serials;
3501:
3502: oe_debug_pub.add('Exiting OE_ORDER_PURGE_PVT.OE_Purge_RMA_Line_Lot_Srl.');
3503: RETURN FND_API.G_RET_STS_SUCCESS;
3504:
3505: EXCEPTION -- Exception handler to record error
3506: WHEN OTHERS THEN
3507: l_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 3507: l_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

3503: RETURN FND_API.G_RET_STS_SUCCESS;
3504:
3505: EXCEPTION -- Exception handler to record error
3506: WHEN OTHERS THEN
3507: l_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3508: ROLLBACK TO SAVEPOINT ORDER_HEADER;
3509: record_errors( l_return_status
3510: ,p_purge_set_id
3511: ,p_header_id

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

3533: ,IS_PURGED = 'N'
3534: WHERE purge_set_id = p_purge_set_id
3535: AND header_id = p_header_id;
3536:
3537: IF p_return_status <> FND_API.G_RET_STS_SUCCESS -- If writting a SQL error
3538: THEN -- then commit the record
3539: COMMIT; -- else (assume) it is commited by the caller
3540: END IF;
3541:

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

3550: l_header_id NUMBER;
3551: l_lock_header_id NUMBER;
3552: l_payment_number NUMBER;
3553:
3554: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
3555:
3556: Cursor c_header_pmts IS
3557: Select payment_number
3558: From oe_payments

Line 3578: RETURN FND_API.G_RET_STS_SUCCESS;

3574:
3575: END LOOP;
3576: CLOSE c_header_pmts;
3577:
3578: RETURN FND_API.G_RET_STS_SUCCESS;
3579:
3580: EXCEPTION
3581: WHEN OTHERS THEN
3582: l_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 3582: l_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

3578: RETURN FND_API.G_RET_STS_SUCCESS;
3579:
3580: EXCEPTION
3581: WHEN OTHERS THEN
3582: l_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3583: ROLLBACK TO SAVEPOINT ORDER_HEADER;
3584: record_errors( l_return_status
3585: ,p_purge_set_id
3586: ,p_header_id

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

3600: l_line_id NUMBER;
3601: l_lock_line_id NUMBER;
3602: l_pmt_count NUMBER;
3603: l_payment_number NUMBER;
3604: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
3605:
3606: cursor c_lock_pmts is
3607: select payment_number
3608: from oe_payments

Line 3628: RETURN FND_API.G_RET_STS_SUCCESS;

3624:
3625: END LOOP;
3626: CLOSE c_lock_pmts;
3627:
3628: RETURN FND_API.G_RET_STS_SUCCESS;
3629:
3630: EXCEPTION
3631: WHEN OTHERS THEN
3632: l_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 3632: l_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

3628: RETURN FND_API.G_RET_STS_SUCCESS;
3629:
3630: EXCEPTION
3631: WHEN OTHERS THEN
3632: l_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3633: ROLLBACK TO SAVEPOINT ORDER_HEADER;
3634: record_errors( l_return_status
3635: ,p_purge_set_id
3636: ,p_line_id

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

3654: , p_error_message OUT NOCOPY VARCHAR2
3655: ) IS
3656:
3657:
3658: l_return_status VARCHAR2(1) := FND_API.G_TRUE;
3659: l_error_message VARCHAR2(2000);
3660: l_temp_mesg VARCHAR2(2000);
3661: l_is_purgable VARCHAR2(1);
3662: l_order_type_name VARCHAR2(30);

Line 3711: IF l_return_status = FND_API.G_TRUE THEN

3707:
3708: IF OE_CODE_CONTROL.Get_Code_Release_Level >= '110510'
3709: AND nvl(l_transaction_phase_code,'F')='N' THEN
3710:
3711: IF l_return_status = FND_API.G_TRUE THEN
3712:
3713: FND_MESSAGE.SET_NAME('ONT','OE_PUR_OPEN_QUOTE');
3714: l_temp_mesg := FND_MESSAGE.GET_ENCODED;
3715: FND_MESSAGE.SET_ENCODED(l_temp_mesg);

Line 3723: IF l_return_status = FND_API.G_TRUE THEN

3719: END IF;
3720:
3721: ELSE
3722:
3723: IF l_return_status = FND_API.G_TRUE THEN
3724: FND_MESSAGE.SET_NAME('ONT','OE_PUR_OPEN_ORDER');
3725: l_temp_mesg := FND_MESSAGE.GET_ENCODED;
3726: FND_MESSAGE.SET_ENCODED(l_temp_mesg);
3727: l_error_message := FND_MESSAGE.GET;

Line 3731: IF l_return_status = FND_API.G_TRUE THEN

3727: l_error_message := FND_MESSAGE.GET;
3728: l_return_status := OE_ORDER_PURGE_PVT.Check_Open_Orders( p_header_id);
3729: END IF;
3730:
3731: IF l_return_status = FND_API.G_TRUE THEN
3732:
3733: SELECT otl.name
3734: INTO l_order_type_name
3735: FROM oe_transaction_types_tl otl,

Line 3752: IF l_return_status = FND_API.G_TRUE THEN

3748: ( TO_CHAR(p_order_number), l_order_type_name );
3749: END IF;
3750:
3751:
3752: IF l_return_status = FND_API.G_TRUE THEN
3753: FND_MESSAGE.SET_NAME('ONT','OE_PUR_OPEN_RETURNS');
3754: l_temp_mesg := FND_MESSAGE.GET_ENCODED;
3755: FND_MESSAGE.SET_ENCODED(l_temp_mesg);
3756: l_error_message := FND_MESSAGE.GET;

Line 3762: IF l_return_status = FND_API.G_TRUE THEN

3758: (p_order_number, p_order_type_name);
3759: END IF;
3760:
3761:
3762: IF l_return_status = FND_API.G_TRUE THEN
3763: Check_Open_RMA_Receipts(p_header_id,l_return_status, l_error_message);
3764: END IF;
3765:
3766:

Line 3768: IF l_return_status = FND_API.G_TRUE THEN

3764: END IF;
3765:
3766:
3767:
3768: IF l_return_status = FND_API.G_TRUE THEN
3769: FND_MESSAGE.SET_NAME('ONT','OE_PUR_OPEN_DELIVERIES');
3770: l_temp_mesg := FND_MESSAGE.GET_ENCODED;
3771: FND_MESSAGE.SET_ENCODED(l_temp_mesg);
3772: l_error_message := FND_MESSAGE.GET;

Line 3790: l_return_status := FND_API.G_FALSE;

3786: )
3787: )
3788: );
3789: IF l_cnt > 0 THEN
3790: l_return_status := FND_API.G_FALSE;
3791: END IF;
3792: END IF;
3793:
3794:

Line 3795: IF l_return_status = FND_API.G_TRUE THEN

3791: END IF;
3792: END IF;
3793:
3794:
3795: IF l_return_status = FND_API.G_TRUE THEN
3796:
3797: IF PO_CODE_RELEASE_GRP.Current_Release >=
3798: PO_CODE_RELEASE_GRP.PRC_11i_Family_Pack_J AND
3799: OE_CODE_CONTROL.Code_Release_Level >= '110510' THEN

Line 3805: IF l_return_status = FND_API.G_FALSE THEN

3801: l_return_status :=
3802: OE_ORDER_PURGE_PVT.Check_Open_PO_Reqs_Dropship
3803: (p_header_id => p_header_id );
3804:
3805: IF l_return_status = FND_API.G_FALSE THEN
3806:
3807: FND_MESSAGE.SET_NAME('ONT','OE_PURGE_OPEN_PO_REQ');
3808: l_temp_mesg := FND_MESSAGE.GET_ENCODED;
3809: FND_MESSAGE.SET_ENCODED(l_temp_mesg);

Line 3819: IF l_return_status = FND_API.G_TRUE THEN

3815: END IF;
3816:
3817: END IF;
3818:
3819: IF l_return_status = FND_API.G_TRUE THEN
3820: p_error_message := NULL;
3821: p_is_purgable := 'Y' ;
3822:
3823: ELSE