276: -- l_str1 := '
277: -- l_str1 := '
278: l_str1 := '' ;
279:
280: dbms_lob.createtemporary(l_clob, FALSE, DBMS_LOB.CALL);
281: dbms_lob.open(l_clob, DBMS_LOB.LOB_READWRITE);
282: --
283: dbms_lob.writeappend(l_clob, LENGTH(l_str1), l_str1);
284: --
277: -- l_str1 := '
278: l_str1 := '' ;
279:
280: dbms_lob.createtemporary(l_clob, FALSE, DBMS_LOB.CALL);
281: dbms_lob.open(l_clob, DBMS_LOB.LOB_READWRITE);
282: --
283: dbms_lob.writeappend(l_clob, LENGTH(l_str1), l_str1);
284: --
285: IF g_xml_element_table.COUNT > 0 THEN
279:
280: dbms_lob.createtemporary(l_clob, FALSE, DBMS_LOB.CALL);
281: dbms_lob.open(l_clob, DBMS_LOB.LOB_READWRITE);
282: --
283: dbms_lob.writeappend(l_clob, LENGTH(l_str1), l_str1);
284: --
285: IF g_xml_element_table.COUNT > 0 THEN
286: --
287: FOR table_counter IN g_xml_element_table.FIRST .. g_xml_element_table.LAST LOOP
320:
321:
322: END IF;
323: --
324: dbms_lob.writeappend(l_clob, LENGTH(l_xml_element), l_xml_element);
325: --
326: END LOOP;
327: --
328: END IF;
326: END LOOP;
327: --
328: END IF;
329: --
330: -- dbms_lob.writeappend(l_clob, LENGTH(l_str2), l_str2);
331: --
332: p_clob := l_clob;
333: --
334: EXCEPTION
403: ']]>';
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;
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: --
413: END IF;
7030: set_currency_mask(l_bg_id, lg_format_mask);
7031:
7032: l_str1 := '' ;
7033:
7034: dbms_lob.createtemporary(g_clob, FALSE, DBMS_LOB.CALL);
7035: dbms_lob.open(g_clob, DBMS_LOB.LOB_READWRITE);
7036: --
7037: dbms_lob.writeappend(g_clob, LENGTH(l_str1), l_str1);
7038: dbms_lob.writeappend(g_clob, LENGTH(l_start), l_start);
7031:
7032: l_str1 := '' ;
7033:
7034: dbms_lob.createtemporary(g_clob, FALSE, DBMS_LOB.CALL);
7035: dbms_lob.open(g_clob, DBMS_LOB.LOB_READWRITE);
7036: --
7037: dbms_lob.writeappend(g_clob, LENGTH(l_str1), l_str1);
7038: dbms_lob.writeappend(g_clob, LENGTH(l_start), l_start);
7039: --
7033:
7034: dbms_lob.createtemporary(g_clob, FALSE, DBMS_LOB.CALL);
7035: dbms_lob.open(g_clob, DBMS_LOB.LOB_READWRITE);
7036: --
7037: dbms_lob.writeappend(g_clob, LENGTH(l_str1), l_str1);
7038: dbms_lob.writeappend(g_clob, LENGTH(l_start), l_start);
7039: --
7040: --/*Applying the changes for the 2007-2008*/
7041:
7034: dbms_lob.createtemporary(g_clob, FALSE, DBMS_LOB.CALL);
7035: dbms_lob.open(g_clob, DBMS_LOB.LOB_READWRITE);
7036: --
7037: dbms_lob.writeappend(g_clob, LENGTH(l_str1), l_str1);
7038: dbms_lob.writeappend(g_clob, LENGTH(l_start), l_start);
7039: --
7040: --/*Applying the changes for the 2007-2008*/
7041:
7042: /* g_xml_element_table(l_xml_element_count).tagname := 'Skjema';
8087: l_xml_element_count := l_xml_element_count + 1; */
8088:
8089: --
8090: -- write_to_clob(p_xml);
8091: dbms_lob.writeappend(g_clob, LENGTH(l_end), l_end);
8092: fnd_file.put_line(fnd_file.log, 'l_end'||l_end);
8093: p_xml := g_clob;
8094: --
8095: hr_utility.set_location('Leaving ' || l_proc_name, 1000);