51:
52: --=============================================================================
53: -- *********** Local Trace Routine **********
54: --=============================================================================
55: C_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
56: C_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
57: C_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
58: C_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
59: C_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
52: --=============================================================================
53: -- *********** Local Trace Routine **********
54: --=============================================================================
55: C_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
56: C_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
57: C_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
58: C_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
59: C_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
60: C_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
53: -- *********** Local Trace Routine **********
54: --=============================================================================
55: C_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
56: C_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
57: C_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
58: C_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
59: C_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
60: C_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
61:
54: --=============================================================================
55: C_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
56: C_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
57: C_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
58: C_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
59: C_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
60: C_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
61:
62: C_LEVEL_LOG_DISABLED CONSTANT NUMBER := 99;
55: C_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
56: C_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
57: C_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
58: C_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
59: C_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
60: C_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
61:
62: C_LEVEL_LOG_DISABLED CONSTANT NUMBER := 99;
63: C_DEFAULT_MODULE CONSTANT VARCHAR2(240) := 'xla.plsql.xla_tab_pkg';
56: C_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
57: C_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
58: C_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
59: C_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
60: C_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
61:
62: C_LEVEL_LOG_DISABLED CONSTANT NUMBER := 99;
63: C_DEFAULT_MODULE CONSTANT VARCHAR2(240) := 'xla.plsql.xla_tab_pkg';
64:
73: ,p_level IN NUMBER
74: ) IS
75: BEGIN
76: IF (p_msg IS NULL AND p_level >= g_log_level) THEN
77: fnd_log.message(p_level, p_module);
78: ELSIF p_level >= g_log_level THEN
79: fnd_log.string(p_level, p_module, p_msg);
80: END IF;
81:
75: BEGIN
76: IF (p_msg IS NULL AND p_level >= g_log_level) THEN
77: fnd_log.message(p_level, p_module);
78: ELSIF p_level >= g_log_level THEN
79: fnd_log.string(p_level, p_module, p_msg);
80: END IF;
81:
82: EXCEPTION
83: WHEN xla_exceptions_pkg.application_exception THEN
658:
659:
660: --Trace initialization
661: BEGIN
662: g_log_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
663: g_log_enabled := fnd_log.test
664: (log_level => g_log_level
665: ,module => C_DEFAULT_MODULE);
666:
659:
660: --Trace initialization
661: BEGIN
662: g_log_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
663: g_log_enabled := fnd_log.test
664: (log_level => g_log_level
665: ,module => C_DEFAULT_MODULE);
666:
667: IF NOT g_log_enabled THEN