废话不多说了,直接给大家贴代码了,具体代码如下所示:
create or replace procedure proc_test is
--description:删除字段中的指定字符(回车chr(13)、换行chr(10))
--by lichao
--date:2016-03-01
colname varchar(20); --列名
cnt number; --包含换行符的列的行数
v_sql varchar(2000); --动态sql变量
begin
--读取表中的列
for col in (select column_name
from user_tab_columns
where table_name = 'temp') loop
colname := col.column_name;
--替换换行符chr(10)
v_sql := 'select count(1) from temp where instr(' || colname ||
',chr(10))>0 ';
execute immediate v_sql
into cnt;
if cnt > 0 then
v_sql := 'update temp set ' || colname || '=trim(replace(' || colname ||
',chr(10),''''))' || 'where instr(' || colname ||
',chr(10))>0 ';
execute immediate v_sql;
commit;
end if;
--替换回车符chr(13)
v_sql := 'select count(1) from temp where instr(' || colname ||
',chr(13))>0 ';
execute immediate v_sql
into cnt;
if cnt > 0 then
v_sql := 'update temp set ' || colname || '=trim(replace(' || colname ||
',chr(13),''''))' || 'where instr(' || colname ||
',chr(13))>0 ';
execute immediate v_sql;
commit;
end if;
--替换'|' chr(124) 为'*' chr(42)
v_sql := 'select count(1) from temp where instr(' || colname ||
',chr(124))>0 ';
execute immediate v_sql
into cnt;
if cnt > 0 then
v_sql := 'update temp set ' || colname || '=replace(' || colname ||
',chr(124),chr(42))' || 'where instr(' || colname ||
',chr(124))>0 ';
execute immediate v_sql;
commit;
end if;
end loop;
end proc_test;
/
以上所述是www.887551.com给大家介绍的oracle删除字段中的空格、回车及指定字符的实例代码,希望对大家有所帮助