66: --=============================================================================
67: --
68: -- Logging levels for R12 compatibility. (DO NOT USE FOR NEW PLSQL CODE)
69: --
70: C_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
71: C_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
72: C_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
73: C_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
74: C_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
67: --
68: -- Logging levels for R12 compatibility. (DO NOT USE FOR NEW PLSQL CODE)
69: --
70: C_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
71: C_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
72: C_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
73: C_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
74: C_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
75: C_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
68: -- Logging levels for R12 compatibility. (DO NOT USE FOR NEW PLSQL CODE)
69: --
70: C_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
71: C_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
72: C_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
73: C_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
74: C_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
75: C_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
76:
69: --
70: C_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
71: C_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
72: C_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
73: C_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
74: C_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
75: C_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
76:
77: --
70: C_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
71: C_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
72: C_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
73: C_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
74: C_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
75: C_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
76:
77: --
78: -- Fusion Logging levels
71: C_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
72: C_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
73: C_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
74: C_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
75: C_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
76:
77: --
78: -- Fusion Logging levels
79: --
77: --
78: -- Fusion Logging levels
79: --
80: /*
81: C_LEVEL_SEVERE CONSTANT NUMBER := FND_LOG.LEVEL_SEVERE;
82: C_LEVEL_WARNING CONSTANT NUMBER := FND_LOG.LEVEL_WARNING;
83: C_LEVEL_INFO CONSTANT NUMBER := FND_LOG.LEVEL_INFO;
84: C_LEVEL_CONFIG CONSTANT NUMBER := FND_LOG.LEVEL_CONFIG;
85: C_LEVEL_FINE CONSTANT NUMBER := FND_LOG.LEVEL_FINE;
78: -- Fusion Logging levels
79: --
80: /*
81: C_LEVEL_SEVERE CONSTANT NUMBER := FND_LOG.LEVEL_SEVERE;
82: C_LEVEL_WARNING CONSTANT NUMBER := FND_LOG.LEVEL_WARNING;
83: C_LEVEL_INFO CONSTANT NUMBER := FND_LOG.LEVEL_INFO;
84: C_LEVEL_CONFIG CONSTANT NUMBER := FND_LOG.LEVEL_CONFIG;
85: C_LEVEL_FINE CONSTANT NUMBER := FND_LOG.LEVEL_FINE;
86: C_LEVEL_FINER CONSTANT NUMBER := FND_LOG.LEVEL_FINER;
79: --
80: /*
81: C_LEVEL_SEVERE CONSTANT NUMBER := FND_LOG.LEVEL_SEVERE;
82: C_LEVEL_WARNING CONSTANT NUMBER := FND_LOG.LEVEL_WARNING;
83: C_LEVEL_INFO CONSTANT NUMBER := FND_LOG.LEVEL_INFO;
84: C_LEVEL_CONFIG CONSTANT NUMBER := FND_LOG.LEVEL_CONFIG;
85: C_LEVEL_FINE CONSTANT NUMBER := FND_LOG.LEVEL_FINE;
86: C_LEVEL_FINER CONSTANT NUMBER := FND_LOG.LEVEL_FINER;
87: C_LEVEL_FINEST CONSTANT NUMBER := FND_LOG.LEVEL_FINEST; */
80: /*
81: C_LEVEL_SEVERE CONSTANT NUMBER := FND_LOG.LEVEL_SEVERE;
82: C_LEVEL_WARNING CONSTANT NUMBER := FND_LOG.LEVEL_WARNING;
83: C_LEVEL_INFO CONSTANT NUMBER := FND_LOG.LEVEL_INFO;
84: C_LEVEL_CONFIG CONSTANT NUMBER := FND_LOG.LEVEL_CONFIG;
85: C_LEVEL_FINE CONSTANT NUMBER := FND_LOG.LEVEL_FINE;
86: C_LEVEL_FINER CONSTANT NUMBER := FND_LOG.LEVEL_FINER;
87: C_LEVEL_FINEST CONSTANT NUMBER := FND_LOG.LEVEL_FINEST; */
88:
81: C_LEVEL_SEVERE CONSTANT NUMBER := FND_LOG.LEVEL_SEVERE;
82: C_LEVEL_WARNING CONSTANT NUMBER := FND_LOG.LEVEL_WARNING;
83: C_LEVEL_INFO CONSTANT NUMBER := FND_LOG.LEVEL_INFO;
84: C_LEVEL_CONFIG CONSTANT NUMBER := FND_LOG.LEVEL_CONFIG;
85: C_LEVEL_FINE CONSTANT NUMBER := FND_LOG.LEVEL_FINE;
86: C_LEVEL_FINER CONSTANT NUMBER := FND_LOG.LEVEL_FINER;
87: C_LEVEL_FINEST CONSTANT NUMBER := FND_LOG.LEVEL_FINEST; */
88:
89: C_LEVEL_LOG_DISABLED CONSTANT NUMBER := 1000000000;
82: C_LEVEL_WARNING CONSTANT NUMBER := FND_LOG.LEVEL_WARNING;
83: C_LEVEL_INFO CONSTANT NUMBER := FND_LOG.LEVEL_INFO;
84: C_LEVEL_CONFIG CONSTANT NUMBER := FND_LOG.LEVEL_CONFIG;
85: C_LEVEL_FINE CONSTANT NUMBER := FND_LOG.LEVEL_FINE;
86: C_LEVEL_FINER CONSTANT NUMBER := FND_LOG.LEVEL_FINER;
87: C_LEVEL_FINEST CONSTANT NUMBER := FND_LOG.LEVEL_FINEST; */
88:
89: C_LEVEL_LOG_DISABLED CONSTANT NUMBER := 1000000000;
90: C_DEFAULT_MODULE CONSTANT VARCHAR2(240) := 'xla.plsql.xla_ca_balances_pkg';
83: C_LEVEL_INFO CONSTANT NUMBER := FND_LOG.LEVEL_INFO;
84: C_LEVEL_CONFIG CONSTANT NUMBER := FND_LOG.LEVEL_CONFIG;
85: C_LEVEL_FINE CONSTANT NUMBER := FND_LOG.LEVEL_FINE;
86: C_LEVEL_FINER CONSTANT NUMBER := FND_LOG.LEVEL_FINER;
87: C_LEVEL_FINEST CONSTANT NUMBER := FND_LOG.LEVEL_FINEST; */
88:
89: C_LEVEL_LOG_DISABLED CONSTANT NUMBER := 1000000000;
90: C_DEFAULT_MODULE CONSTANT VARCHAR2(240) := 'xla.plsql.xla_ca_balances_pkg';
91:
98: ,p_module IN VARCHAR2 DEFAULT C_DEFAULT_MODULE) IS
99:
100: BEGIN
101: IF (p_msg IS NULL AND p_level >= g_log_level) THEN
102: fnd_log.message(p_level, p_module);
103: ELSIF p_level >= g_log_level THEN
104: fnd_log.string(p_level, p_module, p_msg);
105: END IF;
106:
100: BEGIN
101: IF (p_msg IS NULL AND p_level >= g_log_level) THEN
102: fnd_log.message(p_level, p_module);
103: ELSIF p_level >= g_log_level THEN
104: fnd_log.string(p_level, p_module, p_msg);
105: END IF;
106:
107: EXCEPTION
108: WHEN xla_exceptions_pkg.application_exception THEN
1302: --
1303: --=============================================================================
1304: BEGIN
1305:
1306: g_log_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
1307: g_log_enabled := fnd_log.test
1308: (log_level => g_log_level
1309: ,module => C_DEFAULT_MODULE);
1310:
1303: --=============================================================================
1304: BEGIN
1305:
1306: g_log_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
1307: g_log_enabled := fnd_log.test
1308: (log_level => g_log_level
1309: ,module => C_DEFAULT_MODULE);
1310:
1311: IF NOT g_log_enabled THEN