匿名通过本文主要向大家介绍了多次拆分，字符串，存储过程等相关知识,希望本文的分享对您有所帮助
自己写的特殊拆分函数如下：
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
*/
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;
begin
var_tmp := var_str; var_instr_first :=0; var_instr_second :=0; var_result :=''; var_length:=0;
/* 替换掉传过来的特殊字符
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||' ');
/* 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|| ' ';
var_tmp := substr(var_tmp,var_instr_first+1, length(var_tmp));
-- dbms_output.put_line('var_result kg:'||var_result);
-- dbms_output.put_line('var_tmp kg:'||var_tmp||' ');
-- dbms_output.put_line('var_element kg:'||var_element||' ');
/* 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 || ',' ;
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这类 **/