25: | 01-SEP-2003 K.Boussema Reviewed the package comment generated |
26: | 18-DEC-2003 K.Boussema Changed to fix bug 3042840,3307761,3268940 |
27: | 3310291 and 3320689 |
28: | 23-DEC-2003 K.Boussema Added a call to Extract Integrity checker |
29: | 19-FEB-2004 K.Boussema Made changes for the FND_LOG. |
30: | 12-MAR-2004 K.Boussema Changed to incorporate the select of lookups |
31: | from the extract objects |
32: | 22-MAR-2004 K.Boussema Added a parameter p_module to the TRACE calls|
33: | and the procedure. |
192: --=============================================================================
193: -- *********** Local Trace Routine **********
194: --=============================================================================
195:
196: C_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
197: C_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
198: C_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
199: C_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
200: C_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
193: -- *********** Local Trace Routine **********
194: --=============================================================================
195:
196: C_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
197: C_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
198: C_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
199: C_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
200: C_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
201: C_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
194: --=============================================================================
195:
196: C_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
197: C_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
198: C_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
199: C_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
200: C_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
201: C_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
202:
195:
196: C_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
197: C_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
198: C_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
199: C_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
200: C_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
201: C_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
202:
203: C_LEVEL_LOG_DISABLED CONSTANT NUMBER := 99;
196: C_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
197: C_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
198: C_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
199: C_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
200: C_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
201: C_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
202:
203: C_LEVEL_LOG_DISABLED CONSTANT NUMBER := 99;
204: C_DEFAULT_MODULE CONSTANT VARCHAR2(240) := ''xla.plsql.$PACKAGE_NAME$'';
197: C_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
198: C_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
199: C_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
200: C_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
201: C_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
202:
203: C_LEVEL_LOG_DISABLED CONSTANT NUMBER := 99;
204: C_DEFAULT_MODULE CONSTANT VARCHAR2(240) := ''xla.plsql.$PACKAGE_NAME$'';
205:
214: ,p_level IN NUMBER
215: ,p_module IN VARCHAR2 ) IS
216: BEGIN
217: ----------------------------------------------------------------------------
218: -- Following is for FND log.
219: ----------------------------------------------------------------------------
220: IF (p_msg IS NULL AND p_level >= g_log_level) THEN
221: fnd_log.message(p_level, p_module);
222: ELSIF p_level >= g_log_level THEN
217: ----------------------------------------------------------------------------
218: -- Following is for FND log.
219: ----------------------------------------------------------------------------
220: IF (p_msg IS NULL AND p_level >= g_log_level) THEN
221: fnd_log.message(p_level, p_module);
222: ELSIF p_level >= g_log_level THEN
223: fnd_log.string(p_level, p_module, p_msg);
224: END IF;
225:
219: ----------------------------------------------------------------------------
220: IF (p_msg IS NULL AND p_level >= g_log_level) THEN
221: fnd_log.message(p_level, p_module);
222: ELSIF p_level >= g_log_level THEN
223: fnd_log.string(p_level, p_module, p_msg);
224: END IF;
225:
226: EXCEPTION
227: WHEN xla_exceptions_pkg.application_exception THEN
490: -- *********** Initialization routine **********
491: --=============================================================================
492:
493: BEGIN
494: g_log_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
495: g_log_enabled := fnd_log.test
496: (log_level => g_log_level
497: ,module => C_DEFAULT_MODULE);
498:
491: --=============================================================================
492:
493: BEGIN
494: g_log_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
495: g_log_enabled := fnd_log.test
496: (log_level => g_log_level
497: ,module => C_DEFAULT_MODULE);
498:
499: IF NOT g_log_enabled THEN
560: --=============================================================================
561: -- *********** Local Trace Routine **********
562: --=============================================================================
563:
564: C_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
565: C_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
566: C_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
567: C_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
568: C_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
561: -- *********** Local Trace Routine **********
562: --=============================================================================
563:
564: C_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
565: C_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
566: C_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
567: C_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
568: C_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
569: C_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
562: --=============================================================================
563:
564: C_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
565: C_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
566: C_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
567: C_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
568: C_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
569: C_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
570:
563:
564: C_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
565: C_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
566: C_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
567: C_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
568: C_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
569: C_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
570:
571: C_LEVEL_LOG_DISABLED CONSTANT NUMBER := 99;
564: C_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
565: C_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
566: C_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
567: C_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
568: C_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
569: C_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
570:
571: C_LEVEL_LOG_DISABLED CONSTANT NUMBER := 99;
572: C_DEFAULT_MODULE CONSTANT VARCHAR2(240) := 'xla.plsql.xla_cmp_pad_pkg';
565: C_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
566: C_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
567: C_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
568: C_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
569: C_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
570:
571: C_LEVEL_LOG_DISABLED CONSTANT NUMBER := 99;
572: C_DEFAULT_MODULE CONSTANT VARCHAR2(240) := 'xla.plsql.xla_cmp_pad_pkg';
573:
579: ,p_level IN NUMBER
580: ,p_module IN VARCHAR2 ) IS
581: BEGIN
582: ----------------------------------------------------------------------------
583: -- Following is for FND log.
584: ----------------------------------------------------------------------------
585: IF (p_msg IS NULL AND p_level >= g_log_level) THEN
586: fnd_log.message(p_level, p_module);
587: ELSIF p_level >= g_log_level THEN
582: ----------------------------------------------------------------------------
583: -- Following is for FND log.
584: ----------------------------------------------------------------------------
585: IF (p_msg IS NULL AND p_level >= g_log_level) THEN
586: fnd_log.message(p_level, p_module);
587: ELSIF p_level >= g_log_level THEN
588: fnd_log.string(p_level, p_module, p_msg);
589: END IF;
590:
584: ----------------------------------------------------------------------------
585: IF (p_msg IS NULL AND p_level >= g_log_level) THEN
586: fnd_log.message(p_level, p_module);
587: ELSIF p_level >= g_log_level THEN
588: fnd_log.string(p_level, p_module, p_msg);
589: END IF;
590:
591: EXCEPTION
592: WHEN xla_exceptions_pkg.application_exception THEN
2259: --=============================================================================
2260:
2261: BEGIN
2262:
2263: g_log_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
2264: g_log_enabled := fnd_log.test
2265: (log_level => g_log_level
2266: ,module => C_DEFAULT_MODULE);
2267:
2260:
2261: BEGIN
2262:
2263: g_log_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
2264: g_log_enabled := fnd_log.test
2265: (log_level => g_log_level
2266: ,module => C_DEFAULT_MODULE);
2267:
2268: IF NOT g_log_enabled THEN