鸿 网 互 联 www.68idc.cn

当前位置 : 服务器租用 > 数据库 > oracle > >

oracle删除字段中的空格、回车及指定字符

来源:互联网 作者:佚名 时间:2018-02-03 10:50
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 ); -- 动态
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;
/

 

网友评论
<