225: IF (p_debug_mode IS NOT NULL) THEN
226: g_debug_mode := p_debug_mode;
227: END IF;
228:
229: l_debug_prof_val := nvl(FND_PROFILE.value('FTE_PRC_DEBUG_FLAG'),'N');
230: IF (l_debug_prof_val = 'Y') THEN
231: g_debug := true;
232: END IF;
233:
230: IF (l_debug_prof_val = 'Y') THEN
231: g_debug := true;
232: END IF;
233:
234: l_log_level_prof_val := nvl(FND_PROFILE.value('FTE_PRC_LOG_LEVEL'),'1');
235: g_log_level := TO_NUMBER(l_log_level_prof_val);
236:
237: IF (g_debug_mode = 'FILE' AND g_debug = true AND g_utl_file_name IS NULL) THEN
238:
236:
237: IF (g_debug_mode = 'FILE' AND g_debug = true AND g_utl_file_name IS NULL) THEN
238:
239:
240: --g_utl_file_dir := nvl(FND_PROFILE.value('FTE_PRC_DEBUG_LOG_DIR'),'/sqlcom/log/ftewshg');
241: g_utl_file_dir := FND_PROFILE.value('FTE_PRC_DEBUG_LOG_DIR');
242: IF g_utl_file_dir IS NULL THEN
243:
244: --set_exception(p_met=>p_met,p_exc=>p_exc);
237: IF (g_debug_mode = 'FILE' AND g_debug = true AND g_utl_file_name IS NULL) THEN
238:
239:
240: --g_utl_file_dir := nvl(FND_PROFILE.value('FTE_PRC_DEBUG_LOG_DIR'),'/sqlcom/log/ftewshg');
241: g_utl_file_dir := FND_PROFILE.value('FTE_PRC_DEBUG_LOG_DIR');
242: IF g_utl_file_dir IS NULL THEN
243:
244: --set_exception(p_met=>p_met,p_exc=>p_exc);
245: FND_MESSAGE.SET_NAME('FTE','FTE_PRC_MISSING_LOG_DIR');
256:
257: print_tag(p_msg => '
258: printf('
259:
260: -- IF nvl(FND_PROFILE.value('QP_DEBUG'),'N') = 'Y' THEN
261: -- IF NOT OE_DEBUG_PUB.ISDebugOn THEN
262: -- G_OE_DEBUG := FALSE;
263: -- OE_DEBUG_PUB.Debug_On;
264: -- OE_DEBUG_PUB.Initialize;