107: --------------------------------------------------------------------------------
108: --=============================================================================
109: -- *********** Local Trace Routine **********
110: --=============================================================================
111: C_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
112: C_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
113: C_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
114: C_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
115: C_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
108: --=============================================================================
109: -- *********** Local Trace Routine **********
110: --=============================================================================
111: C_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
112: C_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
113: C_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
114: C_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
115: C_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
116: C_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
109: -- *********** Local Trace Routine **********
110: --=============================================================================
111: C_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
112: C_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
113: C_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
114: C_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
115: C_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
116: C_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
117:
110: --=============================================================================
111: C_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
112: C_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
113: C_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
114: C_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
115: C_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
116: C_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
117:
118: C_LEVEL_LOG_DISABLED CONSTANT NUMBER := 99;
111: C_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
112: C_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
113: C_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
114: C_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
115: C_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
116: C_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
117:
118: C_LEVEL_LOG_DISABLED CONSTANT NUMBER := 99;
119: C_DEFAULT_MODULE CONSTANT VARCHAR2(240):= 'ja.plsql.ja_tp_balance_rpt_pkg';
112: C_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
113: C_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
114: C_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
115: C_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
116: C_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
117:
118: C_LEVEL_LOG_DISABLED CONSTANT NUMBER := 99;
119: C_DEFAULT_MODULE CONSTANT VARCHAR2(240):= 'ja.plsql.ja_tp_balance_rpt_pkg';
120:
127: ,p_level IN NUMBER
128: ,p_module IN VARCHAR2) IS
129: BEGIN
130: IF (p_msg IS NULL AND p_level >= g_log_level) THEN
131: fnd_log.message(p_level, NVL(p_module,C_DEFAULT_MODULE));
132: ELSIF p_level >= g_log_level THEN
133: fnd_log.string(p_level, NVL(p_module,C_DEFAULT_MODULE), p_msg);
134: END IF;
135:
129: BEGIN
130: IF (p_msg IS NULL AND p_level >= g_log_level) THEN
131: fnd_log.message(p_level, NVL(p_module,C_DEFAULT_MODULE));
132: ELSIF p_level >= g_log_level THEN
133: fnd_log.string(p_level, NVL(p_module,C_DEFAULT_MODULE), p_msg);
134: END IF;
135:
136: EXCEPTION
137: WHEN OTHERS THEN
135:
136: EXCEPTION
137: WHEN OTHERS THEN
138: IF (p_msg IS NULL AND p_level >= g_log_level) THEN
139: fnd_log.message(p_level, NVL(p_module,C_DEFAULT_MODULE));
140: END IF;
141: END trace;
142:
143: /*======================================================================+
1223: --
1224: --=============================================================================
1225:
1226: BEGIN
1227: g_log_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
1228: g_log_enabled := fnd_log.test
1229: (log_level => g_log_level
1230: ,MODULE => C_DEFAULT_MODULE);
1231:
1224: --=============================================================================
1225:
1226: BEGIN
1227: g_log_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
1228: g_log_enabled := fnd_log.test
1229: (log_level => g_log_level
1230: ,MODULE => C_DEFAULT_MODULE);
1231:
1232: IF NOT g_log_enabled THEN