Oracle存储过程案例集合

CREATE OR REPLACE PROCEDURE pro_testcom (p_string IN VARCHAR2, replace1 IN VARCHAR2, replace2 IN VARCHAR2)
IS
   p_start NUMBER := 1;-- 从哪个位置开始截取
   p_subLength NUMBER := 1;-- 需要截取多长
   p_string_length NUMBER := length(p_string);-- 获取需要截取的字符串的长度
   p_new_string VARCHAR2(2014) := ‘‘;--存储拼接新的字符串
BEGIN
   WHILE(p_start < p_string_length + 1) LOOP
     p_subLength := INSTR(p_string, replace1, p_start);
     IF p_subLength = 0 THEN
       p_subLength := p_string_length + 1;
     END IF ;
     
     IF p_new_string IS NULL THEN
       p_new_string := SUBSTR(p_string , p_start , p_subLength - p_start);
     ELSE
       p_new_string := p_new_string||replace2||SUBSTR(p_string , p_start , p_subLength - p_start);
     END IF;
     p_start := p_subLength + 1;
   END LOOP;
   
   -- 打印结果
   DBMS_OUTPUT.PUT_LINE(‘替换之后的字符串为:‘||p_new_string);
END pro_testcom;

-- 打开日志输出
set serveroutput on;

exec pro_testcom(‘555.555.555.555‘ , ‘.‘ ,‘-‘);

替换之后的字符串为:555-555-555-555
 
PL/SQL procedure successfully completed