25:
26: --=============================================================================
27: -- *********** Local Trace Routine **********
28: --=============================================================================
29: C_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
30: C_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
31: C_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
32: C_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
33: C_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
26: --=============================================================================
27: -- *********** Local Trace Routine **********
28: --=============================================================================
29: C_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
30: C_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
31: C_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
32: C_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
33: C_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
34: C_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
27: -- *********** Local Trace Routine **********
28: --=============================================================================
29: C_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
30: C_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
31: C_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
32: C_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
33: C_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
34: C_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
35:
28: --=============================================================================
29: C_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
30: C_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
31: C_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
32: C_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
33: C_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
34: C_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
35:
36: C_LEVEL_LOG_DISABLED CONSTANT NUMBER := 99;
29: C_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
30: C_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
31: C_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
32: C_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
33: C_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
34: C_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
35:
36: C_LEVEL_LOG_DISABLED CONSTANT NUMBER := 99;
37:
30: C_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
31: C_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
32: C_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
33: C_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
34: C_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
35:
36: C_LEVEL_LOG_DISABLED CONSTANT NUMBER := 99;
37:
38: C_DEFAULT_MODULE CONSTANT VARCHAR2(240) := 'xla.plsql.xla_reverse_events_pub_pkg';
54: ,p_module IN VARCHAR2 DEFAULT C_DEFAULT_MODULE) IS
55: BEGIN
56:
57: IF (p_msg IS NULL AND p_level >= g_log_level) THEN
58: fnd_log.message(p_level, p_module);
59: ELSIF p_level >= g_log_level THEN
60: fnd_log.string(p_level, p_module, p_msg);
61: END IF;
62:
56:
57: IF (p_msg IS NULL AND p_level >= g_log_level) THEN
58: fnd_log.message(p_level, p_module);
59: ELSIF p_level >= g_log_level THEN
60: fnd_log.string(p_level, p_module, p_msg);
61: END IF;
62:
63: EXCEPTION
64: WHEN xla_exceptions_pkg.application_exception THEN
281: END delete_incomplete_reversal ;
282:
283: BEGIN
284:
285: g_log_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
286: g_log_enabled := fnd_log.test
287: (log_level => g_log_level
288: ,MODULE => C_DEFAULT_MODULE);
289:
282:
283: BEGIN
284:
285: g_log_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
286: g_log_enabled := fnd_log.test
287: (log_level => g_log_level
288: ,MODULE => C_DEFAULT_MODULE);
289:
290: IF NOT g_log_enabled THEN