Oracle 10进制转换2进制

写了个Oracle转换函数，发现当数据为负数的时候，无法转换，因为业务前端入库的数据是32位，当JAVA进行有符号转换为INT类型的时候，会产生负数，而我要再次转换为二进制进行位的判断，网上找了好多，都不能做有符号数字的转换，因此按照负数的二进制表示法重新写了个函数：负数的二进制方法的表示方法：例如－5
第一步：首先要把5变成101的二进制形式
第二步：再者就是安位取反，（形成前面全是1）010
第三步：在最后加1 形成：11111111 11111111 11111111 11111011CREATE OR REPLACE FUNCTION NUMBER_2_BIT（V_NUM NUMBER） RETURN VARCHAR IS
V_RTN VARCHAR（2000）;
V_N1 NUMBER;
V_N2 NUMBER;
BEGIN
V_N1 := ABS（V_NUM）;
--如果为正数
IF SIGN（V_NUM） > 0 THEN
    LOOP
      V_N2 := MOD（V_N1, 2）;
      V_N1 := ABS（TRUNC（V_N1 / 2））;
      V_RTN := TO_CHAR（V_N2） || V_RTN;
      EXIT WHEN V_N1 = 0;
    END LOOP;

    --dbms_output.put_line（"正数结果"||V_RTN）;

    --补全32位高位0
    SELECT lpad（V_RTN,32,0）
    INTO   V_RTN
    FROM dual;

     --dbms_output.put_line（"正数补全结果"||V_RTN）;

ELSE
    --转换为二进制同时按位取反
    LOOP
      V_N2 := MOD（V_N1, 2）;
      IF V_N2 = 1 THEN
        V_N2 := 0;
      ELSIF V_N2 = 0 THEN
        V_N2 := 1;
      END IF;
      V_N1 := ABS（TRUNC（V_N1 / 2））;
      V_RTN := TO_CHAR（V_N2） || V_RTN;
      EXIT WHEN V_N1 = 0;
    END LOOP;

    --dbms_output.put_line（"负数结果"||V_RTN）;

    --补全32位高位1
    SELECT lpad（V_RTN,32,1）
    INTO   V_RTN
    FROM dual;

    --dbms_output.put_line（"负数补全1结果"||V_RTN）;

    --二进制转换为10机制，同时+1
    SELECT SUM（data1） + 1
    INTO V_N1
      FROM （SELECT substr（V_RTN, rownum, 1） * power（2, length（V_RTN） - rownum） data1
              FROM dual
            CONNECT BY rownum <= length（V_RTN））;

    -- dbms_output.put_line（"转换为十进制数结果"||V_RTN）;

    ----转换为二进制
    LOOP
      V_N2 := MOD（V_N1, 2）;
      V_N1 := ABS（TRUNC（V_N1 / 2））;
      V_RTN := TO_CHAR（V_N2） || V_RTN;
      EXIT WHEN V_N1 = 0;
    END LOOP;

    --dbms_output.put_line（"负数转换结果"||V_RTN）;

    --补全32位高位0
    SELECT lpad（V_RTN,32,0）
    INTO   V_RTN
    FROM dual;

    --dbms_output.put_line（"负数补全0结果"||V_RTN）;

END IF; RETURN V_RTN;
END;MySQL架构设计相关的方式方法和软件介绍Oracle联机日志出现错误ORA-16038 ORA-19809 ORA-00312 解决相关资讯 Oracle教程

Oracle中纯数字的varchar2类型和（07/29/2015 07:20:43）
Oracle教程：Oracle中查看DBLink密（07/29/2015 07:16:55）
[Oracle] SQL*Loader 详细使用教程（08/11/2013 21:30:36）

Oracle教程：Oracle中kill死锁进程（07/29/2015 07:18:28）
Oracle教程：ORA-25153 临时表空间（07/29/2015 07:13:37）
Oracle教程之管理安全和资源（04/08/2013 11:39:32）

本文评论查看全部评论（0）