APPS.M4U_XML_EXTN_UTILS dependencies on UTL_FILE

Line 94: l_file_ptr utl_file.file_type;

90: IS
91: l_buff VARCHAR2(400);
92: l_lin_len NUMBER;
93: l_xml VARCHAR2(32767);
94: l_file_ptr utl_file.file_type;
95: l_log_fil VARCHAR2(100);
96: l_progress VARCHAR2(4000);
97: BEGIN
98: l_progress := 'Log generated XML';

Line 116: -- obtain UTL file for logging

112: cln_debug_pub.add('l_log_fil - ' || l_log_fil,1);
113: cln_debug_pub.add('g_log_dir - ' || g_log_dir,1);
114: END IF;
115:
116: -- obtain UTL file for logging
117: l_file_ptr := utl_file.fopen(g_log_dir, l_log_fil, 'a');
118:
119: -- break XML into pieces of 80 and write to log file
120: l_xml := a_xml;

Line 117: l_file_ptr := utl_file.fopen(g_log_dir, l_log_fil, 'a');

113: cln_debug_pub.add('g_log_dir - ' || g_log_dir,1);
114: END IF;
115:
116: -- obtain UTL file for logging
117: l_file_ptr := utl_file.fopen(g_log_dir, l_log_fil, 'a');
118:
119: -- break XML into pieces of 80 and write to log file
120: l_xml := a_xml;
121: IF a_xml is NULL THEN

Line 130: utl_file.put_line(l_file_ptr,l_buff);

126:
127: WHILE LENGTH(l_xml) >= 1 LOOP
128: l_buff := SUBSTR(l_xml,1,l_lin_len);
129: l_xml := SUBSTR(l_xml,l_lin_len+1);
130: utl_file.put_line(l_file_ptr,l_buff);
131: utl_file.fflush(l_file_ptr);
132: END LOOP;
133:
134: -- Done, close the log file

Line 131: utl_file.fflush(l_file_ptr);

127: WHILE LENGTH(l_xml) >= 1 LOOP
128: l_buff := SUBSTR(l_xml,1,l_lin_len);
129: l_xml := SUBSTR(l_xml,l_lin_len+1);
130: utl_file.put_line(l_file_ptr,l_buff);
131: utl_file.fflush(l_file_ptr);
132: END LOOP;
133:
134: -- Done, close the log file
135: utl_file.fclose(l_file_ptr);

Line 135: utl_file.fclose(l_file_ptr);

131: utl_file.fflush(l_file_ptr);
132: END LOOP;
133:
134: -- Done, close the log file
135: utl_file.fclose(l_file_ptr);
136: -- Return success
137: x_ret_sts := g_success_code;
138: x_ret_msg := NULL;
139: