1711: l_str10 := '
1712: l_str11 := '
1713:
1714: BEGIN
1715: dbms_lob.createtemporary(l_xfdf_string, FALSE, dbms_lob.CALL);
1716:
1717: END;
1718:
1719: dbms_lob.OPEN(l_xfdf_string, DBMS_LOB.lob_readwrite);
1715: dbms_lob.createtemporary(l_xfdf_string, FALSE, dbms_lob.CALL);
1716:
1717: END;
1718:
1719: dbms_lob.OPEN(l_xfdf_string, DBMS_LOB.lob_readwrite);
1720:
1721: current_index := 0;
1722:
1723: IF gplsqltable.COUNT > 0
1721: current_index := 0;
1722:
1723: IF gplsqltable.COUNT > 0
1724: THEN
1725: DBMS_LOB.writeappend(l_xfdf_string, LENGTH (l_str1), l_str1);
1726: FOR table_counter IN gplsqltable.FIRST .. gplsqltable.LAST
1727: LOOP
1728:
1729: l_str8 := gplsqltable (table_counter).tagname;
1729: l_str8 := gplsqltable (table_counter).tagname;
1730: l_str9 := gplsqltable (table_counter).tagvalue;
1731: IF l_str9 = 'END'
1732: THEN
1733: DBMS_LOB.writeappend (l_xfdf_string,
1734: LENGTH (l_str11),
1735: l_str11
1736: );
1737: ELSIF l_str9 = 'START'
1735: l_str11
1736: );
1737: ELSIF l_str9 = 'START'
1738: THEN
1739: DBMS_LOB.writeappend (
1740: l_xfdf_string,
1741: LENGTH (l_str10),
1742: l_str10
1743: );
1742: l_str10
1743: );
1744: ELSIF l_str9 IS NOT NULL
1745: THEN
1746: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str2), l_str2);
1747: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str8), l_str8);
1748: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str3), l_str3);
1749: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str9), l_str9);
1750: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str4), l_str4);
1743: );
1744: ELSIF l_str9 IS NOT NULL
1745: THEN
1746: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str2), l_str2);
1747: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str8), l_str8);
1748: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str3), l_str3);
1749: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str9), l_str9);
1750: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str4), l_str4);
1751: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str8), l_str8);
1744: ELSIF l_str9 IS NOT NULL
1745: THEN
1746: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str2), l_str2);
1747: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str8), l_str8);
1748: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str3), l_str3);
1749: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str9), l_str9);
1750: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str4), l_str4);
1751: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str8), l_str8);
1752: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str5), l_str5);
1745: THEN
1746: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str2), l_str2);
1747: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str8), l_str8);
1748: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str3), l_str3);
1749: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str9), l_str9);
1750: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str4), l_str4);
1751: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str8), l_str8);
1752: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str5), l_str5);
1753: ELSE
1746: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str2), l_str2);
1747: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str8), l_str8);
1748: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str3), l_str3);
1749: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str9), l_str9);
1750: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str4), l_str4);
1751: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str8), l_str8);
1752: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str5), l_str5);
1753: ELSE
1754: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str2), l_str2);
1747: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str8), l_str8);
1748: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str3), l_str3);
1749: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str9), l_str9);
1750: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str4), l_str4);
1751: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str8), l_str8);
1752: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str5), l_str5);
1753: ELSE
1754: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str2), l_str2);
1755: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str8), l_str8);
1748: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str3), l_str3);
1749: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str9), l_str9);
1750: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str4), l_str4);
1751: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str8), l_str8);
1752: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str5), l_str5);
1753: ELSE
1754: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str2), l_str2);
1755: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str8), l_str8);
1756: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str3), l_str3);
1750: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str4), l_str4);
1751: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str8), l_str8);
1752: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str5), l_str5);
1753: ELSE
1754: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str2), l_str2);
1755: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str8), l_str8);
1756: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str3), l_str3);
1757: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str4), l_str4);
1758: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str8), l_str8);
1751: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str8), l_str8);
1752: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str5), l_str5);
1753: ELSE
1754: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str2), l_str2);
1755: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str8), l_str8);
1756: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str3), l_str3);
1757: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str4), l_str4);
1758: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str8), l_str8);
1759: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str5), l_str5);
1752: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str5), l_str5);
1753: ELSE
1754: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str2), l_str2);
1755: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str8), l_str8);
1756: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str3), l_str3);
1757: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str4), l_str4);
1758: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str8), l_str8);
1759: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str5), l_str5);
1760: END IF;
1753: ELSE
1754: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str2), l_str2);
1755: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str8), l_str8);
1756: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str3), l_str3);
1757: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str4), l_str4);
1758: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str8), l_str8);
1759: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str5), l_str5);
1760: END IF;
1761: END LOOP;
1754: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str2), l_str2);
1755: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str8), l_str8);
1756: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str3), l_str3);
1757: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str4), l_str4);
1758: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str8), l_str8);
1759: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str5), l_str5);
1760: END IF;
1761: END LOOP;
1762: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str6), l_str6);
1755: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str8), l_str8);
1756: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str3), l_str3);
1757: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str4), l_str4);
1758: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str8), l_str8);
1759: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str5), l_str5);
1760: END IF;
1761: END LOOP;
1762: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str6), l_str6);
1763: ELSE
1758: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str8), l_str8);
1759: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str5), l_str5);
1760: END IF;
1761: END LOOP;
1762: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str6), l_str6);
1763: ELSE
1764: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str7), l_str7);
1765: END IF;
1766: p_xfdf_clob := l_xfdf_string;
1760: END IF;
1761: END LOOP;
1762: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str6), l_str6);
1763: ELSE
1764: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str7), l_str7);
1765: END IF;
1766: p_xfdf_clob := l_xfdf_string;
1767: hr_utility.set_location ('Leaving WritetoCLOB ', 70);
1768: hr_utility.set_location ('Leaving WritetoCLOB ', 70);
1895: FETCH csr_month INTO l_month;
1896: CLOSE csr_month;
1897:
1898: /*Generate an xml string*/
1899: dbms_lob.createtemporary(l_xfdf_string,FALSE,DBMS_LOB.CALL);
1900: dbms_lob.open(l_xfdf_string,dbms_lob.lob_readwrite);
1901:
1902: /*Generate an xml string*/
1903: dbms_lob.createtemporary(l_xfdf_string,FALSE,DBMS_LOB.CALL);
1896: CLOSE csr_month;
1897:
1898: /*Generate an xml string*/
1899: dbms_lob.createtemporary(l_xfdf_string,FALSE,DBMS_LOB.CALL);
1900: dbms_lob.open(l_xfdf_string,dbms_lob.lob_readwrite);
1901:
1902: /*Generate an xml string*/
1903: dbms_lob.createtemporary(l_xfdf_string,FALSE,DBMS_LOB.CALL);
1904: dbms_lob.open(l_xfdf_string,dbms_lob.lob_readwrite);
1899: dbms_lob.createtemporary(l_xfdf_string,FALSE,DBMS_LOB.CALL);
1900: dbms_lob.open(l_xfdf_string,dbms_lob.lob_readwrite);
1901:
1902: /*Generate an xml string*/
1903: dbms_lob.createtemporary(l_xfdf_string,FALSE,DBMS_LOB.CALL);
1904: dbms_lob.open(l_xfdf_string,dbms_lob.lob_readwrite);
1905:
1906: /* l_str1 := '
1907:
1900: dbms_lob.open(l_xfdf_string,dbms_lob.lob_readwrite);
1901:
1902: /*Generate an xml string*/
1903: dbms_lob.createtemporary(l_xfdf_string,FALSE,DBMS_LOB.CALL);
1904: dbms_lob.open(l_xfdf_string,dbms_lob.lob_readwrite);
1905:
1906: /* l_str1 := '
1907:
1906: /* l_str1 := '
1907:
1909: skjemanummer="669" etatid="974761076" blankettnummer="RF-1037">';
1910: dbms_lob.writeAppend( l_xfdf_string, length(l_str1), l_str1 );*/
1911:
1912: l_str1 := '
1913:
1914: