Maison >base de données >tutoriel mysql >Une procédure stockée relativement complexe pour diviser des chaînes plusieurs fois
La fonction de partage spéciale que j'ai écrite est la suivante :
créer ou remplacer une fonction FN_SPLIT_STR_2(var_str dans varchar2)retourner varchar2
/*
Il y a une table t1 avec un champ appelé c3, qui stocke les informations de point de tous les magasins.
Maintenant, nous avons besoin d'une procédure stockée pour réduire de 3 fois les valeurs de coordonnées du champ c3 de tous les enregistrements et écrire le contenu du champ c
Par exemple, 220.25 257,220.25 269.75,229.25 269.75,229.25 257
Chaque virgule sépare les points de coordonnées, et chaque point de coordonnées utilise un espace pour distinguer la coordonnée x et la coordonnée y
Nom de la fonction de stockage : FN_SPLIT_STR_2
Objectif : Réduire les coordonnées bis_store v_coords3 trois fois et mettre à jour les coordonnées, telles que
auteur: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;
commencer
var_tmp := var_str; var_instr_first :=0; var_instr_second :=0; var_result :=''; var_length:=0;
/* Remplacer les caractères spéciaux passés
chr(9) Caractère de tabulation
chr(10) Entrer
chr(13) Saut de ligne
*/
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 S'il y a un espace en premier, comme 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 Si les espaces ont été interceptés, la virgule est devant, comme par exemple 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这类 **/
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)!