APPS.PAY_NO_EOY_ARCHIVE dependencies on UTL_FILE

Line 346: l_file UTL_FILE.FILE_TYPE;

342: PROCEDURE write_file(p_file_name IN VARCHAR) IS
343:
344: l_str1 VARCHAR2(80) ;
345: l_xml_element VARCHAR2(800);
346: l_file UTL_FILE.FILE_TYPE;
347: l_directory_path VARCHAR2(500);
348: l_file_name VARCHAR2(50);
349:
350: CURSOR cur_get_directory_path IS

Line 353: WHERE lower (name) = 'utl_file_dir';

349:
350: CURSOR cur_get_directory_path IS
351: SELECT value
352: FROM v$parameter
353: WHERE lower (name) = 'utl_file_dir';
354:
355: BEGIN
356: hr_utility.trace('+====write_file============================================+');
357: fnd_file.put_line(fnd_file.log, 'p_file_name '||p_file_name);

Line 366: l_file := utl_file.fopen(l_directory_path, p_file_name, 'W');

362: IF INSTR(l_directory_path,',') > 0 THEN
363: l_directory_path := SUBSTR(l_directory_path, 1, INSTR(l_directory_path,',')-1);
364: END IF;
365:
366: l_file := utl_file.fopen(l_directory_path, p_file_name, 'W');
367: l_str1 :='';
368: -- l_str1 := ''||EOL;
369: utl_file.put_line(l_file, l_str1);
370:

Line 369: utl_file.put_line(l_file, l_str1);

365:
366: l_file := utl_file.fopen(l_directory_path, p_file_name, 'W');
367: l_str1 :='';
368: -- l_str1 := ''||EOL;
369: utl_file.put_line(l_file, l_str1);
370:
371: IF g_xml_element_table.COUNT > 0 THEN
372: --
373: FOR table_counter IN g_xml_element_table.FIRST .. g_xml_element_table.LAST LOOP

Line 408: utl_file.put_line(l_file,l_xml_element);

404:
405: END IF;
406: --
407: -- dbms_lob.writeappend(l_clob, LENGTH(l_xml_element), l_xml_element);
408: utl_file.put_line(l_file,l_xml_element);
409: dbms_lob.writeappend(g_clob, LENGTH(l_xml_element), l_xml_element);
410: --
411: END LOOP;
412: --

Line 414: utl_file.fclose(l_file);

410: --
411: END LOOP;
412: --
413: END IF;
414: utl_file.fclose(l_file);
415: hr_utility.trace('Written file : '||l_directory_path||'/'||p_file_name);
416: hr_utility.trace('x====write_file============================================x');
417: EXCEPTION
418: WHEN others THEN