APPS.INV_LOG_UTIL dependencies on UTL_FILE

Line 5: g_fd utl_file.file_type; -- Log file descriptor

1: PACKAGE BODY inv_log_util AS
2: /* $Header: INVLOGUB.pls 120.2 2006/10/13 16:41:35 rambrose noship $ */
3:
4: /** Globals to hold Logging attributs **/
5: g_fd utl_file.file_type; -- Log file descriptor
6: g_trace_on number := NULL; -- Log ON state
7: g_dbg_lvl number := 0;
8: g_cp_flag number := 0;
9: g_file_init boolean := false;

Line 87: if utl_file.is_open(INV_DEBUG_INTERFACE.g_file_handle) then

83: l_dbgdir := substr(l_dbgpath, 1, l_strlen - length(l_dbgfile) - 1);
84:
85: -- Open Log file
86: IF l_dbgdir is not null then
87: if utl_file.is_open(INV_DEBUG_INTERFACE.g_file_handle) then
88: g_fd := INV_DEBUG_INTERFACE.g_file_handle;
89: else
90: g_fd := utl_file.fopen(l_dbgdir, l_dbgfile, 'a');
91: end if;

Line 90: g_fd := utl_file.fopen(l_dbgdir, l_dbgfile, 'a');

86: IF l_dbgdir is not null then
87: if utl_file.is_open(INV_DEBUG_INTERFACE.g_file_handle) then
88: g_fd := INV_DEBUG_INTERFACE.g_file_handle;
89: else
90: g_fd := utl_file.fopen(l_dbgdir, l_dbgfile, 'a');
91: end if;
92: utl_file.put_line(g_fd, '');
93: utl_file.put_line(g_fd, ' ******** New Session:'||l_session||'****'||l_errmsg||' **********');
94: if g_invfile IS NULL then

Line 92: utl_file.put_line(g_fd, '');

88: g_fd := INV_DEBUG_INTERFACE.g_file_handle;
89: else
90: g_fd := utl_file.fopen(l_dbgdir, l_dbgfile, 'a');
91: end if;
92: utl_file.put_line(g_fd, '');
93: utl_file.put_line(g_fd, ' ******** New Session:'||l_session||'****'||l_errmsg||' **********');
94: if g_invfile IS NULL then
95: WSH_DEBUG_INTERFACE.Start_Debugger(l_dbgdir,l_dbgfile,g_fd); --call shipping debugger
96: OE_DEBUG_PUB.Start_ONT_Debugger(l_dbgdir,l_dbgfile,g_fd); -- call OM debugger

Line 93: utl_file.put_line(g_fd, ' ******** New Session:'||l_session||'****'||l_errmsg||' **********');

89: else
90: g_fd := utl_file.fopen(l_dbgdir, l_dbgfile, 'a');
91: end if;
92: utl_file.put_line(g_fd, '');
93: utl_file.put_line(g_fd, ' ******** New Session:'||l_session||'****'||l_errmsg||' **********');
94: if g_invfile IS NULL then
95: WSH_DEBUG_INTERFACE.Start_Debugger(l_dbgdir,l_dbgfile,g_fd); --call shipping debugger
96: OE_DEBUG_PUB.Start_ONT_Debugger(l_dbgdir,l_dbgfile,g_fd); -- call OM debugger
97: g_invfile := l_dbgfile;

Line 126: utl_file.put_line(g_fd, l_timestamp || p_module ||': '|| l_message);

122: --If called from a concurrent program add msg to FND log
123: if ( g_cp_flag > 0 ) then
124: FND_FILE.put_line(FND_FILE.LOG, l_timestamp || p_module ||': '|| l_message);
125: if (g_file_init) then
126: utl_file.put_line(g_fd, l_timestamp || p_module ||': '|| l_message);
127: utl_file.fflush(g_fd);
128: end if;
129: else
130: if (g_file_init) then

Line 127: utl_file.fflush(g_fd);

123: if ( g_cp_flag > 0 ) then
124: FND_FILE.put_line(FND_FILE.LOG, l_timestamp || p_module ||': '|| l_message);
125: if (g_file_init) then
126: utl_file.put_line(g_fd, l_timestamp || p_module ||': '|| l_message);
127: utl_file.fflush(g_fd);
128: end if;
129: else
130: if (g_file_init) then
131: utl_file.put_line(g_fd, l_timestamp || p_module ||': '|| l_message);

Line 131: utl_file.put_line(g_fd, l_timestamp || p_module ||': '|| l_message);

127: utl_file.fflush(g_fd);
128: end if;
129: else
130: if (g_file_init) then
131: utl_file.put_line(g_fd, l_timestamp || p_module ||': '|| l_message);
132: utl_file.fflush(g_fd);
133: end if;
134: end if;
135: end if;

Line 132: utl_file.fflush(g_fd);

128: end if;
129: else
130: if (g_file_init) then
131: utl_file.put_line(g_fd, l_timestamp || p_module ||': '|| l_message);
132: utl_file.fflush(g_fd);
133: end if;
134: end if;
135: end if;
136: -- dbms_output.put_line(p_message);

Line 138: when utl_file.INVALID_PATH then

134: end if;
135: end if;
136: -- dbms_output.put_line(p_message);
137: exception
138: when utl_file.INVALID_PATH then
139: null;
140: -- dbms_output.put_line('*** Error: Invalid Path');
141: when others then
142: null;