19: | 22-APR-2003 K.Boussema Included error messages |
20: | 17-JUL-2003 K.Boussema Reviewd the code |
21: | 18-DEC-2003 K.Boussema Changed to fix bug 3042840,3307761,3268940 |
22: | 3310291 and 3320689 |
23: | 23-FEB-2004 K.Boussema Made changes for the FND_LOG. |
24: | 12-MAR-2004 K.Boussema Changed to incorporate the select of lookups |
25: | from the extract objects |
26: | 22-MAR-2004 K.Boussema Added a parameter p_module to the TRACE calls|
27: | and the procedure. |
46: --=============================================================================
47: -- *********** Local Trace Routine **********
48: --=============================================================================
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: -- *********** Local Trace Routine **********
48: --=============================================================================
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: --=============================================================================
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:
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:
57: C_LEVEL_LOG_DISABLED CONSTANT NUMBER := 99;
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:
57: C_LEVEL_LOG_DISABLED CONSTANT NUMBER := 99;
58: C_DEFAULT_MODULE CONSTANT VARCHAR2(240) := 'xla.plsql.xla_cmp_call_fct_pkg';
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:
57: C_LEVEL_LOG_DISABLED CONSTANT NUMBER := 99;
58: C_DEFAULT_MODULE CONSTANT VARCHAR2(240) := 'xla.plsql.xla_cmp_call_fct_pkg';
59:
66: ,p_module IN VARCHAR2)
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
468: --=============================================================================
469:
470: BEGIN
471:
472: g_log_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
473: g_log_enabled := fnd_log.test
474: (log_level => g_log_level
475: ,module => C_DEFAULT_MODULE);
476:
469:
470: BEGIN
471:
472: g_log_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
473: g_log_enabled := fnd_log.test
474: (log_level => g_log_level
475: ,module => C_DEFAULT_MODULE);
476:
477: IF NOT g_log_enabled THEN