oracle数据库二进制转十进制函数

最新推荐文章于 2021-06-03 23:55:14 发布

最新推荐文章于 2021-06-03 23:55:14 发布 · 338 阅读

文章标签：

#Oracle #SQL

oracle数据库专栏收录该内容

11 篇文章

订阅专栏

本文介绍了一个使用PL/SQL编写的二进制字符串转换为十进制数值的函数。该函数能够处理合法的二进制字符串，并返回其对应的十进制数值。若输入的字符串包含非二进制字符，则返回-1。


create or replace   
FUNCTION "BINTOTEN" (strbin in varchar2) return NUMBER     
IS   

    decvalue NUMBER(10);   
    binlen NUMBER(10);   
    indexa NUMBER(10);   
    currbit CHAR;   
BEGIN   

    binlen := LENGTH(strbin);   
    decvalue := 0;   
    indexa := 0;   
    WHILE indexa < binlen LOOP   
        indexa := indexa + 1;   
        currbit := SUBSTR(strbin, indexa, 1);   
        IF (currbit != '0' AND currbit != '1') THEN   
            decvalue := -1;   
        ELSE   
            decvalue := decvalue * 2;   
            IF(currbit = '1') THEN   
                decvalue := decvalue + POWER(2, 0);   
            END IF;   
        END IF;   
    END LOOP;   
    RETURN decvalue;   
END BINTOTEN;