186:
187: if l_addr_sql is not null then
188: l_sql := l_addr_sql || l_where_sql;
189:
190: dbms_lob.createtemporary(clob_addr, true);
191: dbms_lob.open(clob_addr, dbms_lob.lob_readwrite);
192: open c_addr for l_sql using p_header_id,l_attr_grp_id;
193: loop
194: fetch c_addr into l_address;
187: if l_addr_sql is not null then
188: l_sql := l_addr_sql || l_where_sql;
189:
190: dbms_lob.createtemporary(clob_addr, true);
191: dbms_lob.open(clob_addr, dbms_lob.lob_readwrite);
192: open c_addr for l_sql using p_header_id,l_attr_grp_id;
193: loop
194: fetch c_addr into l_address;
195: exit when c_addr%notfound;
193: loop
194: fetch c_addr into l_address;
195: exit when c_addr%notfound;
196: if l_address is not null then
197: dbms_lob.writeappend(clob_addr, length(l_address), l_address);
198: end if;
199: end loop;
200: dbms_lob.close(clob_addr);
201: end if;
196: if l_address is not null then
197: dbms_lob.writeappend(clob_addr, length(l_address), l_address);
198: end if;
199: end loop;
200: dbms_lob.close(clob_addr);
201: end if;
202: return(clob_addr);
203: end get_addressxml;
204:
242:
243: if l_cnt_sql is not null then
244: l_sql := l_cnt_sql || l_where_sql;
245:
246: dbms_lob.createtemporary(clob_cnt, true);
247: dbms_lob.open(clob_cnt , dbms_lob.lob_readwrite);
248: open c_cnt for l_sql using p_header_id,l_attr_grp_id;
249: loop
250: fetch c_cnt into l_cnt;
243: if l_cnt_sql is not null then
244: l_sql := l_cnt_sql || l_where_sql;
245:
246: dbms_lob.createtemporary(clob_cnt, true);
247: dbms_lob.open(clob_cnt , dbms_lob.lob_readwrite);
248: open c_cnt for l_sql using p_header_id,l_attr_grp_id;
249: loop
250: fetch c_cnt into l_cnt;
251: exit when c_cnt%notfound;
249: loop
250: fetch c_cnt into l_cnt;
251: exit when c_cnt%notfound;
252: if l_cnt is not null then
253: dbms_lob.writeappend(clob_cnt, length(l_cnt), l_cnt);
254: end if;
255: end loop;
256: dbms_lob.close(clob_cnt);
257: end if;
252: if l_cnt is not null then
253: dbms_lob.writeappend(clob_cnt, length(l_cnt), l_cnt);
254: end if;
255: end loop;
256: dbms_lob.close(clob_cnt);
257: end if;
258: return(clob_cnt);
259: end get_contactsxml;
260: