DBA Data[Home] [Help]

APPS.OE_DEBUG_PUB dependencies on UTL_FILE

Line 15: G_FILE_PTR := utl_file.fopen(G_DIR, G_FILE, 'w');

11: select substr('l'|| substr(to_char(sysdate,'MI'),1,1)
12: || lpad(oe_debug_s.nextval,6,'0'),1,8) || '.dbg'
13: into G_FILE
14: from dual;
15: G_FILE_PTR := utl_file.fopen(G_DIR, G_FILE, 'w');
16: UTL_FILE.Put_Line(G_FILE_PTR,'Session Id:'||userenv('SESSIONID'));
17:
18: -- Start Other Debuggers.
19:

Line 16: UTL_FILE.Put_Line(G_FILE_PTR,'Session Id:'||userenv('SESSIONID'));

12: || lpad(oe_debug_s.nextval,6,'0'),1,8) || '.dbg'
13: into G_FILE
14: from dual;
15: G_FILE_PTR := utl_file.fopen(G_DIR, G_FILE, 'w');
16: UTL_FILE.Put_Line(G_FILE_PTR,'Session Id:'||userenv('SESSIONID'));
17:
18: -- Start Other Debuggers.
19:
20: WSH_DEBUG_INTERFACE.Start_Debugger

Line 164: utl_file.put_line(G_FILE_PTR, debug_msg);

160: -- G_Debug_tbl(G_debug_count) := substr(debug_msg,1,G_DEBUG_LEN);
161: l_debug_msg := substr(replace(debug_msg,l_g_miss_char,l_replace),1,2000);
162: FND_FILE.put_line(FND_FILE.LOG, l_debug_msg);
163: if G_FILE is not null then
164: utl_file.put_line(G_FILE_PTR, debug_msg);
165: utl_file.fflush(G_FILE_PTR);
166: end if;
167: else -- debug mode
168: l_debug_msg := substr(replace(debug_msg,l_g_miss_char,l_replace),1,2000);

Line 165: utl_file.fflush(G_FILE_PTR);

161: l_debug_msg := substr(replace(debug_msg,l_g_miss_char,l_replace),1,2000);
162: FND_FILE.put_line(FND_FILE.LOG, l_debug_msg);
163: if G_FILE is not null then
164: utl_file.put_line(G_FILE_PTR, debug_msg);
165: utl_file.fflush(G_FILE_PTR);
166: end if;
167: else -- debug mode
168: l_debug_msg := substr(replace(debug_msg,l_g_miss_char,l_replace),1,2000);
169: utl_file.put_line(G_FILE_PTR, l_debug_msg);

Line 169: utl_file.put_line(G_FILE_PTR, l_debug_msg);

165: utl_file.fflush(G_FILE_PTR);
166: end if;
167: else -- debug mode
168: l_debug_msg := substr(replace(debug_msg,l_g_miss_char,l_replace),1,2000);
169: utl_file.put_line(G_FILE_PTR, l_debug_msg);
170: utl_file.fflush(G_FILE_PTR);
171: end if;
172: end if; -- debug_msg is not null
173: end if; -- debug on

Line 170: utl_file.fflush(G_FILE_PTR);

166: end if;
167: else -- debug mode
168: l_debug_msg := substr(replace(debug_msg,l_g_miss_char,l_replace),1,2000);
169: utl_file.put_line(G_FILE_PTR, l_debug_msg);
170: utl_file.fflush(G_FILE_PTR);
171: end if;
172: end if; -- debug_msg is not null
173: end if; -- debug on
174: end if;-- debug level is big enough

Line 318: ,p_file_handle IN UTL_FILE.File_Type

314:
315: Procedure Start_ONT_Debugger
316: (p_directory IN VARCHAR2
317: ,p_filename IN VARCHAR2
318: ,p_file_handle IN UTL_FILE.File_Type
319: )
320: IS
321:
322: BEGIN

Line 334: IF UTL_FILE.Is_Open(p_file_handle) THEN

330: -- Open the file if filename and directory are
331: -- not null.
332:
333:
334: IF UTL_FILE.Is_Open(p_file_handle) THEN
335:
336: G_FILE_PTR := p_file_handle;
337:
338: ELSIF p_filename is NOT NULL AND

Line 344: G_FILE_PTR := UTL_FILE.Fopen(G_DIR, G_FILE, 'w');

340:
341: G_DIR := p_directory;
342: G_FILE := p_filename;
343:
344: G_FILE_PTR := UTL_FILE.Fopen(G_DIR, G_FILE, 'w');
345:
346: END IF;
347:
348: UTL_FILE.Put_Line(G_FILE_PTR,'Session Id:'||userenv('SESSIONID'));

Line 348: UTL_FILE.Put_Line(G_FILE_PTR,'Session Id:'||userenv('SESSIONID'));

344: G_FILE_PTR := UTL_FILE.Fopen(G_DIR, G_FILE, 'w');
345:
346: END IF;
347:
348: UTL_FILE.Put_Line(G_FILE_PTR,'Session Id:'||userenv('SESSIONID'));
349:
350: BEGIN
351: OE_DEBUG_PUB.Setdebuglevel(5);
352: EXCEPTION