APPS.JAI_CMN_DEBUG_CONTEXTS_PKG dependencies on UTL_FILE

Line 15: last_file_handle utl_file.file_type;

11: t_context_cache tab_log_manager_typ;
12: ln_context_idx number := 0;
13:
14: last_file_name varchar2(250);
15: last_file_handle utl_file.file_type;
16: last_utl_dir varchar2(2000);
17: ln_user_id fnd_user.user_id%type;
18: lv_default_log_file varchar2 (512);
19: lv_file_suffix varchar2 (250);

Line 58: if utl_file.is_open (last_file_handle) then

54: /** Perfom cleanup */
55: debug ('Cleanup');
56: last_file_name := null;
57:
58: if utl_file.is_open (last_file_handle) then
59: begin
60: utl_file.fclose (last_file_handle);
61: exception
62: when others then

Line 60: utl_file.fclose (last_file_handle);

56: last_file_name := null;
57:
58: if utl_file.is_open (last_file_handle) then
59: begin
60: utl_file.fclose (last_file_handle);
61: exception
62: when others then
63: if sqlcode = -29282 then
64: /** no such file is open, Do nothing */

Line 82: function get_log_file_handle (pv_file_name varchar2) return utl_file.file_type

78: end if;
79:
80: end when_stack_empty;
81: /*------------------------------------------------------------------------------------------------------------*/
82: function get_log_file_handle (pv_file_name varchar2) return utl_file.file_type
83: is
84: begin
85: if last_file_name is null or (last_file_name <> pv_file_name) then
86:

Line 87: if utl_file.is_open (last_file_handle) then

83: is
84: begin
85: if last_file_name is null or (last_file_name <> pv_file_name) then
86:
87: if utl_file.is_open (last_file_handle) then
88: begin
89: utl_file.fclose (last_file_handle);
90: exception
91: when others then

Line 89: utl_file.fclose (last_file_handle);

85: if last_file_name is null or (last_file_name <> pv_file_name) then
86:
87: if utl_file.is_open (last_file_handle) then
88: begin
89: utl_file.fclose (last_file_handle);
90: exception
91: when others then
92: if sqlcode = -29282 then
93: /** no such file is open, Do nothing */

Line 103: where name = 'utl_file_dir';

99: if last_utl_dir is null then
100: select decode(substr (value,1,instr(value,',') -1) ,null, value,substr (value,1,instr(value,',') -1))
101: into last_utl_dir
102: from v$parameter
103: where name = 'utl_file_dir';
104: end if;
105:
106: last_file_handle:= utl_file.fopen
107: ( last_utl_dir

Line 106: last_file_handle:= utl_file.fopen

102: from v$parameter
103: where name = 'utl_file_dir';
104: end if;
105:
106: last_file_handle:= utl_file.fopen
107: ( last_utl_dir
108: , pv_file_name
109: , lv_each_file_open_mode
110: );

Line 218: f_handle utl_file.file_type;

214: , pn_statement_level in number default jai_cmn_debug_contexts_pkg.off
215: , pv_new_line_flag in varchar2 default jai_constants.yes
216: )
217: is
218: f_handle utl_file.file_type;
219: begin
220:
221: if pn_reg_id is null AND NVL(lv_debug,jai_constants.no)=jai_constants.yes then --Added the second condition by kunkumar in if statement for bug#5915101
222: /** Internal calll to write in the default log file */

Line 224: utl_file.put_line (f_handle, pv_log_msg);

220:
221: if pn_reg_id is null AND NVL(lv_debug,jai_constants.no)=jai_constants.yes then --Added the second condition by kunkumar in if statement for bug#5915101
222: /** Internal calll to write in the default log file */
223: f_handle := get_log_file_handle (lv_internal_log_file);
224: utl_file.put_line (f_handle, pv_log_msg);
225: return;
226: end if;
227:
228: if t_call_stack(pn_reg_id).row.log_status >= pn_statement_level then

Line 231: utl_file.put (f_handle, pv_log_msg);

227:
228: if t_call_stack(pn_reg_id).row.log_status >= pn_statement_level then
229: f_handle := get_log_file_handle (nvl(t_call_stack(pn_reg_id).log_file_name,lv_default_log_file));
230: if pv_new_line_flag = jai_constants.no then
231: utl_file.put (f_handle, pv_log_msg);
232: else
233: utl_file.put_line (f_handle, pv_log_msg);
234: end if;
235: end if;

Line 233: utl_file.put_line (f_handle, pv_log_msg);

229: f_handle := get_log_file_handle (nvl(t_call_stack(pn_reg_id).log_file_name,lv_default_log_file));
230: if pv_new_line_flag = jai_constants.no then
231: utl_file.put (f_handle, pv_log_msg);
232: else
233: utl_file.put_line (f_handle, pv_log_msg);
234: end if;
235: end if;
236:
237: exception