2523: || l_iana_charset
2524: || '"?>
2525: l_str10 := '
2526: l_str11 := '
2527: DBMS_LOB.createtemporary (l_xfdf_string, FALSE, DBMS_LOB.CALL);
2528: DBMS_LOB.OPEN (l_xfdf_string, DBMS_LOB.lob_readwrite);
2529: current_index := 0;
2530:
2531: IF gplsqltable.COUNT > 0
2524: || '"?>
2525: l_str10 := '
2526: l_str11 := '
2527: DBMS_LOB.createtemporary (l_xfdf_string, FALSE, DBMS_LOB.CALL);
2528: DBMS_LOB.OPEN (l_xfdf_string, DBMS_LOB.lob_readwrite);
2529: current_index := 0;
2530:
2531: IF gplsqltable.COUNT > 0
2532: THEN
2529: current_index := 0;
2530:
2531: IF gplsqltable.COUNT > 0
2532: THEN
2533: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str1), l_str1);
2534:
2535: FOR table_counter IN gplsqltable.FIRST .. gplsqltable.LAST
2536: LOOP
2537: l_str8 := gplsqltable (table_counter).tagname;
2560: ,'FIRSTYEAR'
2561: ,'SECONDYEAR'
2562: )
2563: THEN
2564: DBMS_LOB.writeappend (l_xfdf_string
2565: ,LENGTH (l_str2)
2566: ,l_str2
2567: );
2568: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str8)
2564: DBMS_LOB.writeappend (l_xfdf_string
2565: ,LENGTH (l_str2)
2566: ,l_str2
2567: );
2568: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str8)
2569: ,l_str8);
2570: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str3)
2571: ,l_str3);
2572: ELSE
2566: ,l_str2
2567: );
2568: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str8)
2569: ,l_str8);
2570: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str3)
2571: ,l_str3);
2572: ELSE
2573: DBMS_LOB.writeappend (l_xfdf_string
2574: ,LENGTH (l_str4)
2569: ,l_str8);
2570: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str3)
2571: ,l_str3);
2572: ELSE
2573: DBMS_LOB.writeappend (l_xfdf_string
2574: ,LENGTH (l_str4)
2575: ,l_str4
2576: );
2577: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str8)
2573: DBMS_LOB.writeappend (l_xfdf_string
2574: ,LENGTH (l_str4)
2575: ,l_str4
2576: );
2577: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str8)
2578: ,l_str8);
2579: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str5)
2580: ,l_str5);
2581: END IF;
2575: ,l_str4
2576: );
2577: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str8)
2578: ,l_str8);
2579: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str5)
2580: ,l_str5);
2581: END IF;
2582: ELSE
2583: IF l_str9 IS NOT NULL
2581: END IF;
2582: ELSE
2583: IF l_str9 IS NOT NULL
2584: THEN
2585: DBMS_LOB.writeappend (l_xfdf_string
2586: ,LENGTH (l_str2)
2587: ,l_str2
2588: );
2589: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str8)
2585: DBMS_LOB.writeappend (l_xfdf_string
2586: ,LENGTH (l_str2)
2587: ,l_str2
2588: );
2589: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str8)
2590: ,l_str8);
2591: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str3)
2592: ,l_str3);
2593: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str9)
2587: ,l_str2
2588: );
2589: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str8)
2590: ,l_str8);
2591: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str3)
2592: ,l_str3);
2593: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str9)
2594: ,l_str9);
2595: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str4)
2589: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str8)
2590: ,l_str8);
2591: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str3)
2592: ,l_str3);
2593: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str9)
2594: ,l_str9);
2595: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str4)
2596: ,l_str4);
2597: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str8)
2591: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str3)
2592: ,l_str3);
2593: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str9)
2594: ,l_str9);
2595: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str4)
2596: ,l_str4);
2597: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str8)
2598: ,l_str8);
2599: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str5)
2593: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str9)
2594: ,l_str9);
2595: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str4)
2596: ,l_str4);
2597: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str8)
2598: ,l_str8);
2599: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str5)
2600: ,l_str5);
2601: ELSE
2595: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str4)
2596: ,l_str4);
2597: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str8)
2598: ,l_str8);
2599: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str5)
2600: ,l_str5);
2601: ELSE
2602: DBMS_LOB.writeappend (l_xfdf_string
2603: ,LENGTH (l_str2)
2598: ,l_str8);
2599: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str5)
2600: ,l_str5);
2601: ELSE
2602: DBMS_LOB.writeappend (l_xfdf_string
2603: ,LENGTH (l_str2)
2604: ,l_str2
2605: );
2606: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str8)
2602: DBMS_LOB.writeappend (l_xfdf_string
2603: ,LENGTH (l_str2)
2604: ,l_str2
2605: );
2606: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str8)
2607: ,l_str8);
2608: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str3)
2609: ,l_str3);
2610: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str4)
2604: ,l_str2
2605: );
2606: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str8)
2607: ,l_str8);
2608: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str3)
2609: ,l_str3);
2610: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str4)
2611: ,l_str4);
2612: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str8)
2606: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str8)
2607: ,l_str8);
2608: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str3)
2609: ,l_str3);
2610: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str4)
2611: ,l_str4);
2612: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str8)
2613: ,l_str8);
2614: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str5)
2608: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str3)
2609: ,l_str3);
2610: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str4)
2611: ,l_str4);
2612: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str8)
2613: ,l_str8);
2614: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str5)
2615: ,l_str5);
2616: END IF;
2610: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str4)
2611: ,l_str4);
2612: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str8)
2613: ,l_str8);
2614: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str5)
2615: ,l_str5);
2616: END IF;
2617: END IF;
2618: END LOOP;
2616: END IF;
2617: END IF;
2618: END LOOP;
2619:
2620: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str6), l_str6);
2621: ELSE
2622: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str7), l_str7);
2623: END IF;
2624:
2618: END LOOP;
2619:
2620: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str6), l_str6);
2621: ELSE
2622: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str7), l_str7);
2623: END IF;
2624:
2625: p_xfdf_clob := l_xfdf_string;
2626: hr_utility.set_location ('Leaving WritetoCLOB ', 40);