在业务系统中处理小数精度, 四舍五入,全舍弃,全进位的方法
类别: 数据库教程
在业务系统中,不同的客户对小数的处理有不同的方法
通过在设置保留的小数位数,以及小数位数以后的尾数的处理方法,可以灵活的满足客户要求
处理方法表
ID NUMBER(1) , --设置ID
AMOUNTDOT NUMBER(4,2) DEFAULT 0.01, --金额精确度 1: 精确到元 0.1:精确到角 0.01:精确到分ROUNDING NUMBER(1) , --舍入分界 -- 9: 全舍 0: 全入 4:四舍5入
建立ORACLE函数,传入设置ID,传入金额,返回处理过的金额
存储过程实现代码如下
create or replace function Get_Real_Number ( --根据处理方法ID,取得处理后的金额-计算的金额
ID IN NUMBER, -- 处理方法ID
n_Amount IN NUMBER)
-----------------------------------------------------------------------
-- 用 途 自定义数据精度处理。
-- 创建者 :Andrew
-----------------------------------------------------------------------
-- 修改记录列表:(按日期的先后顺序逆序排列)
-- 修改时间 修改人 实现的功能说明
-- 9 全舍 0 全入 4四舍5入
-----------------------------------------------------------------------
return NUMBER-- 返回的金额
IS
v_amountdot VARCHAR2(5); --小数位数字符
v_keep NUMBER ; --保留的小数位数
v_rounding NUMBER ; --舍入分界
v_Amount NUMBER:=0 ; --返回的金额
BEGIN
SELECT amountdot, nvl(rounding,0) INTO v_amountdot,v_rounding FROM 处理方法表
WHERE id = SALE_PLACE_ID;
v_keep := Length(v_amountdot) - instr(v_amountdot,\'.\') ; --要保留的小数位数
IF v_rounding = 9 THEN --处理全舍弃
v_Amount := trunc(n_Amount,v_keep);
END IF;
IF v_rounding = 4 THEN --处理四舍五入
v_Amount := round(n_Amount,v_keep);
END IF;
IF v_rounding = 0 THEN --处理全进位
v_Amount := trunc(n_Amount,v_keep); --小数为数刚好等于要求保留的数
IF v_Amount <> n_Amount THEN --如果截取后的数与原来的数字不同,进1
v_Amount := v_Amount + to_number(v_amountdot);
END IF;
RETURN v_Amount;
exception
when OTHERS then RETURN n_Amount;
END Get_Real_Number;
通过在设置保留的小数位数,以及小数位数以后的尾数的处理方法,可以灵活的满足客户要求
处理方法表
ID NUMBER(1) , --设置ID
AMOUNTDOT NUMBER(4,2) DEFAULT 0.01, --金额精确度 1: 精确到元 0.1:精确到角 0.01:精确到分ROUNDING NUMBER(1) , --舍入分界 -- 9: 全舍 0: 全入 4:四舍5入
建立ORACLE函数,传入设置ID,传入金额,返回处理过的金额
存储过程实现代码如下
create or replace function Get_Real_Number ( --根据处理方法ID,取得处理后的金额-计算的金额
ID IN NUMBER, -- 处理方法ID
n_Amount IN NUMBER)
-----------------------------------------------------------------------
-- 用 途 自定义数据精度处理。
-- 创建者 :Andrew
-----------------------------------------------------------------------
-- 修改记录列表:(按日期的先后顺序逆序排列)
-- 修改时间 修改人 实现的功能说明
-- 9 全舍 0 全入 4四舍5入
-----------------------------------------------------------------------
return NUMBER-- 返回的金额
IS
v_amountdot VARCHAR2(5); --小数位数字符
v_keep NUMBER ; --保留的小数位数
v_rounding NUMBER ; --舍入分界
v_Amount NUMBER:=0 ; --返回的金额
BEGIN
SELECT amountdot, nvl(rounding,0) INTO v_amountdot,v_rounding FROM 处理方法表
WHERE id = SALE_PLACE_ID;
v_keep := Length(v_amountdot) - instr(v_amountdot,\'.\') ; --要保留的小数位数
IF v_rounding = 9 THEN --处理全舍弃
v_Amount := trunc(n_Amount,v_keep);
END IF;
IF v_rounding = 4 THEN --处理四舍五入
v_Amount := round(n_Amount,v_keep);
END IF;
IF v_rounding = 0 THEN --处理全进位
v_Amount := trunc(n_Amount,v_keep); --小数为数刚好等于要求保留的数
IF v_Amount <> n_Amount THEN --如果截取后的数与原来的数字不同,进1
v_Amount := v_Amount + to_number(v_amountdot);
END IF;
RETURN v_Amount;
exception
when OTHERS then RETURN n_Amount;
END Get_Real_Number;
- 上一篇: 根据进程号获取该进程所在客户端的IP地址
- 下一篇: 如何将数据库中被锁表解锁
-= 资 源 教 程 =-
文 章 搜 索