278: p_module => l_log_module,
279: p_level => C_LEVEL_PROCEDURE);
280: END IF;
281:
282: IF (FND_API.to_boolean(p_init_msg_list)) THEN
283: FND_MSG_PUB.initialize;
284: END IF;
285:
286: -- Standard call to check for call compatibility.
283: FND_MSG_PUB.initialize;
284: END IF;
285:
286: -- Standard call to check for call compatibility.
287: IF (NOT FND_API.compatible_api_call
288: (p_current_version_number => l_api_version
289: ,p_caller_version_number => p_api_version
290: ,p_api_name => l_api_name
291: ,p_pkg_name => C_DEFAULT_MODULE))
289: ,p_caller_version_number => p_api_version
290: ,p_api_name => l_api_name
291: ,p_pkg_name => C_DEFAULT_MODULE))
292: THEN
293: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
294: END IF;
295:
296: --Bug : 8752657 - Check MO security setting
297: select count(1)
313: ,p_error_msg => 'Journal entries cannot be deleted because either MO Security is not set for this session or Entity does not exist for this event');
314: END IF;--Bug 8752657.
315:
316: -- Initialize global variables
317: x_return_status := FND_API.G_RET_STS_SUCCESS;
318:
319: -----------------------------------------------------------------------------------
320: -- Validation
321: -----------------------------------------------------------------------------------
399: p_level => C_LEVEL_PROCEDURE);
400: END IF;
401:
402: EXCEPTION
403: WHEN FND_API.G_EXC_ERROR THEN
404: ROLLBACK;
405: x_return_status := FND_API.G_RET_STS_ERROR ;
406: FND_MSG_PUB.count_and_get(p_count => x_msg_count
407: ,p_data => x_msg_data);
401:
402: EXCEPTION
403: WHEN FND_API.G_EXC_ERROR THEN
404: ROLLBACK;
405: x_return_status := FND_API.G_RET_STS_ERROR ;
406: FND_MSG_PUB.count_and_get(p_count => x_msg_count
407: ,p_data => x_msg_data);
408:
409: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
405: x_return_status := FND_API.G_RET_STS_ERROR ;
406: FND_MSG_PUB.count_and_get(p_count => x_msg_count
407: ,p_data => x_msg_data);
408:
409: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
410: ROLLBACK;
411: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
412: FND_MSG_PUB.count_and_get(p_count => x_msg_count
413: ,p_data => x_msg_data);
407: ,p_data => x_msg_data);
408:
409: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
410: ROLLBACK;
411: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
412: FND_MSG_PUB.count_and_get(p_count => x_msg_count
413: ,p_data => x_msg_data);
414:
415: WHEN OTHERS THEN
413: ,p_data => x_msg_data);
414:
415: WHEN OTHERS THEN
416: ROLLBACK;
417: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
418: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
419: FND_MSG_PUB.add_exc_msg(C_DEFAULT_MODULE, l_api_name);
420: END IF;
421: FND_MSG_PUB.count_and_get(p_count => x_msg_count
576: p_module => l_log_module,
577: p_level => C_LEVEL_PROCEDURE);
578: END IF;
579:
580: IF (FND_API.to_boolean(p_init_msg_list)) THEN
581: FND_MSG_PUB.initialize;
582: END IF;
583:
584: -- Bug :8752657 Check MO security setting
607: p_level => C_LEVEL_PROCEDURE);
608: END IF;
609:
610: -- Standard call to check for call compatibility.
611: IF (NOT FND_API.compatible_api_call
612: (p_current_version_number => l_api_version
613: ,p_caller_version_number => p_api_version
614: ,p_api_name => l_api_name
615: ,p_pkg_name => C_DEFAULT_MODULE))
613: ,p_caller_version_number => p_api_version
614: ,p_api_name => l_api_name
615: ,p_pkg_name => C_DEFAULT_MODULE))
616: THEN
617: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
618: END IF;
619:
620: -- Initialize global variables
621: x_return_status := FND_API.G_RET_STS_SUCCESS;
617: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
618: END IF;
619:
620: -- Initialize global variables
621: x_return_status := FND_API.G_RET_STS_SUCCESS;
622:
623: --------------------------------------------------------------
624: -- Call to DELETE TB entries for original event E1
625: --------------------------------------------------------------
1246: END IF;
1247:
1248:
1249: EXCEPTION
1250: WHEN FND_API.G_EXC_ERROR THEN
1251: ROLLBACK;
1252: x_return_status := FND_API.G_RET_STS_ERROR ;
1253: FND_MSG_PUB.count_and_get(p_count => x_msg_count
1254: ,p_data => x_msg_data);
1248:
1249: EXCEPTION
1250: WHEN FND_API.G_EXC_ERROR THEN
1251: ROLLBACK;
1252: x_return_status := FND_API.G_RET_STS_ERROR ;
1253: FND_MSG_PUB.count_and_get(p_count => x_msg_count
1254: ,p_data => x_msg_data);
1255:
1256: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1252: x_return_status := FND_API.G_RET_STS_ERROR ;
1253: FND_MSG_PUB.count_and_get(p_count => x_msg_count
1254: ,p_data => x_msg_data);
1255:
1256: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1257: ROLLBACK;
1258: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1259: FND_MSG_PUB.count_and_get(p_count => x_msg_count
1260: ,p_data => x_msg_data);
1254: ,p_data => x_msg_data);
1255:
1256: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1257: ROLLBACK;
1258: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1259: FND_MSG_PUB.count_and_get(p_count => x_msg_count
1260: ,p_data => x_msg_data);
1261:
1262: WHEN OTHERS THEN
1260: ,p_data => x_msg_data);
1261:
1262: WHEN OTHERS THEN
1263: ROLLBACK;
1264: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1265: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
1266: FND_MSG_PUB.add_exc_msg(C_DEFAULT_MODULE, l_api_name);
1267: END IF;
1268: FND_MSG_PUB.count_and_get(p_count => x_msg_count
1307: p_module => l_log_module,
1308: p_level => C_LEVEL_PROCEDURE);
1309: END IF;
1310:
1311: IF (FND_API.to_boolean(p_init_msg_list)) THEN
1312: FND_MSG_PUB.initialize;
1313: END IF;
1314:
1315: -- Standard call to check for call compatibility.
1312: FND_MSG_PUB.initialize;
1313: END IF;
1314:
1315: -- Standard call to check for call compatibility.
1316: IF (NOT FND_API.compatible_api_call
1317: (p_current_version_number => l_api_version
1318: ,p_caller_version_number => p_api_version
1319: ,p_api_name => l_api_name
1320: ,p_pkg_name => C_DEFAULT_MODULE))
1318: ,p_caller_version_number => p_api_version
1319: ,p_api_name => l_api_name
1320: ,p_pkg_name => C_DEFAULT_MODULE))
1321: THEN
1322: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
1323: END IF;
1324:
1325: -- Initialize global variables
1326: x_return_status := FND_API.G_RET_STS_SUCCESS;
1322: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
1323: END IF;
1324:
1325: -- Initialize global variables
1326: x_return_status := FND_API.G_RET_STS_SUCCESS;
1327:
1328: -- Validation ------------------------------------------------------------------------------------------
1329: SELECT DECODE(NVL(budgetary_control_flag,'N'),'Y', C_STATUS_FUNDS_RESERVE, C_STATUS_FINAL),process_status_code
1330: INTO l_accounting_mode, l_process_status
1401: p_level => C_LEVEL_PROCEDURE);
1402: END IF;
1403:
1404: EXCEPTION
1405: WHEN FND_API.G_EXC_ERROR THEN
1406: ROLLBACK;
1407: x_return_status := FND_API.G_RET_STS_ERROR ;
1408: FND_MSG_PUB.count_and_get(p_count => x_msg_count
1409: ,p_data => x_msg_data);
1403:
1404: EXCEPTION
1405: WHEN FND_API.G_EXC_ERROR THEN
1406: ROLLBACK;
1407: x_return_status := FND_API.G_RET_STS_ERROR ;
1408: FND_MSG_PUB.count_and_get(p_count => x_msg_count
1409: ,p_data => x_msg_data);
1410:
1411: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1407: x_return_status := FND_API.G_RET_STS_ERROR ;
1408: FND_MSG_PUB.count_and_get(p_count => x_msg_count
1409: ,p_data => x_msg_data);
1410:
1411: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1412: ROLLBACK;
1413: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1414: FND_MSG_PUB.count_and_get(p_count => x_msg_count
1415: ,p_data => x_msg_data);
1409: ,p_data => x_msg_data);
1410:
1411: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1412: ROLLBACK;
1413: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1414: FND_MSG_PUB.count_and_get(p_count => x_msg_count
1415: ,p_data => x_msg_data);
1416:
1417:
1416:
1417:
1418: WHEN OTHERS THEN
1419: ROLLBACK;
1420: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1421: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
1422: FND_MSG_PUB.add_exc_msg(C_DEFAULT_MODULE, l_api_name);
1423: END IF;
1424: FND_MSG_PUB.count_and_get(p_count => x_msg_count
1499: p_module => l_log_module,
1500: p_level => C_LEVEL_PROCEDURE);
1501: END IF;
1502:
1503: IF (FND_API.to_boolean(p_init_msg_list)) THEN
1504: FND_MSG_PUB.initialize;
1505: END IF;
1506:
1507: -- Standard call to check for call compatibility.
1504: FND_MSG_PUB.initialize;
1505: END IF;
1506:
1507: -- Standard call to check for call compatibility.
1508: IF (NOT FND_API.compatible_api_call
1509: (p_current_version_number => l_api_version
1510: ,p_caller_version_number => p_api_version
1511: ,p_api_name => l_api_name
1512: ,p_pkg_name => C_DEFAULT_MODULE))
1510: ,p_caller_version_number => p_api_version
1511: ,p_api_name => l_api_name
1512: ,p_pkg_name => C_DEFAULT_MODULE))
1513: THEN
1514: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
1515: END IF;
1516:
1517: -- Initialize global variables
1518: x_return_status := FND_API.G_RET_STS_SUCCESS;
1514: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
1515: END IF;
1516:
1517: -- Initialize global variables
1518: x_return_status := FND_API.G_RET_STS_SUCCESS;
1519:
1520: UPDATE xla_ae_headers
1521: SET gl_transfer_status_code = 'NT'
1522: WHERE application_id = p_application_id
1548: p_level => C_LEVEL_PROCEDURE);
1549: END IF;
1550:
1551: EXCEPTION
1552: WHEN FND_API.G_EXC_ERROR THEN
1553: ROLLBACK;
1554: x_return_status := FND_API.G_RET_STS_ERROR ;
1555: FND_MSG_PUB.count_and_get(p_count => x_msg_count
1556: ,p_data => x_msg_data);
1550:
1551: EXCEPTION
1552: WHEN FND_API.G_EXC_ERROR THEN
1553: ROLLBACK;
1554: x_return_status := FND_API.G_RET_STS_ERROR ;
1555: FND_MSG_PUB.count_and_get(p_count => x_msg_count
1556: ,p_data => x_msg_data);
1557:
1558: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1554: x_return_status := FND_API.G_RET_STS_ERROR ;
1555: FND_MSG_PUB.count_and_get(p_count => x_msg_count
1556: ,p_data => x_msg_data);
1557:
1558: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1559: ROLLBACK;
1560: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1561: FND_MSG_PUB.count_and_get(p_count => x_msg_count
1562: ,p_data => x_msg_data);
1556: ,p_data => x_msg_data);
1557:
1558: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1559: ROLLBACK;
1560: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1561: FND_MSG_PUB.count_and_get(p_count => x_msg_count
1562: ,p_data => x_msg_data);
1563:
1564: WHEN OTHERS THEN
1562: ,p_data => x_msg_data);
1563:
1564: WHEN OTHERS THEN
1565: ROLLBACK;
1566: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1567: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
1568: FND_MSG_PUB.add_exc_msg(C_DEFAULT_MODULE, l_api_name);
1569: END IF;
1570: FND_MSG_PUB.count_and_get(p_count => x_msg_count
1676: p_module => l_log_module,
1677: p_level => C_LEVEL_PROCEDURE);
1678: END IF;
1679:
1680: IF (FND_API.to_boolean(p_init_msg_list)) THEN
1681: FND_MSG_PUB.initialize;
1682: END IF;
1683:
1684: -- Standard call to check for call compatibility.
1681: FND_MSG_PUB.initialize;
1682: END IF;
1683:
1684: -- Standard call to check for call compatibility.
1685: IF (NOT FND_API.compatible_api_call
1686: (p_current_version_number => l_api_version
1687: ,p_caller_version_number => p_api_version
1688: ,p_api_name => l_api_name
1689: ,p_pkg_name => C_DEFAULT_MODULE))
1687: ,p_caller_version_number => p_api_version
1688: ,p_api_name => l_api_name
1689: ,p_pkg_name => C_DEFAULT_MODULE))
1690: THEN
1691: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
1692: END IF;
1693:
1694: -- Initialize global variables
1695: x_return_status := FND_API.G_RET_STS_SUCCESS;
1691: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
1692: END IF;
1693:
1694: -- Initialize global variables
1695: x_return_status := FND_API.G_RET_STS_SUCCESS;
1696:
1697: SELECT count(*)
1698: INTO l_dummy
1699: FROM xla_ae_headers
1742: p_level => C_LEVEL_PROCEDURE);
1743: END IF;
1744:
1745: EXCEPTION
1746: WHEN FND_API.G_EXC_ERROR THEN
1747: ROLLBACK;
1748: x_return_status := FND_API.G_RET_STS_ERROR ;
1749: FND_MSG_PUB.count_and_get(p_count => x_msg_count
1750: ,p_data => x_msg_data);
1744:
1745: EXCEPTION
1746: WHEN FND_API.G_EXC_ERROR THEN
1747: ROLLBACK;
1748: x_return_status := FND_API.G_RET_STS_ERROR ;
1749: FND_MSG_PUB.count_and_get(p_count => x_msg_count
1750: ,p_data => x_msg_data);
1751:
1752: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1748: x_return_status := FND_API.G_RET_STS_ERROR ;
1749: FND_MSG_PUB.count_and_get(p_count => x_msg_count
1750: ,p_data => x_msg_data);
1751:
1752: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1753: ROLLBACK;
1754: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1755: FND_MSG_PUB.count_and_get(p_count => x_msg_count
1756: ,p_data => x_msg_data);
1750: ,p_data => x_msg_data);
1751:
1752: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1753: ROLLBACK;
1754: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1755: FND_MSG_PUB.count_and_get(p_count => x_msg_count
1756: ,p_data => x_msg_data);
1757:
1758: WHEN OTHERS THEN
1756: ,p_data => x_msg_data);
1757:
1758: WHEN OTHERS THEN
1759: ROLLBACK;
1760: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1761: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
1762: FND_MSG_PUB.add_exc_msg(C_DEFAULT_MODULE, l_api_name);
1763: END IF;
1764: FND_MSG_PUB.count_and_get(p_count => x_msg_count
1905: ,p_msg_mode => g_msg_mode);
1906:
1907: END IF;
1908:
1909: Raise FND_API.G_EXC_ERROR;
1910:
1911: END log_error;
1912:
1913: