71:
72: --=============================================================================
73: -- *********** Local Trace Routine **********
74: --=============================================================================
75: C_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
76: C_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
77: C_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
78: C_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
79: C_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
72: --=============================================================================
73: -- *********** Local Trace Routine **********
74: --=============================================================================
75: C_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
76: C_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
77: C_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
78: C_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
79: C_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
80: C_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
73: -- *********** Local Trace Routine **********
74: --=============================================================================
75: C_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
76: C_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
77: C_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
78: C_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
79: C_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
80: C_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
81:
74: --=============================================================================
75: C_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
76: C_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
77: C_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
78: C_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
79: C_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
80: C_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
81:
82: C_LEVEL_LOG_DISABLED CONSTANT NUMBER := 99;
75: C_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
76: C_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
77: C_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
78: C_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
79: C_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
80: C_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
81:
82: C_LEVEL_LOG_DISABLED CONSTANT NUMBER := 99;
83:
76: C_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
77: C_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
78: C_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
79: C_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
80: C_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
81:
82: C_LEVEL_LOG_DISABLED CONSTANT NUMBER := 99;
83:
84: C_DEFAULT_MODULE CONSTANT VARCHAR2(240) := 'xla.plsql.xla_events_pub_pkg';
96: ,p_level IN NUMBER
97: ,p_module IN VARCHAR2 DEFAULT C_DEFAULT_MODULE) IS
98: BEGIN
99: IF (p_msg IS NULL AND p_level >= g_log_level) THEN
100: fnd_log.message(p_level, p_module);
101: ELSIF p_level >= g_log_level THEN
102: fnd_log.string(p_level, p_module, p_msg);
103: END IF;
104: EXCEPTION
98: BEGIN
99: IF (p_msg IS NULL AND p_level >= g_log_level) THEN
100: fnd_log.message(p_level, p_module);
101: ELSIF p_level >= g_log_level THEN
102: fnd_log.string(p_level, p_module, p_msg);
103: END IF;
104: EXCEPTION
105: WHEN xla_exceptions_pkg.application_exception THEN
106: RAISE;
1072: END allow_third_party_update;
1073:
1074:
1075: BEGIN
1076: g_log_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
1077: g_log_enabled := fnd_log.test
1078: (log_level => g_log_level
1079: ,MODULE => C_DEFAULT_MODULE);
1080:
1073:
1074:
1075: BEGIN
1076: g_log_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
1077: g_log_enabled := fnd_log.test
1078: (log_level => g_log_level
1079: ,MODULE => C_DEFAULT_MODULE);
1080:
1081: IF NOT g_log_enabled THEN