一个比较复杂的多次拆分字符串的存储过程

黄舟
Lepaskan: 2017-02-16 13:19:57
asal
1355 orang telah melayarinya

自己写的特殊拆分函数如下: 
create or replace function FN_SPLIT_STR_2(var_str   in varchar2)return varchar2
/* 
有一张表 t1,里面有个字段叫c3,存的是所有店铺的点位信息。
现在需要一个存储过程,将所有的记录的c3字段的坐标值都缩小3倍,写入c字段


内容举例为  220.25 257,220.25 269.75,229.25 269.75,229.25 257
每个逗号分开的是一个个的坐标点,每个坐标点用空格区分x坐标和y坐标


存储函数名称:FN_SPLIT_STR_2
用途:把bis_store坐标v_coords3缩小三倍更新coords,比如
author:huangshan
*/

as
  var_tmp     varchar2(4000);
  var_element varchar2(4000);
  var_result varchar2(4000);
  var_instr_first number;
  var_instr_second number;
  var_length number;
Salin selepas log masuk




begin

  var_tmp := var_str;
  var_instr_first :=0;
  var_instr_second :=0;
  var_result :='';
  var_length:=0;
Salin selepas log masuk



/* 替换掉传过来的特殊字符
chr(9) 制表符
chr(10)回车
chr(13)换行
*/

  var_tmp:= replace(var_tmp,chr(10),'');
  var_tmp:= replace(var_tmp,chr(13),'');
  var_tmp:= replace(var_tmp,chr(9),'');
  
  while instr(var_tmp, ' ') > 0 
    or instr(var_tmp, ',')>0 
    or(var_length>0) loop
    var_instr_first :=instr(var_tmp, ' ');
    var_instr_second :=instr(var_tmp, ',');
   -- dbms_output.put_line('var_instr_kg:'||var_instr_first||'  ');
   -- dbms_output.put_line('var_instr_dh:'||var_instr_second||'  ');
         var_length:=length(var_tmp);
   --  dbms_output.put_line('var_length  :'||var_length||'  ');
Salin selepas log masuk



