Oracle10進制轉換2進制

寫了個Oracle轉換函數，發現當數據為負數的時候，無法轉換，因為業務前端入庫的數據是32位，當JAVA進行有符號轉換為INT類型的時候

寫了個Oracle轉換函數，發現當數據為負數的時候，無法轉換，，因為業務前端入庫的數據是32位，當JAVA進行有符號轉換為INT類型的時候，會產生負數，而我要再次轉換為二進制進行位的判斷，網上找了好多，都不能做有符號數字的轉換，因此按照負數的二進制表示法重新寫了個函數：

負數的二進制方法的表示方法：例如 －5
第一步：首先要把5變成101的二進制形式
第二步：再者就是安位取反，（形成前面全是1）010
第三步：在最后加1 形成：11111111 11111111 11111111 11111011

CREATE 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;

聲明：本網頁內容旨在傳播知識，若有侵權等問題請及時與本網聯系，我們將在第一時間刪除處理。TEL:177 7030 7066 E-MAIL:11247931@qq.com