create or replace
FUNCTION hextodec (hexnum in char) RETURN number IS
x number;
digits number;
result number := 0;
current_digit char(1);
current_digit_dec number;
BEGIN
digits := length(hexnum);
FOR X IN 1..DIGITS LOOP
current_digit := SUBSTR(UPPER(hexnum), x, 1);
if current_digit in ('A','B','C','D','E','F') then
current_digit_dec := ascii(current_digit) - ascii('A') + 10;
else
current_digit_dec := to_number(current_digit);
end if;
result := (result * 16) + current_digit_dec;
end loop;
return result;
END;
Oracle Hexadecimal to Decimal Function
最新推荐文章于 2021-05-19 18:56:18 发布