45: | Added CacheExtractObject proc. and changed |
46: | CacheExtractErrors procedure |
47: | 04-FEB-2004 K.Boussema Removed the token LEDGER_NAME from message |
48: | XLA_AP_INV_PAD_SETUP, bug 3320707 |
49: | 12-FEB-2004 K.Boussema Made changes for the FND_LOG. |
50: | 22-MAR-2004 K.Boussema Added a parameter p_module to the TRACE calls|
51: | and the procedure. |
52: | 11-MAY-2004 K.Boussema Removed the call to XLA trace routine from |
53: | trace() procedure |
210: --=============================================================================
211: -- *********** Local Trace Routine **********
212: --=============================================================================
213:
214: C_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
215: C_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
216: C_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
217: C_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
218: C_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
211: -- *********** Local Trace Routine **********
212: --=============================================================================
213:
214: C_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
215: C_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
216: C_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
217: C_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
218: C_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
219: C_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
212: --=============================================================================
213:
214: C_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
215: C_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
216: C_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
217: C_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
218: C_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
219: C_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
220:
213:
214: C_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
215: C_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
216: C_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
217: C_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
218: C_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
219: C_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
220:
221: C_LEVEL_LOG_DISABLED CONSTANT NUMBER := 99;
214: C_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
215: C_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
216: C_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
217: C_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
218: C_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
219: C_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
220:
221: C_LEVEL_LOG_DISABLED CONSTANT NUMBER := 99;
222: C_DEFAULT_MODULE CONSTANT VARCHAR2(240) := 'xla.plsql.xla_accounting_engine_pkg';
215: C_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
216: C_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
217: C_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
218: C_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
219: C_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
220:
221: C_LEVEL_LOG_DISABLED CONSTANT NUMBER := 99;
222: C_DEFAULT_MODULE CONSTANT VARCHAR2(240) := 'xla.plsql.xla_accounting_engine_pkg';
223:
230: ,p_module IN VARCHAR2) IS
231: BEGIN
232:
233: ----------------------------------------------------------------------------
234: -- Following is for FND log.
235: ----------------------------------------------------------------------------
236: IF (p_msg IS NULL AND p_level >= g_log_level) THEN
237: fnd_log.message(p_level, NVL(p_module,C_DEFAULT_MODULE));
238: ELSIF p_level >= g_log_level THEN
233: ----------------------------------------------------------------------------
234: -- Following is for FND log.
235: ----------------------------------------------------------------------------
236: IF (p_msg IS NULL AND p_level >= g_log_level) THEN
237: fnd_log.message(p_level, NVL(p_module,C_DEFAULT_MODULE));
238: ELSIF p_level >= g_log_level THEN
239: fnd_log.string(p_level, NVL(p_module,C_DEFAULT_MODULE), p_msg);
240: END IF;
241:
235: ----------------------------------------------------------------------------
236: IF (p_msg IS NULL AND p_level >= g_log_level) THEN
237: fnd_log.message(p_level, NVL(p_module,C_DEFAULT_MODULE));
238: ELSIF p_level >= g_log_level THEN
239: fnd_log.string(p_level, NVL(p_module,C_DEFAULT_MODULE), p_msg);
240: END IF;
241:
242: EXCEPTION
243: WHEN xla_exceptions_pkg.application_exception THEN
2113: --=============================================================================
2114:
2115: BEGIN
2116:
2117: g_log_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
2118: g_log_enabled := fnd_log.test
2119: (log_level => g_log_level
2120: ,module => C_DEFAULT_MODULE);
2121:
2114:
2115: BEGIN
2116:
2117: g_log_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
2118: g_log_enabled := fnd_log.test
2119: (log_level => g_log_level
2120: ,module => C_DEFAULT_MODULE);
2121:
2122: IF NOT g_log_enabled THEN