53: --=============================================================================
54:
55: -- Constants
56:
57: C_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
58: C_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
59: C_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
60: C_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
61: C_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
54:
55: -- Constants
56:
57: C_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
58: C_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
59: C_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
60: C_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
61: C_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
62: C_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
55: -- Constants
56:
57: C_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
58: C_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
59: C_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
60: C_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
61: C_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
62: C_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
63: C_LEVEL_LOG_DISABLED CONSTANT NUMBER := 99;
56:
57: C_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
58: C_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
59: C_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
60: C_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
61: C_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
62: C_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
63: C_LEVEL_LOG_DISABLED CONSTANT NUMBER := 99;
64: C_DEFAULT_MODULE CONSTANT VARCHAR2(240) := 'xla.plsql.xla_security_policy_pkg';
57: C_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
58: C_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
59: C_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
60: C_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
61: C_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
62: C_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
63: C_LEVEL_LOG_DISABLED CONSTANT NUMBER := 99;
64: C_DEFAULT_MODULE CONSTANT VARCHAR2(240) := 'xla.plsql.xla_security_policy_pkg';
65:
58: C_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
59: C_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
60: C_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
61: C_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
62: C_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
63: C_LEVEL_LOG_DISABLED CONSTANT NUMBER := 99;
64: C_DEFAULT_MODULE CONSTANT VARCHAR2(240) := 'xla.plsql.xla_security_policy_pkg';
65:
66:
64: C_DEFAULT_MODULE CONSTANT VARCHAR2(240) := 'xla.plsql.xla_security_policy_pkg';
65:
66:
67: -- Global variables for debugging
68: g_log_level PLS_INTEGER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
69: g_log_enabled BOOLEAN := fnd_log.test
70: (log_level => g_log_level
71: ,module => C_DEFAULT_MODULE);
72:
65:
66:
67: -- Global variables for debugging
68: g_log_level PLS_INTEGER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
69: g_log_enabled BOOLEAN := fnd_log.test
70: (log_level => g_log_level
71: ,module => C_DEFAULT_MODULE);
72:
73:
82: ,p_module IN VARCHAR2) IS
83: BEGIN
84:
85: IF (p_msg IS NULL AND p_level >= g_log_level) THEN
86: fnd_log.message(p_level, p_module);
87: ELSIF p_level >= g_log_level THEN
88: fnd_log.string(p_level, p_module, p_msg);
89: END IF;
90: EXCEPTION
84:
85: IF (p_msg IS NULL AND p_level >= g_log_level) THEN
86: fnd_log.message(p_level, p_module);
87: ELSIF p_level >= g_log_level THEN
88: fnd_log.string(p_level, p_module, p_msg);
89: END IF;
90: EXCEPTION
91: WHEN xla_exceptions_pkg.application_exception THEN
92: RAISE;