APPS.OKL_DEBUG_PUB dependencies on UTL_FILE

Line 19: from v$PARAMETER where name = 'utl_file_dir';

15: Begin
16:
17: if G_DIR is null then
18: select value INTO G_DIR
19: from v$PARAMETER where name = 'utl_file_dir';
20: if instr(G_DIR,',') > 0 then
21: G_DIR := substr(G_DIR,1,instr(G_DIR,',')-1);
22: end if;
23: END IF;

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

30:
31: SELECT DB_NAME || USERENV('SESSIONID') || '.OKL' into G_FILE
32: FROM DUAL;
33:
34: G_FILE_PTR := utl_file.fopen(G_DIR, G_FILE, 'w');
35: else
36: G_FILE :=P_File;
37: G_FILE_PTR := utl_file.fopen(G_DIR, G_FILE, 'a');
38: end if;

Line 37: G_FILE_PTR := utl_file.fopen(G_DIR, G_FILE, 'a');

33:
34: G_FILE_PTR := utl_file.fopen(G_DIR, G_FILE, 'w');
35: else
36: G_FILE :=P_File;
37: G_FILE_PTR := utl_file.fopen(G_DIR, G_FILE, 'a');
38: end if;
39:
40: rtn_val := G_DIR || '/' || g_file;
41:

Line 75: utl_file.put_line(G_FILE_PTR, to_char( sysdate, 'DD-MON-YYYY HH:MI:SS' ) || ' ' || debug_msg );

71: if (G_Debug_Level <= debug_level) then
72: rtn_val:=OpenFile(G_FILE);
73:
74: if print_date = 'Y' then
75: utl_file.put_line(G_FILE_PTR, to_char( sysdate, 'DD-MON-YYYY HH:MI:SS' ) || ' ' || debug_msg );
76:
77: else
78: utl_file.put_line(G_FILE_PTR, ' ' ||debug_msg);
79: end if; --if print date is 'Y'

Line 78: utl_file.put_line(G_FILE_PTR, ' ' ||debug_msg);

74: if print_date = 'Y' then
75: utl_file.put_line(G_FILE_PTR, to_char( sysdate, 'DD-MON-YYYY HH:MI:SS' ) || ' ' || debug_msg );
76:
77: else
78: utl_file.put_line(G_FILE_PTR, ' ' ||debug_msg);
79: end if; --if print date is 'Y'
80:
81: -- Write and close the file
82: utl_file.fflush(G_FILE_PTR);

Line 82: utl_file.fflush(G_FILE_PTR);

78: utl_file.put_line(G_FILE_PTR, ' ' ||debug_msg);
79: end if; --if print date is 'Y'
80:
81: -- Write and close the file
82: utl_file.fflush(G_FILE_PTR);
83: utl_file.fclose(G_FILE_PTR);
84:
85: end if;-- debug level is big enough
86:

Line 83: utl_file.fclose(G_FILE_PTR);

79: end if; --if print date is 'Y'
80:
81: -- Write and close the file
82: utl_file.fflush(G_FILE_PTR);
83: utl_file.fclose(G_FILE_PTR);
84:
85: end if;-- debug level is big enough
86:
87: Exception