注册 登录  
 加关注
   显示下一条  |  关闭
温馨提示!由于新浪微博认证机制调整,您的新浪微博帐号绑定已过期,请重新绑定!立即重新绑定新浪微博》  |  关闭

伯纳乌の夢

可以挽回么?我们按“ Ctrl+Z”撤销掉吧。对不起啦~~

 
 
 

日志

 
 
 
 

get_address oracle  

2008-10-29 21:01:54|  分类: Oracle/SQLServer |  标签: |举报 |字号 订阅

  下载LOFTER 我的照片书  |
FUNCTION get_address(addr_list IN OUT VARCHAR2 )RETURN varchar2 IS
  addr VARCHAR2(256);
    i    PLS_INTEGER;
    ------------------------------
      FUNCTION lookup_unquoted_char(str  IN VARCHAR2, chrs IN VARCHAR2) RETURN PLS_INTEGER AS
          c            VARCHAR2(5);
          i            PLS_INTEGER;
          len          PLS_INTEGER;
          inside_quote BOOLEAN;
        BEGIN
             inside_quote := FALSE;
             i := 1;
             len := LENGTH(str);
             WHILE (i <= len) LOOP
              c := SUBSTR(str, i, 1);
          IF (inside_quote) THEN
          IF (c = '"') THEN
            inside_quote := FALSE;
          ELSIF (c = '\') THEN
            i := i + 1; -- Skip the quote character
          END IF;
          GOTO next_char;
        END IF;
        IF (c = '"') THEN
          inside_quote := TRUE;
          GOTO next_char;
        END IF;
        IF (INSTR(chrs, c) >= 1) THEN
           RETURN i;
        END IF;
        <<next_char>>
        i := i + 1;
             END LOOP;
             RETURN 0;
          END;
       -----------------------------------------
  BEGIN
    addr_list := LTRIM(addr_list);
    i := lookup_unquoted_char(addr_list, ',;');
    IF (i >= 1) THEN
      addr      := SUBSTR(addr_list, 1, i - 1);
      addr_list := SUBSTR(addr_list, i + 1);
    ELSE
      addr := addr_list;
      addr_list := '';
    END IF;
    i := lookup_unquoted_char(addr, '<');
    IF (i >= 1) THEN
      addr := SUBSTR(addr, i + 1);
      i := INSTR(addr, '>');
      IF (i >= 1) THEN
 addr := SUBSTR(addr, 1, i - 1);
      END IF;
    END IF;
    RETURN addr;
END get_address;
  评论这张
 
阅读(99)| 评论(0)
推荐 转载

历史上的今天

评论

<#--最新日志,群博日志--> <#--推荐日志--> <#--引用记录--> <#--博主推荐--> <#--随机阅读--> <#--首页推荐--> <#--历史上的今天--> <#--被推荐日志--> <#--上一篇,下一篇--> <#-- 热度 --> <#-- 网易新闻广告 --> <#--右边模块结构--> <#--评论模块结构--> <#--引用模块结构--> <#--博主发起的投票-->
 
 
 
 
 
 
 
 
 
 
 
 
 
 

页脚

网易公司版权所有 ©1997-2017