##这里我选择解决办法2:
SQL> create table result (id number, checked_rowid rowid, status varchar2(10), page number, error varchar2(100));
SQL> set serverout on
exec dbms_output.enable(100000);
declare
page number;
len number;
c varchar2(10);
charpp number := 8132/2;
n number;
v_sqlerrm varchar2(100);
begin
n := 0;
for r in (select rowid rid, dbms_lob.getlength (xmltype.getclobval(content)) len -- replace column name
from zldoc.bz_doc_log) loop << replace table name
n := n+1;
if r.len is not null then
for page in 0..r.len/charpp loop
begin
select dbms_lob.substr (xmltype.getclobval(content), 1, 1+ (page * charpp)) --replace column name
into c
from zldoc.bz_doc_log -- replace table name
where rowid = r.rid;
v_sqlerrm := SQLERRM;
insert into result values (n, r.rid, 'good', page, v_sqlerrm);
commit;
exception
when others then
dbms_output.put_line ('Error on rowid ' ||r.rid||' page '||page);
dbms_output.put_line (sqlerrm);
v_sqlerrm := SQLERRM;
insert into result values (n, r.rid, 'bad',page,v_sqlerrm);
commit;
end;
end loop;
end if;
end loop;
end;
/
expdp system/manager DIRECTORY=my_dir DUMPFILE=expdp.dmp LOGFILE=expdp.log TABLES=<USER>.TESTTAB QUERY=\"WHERE rowid NOT IN \(\'<orrupt_rowid>\'\)\"