一個比較複雜的多次拆分字串的預存過程

自己寫的特殊分割函數如下： 
create or replace function FN_SPLIT_STR_2(var_str   in varchar2)return/表t1，裡面有個字段叫c3，存的是所有店舖的點位資訊。
現在需要一個儲存過程，將所有的記錄的c3字段的坐標值都縮小3倍，寫入c字段

內容舉例為 220.25 257,220.25 269.75,599.5759.5959.599. 每個逗號分開的是一個個的座標點，每個座標點用空格區分x座標和y座標


儲存函數名稱：FN_SPLIT_STR_2

用途：把bis_storev_coords3座標

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;

  

  /* 替換掉傳過來的特殊字元
chr(9) 製表符 

chr(10)回車
chr(13)換行

  */

/* 1 如果是先有空格，例如12 32,12 32這類**/
 

  var_tmp := var_str;
  var_instr_first :=0;
  var_instr_second :=0;
  var_result :='';
  var_length:=0;

 
 
 

   

/  /    
 

  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 || ',' ;
           var_tmp := substr(var_tmp,var_instr_second+1, length(var_tmp));
         --  dbms_output.put_line('var_result dh:'||var_result);
        --   dbms_output.put_line('var_tmp dh:'||var_tmp||'  ');
        --   dbms_output.put_line('var_element dh:'||var_element||'  ');

/* 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|| ' ';
         var_tmp := substr(var_tmp,+1, length(var_tmp));
       --  dbms_output.put_line('var_result kg:'||var_result);
       --  dbms_output.put_line('var_tmpvar_instr_first kg:'||var_tmp||'  ');
        -- dbms_output.put_line('var_element kg:'||var_element||'  ');

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

    elsif var_instr_first=0 and var_instr_second=0 and var_length>0 then
      --  dbms_output.put_line('var_tmp the last one:'||var_tmp||'  ');
       var_element := round(to_number(var_tmp)/3,2);
       var_result := var_result  || var_element;
       var_tmp:='';
       --  dbms_output.put_line('var_result 0:'||var_result);
       --  dbms_output.put_line('var_tmp 0:'||var_tmp||'  ');
       --  dbms_output.put_line('var_element 0:'||var_element||'  ');

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

     else 
       var_tmp:='';
     end if;
    -- dbms_output.put_line('     ');
     
  end loop;
  return var_result;
end FN_SPLIT_STR_2;

-- 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('2008-10-21','-')) 
  ****************************************************/ 
  return t_ret_table is 
  var_out     t_ret_table; 
  var_tmp     varchar2(4000); 
  var_element varchar2(4000);

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;

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