46:
47: --=============================================================================
48: -- *********** Local Trace Routine **********
49: --=============================================================================
50: C_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
51: C_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
52: C_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
53: C_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
54: C_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
47: --=============================================================================
48: -- *********** Local Trace Routine **********
49: --=============================================================================
50: C_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
51: C_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
52: C_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
53: C_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
54: C_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
55: C_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
48: -- *********** Local Trace Routine **********
49: --=============================================================================
50: C_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
51: C_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
52: C_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
53: C_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
54: C_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
55: C_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
56: C_LEVEL_LOG_DISABLED CONSTANT NUMBER := 99;
49: --=============================================================================
50: C_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
51: C_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
52: C_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
53: C_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
54: C_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
55: C_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
56: C_LEVEL_LOG_DISABLED CONSTANT NUMBER := 99;
57: C_DEFAULT_MODULE CONSTANT VARCHAR2(240) := 'xla.plsql.xla_adr_interface_pkg';
50: C_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
51: C_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
52: C_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
53: C_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
54: C_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
55: C_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
56: C_LEVEL_LOG_DISABLED CONSTANT NUMBER := 99;
57: C_DEFAULT_MODULE CONSTANT VARCHAR2(240) := 'xla.plsql.xla_adr_interface_pkg';
58: g_log_level NUMBER;
51: C_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
52: C_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
53: C_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
54: C_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
55: C_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
56: C_LEVEL_LOG_DISABLED CONSTANT NUMBER := 99;
57: C_DEFAULT_MODULE CONSTANT VARCHAR2(240) := 'xla.plsql.xla_adr_interface_pkg';
58: g_log_level NUMBER;
59: g_log_enabled BOOLEAN;
66: ,p_level IN NUMBER
67: ) IS
68: BEGIN
69: IF (p_msg IS NULL AND p_level >= g_log_level) THEN
70: fnd_log.message(p_level, p_module);
71: ELSIF p_level >= g_log_level THEN
72: fnd_log.string(p_level, p_module, p_msg);
73: END IF;
74:
68: BEGIN
69: IF (p_msg IS NULL AND p_level >= g_log_level) THEN
70: fnd_log.message(p_level, p_module);
71: ELSIF p_level >= g_log_level THEN
72: fnd_log.string(p_level, p_module, p_msg);
73: END IF;
74:
75: EXCEPTION
76: WHEN xla_exceptions_pkg.application_exception THEN