481:
482: --=============================================================================
483: -- *********** Local Trace Routine **********
484: --=============================================================================
485: C_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
486: C_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
487: C_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
488: C_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
489: C_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
482: --=============================================================================
483: -- *********** Local Trace Routine **********
484: --=============================================================================
485: C_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
486: C_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
487: C_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
488: C_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
489: C_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
490: C_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
483: -- *********** Local Trace Routine **********
484: --=============================================================================
485: C_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
486: C_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
487: C_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
488: C_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
489: C_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
490: C_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
491:
484: --=============================================================================
485: C_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
486: C_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
487: C_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
488: C_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
489: C_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
490: C_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
491:
492: C_LEVEL_LOG_DISABLED CONSTANT NUMBER := 99;
485: C_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
486: C_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
487: C_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
488: C_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
489: C_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
490: C_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
491:
492: C_LEVEL_LOG_DISABLED CONSTANT NUMBER := 99;
493: C_DEFAULT_MODULE CONSTANT VARCHAR2(240) := 'xla.plsql.xla_journal_entries_pkg';
486: C_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
487: C_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
488: C_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
489: C_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
490: C_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
491:
492: C_LEVEL_LOG_DISABLED CONSTANT NUMBER := 99;
493: C_DEFAULT_MODULE CONSTANT VARCHAR2(240) := 'xla.plsql.xla_journal_entries_pkg';
494:
500: ,p_module IN VARCHAR2
501: ,p_level IN NUMBER) IS
502: BEGIN
503: ----------------------------------------------------------------------------
504: -- Following is for FND log.
505: ----------------------------------------------------------------------------
506: IF (p_msg IS NULL AND p_level >= g_log_level) THEN
507: fnd_log.message(p_level, p_module);
508: ELSIF p_level >= g_log_level THEN
503: ----------------------------------------------------------------------------
504: -- Following is for FND log.
505: ----------------------------------------------------------------------------
506: IF (p_msg IS NULL AND p_level >= g_log_level) THEN
507: fnd_log.message(p_level, p_module);
508: ELSIF p_level >= g_log_level THEN
509: fnd_log.string(p_level, p_module, p_msg);
510: END IF;
511:
505: ----------------------------------------------------------------------------
506: IF (p_msg IS NULL AND p_level >= g_log_level) THEN
507: fnd_log.message(p_level, p_module);
508: ELSIF p_level >= g_log_level THEN
509: fnd_log.string(p_level, p_module, p_msg);
510: END IF;
511:
512: EXCEPTION
513: WHEN xla_exceptions_pkg.application_exception THEN
8751: -- time
8752: --
8753: --=============================================================================
8754: BEGIN
8755: g_log_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
8756: g_log_enabled := fnd_log.test
8757: (log_level => g_log_level
8758: ,module => C_DEFAULT_MODULE);
8759:
8752: --
8753: --=============================================================================
8754: BEGIN
8755: g_log_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
8756: g_log_enabled := fnd_log.test
8757: (log_level => g_log_level
8758: ,module => C_DEFAULT_MODULE);
8759:
8760: g_log_level := C_LEVEL_STATEMENT;