290: l_str10 := '
291: l_str11 := '
292:
293:
294: dbms_lob.createtemporary(l_xfdf_string,FALSE,DBMS_LOB.CALL);
295: dbms_lob.open(l_xfdf_string,dbms_lob.lob_readwrite);
296:
297: current_index := 0;
298:
291: l_str11 := '';
292:
293:
294: dbms_lob.createtemporary(l_xfdf_string,FALSE,DBMS_LOB.CALL);
295: dbms_lob.open(l_xfdf_string,dbms_lob.lob_readwrite);
296:
297: current_index := 0;
298:
299: IF gtagdata.count > 0 THEN
297: current_index := 0;
298:
299: IF gtagdata.count > 0 THEN
300:
301: dbms_lob.writeAppend( l_xfdf_string, length(l_str1), l_str1 );
302:
303: FOR table_counter IN gtagdata.FIRST .. gtagdata.LAST LOOP
304:
305: l_str8 := gtagdata(table_counter).TagName;
310: IF l_str9 IN ('PERSON' ,'PERSON_END','BODY',
311: 'BODY_END','PH','PH_END','CH','CH_END','SUMMARY','SUMMARY_END') THEN
312:
313: IF l_str9 IN ('PERSON' ,'BODY','PH','CH','SUMMARY') THEN
314: dbms_lob.writeAppend(l_xfdf_string, length(l_str2), l_str2);
315: dbms_lob.writeAppend(l_xfdf_string, length(l_str8), l_str8);
316: dbms_lob.writeAppend(l_xfdf_string, length(l_str3), l_str3);
317: ELSE
318: dbms_lob.writeAppend(l_xfdf_string, length(l_str4), l_str4);
311: 'BODY_END','PH','PH_END','CH','CH_END','SUMMARY','SUMMARY_END') THEN
312:
313: IF l_str9 IN ('PERSON' ,'BODY','PH','CH','SUMMARY') THEN
314: dbms_lob.writeAppend(l_xfdf_string, length(l_str2), l_str2);
315: dbms_lob.writeAppend(l_xfdf_string, length(l_str8), l_str8);
316: dbms_lob.writeAppend(l_xfdf_string, length(l_str3), l_str3);
317: ELSE
318: dbms_lob.writeAppend(l_xfdf_string, length(l_str4), l_str4);
319: dbms_lob.writeAppend(l_xfdf_string, length(l_str8), l_str8);
312:
313: IF l_str9 IN ('PERSON' ,'BODY','PH','CH','SUMMARY') THEN
314: dbms_lob.writeAppend(l_xfdf_string, length(l_str2), l_str2);
315: dbms_lob.writeAppend(l_xfdf_string, length(l_str8), l_str8);
316: dbms_lob.writeAppend(l_xfdf_string, length(l_str3), l_str3);
317: ELSE
318: dbms_lob.writeAppend(l_xfdf_string, length(l_str4), l_str4);
319: dbms_lob.writeAppend(l_xfdf_string, length(l_str8), l_str8);
320: dbms_lob.writeAppend(l_xfdf_string, length(l_str5), l_str5);
314: dbms_lob.writeAppend(l_xfdf_string, length(l_str2), l_str2);
315: dbms_lob.writeAppend(l_xfdf_string, length(l_str8), l_str8);
316: dbms_lob.writeAppend(l_xfdf_string, length(l_str3), l_str3);
317: ELSE
318: dbms_lob.writeAppend(l_xfdf_string, length(l_str4), l_str4);
319: dbms_lob.writeAppend(l_xfdf_string, length(l_str8), l_str8);
320: dbms_lob.writeAppend(l_xfdf_string, length(l_str5), l_str5);
321: END IF;
322:
315: dbms_lob.writeAppend(l_xfdf_string, length(l_str8), l_str8);
316: dbms_lob.writeAppend(l_xfdf_string, length(l_str3), l_str3);
317: ELSE
318: dbms_lob.writeAppend(l_xfdf_string, length(l_str4), l_str4);
319: dbms_lob.writeAppend(l_xfdf_string, length(l_str8), l_str8);
320: dbms_lob.writeAppend(l_xfdf_string, length(l_str5), l_str5);
321: END IF;
322:
323: ELSE
316: dbms_lob.writeAppend(l_xfdf_string, length(l_str3), l_str3);
317: ELSE
318: dbms_lob.writeAppend(l_xfdf_string, length(l_str4), l_str4);
319: dbms_lob.writeAppend(l_xfdf_string, length(l_str8), l_str8);
320: dbms_lob.writeAppend(l_xfdf_string, length(l_str5), l_str5);
321: END IF;
322:
323: ELSE
324:
325: if l_str9 is not null then
326:
327: l_str9 := '';
328:
329: dbms_lob.writeAppend(l_xfdf_string, length(l_str2), l_str2);
330: dbms_lob.writeAppend(l_xfdf_string, length(l_str8), l_str8);
331: dbms_lob.writeAppend(l_xfdf_string, length(l_str3), l_str3);
332: dbms_lob.writeAppend(l_xfdf_string, length(l_str9), l_str9);
333: dbms_lob.writeAppend(l_xfdf_string, length(l_str4), l_str4);
326:
327: l_str9 := '';
328:
329: dbms_lob.writeAppend(l_xfdf_string, length(l_str2), l_str2);
330: dbms_lob.writeAppend(l_xfdf_string, length(l_str8), l_str8);
331: dbms_lob.writeAppend(l_xfdf_string, length(l_str3), l_str3);
332: dbms_lob.writeAppend(l_xfdf_string, length(l_str9), l_str9);
333: dbms_lob.writeAppend(l_xfdf_string, length(l_str4), l_str4);
334: dbms_lob.writeAppend(l_xfdf_string, length(l_str8), l_str8);
327: l_str9 := '';
328:
329: dbms_lob.writeAppend(l_xfdf_string, length(l_str2), l_str2);
330: dbms_lob.writeAppend(l_xfdf_string, length(l_str8), l_str8);
331: dbms_lob.writeAppend(l_xfdf_string, length(l_str3), l_str3);
332: dbms_lob.writeAppend(l_xfdf_string, length(l_str9), l_str9);
333: dbms_lob.writeAppend(l_xfdf_string, length(l_str4), l_str4);
334: dbms_lob.writeAppend(l_xfdf_string, length(l_str8), l_str8);
335: dbms_lob.writeAppend(l_xfdf_string, length(l_str5), l_str5);
328:
329: dbms_lob.writeAppend(l_xfdf_string, length(l_str2), l_str2);
330: dbms_lob.writeAppend(l_xfdf_string, length(l_str8), l_str8);
331: dbms_lob.writeAppend(l_xfdf_string, length(l_str3), l_str3);
332: dbms_lob.writeAppend(l_xfdf_string, length(l_str9), l_str9);
333: dbms_lob.writeAppend(l_xfdf_string, length(l_str4), l_str4);
334: dbms_lob.writeAppend(l_xfdf_string, length(l_str8), l_str8);
335: dbms_lob.writeAppend(l_xfdf_string, length(l_str5), l_str5);
336: else
329: dbms_lob.writeAppend(l_xfdf_string, length(l_str2), l_str2);
330: dbms_lob.writeAppend(l_xfdf_string, length(l_str8), l_str8);
331: dbms_lob.writeAppend(l_xfdf_string, length(l_str3), l_str3);
332: dbms_lob.writeAppend(l_xfdf_string, length(l_str9), l_str9);
333: dbms_lob.writeAppend(l_xfdf_string, length(l_str4), l_str4);
334: dbms_lob.writeAppend(l_xfdf_string, length(l_str8), l_str8);
335: dbms_lob.writeAppend(l_xfdf_string, length(l_str5), l_str5);
336: else
337:
330: dbms_lob.writeAppend(l_xfdf_string, length(l_str8), l_str8);
331: dbms_lob.writeAppend(l_xfdf_string, length(l_str3), l_str3);
332: dbms_lob.writeAppend(l_xfdf_string, length(l_str9), l_str9);
333: dbms_lob.writeAppend(l_xfdf_string, length(l_str4), l_str4);
334: dbms_lob.writeAppend(l_xfdf_string, length(l_str8), l_str8);
335: dbms_lob.writeAppend(l_xfdf_string, length(l_str5), l_str5);
336: else
337:
338: dbms_lob.writeAppend(l_xfdf_string, length(l_str2), l_str2);
331: dbms_lob.writeAppend(l_xfdf_string, length(l_str3), l_str3);
332: dbms_lob.writeAppend(l_xfdf_string, length(l_str9), l_str9);
333: dbms_lob.writeAppend(l_xfdf_string, length(l_str4), l_str4);
334: dbms_lob.writeAppend(l_xfdf_string, length(l_str8), l_str8);
335: dbms_lob.writeAppend(l_xfdf_string, length(l_str5), l_str5);
336: else
337:
338: dbms_lob.writeAppend(l_xfdf_string, length(l_str2), l_str2);
339: dbms_lob.writeAppend(l_xfdf_string, length(l_str8), l_str8);
334: dbms_lob.writeAppend(l_xfdf_string, length(l_str8), l_str8);
335: dbms_lob.writeAppend(l_xfdf_string, length(l_str5), l_str5);
336: else
337:
338: dbms_lob.writeAppend(l_xfdf_string, length(l_str2), l_str2);
339: dbms_lob.writeAppend(l_xfdf_string, length(l_str8), l_str8);
340: dbms_lob.writeAppend(l_xfdf_string, length(l_str3), l_str3);
341: dbms_lob.writeAppend(l_xfdf_string, length(l_str4), l_str4);
342: dbms_lob.writeAppend(l_xfdf_string, length(l_str8), l_str8);
335: dbms_lob.writeAppend(l_xfdf_string, length(l_str5), l_str5);
336: else
337:
338: dbms_lob.writeAppend(l_xfdf_string, length(l_str2), l_str2);
339: dbms_lob.writeAppend(l_xfdf_string, length(l_str8), l_str8);
340: dbms_lob.writeAppend(l_xfdf_string, length(l_str3), l_str3);
341: dbms_lob.writeAppend(l_xfdf_string, length(l_str4), l_str4);
342: dbms_lob.writeAppend(l_xfdf_string, length(l_str8), l_str8);
343: dbms_lob.writeAppend(l_xfdf_string, length(l_str5), l_str5);
336: else
337:
338: dbms_lob.writeAppend(l_xfdf_string, length(l_str2), l_str2);
339: dbms_lob.writeAppend(l_xfdf_string, length(l_str8), l_str8);
340: dbms_lob.writeAppend(l_xfdf_string, length(l_str3), l_str3);
341: dbms_lob.writeAppend(l_xfdf_string, length(l_str4), l_str4);
342: dbms_lob.writeAppend(l_xfdf_string, length(l_str8), l_str8);
343: dbms_lob.writeAppend(l_xfdf_string, length(l_str5), l_str5);
344:
337:
338: dbms_lob.writeAppend(l_xfdf_string, length(l_str2), l_str2);
339: dbms_lob.writeAppend(l_xfdf_string, length(l_str8), l_str8);
340: dbms_lob.writeAppend(l_xfdf_string, length(l_str3), l_str3);
341: dbms_lob.writeAppend(l_xfdf_string, length(l_str4), l_str4);
342: dbms_lob.writeAppend(l_xfdf_string, length(l_str8), l_str8);
343: dbms_lob.writeAppend(l_xfdf_string, length(l_str5), l_str5);
344:
345: end if;
338: dbms_lob.writeAppend(l_xfdf_string, length(l_str2), l_str2);
339: dbms_lob.writeAppend(l_xfdf_string, length(l_str8), l_str8);
340: dbms_lob.writeAppend(l_xfdf_string, length(l_str3), l_str3);
341: dbms_lob.writeAppend(l_xfdf_string, length(l_str4), l_str4);
342: dbms_lob.writeAppend(l_xfdf_string, length(l_str8), l_str8);
343: dbms_lob.writeAppend(l_xfdf_string, length(l_str5), l_str5);
344:
345: end if;
346:
339: dbms_lob.writeAppend(l_xfdf_string, length(l_str8), l_str8);
340: dbms_lob.writeAppend(l_xfdf_string, length(l_str3), l_str3);
341: dbms_lob.writeAppend(l_xfdf_string, length(l_str4), l_str4);
342: dbms_lob.writeAppend(l_xfdf_string, length(l_str8), l_str8);
343: dbms_lob.writeAppend(l_xfdf_string, length(l_str5), l_str5);
344:
345: end if;
346:
347: END IF;
347: END IF;
348:
349: END LOOP;
350:
351: dbms_lob.writeAppend(l_xfdf_string, length(l_str6), l_str6 );
352:
353: ELSE
354: dbms_lob.writeAppend(l_xfdf_string, length(l_str7), l_str7 );
355: END IF;
350:
351: dbms_lob.writeAppend(l_xfdf_string, length(l_str6), l_str6 );
352:
353: ELSE
354: dbms_lob.writeAppend(l_xfdf_string, length(l_str7), l_str7 );
355: END IF;
356:
357: p_xfdf_clob := l_xfdf_string;
358: