167: l_str6 := '';
168: l_str7 := '
169: l_str10 := '
170: l_str11 := '
171: DBMS_LOB.createtemporary (l_xfdf_string, FALSE, DBMS_LOB.CALL);
172: DBMS_LOB.OPEN (l_xfdf_string, DBMS_LOB.lob_readwrite);
173: current_index := 0;
174: IF gplsqltable.COUNT > 0
175: THEN
168: l_str7 := '
169: l_str10 := '
170: l_str11 := '
171: DBMS_LOB.createtemporary (l_xfdf_string, FALSE, DBMS_LOB.CALL);
172: DBMS_LOB.OPEN (l_xfdf_string, DBMS_LOB.lob_readwrite);
173: current_index := 0;
174: IF gplsqltable.COUNT > 0
175: THEN
176: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str1), l_str1);
172: DBMS_LOB.OPEN (l_xfdf_string, DBMS_LOB.lob_readwrite);
173: current_index := 0;
174: IF gplsqltable.COUNT > 0
175: THEN
176: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str1), l_str1);
177: FOR table_counter IN gplsqltable.FIRST .. gplsqltable.LAST
178: LOOP
179: l_str8 := gplsqltable (table_counter).tagname;
180: l_str9 := gplsqltable (table_counter).tagvalue;
179: l_str8 := gplsqltable (table_counter).tagname;
180: l_str9 := gplsqltable (table_counter).tagvalue;
181: IF l_str9 = 'END'
182: THEN
183: DBMS_LOB.writeappend (
184: l_xfdf_string,
185: LENGTH (l_str11),
186: l_str11
187: );
186: l_str11
187: );
188: ELSIF l_str9 = 'START'
189: THEN
190: DBMS_LOB.writeappend (
191: l_xfdf_string,
192: LENGTH (l_str10),
193: l_str10
194: );
193: l_str10
194: );
195: ELSIF l_str9 IS NOT NULL
196: THEN
197: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str2), l_str2);
198: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str8), l_str8);
199: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str3), l_str3);
200: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str9), l_str9);
201: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str4), l_str4);
194: );
195: ELSIF l_str9 IS NOT NULL
196: THEN
197: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str2), l_str2);
198: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str8), l_str8);
199: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str3), l_str3);
200: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str9), l_str9);
201: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str4), l_str4);
202: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str8), l_str8);
195: ELSIF l_str9 IS NOT NULL
196: THEN
197: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str2), l_str2);
198: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str8), l_str8);
199: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str3), l_str3);
200: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str9), l_str9);
201: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str4), l_str4);
202: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str8), l_str8);
203: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str5), l_str5);
196: THEN
197: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str2), l_str2);
198: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str8), l_str8);
199: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str3), l_str3);
200: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str9), l_str9);
201: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str4), l_str4);
202: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str8), l_str8);
203: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str5), l_str5);
204: ELSE
197: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str2), l_str2);
198: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str8), l_str8);
199: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str3), l_str3);
200: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str9), l_str9);
201: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str4), l_str4);
202: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str8), l_str8);
203: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str5), l_str5);
204: ELSE
205: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str2), l_str2);
198: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str8), l_str8);
199: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str3), l_str3);
200: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str9), l_str9);
201: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str4), l_str4);
202: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str8), l_str8);
203: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str5), l_str5);
204: ELSE
205: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str2), l_str2);
206: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str8), l_str8);
199: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str3), l_str3);
200: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str9), l_str9);
201: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str4), l_str4);
202: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str8), l_str8);
203: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str5), l_str5);
204: ELSE
205: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str2), l_str2);
206: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str8), l_str8);
207: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str3), l_str3);
201: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str4), l_str4);
202: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str8), l_str8);
203: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str5), l_str5);
204: ELSE
205: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str2), l_str2);
206: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str8), l_str8);
207: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str3), l_str3);
208: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str4), l_str4);
209: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str8), l_str8);
202: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str8), l_str8);
203: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str5), l_str5);
204: ELSE
205: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str2), l_str2);
206: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str8), l_str8);
207: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str3), l_str3);
208: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str4), l_str4);
209: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str8), l_str8);
210: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str5), l_str5);
203: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str5), l_str5);
204: ELSE
205: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str2), l_str2);
206: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str8), l_str8);
207: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str3), l_str3);
208: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str4), l_str4);
209: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str8), l_str8);
210: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str5), l_str5);
211: END IF;
204: ELSE
205: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str2), l_str2);
206: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str8), l_str8);
207: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str3), l_str3);
208: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str4), l_str4);
209: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str8), l_str8);
210: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str5), l_str5);
211: END IF;
212: END LOOP;
205: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str2), l_str2);
206: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str8), l_str8);
207: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str3), l_str3);
208: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str4), l_str4);
209: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str8), l_str8);
210: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str5), l_str5);
211: END IF;
212: END LOOP;
213: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str6), l_str6);
206: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str8), l_str8);
207: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str3), l_str3);
208: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str4), l_str4);
209: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str8), l_str8);
210: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str5), l_str5);
211: END IF;
212: END LOOP;
213: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str6), l_str6);
214: ELSE
209: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str8), l_str8);
210: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str5), l_str5);
211: END IF;
212: END LOOP;
213: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str6), l_str6);
214: ELSE
215: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str7), l_str7);
216: END IF;
217: p_xfdf_clob := l_xfdf_string;
211: END IF;
212: END LOOP;
213: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str6), l_str6);
214: ELSE
215: DBMS_LOB.writeappend (l_xfdf_string, LENGTH (l_str7), l_str7);
216: END IF;
217: p_xfdf_clob := l_xfdf_string;
218:
219: EXCEPTION