22: BEGIN
23:
24: IF ( nvl(fnd_global.conc_request_id, -1) > 0 )
25: THEN
26: fnd_profile.put('INV_DEBUG_LEVEL','10');
27: fnd_profile.put('INV_DEBUG_TRACE',1);
28: fnd_profile.put('INV_DEBUG_FILE','Dummy');
29: RETURN;
30: END IF;
23:
24: IF ( nvl(fnd_global.conc_request_id, -1) > 0 )
25: THEN
26: fnd_profile.put('INV_DEBUG_LEVEL','10');
27: fnd_profile.put('INV_DEBUG_TRACE',1);
28: fnd_profile.put('INV_DEBUG_FILE','Dummy');
29: RETURN;
30: END IF;
31:
24: IF ( nvl(fnd_global.conc_request_id, -1) > 0 )
25: THEN
26: fnd_profile.put('INV_DEBUG_LEVEL','10');
27: fnd_profile.put('INV_DEBUG_TRACE',1);
28: fnd_profile.put('INV_DEBUG_FILE','Dummy');
29: RETURN;
30: END IF;
31:
32: IF p_dir_name IS NOT NULL
32: IF p_dir_name IS NOT NULL
33: AND p_file_name IS NOT NULL
34: AND utl_file.is_open(p_file_handle)
35: THEN
36: fnd_profile.put('INV_DEBUG_LEVEL','10');
37: fnd_profile.put('INV_DEBUG_TRACE',1);
38:
39: --- Concatenate directory and file name based on OS
40: l_dir_separator := '/';
33: AND p_file_name IS NOT NULL
34: AND utl_file.is_open(p_file_handle)
35: THEN
36: fnd_profile.put('INV_DEBUG_LEVEL','10');
37: fnd_profile.put('INV_DEBUG_TRACE',1);
38:
39: --- Concatenate directory and file name based on OS
40: l_dir_separator := '/';
41: l_ndx := instr(p_dir_name,l_dir_separator);
43: l_dir_separator := '\';
44: end if;
45: l_dir_file_name := p_dir_name||l_dir_separator||p_file_name;
46:
47: fnd_profile.put('INV_DEBUG_FILE',l_dir_file_name);
48: g_file_handle := p_file_handle;
49: --
50: END IF;
51:
66: PROCEDURE stop_inv_debugger
67: IS
68: BEGIN
69:
70: fnd_profile.put('INV_DEBUG_LEVEL','NULL');
71: fnd_profile.put('INV_DEBUG_TRACE',2);
72: fnd_profile.put('INV_DEBUG_FILE',NULL);
73: g_file_handle := NULL;
74:
67: IS
68: BEGIN
69:
70: fnd_profile.put('INV_DEBUG_LEVEL','NULL');
71: fnd_profile.put('INV_DEBUG_TRACE',2);
72: fnd_profile.put('INV_DEBUG_FILE',NULL);
73: g_file_handle := NULL;
74:
75: EXCEPTION
68: BEGIN
69:
70: fnd_profile.put('INV_DEBUG_LEVEL','NULL');
71: fnd_profile.put('INV_DEBUG_TRACE',2);
72: fnd_profile.put('INV_DEBUG_FILE',NULL);
73: g_file_handle := NULL;
74:
75: EXCEPTION
76: WHEN OTHERS THEN