35: | 01-DEC-2003 K.Boussema Remove changed introduced in 27-NOV-2003 |
36: | 18-DEC-2003 K.Boussema Changed to fix bug 3042840,3307761,3268940 |
37: | 3310291 and 3320689 |
38: | 30-DEC-2003 K.Boussema Removed validation of JLT side, bug 3239528 |
39: | 23-FEB-2004 K.Boussema Made changes for the FND_LOG. |
40: | 12-MAR-2004 K.Boussema Changed to incorporate the select of lookups |
41: | from the extract objects |
42: | 22-MAR-2004 K.Boussema Added a parameter p_module to the TRACE calls |
43: | and the procedure. |
807: --=============================================================================
808: -- *********** Local Trace Routine **********
809: --=============================================================================
810:
811: C_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
812: C_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
813: C_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
814: C_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
815: C_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
808: -- *********** Local Trace Routine **********
809: --=============================================================================
810:
811: C_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
812: C_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
813: C_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
814: C_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
815: C_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
816: C_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
809: --=============================================================================
810:
811: C_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
812: C_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
813: C_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
814: C_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
815: C_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
816: C_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
817:
810:
811: C_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
812: C_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
813: C_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
814: C_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
815: C_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
816: C_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
817:
818: C_LEVEL_LOG_DISABLED CONSTANT NUMBER := 99;
811: C_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
812: C_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
813: C_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
814: C_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
815: C_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
816: C_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
817:
818: C_LEVEL_LOG_DISABLED CONSTANT NUMBER := 99;
819: C_DEFAULT_MODULE CONSTANT VARCHAR2(240) := 'xla.plsql.xla_cmp_acct_line_type_pkg';
812: C_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
813: C_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
814: C_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
815: C_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
816: C_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
817:
818: C_LEVEL_LOG_DISABLED CONSTANT NUMBER := 99;
819: C_DEFAULT_MODULE CONSTANT VARCHAR2(240) := 'xla.plsql.xla_cmp_acct_line_type_pkg';
820:
828: IS
829: BEGIN
830:
831: ----------------------------------------------------------------
832: -- Following is for FND log.
833: ----------------------------------------------------------------
834: IF (p_msg IS NULL AND p_level >= g_log_level) THEN
835: fnd_log.message(p_level, p_module);
836: ELSIF p_level >= g_log_level THEN
831: ----------------------------------------------------------------
832: -- Following is for FND log.
833: ----------------------------------------------------------------
834: IF (p_msg IS NULL AND p_level >= g_log_level) THEN
835: fnd_log.message(p_level, p_module);
836: ELSIF p_level >= g_log_level THEN
837: fnd_log.string(p_level, p_module, p_msg);
838: END IF;
839:
833: ----------------------------------------------------------------
834: IF (p_msg IS NULL AND p_level >= g_log_level) THEN
835: fnd_log.message(p_level, p_module);
836: ELSIF p_level >= g_log_level THEN
837: fnd_log.string(p_level, p_module, p_msg);
838: END IF;
839:
840: EXCEPTION
841: WHEN xla_exceptions_pkg.application_exception THEN
4298: --=============================================================================
4299:
4300: BEGIN
4301:
4302: g_log_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
4303: g_log_enabled := fnd_log.test
4304: (log_level => g_log_level
4305: ,module => C_DEFAULT_MODULE);
4306:
4299:
4300: BEGIN
4301:
4302: g_log_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
4303: g_log_enabled := fnd_log.test
4304: (log_level => g_log_level
4305: ,module => C_DEFAULT_MODULE);
4306:
4307: IF NOT g_log_enabled THEN