45: | Extract Integrity Checker routine |
46: | 02-FRB-2004 K.Boussema Changed code generated, refer to bug 3274707 |
47: | 12-FEB-2004 K.Boussema Changed to only display the extraxt error msg|
48: | of the alway_populated objects |
49: | 19-FEB-2004 K.Boussema Made changes for the FND_LOG. |
50: | 12-MAR-2004 K.Boussema Changed to incorporate the select of lookups |
51: | from the extract objects |
52: | 22-MAR-2004 K.Boussema Added a parameter p_module to the TRACE calls|
53: | and the procedure. |
1211: --
1212: --
1213: --
1214: --
1215: -- FND_LOG trace
1216: --
1217: --
1218: --
1219: --
1230: --=============================================================================
1231: -- *********** Local Trace Routine **********
1232: --=============================================================================
1233:
1234: C_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
1235: C_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
1236: C_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
1237: C_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
1238: C_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
1231: -- *********** Local Trace Routine **********
1232: --=============================================================================
1233:
1234: C_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
1235: C_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
1236: C_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
1237: C_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
1238: C_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
1239: C_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
1232: --=============================================================================
1233:
1234: C_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
1235: C_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
1236: C_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
1237: C_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
1238: C_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
1239: C_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
1240:
1233:
1234: C_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
1235: C_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
1236: C_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
1237: C_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
1238: C_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
1239: C_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
1240:
1241: C_LEVEL_LOG_DISABLED CONSTANT NUMBER := 99;
1234: C_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
1235: C_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
1236: C_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
1237: C_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
1238: C_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
1239: C_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
1240:
1241: C_LEVEL_LOG_DISABLED CONSTANT NUMBER := 99;
1242: C_DEFAULT_MODULE CONSTANT VARCHAR2(240) := 'xla.plsql.XLA_CMP_EVENT_TYPE_PKG';
1235: C_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
1236: C_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
1237: C_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
1238: C_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
1239: C_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
1240:
1241: C_LEVEL_LOG_DISABLED CONSTANT NUMBER := 99;
1242: C_DEFAULT_MODULE CONSTANT VARCHAR2(240) := 'xla.plsql.XLA_CMP_EVENT_TYPE_PKG';
1243:
1250: ,p_module IN VARCHAR2)
1251: IS
1252: BEGIN
1253: IF (p_msg IS NULL AND p_level >= g_log_level) THEN
1254: fnd_log.message(p_level, p_module);
1255: ELSIF p_level >= g_log_level THEN
1256: fnd_log.string(p_level, p_module, p_msg);
1257: END IF;
1258:
1252: BEGIN
1253: IF (p_msg IS NULL AND p_level >= g_log_level) THEN
1254: fnd_log.message(p_level, p_module);
1255: ELSIF p_level >= g_log_level THEN
1256: fnd_log.string(p_level, p_module, p_msg);
1257: END IF;
1258:
1259: EXCEPTION
1260: WHEN xla_exceptions_pkg.application_exception THEN
5944: --=============================================================================
5945:
5946: BEGIN
5947:
5948: g_log_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
5949: g_log_enabled := fnd_log.test
5950: (log_level => g_log_level
5951: ,module => C_DEFAULT_MODULE);
5952:
5945:
5946: BEGIN
5947:
5948: g_log_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
5949: g_log_enabled := fnd_log.test
5950: (log_level => g_log_level
5951: ,module => C_DEFAULT_MODULE);
5952:
5953: IF NOT g_log_enabled THEN