166: -- l_str5 := '
167: l_str4 := '';
168: l_str5 := '
169: l_str8 := '
170: dbms_lob.createtemporary(l_xfdf_string,FALSE,DBMS_LOB.CALL);
171: dbms_lob.open(l_xfdf_string,dbms_lob.lob_readwrite);
172: dbms_lob.writeAppend( l_xfdf_string, length(l_str0), l_str0);
173: if p_XMLTable.count > 0 then
174: dbms_lob.writeAppend( l_xfdf_string, length(l_str1), l_str1 );
167: l_str4 := '';
168: l_str5 := '
169: l_str8 := '
170: dbms_lob.createtemporary(l_xfdf_string,FALSE,DBMS_LOB.CALL);
171: dbms_lob.open(l_xfdf_string,dbms_lob.lob_readwrite);
172: dbms_lob.writeAppend( l_xfdf_string, length(l_str0), l_str0);
173: if p_XMLTable.count > 0 then
174: dbms_lob.writeAppend( l_xfdf_string, length(l_str1), l_str1 );
175: FOR ctr_table IN p_XMLTable.FIRST .. p_XMLTable.LAST LOOP
168: l_str5 := '
169: l_str8 := '
170: dbms_lob.createtemporary(l_xfdf_string,FALSE,DBMS_LOB.CALL);
171: dbms_lob.open(l_xfdf_string,dbms_lob.lob_readwrite);
172: dbms_lob.writeAppend( l_xfdf_string, length(l_str0), l_str0);
173: if p_XMLTable.count > 0 then
174: dbms_lob.writeAppend( l_xfdf_string, length(l_str1), l_str1 );
175: FOR ctr_table IN p_XMLTable.FIRST .. p_XMLTable.LAST LOOP
176: l_str6 := p_XMLTable(ctr_table).TagName;
170: dbms_lob.createtemporary(l_xfdf_string,FALSE,DBMS_LOB.CALL);
171: dbms_lob.open(l_xfdf_string,dbms_lob.lob_readwrite);
172: dbms_lob.writeAppend( l_xfdf_string, length(l_str0), l_str0);
173: if p_XMLTable.count > 0 then
174: dbms_lob.writeAppend( l_xfdf_string, length(l_str1), l_str1 );
175: FOR ctr_table IN p_XMLTable.FIRST .. p_XMLTable.LAST LOOP
176: l_str6 := p_XMLTable(ctr_table).TagName;
177: l_str7 := p_XMLTable(ctr_table).TagValue;
178: if (l_str6 = 'Bericht' OR l_str6 = 'AdministratieveEenheid' OR l_str6 = 'Dienstbetrekking' OR l_str6 = 'NatuurlijkPersoon') then
176: l_str6 := p_XMLTable(ctr_table).TagName;
177: l_str7 := p_XMLTable(ctr_table).TagValue;
178: if (l_str6 = 'Bericht' OR l_str6 = 'AdministratieveEenheid' OR l_str6 = 'Dienstbetrekking' OR l_str6 = 'NatuurlijkPersoon') then
179: if (l_str7 is null) then
180: dbms_lob.writeAppend( l_xfdf_string, length(l_str2), l_str2);
181: dbms_lob.writeAppend( l_xfdf_string, length(l_str6), l_str6);
182: dbms_lob.writeAppend( l_xfdf_string, length(l_str3), l_str3);
183: else
184: if (l_str7 = 'END') then
177: l_str7 := p_XMLTable(ctr_table).TagValue;
178: if (l_str6 = 'Bericht' OR l_str6 = 'AdministratieveEenheid' OR l_str6 = 'Dienstbetrekking' OR l_str6 = 'NatuurlijkPersoon') then
179: if (l_str7 is null) then
180: dbms_lob.writeAppend( l_xfdf_string, length(l_str2), l_str2);
181: dbms_lob.writeAppend( l_xfdf_string, length(l_str6), l_str6);
182: dbms_lob.writeAppend( l_xfdf_string, length(l_str3), l_str3);
183: else
184: if (l_str7 = 'END') then
185: dbms_lob.writeAppend( l_xfdf_string, length(l_str8), l_str8);
178: if (l_str6 = 'Bericht' OR l_str6 = 'AdministratieveEenheid' OR l_str6 = 'Dienstbetrekking' OR l_str6 = 'NatuurlijkPersoon') then
179: if (l_str7 is null) then
180: dbms_lob.writeAppend( l_xfdf_string, length(l_str2), l_str2);
181: dbms_lob.writeAppend( l_xfdf_string, length(l_str6), l_str6);
182: dbms_lob.writeAppend( l_xfdf_string, length(l_str3), l_str3);
183: else
184: if (l_str7 = 'END') then
185: dbms_lob.writeAppend( l_xfdf_string, length(l_str8), l_str8);
186: dbms_lob.writeAppend( l_xfdf_string, length(l_str6), l_str6);
181: dbms_lob.writeAppend( l_xfdf_string, length(l_str6), l_str6);
182: dbms_lob.writeAppend( l_xfdf_string, length(l_str3), l_str3);
183: else
184: if (l_str7 = 'END') then
185: dbms_lob.writeAppend( l_xfdf_string, length(l_str8), l_str8);
186: dbms_lob.writeAppend( l_xfdf_string, length(l_str6), l_str6);
187: dbms_lob.writeAppend( l_xfdf_string, length(l_str3), l_str3);
188: end if;
189: end if;
182: dbms_lob.writeAppend( l_xfdf_string, length(l_str3), l_str3);
183: else
184: if (l_str7 = 'END') then
185: dbms_lob.writeAppend( l_xfdf_string, length(l_str8), l_str8);
186: dbms_lob.writeAppend( l_xfdf_string, length(l_str6), l_str6);
187: dbms_lob.writeAppend( l_xfdf_string, length(l_str3), l_str3);
188: end if;
189: end if;
190: else
183: else
184: if (l_str7 = 'END') then
185: dbms_lob.writeAppend( l_xfdf_string, length(l_str8), l_str8);
186: dbms_lob.writeAppend( l_xfdf_string, length(l_str6), l_str6);
187: dbms_lob.writeAppend( l_xfdf_string, length(l_str3), l_str3);
188: end if;
189: end if;
190: else
191: if (l_str7 is not null) then
188: end if;
189: end if;
190: else
191: if (l_str7 is not null) then
192: dbms_lob.writeAppend( l_xfdf_string, length(l_str2), l_str2);
193: dbms_lob.writeAppend( l_xfdf_string, length(l_str6), l_str6);
194: dbms_lob.writeAppend( l_xfdf_string, length(l_str3), l_str3);
195: dbms_lob.writeAppend( l_xfdf_string, length(l_str7), l_str7);
196: dbms_lob.writeAppend( l_xfdf_string, length(l_str8), l_str8);
189: end if;
190: else
191: if (l_str7 is not null) then
192: dbms_lob.writeAppend( l_xfdf_string, length(l_str2), l_str2);
193: dbms_lob.writeAppend( l_xfdf_string, length(l_str6), l_str6);
194: dbms_lob.writeAppend( l_xfdf_string, length(l_str3), l_str3);
195: dbms_lob.writeAppend( l_xfdf_string, length(l_str7), l_str7);
196: dbms_lob.writeAppend( l_xfdf_string, length(l_str8), l_str8);
197: dbms_lob.writeAppend( l_xfdf_string, length(l_str6), l_str6);
190: else
191: if (l_str7 is not null) then
192: dbms_lob.writeAppend( l_xfdf_string, length(l_str2), l_str2);
193: dbms_lob.writeAppend( l_xfdf_string, length(l_str6), l_str6);
194: dbms_lob.writeAppend( l_xfdf_string, length(l_str3), l_str3);
195: dbms_lob.writeAppend( l_xfdf_string, length(l_str7), l_str7);
196: dbms_lob.writeAppend( l_xfdf_string, length(l_str8), l_str8);
197: dbms_lob.writeAppend( l_xfdf_string, length(l_str6), l_str6);
198: dbms_lob.writeAppend( l_xfdf_string, length(l_str3), l_str3);
191: if (l_str7 is not null) then
192: dbms_lob.writeAppend( l_xfdf_string, length(l_str2), l_str2);
193: dbms_lob.writeAppend( l_xfdf_string, length(l_str6), l_str6);
194: dbms_lob.writeAppend( l_xfdf_string, length(l_str3), l_str3);
195: dbms_lob.writeAppend( l_xfdf_string, length(l_str7), l_str7);
196: dbms_lob.writeAppend( l_xfdf_string, length(l_str8), l_str8);
197: dbms_lob.writeAppend( l_xfdf_string, length(l_str6), l_str6);
198: dbms_lob.writeAppend( l_xfdf_string, length(l_str3), l_str3);
199: elsif (l_str7 is null and l_str6 is not null) then
192: dbms_lob.writeAppend( l_xfdf_string, length(l_str2), l_str2);
193: dbms_lob.writeAppend( l_xfdf_string, length(l_str6), l_str6);
194: dbms_lob.writeAppend( l_xfdf_string, length(l_str3), l_str3);
195: dbms_lob.writeAppend( l_xfdf_string, length(l_str7), l_str7);
196: dbms_lob.writeAppend( l_xfdf_string, length(l_str8), l_str8);
197: dbms_lob.writeAppend( l_xfdf_string, length(l_str6), l_str6);
198: dbms_lob.writeAppend( l_xfdf_string, length(l_str3), l_str3);
199: elsif (l_str7 is null and l_str6 is not null) then
200: dbms_lob.writeAppend(l_xfdf_string, length(l_str2), l_str2);
193: dbms_lob.writeAppend( l_xfdf_string, length(l_str6), l_str6);
194: dbms_lob.writeAppend( l_xfdf_string, length(l_str3), l_str3);
195: dbms_lob.writeAppend( l_xfdf_string, length(l_str7), l_str7);
196: dbms_lob.writeAppend( l_xfdf_string, length(l_str8), l_str8);
197: dbms_lob.writeAppend( l_xfdf_string, length(l_str6), l_str6);
198: dbms_lob.writeAppend( l_xfdf_string, length(l_str3), l_str3);
199: elsif (l_str7 is null and l_str6 is not null) then
200: dbms_lob.writeAppend(l_xfdf_string, length(l_str2), l_str2);
201: dbms_lob.writeAppend(l_xfdf_string, length(l_str6), l_str6);
194: dbms_lob.writeAppend( l_xfdf_string, length(l_str3), l_str3);
195: dbms_lob.writeAppend( l_xfdf_string, length(l_str7), l_str7);
196: dbms_lob.writeAppend( l_xfdf_string, length(l_str8), l_str8);
197: dbms_lob.writeAppend( l_xfdf_string, length(l_str6), l_str6);
198: dbms_lob.writeAppend( l_xfdf_string, length(l_str3), l_str3);
199: elsif (l_str7 is null and l_str6 is not null) then
200: dbms_lob.writeAppend(l_xfdf_string, length(l_str2), l_str2);
201: dbms_lob.writeAppend(l_xfdf_string, length(l_str6), l_str6);
202: dbms_lob.writeAppend(l_xfdf_string, length(l_str3), l_str3);
196: dbms_lob.writeAppend( l_xfdf_string, length(l_str8), l_str8);
197: dbms_lob.writeAppend( l_xfdf_string, length(l_str6), l_str6);
198: dbms_lob.writeAppend( l_xfdf_string, length(l_str3), l_str3);
199: elsif (l_str7 is null and l_str6 is not null) then
200: dbms_lob.writeAppend(l_xfdf_string, length(l_str2), l_str2);
201: dbms_lob.writeAppend(l_xfdf_string, length(l_str6), l_str6);
202: dbms_lob.writeAppend(l_xfdf_string, length(l_str3), l_str3);
203: dbms_lob.writeAppend(l_xfdf_string, length(l_str8), l_str8);
204: dbms_lob.writeAppend(l_xfdf_string, length(l_str6), l_str6);
197: dbms_lob.writeAppend( l_xfdf_string, length(l_str6), l_str6);
198: dbms_lob.writeAppend( l_xfdf_string, length(l_str3), l_str3);
199: elsif (l_str7 is null and l_str6 is not null) then
200: dbms_lob.writeAppend(l_xfdf_string, length(l_str2), l_str2);
201: dbms_lob.writeAppend(l_xfdf_string, length(l_str6), l_str6);
202: dbms_lob.writeAppend(l_xfdf_string, length(l_str3), l_str3);
203: dbms_lob.writeAppend(l_xfdf_string, length(l_str8), l_str8);
204: dbms_lob.writeAppend(l_xfdf_string, length(l_str6), l_str6);
205: dbms_lob.writeAppend(l_xfdf_string, length(l_str3), l_str3);
198: dbms_lob.writeAppend( l_xfdf_string, length(l_str3), l_str3);
199: elsif (l_str7 is null and l_str6 is not null) then
200: dbms_lob.writeAppend(l_xfdf_string, length(l_str2), l_str2);
201: dbms_lob.writeAppend(l_xfdf_string, length(l_str6), l_str6);
202: dbms_lob.writeAppend(l_xfdf_string, length(l_str3), l_str3);
203: dbms_lob.writeAppend(l_xfdf_string, length(l_str8), l_str8);
204: dbms_lob.writeAppend(l_xfdf_string, length(l_str6), l_str6);
205: dbms_lob.writeAppend(l_xfdf_string, length(l_str3), l_str3);
206: else
199: elsif (l_str7 is null and l_str6 is not null) then
200: dbms_lob.writeAppend(l_xfdf_string, length(l_str2), l_str2);
201: dbms_lob.writeAppend(l_xfdf_string, length(l_str6), l_str6);
202: dbms_lob.writeAppend(l_xfdf_string, length(l_str3), l_str3);
203: dbms_lob.writeAppend(l_xfdf_string, length(l_str8), l_str8);
204: dbms_lob.writeAppend(l_xfdf_string, length(l_str6), l_str6);
205: dbms_lob.writeAppend(l_xfdf_string, length(l_str3), l_str3);
206: else
207: null;
200: dbms_lob.writeAppend(l_xfdf_string, length(l_str2), l_str2);
201: dbms_lob.writeAppend(l_xfdf_string, length(l_str6), l_str6);
202: dbms_lob.writeAppend(l_xfdf_string, length(l_str3), l_str3);
203: dbms_lob.writeAppend(l_xfdf_string, length(l_str8), l_str8);
204: dbms_lob.writeAppend(l_xfdf_string, length(l_str6), l_str6);
205: dbms_lob.writeAppend(l_xfdf_string, length(l_str3), l_str3);
206: else
207: null;
208: end if;
201: dbms_lob.writeAppend(l_xfdf_string, length(l_str6), l_str6);
202: dbms_lob.writeAppend(l_xfdf_string, length(l_str3), l_str3);
203: dbms_lob.writeAppend(l_xfdf_string, length(l_str8), l_str8);
204: dbms_lob.writeAppend(l_xfdf_string, length(l_str6), l_str6);
205: dbms_lob.writeAppend(l_xfdf_string, length(l_str3), l_str3);
206: else
207: null;
208: end if;
209: end if;
207: null;
208: end if;
209: end if;
210: END LOOP;
211: dbms_lob.writeAppend( l_xfdf_string, length(l_str4), l_str4 );
212: else
213: dbms_lob.writeAppend( l_xfdf_string, length(l_str5), l_str5 );
214: end if;
215: DBMS_LOB.CREATETEMPORARY(p_xfdf_clob,TRUE);
209: end if;
210: END LOOP;
211: dbms_lob.writeAppend( l_xfdf_string, length(l_str4), l_str4 );
212: else
213: dbms_lob.writeAppend( l_xfdf_string, length(l_str5), l_str5 );
214: end if;
215: DBMS_LOB.CREATETEMPORARY(p_xfdf_clob,TRUE);
216: p_xfdf_clob := l_xfdf_string;
217: hr_utility.set_location('Finished Procedure Write to CLOB ',110);
211: dbms_lob.writeAppend( l_xfdf_string, length(l_str4), l_str4 );
212: else
213: dbms_lob.writeAppend( l_xfdf_string, length(l_str5), l_str5 );
214: end if;
215: DBMS_LOB.CREATETEMPORARY(p_xfdf_clob,TRUE);
216: p_xfdf_clob := l_xfdf_string;
217: hr_utility.set_location('Finished Procedure Write to CLOB ',110);
218: EXCEPTION
219: WHEN OTHERS then