483:
484: --=============================================================================
485: -- *********** Local Trace Routine **********
486: --=============================================================================
487: C_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
488: C_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
489: C_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
490: C_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
491: C_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
484: --=============================================================================
485: -- *********** Local Trace Routine **********
486: --=============================================================================
487: C_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
488: C_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
489: C_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
490: C_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
491: C_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
492: C_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
485: -- *********** Local Trace Routine **********
486: --=============================================================================
487: C_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
488: C_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
489: C_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
490: C_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
491: C_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
492: C_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
493:
486: --=============================================================================
487: C_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
488: C_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
489: C_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
490: C_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
491: C_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
492: C_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
493:
494: C_LEVEL_LOG_DISABLED CONSTANT NUMBER := 99;
487: C_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
488: C_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
489: C_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
490: C_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
491: C_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
492: C_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
493:
494: C_LEVEL_LOG_DISABLED CONSTANT NUMBER := 99;
495: C_DEFAULT_MODULE CONSTANT VARCHAR2(240) := 'xla.plsql.xla_journal_entries_pkg';
488: C_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
489: C_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
490: C_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
491: C_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
492: C_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
493:
494: C_LEVEL_LOG_DISABLED CONSTANT NUMBER := 99;
495: C_DEFAULT_MODULE CONSTANT VARCHAR2(240) := 'xla.plsql.xla_journal_entries_pkg';
496:
502: ,p_module IN VARCHAR2
503: ,p_level IN NUMBER) IS
504: BEGIN
505: ----------------------------------------------------------------------------
506: -- Following is for FND log.
507: ----------------------------------------------------------------------------
508: IF (p_msg IS NULL AND p_level >= g_log_level) THEN
509: fnd_log.message(p_level, p_module);
510: ELSIF p_level >= g_log_level THEN
505: ----------------------------------------------------------------------------
506: -- Following is for FND log.
507: ----------------------------------------------------------------------------
508: IF (p_msg IS NULL AND p_level >= g_log_level) THEN
509: fnd_log.message(p_level, p_module);
510: ELSIF p_level >= g_log_level THEN
511: fnd_log.string(p_level, p_module, p_msg);
512: END IF;
513:
507: ----------------------------------------------------------------------------
508: IF (p_msg IS NULL AND p_level >= g_log_level) THEN
509: fnd_log.message(p_level, p_module);
510: ELSIF p_level >= g_log_level THEN
511: fnd_log.string(p_level, p_module, p_msg);
512: END IF;
513:
514: EXCEPTION
515: WHEN xla_exceptions_pkg.application_exception THEN
9051: -- time
9052: --
9053: --=============================================================================
9054: BEGIN
9055: g_log_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
9056: g_log_enabled := fnd_log.test
9057: (log_level => g_log_level
9058: ,module => C_DEFAULT_MODULE);
9059:
9052: --
9053: --=============================================================================
9054: BEGIN
9055: g_log_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
9056: g_log_enabled := fnd_log.test
9057: (log_level => g_log_level
9058: ,module => C_DEFAULT_MODULE);
9059:
9060: g_log_level := C_LEVEL_STATEMENT;