2483: || l_iana_charset
2484: || '"?>
2485: l_str10 := '
2486: l_str11 := '
2487: DBMS_LOB.createtemporary (l_xfdf_string, FALSE, DBMS_LOB.CALL);
2488: DBMS_LOB.OPEN (l_xfdf_string, DBMS_LOB.lob_readwrite);
2489: current_index := 0;
2490:
2491: IF gplsqltable.COUNT > 0
2484: || '"?>
2485: l_str10 := '
2486: l_str11 := '
2487: DBMS_LOB.createtemporary (l_xfdf_string, FALSE, DBMS_LOB.CALL);
2488: DBMS_LOB.OPEN (l_xfdf_string, DBMS_LOB.lob_readwrite);
2489: current_index := 0;
2490:
2491: IF gplsqltable.COUNT > 0
2492: THEN
2489: current_index := 0;
2490:
2491: IF gplsqltable.COUNT > 0
2492: THEN
2493: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str1), l_str1);
2494:
2495: FOR table_counter IN gplsqltable.FIRST .. gplsqltable.LAST
2496: LOOP
2497: l_str8 := gplsqltable (table_counter).tagname;
2520: ,'FIRSTYEAR'
2521: ,'SECONDYEAR'
2522: )
2523: THEN
2524: DBMS_LOB.writeappend (l_xfdf_string
2525: ,LENGTH (l_str2)
2526: ,l_str2
2527: );
2528: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str8)
2524: DBMS_LOB.writeappend (l_xfdf_string
2525: ,LENGTH (l_str2)
2526: ,l_str2
2527: );
2528: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str8)
2529: ,l_str8);
2530: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str3)
2531: ,l_str3);
2532: ELSE
2526: ,l_str2
2527: );
2528: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str8)
2529: ,l_str8);
2530: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str3)
2531: ,l_str3);
2532: ELSE
2533: DBMS_LOB.writeappend (l_xfdf_string
2534: ,LENGTH (l_str4)
2529: ,l_str8);
2530: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str3)
2531: ,l_str3);
2532: ELSE
2533: DBMS_LOB.writeappend (l_xfdf_string
2534: ,LENGTH (l_str4)
2535: ,l_str4
2536: );
2537: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str8)
2533: DBMS_LOB.writeappend (l_xfdf_string
2534: ,LENGTH (l_str4)
2535: ,l_str4
2536: );
2537: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str8)
2538: ,l_str8);
2539: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str5)
2540: ,l_str5);
2541: END IF;
2535: ,l_str4
2536: );
2537: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str8)
2538: ,l_str8);
2539: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str5)
2540: ,l_str5);
2541: END IF;
2542: ELSE
2543: IF l_str9 IS NOT NULL
2541: END IF;
2542: ELSE
2543: IF l_str9 IS NOT NULL
2544: THEN
2545: DBMS_LOB.writeappend (l_xfdf_string
2546: ,LENGTH (l_str2)
2547: ,l_str2
2548: );
2549: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str8)
2545: DBMS_LOB.writeappend (l_xfdf_string
2546: ,LENGTH (l_str2)
2547: ,l_str2
2548: );
2549: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str8)
2550: ,l_str8);
2551: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str3)
2552: ,l_str3);
2553: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str9)
2547: ,l_str2
2548: );
2549: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str8)
2550: ,l_str8);
2551: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str3)
2552: ,l_str3);
2553: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str9)
2554: ,l_str9);
2555: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str4)
2549: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str8)
2550: ,l_str8);
2551: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str3)
2552: ,l_str3);
2553: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str9)
2554: ,l_str9);
2555: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str4)
2556: ,l_str4);
2557: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str8)
2551: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str3)
2552: ,l_str3);
2553: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str9)
2554: ,l_str9);
2555: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str4)
2556: ,l_str4);
2557: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str8)
2558: ,l_str8);
2559: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str5)
2553: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str9)
2554: ,l_str9);
2555: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str4)
2556: ,l_str4);
2557: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str8)
2558: ,l_str8);
2559: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str5)
2560: ,l_str5);
2561: ELSE
2555: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str4)
2556: ,l_str4);
2557: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str8)
2558: ,l_str8);
2559: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str5)
2560: ,l_str5);
2561: ELSE
2562: DBMS_LOB.writeappend (l_xfdf_string
2563: ,LENGTH (l_str2)
2558: ,l_str8);
2559: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str5)
2560: ,l_str5);
2561: ELSE
2562: DBMS_LOB.writeappend (l_xfdf_string
2563: ,LENGTH (l_str2)
2564: ,l_str2
2565: );
2566: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str8)
2562: DBMS_LOB.writeappend (l_xfdf_string
2563: ,LENGTH (l_str2)
2564: ,l_str2
2565: );
2566: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str8)
2567: ,l_str8);
2568: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str3)
2569: ,l_str3);
2570: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str4)
2564: ,l_str2
2565: );
2566: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str8)
2567: ,l_str8);
2568: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str3)
2569: ,l_str3);
2570: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str4)
2571: ,l_str4);
2572: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str8)
2566: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str8)
2567: ,l_str8);
2568: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str3)
2569: ,l_str3);
2570: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str4)
2571: ,l_str4);
2572: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str8)
2573: ,l_str8);
2574: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str5)
2568: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str3)
2569: ,l_str3);
2570: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str4)
2571: ,l_str4);
2572: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str8)
2573: ,l_str8);
2574: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str5)
2575: ,l_str5);
2576: END IF;
2570: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str4)
2571: ,l_str4);
2572: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str8)
2573: ,l_str8);
2574: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str5)
2575: ,l_str5);
2576: END IF;
2577: END IF;
2578: END LOOP;
2576: END IF;
2577: END IF;
2578: END LOOP;
2579:
2580: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str6), l_str6);
2581: ELSE
2582: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str7), l_str7);
2583: END IF;
2584:
2578: END LOOP;
2579:
2580: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str6), l_str6);
2581: ELSE
2582: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str7), l_str7);
2583: END IF;
2584:
2585: p_xfdf_clob := l_xfdf_string;
2586: hr_utility.set_location ('Leaving WritetoCLOB ', 40);