Difficulty continuing past exception in a for loop while parsing XML

Question

Hola -
I've got an issue where (in this case) Turkish characters cause XML parsing to fail; I'm trying to insert an exception here so that any given XML element which causes a problem will simply be skipped & I can figure out the issue later. But if I place it outside, as presented below, then the entire file does not get written rather than simply that element being skipped. My other attempts have resulted in compiler errors indicating I've misplaced it, such as:
Error(61,6): PLS-00103: Encountered the symbol "EXCEPTION" when expecting one of the following: begin case declare end exit for goto if loop mod null pragma raise return select update while with <an identifier> <a double-quoted delimited-identifier> <a bind variable> << close current delete fetch lock insert open rollback savepoint set sql execute commit forall merge pipe
Can I get this to drop processing of only the specific problem element & return to complete the entire file?
Many thanks for any help here, greatly puzzled by this.
create or replace
PROCEDURE "RSSLOOPWORKS2" ( fund_in IN VARCHAR2)
is
-- customizable parameters
l_title varchar2(255) := ' New Titles Since ' || to_char(sysdate - 90, 'MM/DD/YYYY');
l_link varchar2(255) := 'replace' || fund_in || '.rss';
l_description varchar2(255) := 'This is a feed of changes to items ' || fund_in;
l_language varchar2(255) := 'en-us';
-- end customizable parameters
l_version varchar2(10) := '2.0';
l_clob clob;
l_idx pls_integer := 1;
l_len pls_integer := 255;
l_defrows pls_integer := 100;
l_maxrows pls_integer := 100;
l_desclen pls_integer := 250;
-- for output to file
begin
-- fund := fund_in;
for i in (
select xmlelement( "rss",
-- Begin XML Header Block
xmlattributes( l_version as "version"),
xmlelement( "channel",
xmlforest( l_title as "title",
l_link as "link",
l_description as "description",
l_language as "language"),
-- End XML Header Block
-- Begin List of Individual Articles or Items
xmlagg(
xmlelement( "item",
CASE
WHEN x.title IS NOT NULL THEN xmlelement("title", x.title)
ELSE xmlelement("title", substr(x.description,1,255))
END,
xmlelement("link", x.link),
xmlelement("description", x.description || ' -- Call number: ' || x.callnum),
xmlelement("callnum", x.callnum),
xmlelement("pubDate", to_char(x.updated_on,'Dy, DD Mon RRRR hh24:mi:ss') || ' EST'),
xmlelement("guid", XMLATTRIBUTES('false' as "isPermaLink"),x.id||to_char(x.updated_on,'JHH24MISS'))
-- End List of Individual Articles or Items
) as result
from ( -- Actual Database Query that populates the list of Items
select id,title,link,description,updated_on, callnum
from drx_rss_feeds
where (fund like fund_in||'%')
and rownum < (l_maxrows+1)) x)
loop
l_clob := xmltype.extract(i.result,'/').getclobval;
exit;
end loop; --i
--- EXCEPTION
exception
WHEN OTHERS THEN DBMS_OUTPUT.PUT_LINE(dbms_utility.format_error_backtrace);
--- OUTPUT RESULTS
-- for i in 1..ceil(dbms_lob.getlength(l_clob)/l_len) loop
dbms_xslprocessor.clob2file(l_clob, '/iiidb/http/live/screens/rss/', fund_in || '.rss');
-- l_idx := l_idx + l_len;
-- end loop; --i
end rssloopworks2;

Answer 1

To clarify, I know the practice should be to separate out statements so that the next statement can execute; however, inside of the loop, I haven't been able to correctly accomplish this. When I try to add a block inside the loop over 'result' then the procedure compiles & runs, but I haven't gotten an error and there is not output.
create or replace
PROCEDURE "RSSLOOPWORKS2" ( fund_in IN VARCHAR2)
is
-- customizable parameters
l_title varchar2(255) := ' New Titles Since ' || to_char(sysdate - 90, 'MM/DD/YYYY');
l_link varchar2(255) := 'replace' || fund_in || '.rss';
l_description varchar2(255) := 'This is a feed of changes to items ' || fund_in;
l_language varchar2(255) := 'en-us';
-- end customizable parameters
l_version varchar2(10) := '2.0';
l_clob clob;
l_idx pls_integer := 1;
l_len pls_integer := 255;
l_defrows pls_integer := 100;
l_maxrows pls_integer := 100;
l_desclen pls_integer := 250;
-- for output to file
begin
-- fund := fund_in;
for i in (
select xmlelement( "rss",
-- Begin XML Header Block
xmlattributes( l_version as "version"),
xmlelement( "channel",
xmlforest( l_title as "title",
l_link as "link",
l_description as "description",
l_language as "language"),
-- End XML Header Block
-- Begin List of Individual Articles or Items
xmlagg(
xmlelement( "item",
CASE
WHEN x.title IS NOT NULL THEN xmlelement("title", x.title)
ELSE xmlelement("title", substr(x.description,1,255))
END,
xmlelement("link", x.link),
xmlelement("description", x.description || ' -- Call number: ' || x.callnum),
xmlelement("callnum", x.callnum),
xmlelement("pubDate", to_char(x.updated_on,'Dy, DD Mon RRRR hh24:mi:ss') || ' EST'),
xmlelement("guid", XMLATTRIBUTES('false' as "isPermaLink"),x.id||to_char(x.updated_on,'JHH24MISS'))
-- End List of Individual Articles or Items
) as result
from ( -- Actual Database Query that populates the list of Items
select id,title,link,description,updated_on, callnum
from drx_rss_feeds
where (fund like fund_in||'%')
and rownum < (l_maxrows+1)) x)
loop
BEGIN
l_clob := xmltype.extract(i.result,'/').getclobval;
exit;
exception
WHEN OTHERS THEN DBMS_OUTPUT.PUT_LINE('oi');
END;
end loop; --i
--- EXCEPTION
exception
WHEN OTHERS THEN DBMS_OUTPUT.PUT_LINE(dbms_utility.format_error_backtrace);
--- OUTPUT RESULTS
-- for i in 1..ceil(dbms_lob.getlength(l_clob)/l_len) loop
dbms_xslprocessor.clob2file(l_clob, '/iiidb/http/live/screens/rss/', fund_in || '.rss');
-- l_idx := l_idx + l_len;
-- end loop; --i
end rssloopworks2;