/* 1 如果是先有空格,比如 12 32,12 32这类 **/

  if var_instr_first<var_instr_second  then
         var_element := round(to_number(substr(var_tmp, 1, var_instr_first-1))/3,2);
         var_result := var_result|| var_element|| &#39; &#39;;
         var_tmp := substr(var_tmp,var_instr_first+1, length(var_tmp));
      --   dbms_output.put_line(&#39;var_result kg:&#39;||var_result);
      --   dbms_output.put_line(&#39;var_tmp kg:&#39;||var_tmp||&#39;  &#39;);
      --   dbms_output.put_line(&#39;var_element kg:&#39;||var_element||&#39;  &#39;);
Salin selepas log masuk



/* 2 如果是已经截取完空格,逗号在前面比如 32,12 32这类 **/

  elsif var_instr_first>var_instr_second and  var_instr_second>0 then
           var_element := round(to_number(substr(var_tmp, 1, var_instr_second-1))/3,2);
           var_result := var_result || var_element || &#39;,&#39; ;
           var_tmp := substr(var_tmp,var_instr_second+1, length(var_tmp));
         --  dbms_output.put_line(&#39;var_result dh:&#39;||var_result);
        --   dbms_output.put_line(&#39;var_tmp dh:&#39;||var_tmp||&#39;  &#39;);
        --   dbms_output.put_line(&#39;var_element dh:&#39;||var_element||&#39;  &#39;);
Salin selepas log masuk



/* 3 如果是已经截取完逗号,已经只剩下最后一个坐标x y,比如12 32这类 **/

 elsif var_instr_first>var_instr_second and  var_instr_second=0 then
         var_element := round(to_number(substr(var_tmp, 1, var_instr_first-1))/3,2);
         var_result := var_result|| var_element|| &#39; &#39;;
         var_tmp := substr(var_tmp,+1, length(var_tmp));
       --  dbms_output.put_line(&#39;var_result kg:&#39;||var_result);
       --  dbms_output.put_line(&#39;var_tmpvar_instr_first kg:&#39;||var_tmp||&#39;  &#39;);
        -- dbms_output.put_line(&#39;var_element kg:&#39;||var_element||&#39;  &#39;);
Salin selepas log masuk



/* 4 如果是已经截取到最后一个坐标,比如32这类 **/

    elsif var_instr_first=0 and var_instr_second=0 and var_length>0 then
      --  dbms_output.put_line(&#39;var_tmp the last one:&#39;||var_tmp||&#39;  &#39;);
       var_element := round(to_number(var_tmp)/3,2);
       var_result := var_result  || var_element;
       var_tmp:=&#39;&#39;;
       --  dbms_output.put_line(&#39;var_result 0:&#39;||var_result);
       --  dbms_output.put_line(&#39;var_tmp 0:&#39;||var_tmp||&#39;  &#39;);
       --  dbms_output.put_line(&#39;var_element 0:&#39;||var_element||&#39;  &#39;);
Salin selepas log masuk



/* 5 如果其他的东西,设置成''退出while循环为止 **/

     else 
       var_tmp:=&#39;&#39;;
     end if;
    -- dbms_output.put_line(&#39;     &#39;);
     
  end loop;
  return var_result;
end FN_SPLIT_STR_2;
Salin selepas log masuk




-- google其他人的拆分function如下:
-- 拆分函数

create or replace function split_str(var_str   in varchar2, 
                                       var_split in varchar2) 
/**************************************************** 
  注意 先执行下面语句 创建类型 
  create or replace type t_ret_table is table of varchar2(100) 
  ** 函数名称:split_str 
  ** 参    数:【名称】         【类型 】      【说明】 
  **           var_str          varchar2       要拆分的字符串 
  **           var_split        varchar2       字符串分隔符 
  ** 返 回 值:Result           t_ret_table    拆分后数组集合 
  ** 摘    要:拆分字符串 
  调用 举例: 
  select * from table(split_str(&#39;2008-10-21&#39;,&#39;-&#39;)) 
  ****************************************************/ 
  return t_ret_table is 
  var_out     t_ret_table; 
  var_tmp     varchar2(4000); 
  var_element varchar2(4000);
Salin selepas log masuk


begin

 var_tmp := var_str; 
  var_out := t_ret_table(); 
  --如果存在匹配的分割符 
  while instr(var_tmp, var_split) > 0 loop 
    var_element := substr(var_tmp, 1, instr(var_tmp, var_split) - 1); 
    var_tmp     := substr(var_tmp, 
                          instr(var_tmp, var_split) + length(var_split), 
                          length(var_tmp)); 
    --var_out.extend(1); 
    var_out.extend; 
    var_out(var_out.count) := var_element; 
  end loop; 
  --var_out.extend(1); 
  var_out.extend; 
  var_out(var_out.count) := var_tmp; 
  return var_out; 
end split_str;
Salin selepas log masuk

 以上就是一个比较复杂的多次拆分字符串的存储过程的内容,更多相关内容请关注PHP中文网(www.php.cn)!


sumber:php.cn
Kenyataan Laman Web ini
Kandungan artikel ini disumbangkan secara sukarela oleh netizen, dan hak cipta adalah milik pengarang asal. Laman web ini tidak memikul tanggungjawab undang-undang yang sepadan. Jika anda menemui sebarang kandungan yang disyaki plagiarisme atau pelanggaran, sila hubungi admin@php.cn
Tutorial Popular
Lagi>
Muat turun terkini
Lagi>
kesan web
Kod sumber laman web
Bahan laman web
Templat hujung hadapan
Tentang kita Penafian Sitemap
Laman web PHP Cina:Latihan PHP dalam talian kebajikan awam,Bantu pelajar PHP berkembang dengan cepat!