20:
21: --=============================================================================
22: -- *********** Local Trace Routine **********
23: --=============================================================================
24: C_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
25: C_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
26: C_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
27: C_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
28: C_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
21: --=============================================================================
22: -- *********** Local Trace Routine **********
23: --=============================================================================
24: C_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
25: C_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
26: C_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
27: C_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
28: C_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
29: C_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
22: -- *********** Local Trace Routine **********
23: --=============================================================================
24: C_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
25: C_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
26: C_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
27: C_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
28: C_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
29: C_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
30:
23: --=============================================================================
24: C_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
25: C_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
26: C_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
27: C_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
28: C_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
29: C_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
30:
31: C_LEVEL_LOG_DISABLED CONSTANT NUMBER := 99;
24: C_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
25: C_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
26: C_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
27: C_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
28: C_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
29: C_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
30:
31: C_LEVEL_LOG_DISABLED CONSTANT NUMBER := 99;
32: C_DEFAULT_MODULE CONSTANT VARCHAR2(240) := 'xla.plsql.xla_accounting_errors_pkg';
25: C_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
26: C_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
27: C_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
28: C_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
29: C_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
30:
31: C_LEVEL_LOG_DISABLED CONSTANT NUMBER := 99;
32: C_DEFAULT_MODULE CONSTANT VARCHAR2(240) := 'xla.plsql.xla_accounting_errors_pkg';
33:
40: ,p_module IN VARCHAR2) IS
41: BEGIN
42:
43: IF (p_msg IS NULL AND p_level >= g_log_level) THEN
44: fnd_log.message(p_level, p_module);
45: ELSIF p_level >= g_log_level THEN
46: fnd_log.string(p_level, p_module, p_msg);
47: END IF;
48:
42:
43: IF (p_msg IS NULL AND p_level >= g_log_level) THEN
44: fnd_log.message(p_level, p_module);
45: ELSIF p_level >= g_log_level THEN
46: fnd_log.string(p_level, p_module, p_msg);
47: END IF;
48:
49: EXCEPTION
50: WHEN xla_exceptions_pkg.application_exception THEN
557:
558: END modify_message;
559:
560: BEGIN
561: g_log_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
562: g_log_enabled := fnd_log.test
563: (log_level => g_log_level
564: ,module => C_DEFAULT_MODULE);
565:
558: END modify_message;
559:
560: BEGIN
561: g_log_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
562: g_log_enabled := fnd_log.test
563: (log_level => g_log_level
564: ,module => C_DEFAULT_MODULE);
565:
566: IF NOT g_log_enabled THEN