根据字符分割字符串

CREATE OR REPLACE PROCEDURE GET_SPLIT (

V_STRING1   IN VARCHAR2,  --输入的字符串
V_START IN NUMBER,       --开始截取的位置
V_LENGTH IN NUMBER,      --截取的字符个数
V_SPLIT  IN VARCHAR2     --分隔符号

)

 AS

V_STRING2  VARCHAR2(50);   --保留截取后的 字符串

BEGIN

  FOR I IN V_START..LENGTH(V_STRING1)   LOOP      --从字符串的第一个位置  到 字符串的最后一个位置
 V_STRING2:=SUBSTR(V_STRING1,I,V_LENGTH);         -- 遍历字符串
   IF    INSTR(V_STRING2, V_SPLIT) =0  AND LENGTH(V_STRING2) > 2  THEN  --如果字符串中  ‘.‘ 的位置是 空即 没有 . 字符   ;字符串 CHAR2的长度> 2
         DBMS_OUTPUT.PUT_LINE(V_STRING2);    --输出CHAR2
    END IF;
  END LOOP;
 
 END GET_SPLIT;

根据字符分割字符串

原文：http://www.cnblogs.com/iyoume2008/p/4719280.html