21:
22: --=============================================================================
23: -- *********** Local Trace Routine **********
24: --=============================================================================
25: C_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
26: C_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
27: C_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
28: C_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
29: C_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
22: --=============================================================================
23: -- *********** Local Trace Routine **********
24: --=============================================================================
25: C_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
26: C_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
27: C_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
28: C_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
29: C_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
30: C_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
23: -- *********** Local Trace Routine **********
24: --=============================================================================
25: C_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
26: C_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
27: C_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
28: C_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
29: C_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
30: C_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
31:
24: --=============================================================================
25: C_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
26: C_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
27: C_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
28: C_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
29: C_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
30: C_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
31:
32: C_LEVEL_LOG_DISABLED CONSTANT NUMBER := 99;
25: C_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
26: C_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
27: C_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
28: C_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
29: C_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
30: C_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
31:
32: C_LEVEL_LOG_DISABLED CONSTANT NUMBER := 99;
33: C_DEFAULT_MODULE CONSTANT VARCHAR2(240) := 'xla.plsql.xla_event_sources_f_pkg';
26: C_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
27: C_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
28: C_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
29: C_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
30: C_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
31:
32: C_LEVEL_LOG_DISABLED CONSTANT NUMBER := 99;
33: C_DEFAULT_MODULE CONSTANT VARCHAR2(240) := 'xla.plsql.xla_event_sources_f_pkg';
34:
43: ,p_module IN VARCHAR2
44: ,p_level IN NUMBER) IS
45: BEGIN
46: ----------------------------------------------------------------------------
47: -- Following is for FND log.
48: ----------------------------------------------------------------------------
49: IF (p_msg IS NULL AND p_level >= g_log_level) THEN
50: fnd_log.message(p_level, p_module);
51: ELSIF p_level >= g_log_level THEN
46: ----------------------------------------------------------------------------
47: -- Following is for FND log.
48: ----------------------------------------------------------------------------
49: IF (p_msg IS NULL AND p_level >= g_log_level) THEN
50: fnd_log.message(p_level, p_module);
51: ELSIF p_level >= g_log_level THEN
52: fnd_log.string(p_level, p_module, p_msg);
53: END IF;
54:
48: ----------------------------------------------------------------------------
49: IF (p_msg IS NULL AND p_level >= g_log_level) THEN
50: fnd_log.message(p_level, p_module);
51: ELSIF p_level >= g_log_level THEN
52: fnd_log.string(p_level, p_module, p_msg);
53: END IF;
54:
55: EXCEPTION
56: WHEN xla_exceptions_pkg.application_exception THEN
480: -- time
481: --
482: --=============================================================================
483: BEGIN
484: g_log_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
485: g_log_enabled := fnd_log.test
486: (log_level => g_log_level
487: ,module => C_DEFAULT_MODULE);
488:
481: --
482: --=============================================================================
483: BEGIN
484: g_log_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
485: g_log_enabled := fnd_log.test
486: (log_level => g_log_level
487: ,module => C_DEFAULT_MODULE);
488:
489: IF NOT g_log_enabled THEN