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 168: utl_file.put_line(G_FILE_PTR, debug_msg);

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

Line 169: utl_file.fflush(G_FILE_PTR);

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

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

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

Line 174: utl_file.fflush(G_FILE_PTR);

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

Line 342: ,p_file_handle IN UTL_FILE.File_Type

338:
339: Procedure Start_ONT_Debugger
340: (p_directory IN VARCHAR2
341: ,p_filename IN VARCHAR2
342: ,p_file_handle IN UTL_FILE.File_Type
343: )
344: IS
345:
346: BEGIN

Line 358: IF UTL_FILE.Is_Open(p_file_handle) THEN

354: -- Open the file if filename and directory are
355: -- not null.
356:
357:
358: IF UTL_FILE.Is_Open(p_file_handle) THEN
359:
360: G_FILE_PTR := p_file_handle;
361:
362: ELSIF p_filename is NOT NULL AND

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

364:
365: G_DIR := p_directory;
366: G_FILE := p_filename;
367:
368: G_FILE_PTR := UTL_FILE.Fopen(G_DIR, G_FILE, 'w');
369:
370: END IF;
371:
372: UTL_FILE.Put_Line(G_FILE_PTR,'Session Id:'||userenv('SESSIONID'));

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

368: G_FILE_PTR := UTL_FILE.Fopen(G_DIR, G_FILE, 'w');
369:
370: END IF;
371:
372: UTL_FILE.Put_Line(G_FILE_PTR,'Session Id:'||userenv('SESSIONID'));
373:
374: BEGIN
375: OE_DEBUG_PUB.Setdebuglevel(5);
376: EXCEPTION