APPS.PER_NL_DSRR_ARCHIVE dependencies on UTL_FILE

Line 73: |Description: Procedure to create an XML file output in utl_file_dir |

69:
70: /*-----------------------------------------------------------------------------
71: |Name : write_file |
72: |Type : Procedure |
73: |Description: Procedure to create an XML file output in utl_file_dir |
74: -------------------------------------------------------------------------------*/
75:
76: PROCEDURE write_file(p_XMLTable IN tXMLTable
77: ,p_file_name IN VARCHAR) IS

Line 81: l_file UTL_FILE.FILE_TYPE;

77: ,p_file_name IN VARCHAR) IS
78:
79: l_str1 VARCHAR2(80) ;
80: l_xml_element VARCHAR2(800);
81: l_file UTL_FILE.FILE_TYPE;
82: l_directory_path VARCHAR2(500);
83: l_file_name VARCHAR2(50);
84:
85: CURSOR cur_get_directory_path IS

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

84:
85: CURSOR cur_get_directory_path IS
86: SELECT value
87: FROM v$parameter
88: WHERE lower (name) = 'utl_file_dir';
89:
90: BEGIN
91: hr_utility.trace('+====write_file============================================+');
92: OPEN cur_get_directory_path;

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

96: IF INSTR(l_directory_path,',') > 0 THEN
97: l_directory_path := SUBSTR(l_directory_path, 1, INSTR(l_directory_path,',')-1);
98: END IF;
99:
100: l_file := utl_file.fopen(l_directory_path, p_file_name, 'W');
101: l_str1 := ''||EOL;
102: utl_file.put_line(l_file, l_str1);
103:
104: IF p_XMLTable.COUNT > 0 THEN

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

98: END IF;
99:
100: l_file := utl_file.fopen(l_directory_path, p_file_name, 'W');
101: l_str1 := ''||EOL;
102: utl_file.put_line(l_file, l_str1);
103:
104: IF p_XMLTable.COUNT > 0 THEN
105:
106: FOR table_counter IN p_XMLTable.FIRST .. p_XMLTable.LAST

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

114: '>'|| clean_XML(p_XMLTable(table_counter).tagvalue) ||
115: '';
116: END IF;
117: -- IF p_XMLTable(table_counter).tagvalue IS NOT NULL THEN
118: utl_file.put_line(l_file,l_xml_element);
119: -- END IF;
120: END LOOP;
121: END IF;
122: utl_file.fclose(l_file);

Line 122: utl_file.fclose(l_file);

118: utl_file.put_line(l_file,l_xml_element);
119: -- END IF;
120: END LOOP;
121: END IF;
122: utl_file.fclose(l_file);
123: hr_utility.trace('Written file : '||l_directory_path||'/'||p_file_name);
124: hr_utility.trace('x====write_file============================================x');
125: EXCEPTION
126: WHEN others THEN

Line 1798: l_file UTL_FILE.FILE_TYPE;

1794: /**************************************************************************/
1795: --Variables--
1796: l_clob PAY_FILE_DETAILS.FILE_FRAGMENT%TYPE;
1797: l_blob PAY_FILE_DETAILS.BLOB_FILE_FRAGMENT%TYPE;
1798: l_file UTL_FILE.FILE_TYPE;
1799: l_directory_path VARCHAR2(500);
1800: l_file_name VARCHAR2(50);
1801: x NUMBER := 0;
1802: r NUMBER := 0;