版权声明：如若转载或他用，望告知 https://blog.csdn.net/qwerdfcv/article/details/80737750
我们都知道，Oracle里面，小数点前面的0，通常查询出来就是没有，这样看起来就会觉得奇怪，所以，这里给大家提供一个处理思路。这个方法，就是将小数点前的0补全，然后返回小数的字符串。
/*==========================================================
数字转化为char
add by zuhui.yang
==========================================================*/
FUNCTION get_number_char(p_number IN NUMBER, p_decimal_place IN NUMBER DEFAULT NULL)
RETURN VARCHAR2 IS
lv_number_char VARCHAR2(60);
ln_number NUMBER;
lv_place VARCHAR2(30) := 'fm9999990.';
BEGIN
--保留小数位数判断，默认四位有效数字
IF p_decimal_place IS NOT NULL AND p_decimal_place > 0 THEN
FOR i IN 1 .. p_decimal_place LOOP
lv_place := lv_place || '0';
END LOOP;
ELSE
lv_place := lv_place || '9999';
END IF;
IF p_number > 0 THEN
lv_number_char := to_char(p_number, lv_place);
lv_number_char := rtrim(lv_number_char, '.');
ELSE
SELECT to_char(p_number, lv_place) INTO lv_number_char FROM dual WHERE 1 = 1;
END IF;
ln_number := to_number(lv_number_char);
IF ln_number = 0 THEN
lv_number_char := '0';
END IF;
RETURN lv_number_char;
EXCEPTION
WHEN OTHERS THEN
RETURN null;
END get_number_char;