我们都知道,Oracle里面,小数点前面的0,通常查询出来就是没有,这样看起来就会觉得奇怪。
正常情况下,我们可将小数用to_char(t.qty,'fm9999999990.000')查询字段就可满足,但这样有时也会存在问题。
所以,这里给大家提供一个新的处理思路。以Oracle程序包实现小数点处理,方法的思路就是将小数点前的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;