oracle 滞纳金的计算-阿里云开发者社区

开发者社区> 数据库> 正文
登录阅读全文

oracle 滞纳金的计算

简介:

create or replace function GET_ZNJ(
JFJZRQ in date,
YJE in number,
ZNJBL in number,
ZT in varchar2,
SJJFRQ in date,
MIAN_ZNJ in varchar2,
ZNJ_JMCS in number
) return NUMBER is
V_ZNJ NUMBER(14,2);
V_DATE date;
V_DAYS number;
begin
  V_ZNJ := 0;


  IF ZT <= '4' THEN
     V_DATE := SYSDATE;
  END IF;
  IF ZT >= '5' THEN
     V_DATE := SJJFRQ;
  END IF;

  V_DAYS := trunc(V_DATE) - trunc(JFJZRQ);
  IF MIAN_ZNJ = '1' THEN --不予减免1
  BEGIN
     V_ZNJ := CASE WHEN V_DAYS <= 0 THEN 0
                ELSE NVL(ROUND(V_DAYS * YJE * ZNJBL,2),0)
            END;
  END;
  ELSIF MIAN_ZNJ = '0' THEN --全部减免0
  BEGIN
     V_ZNJ := 0;
  END;
  ELSIF MIAN_ZNJ = '2' THEN  --日期减免2
  BEGIN
     V_ZNJ := CASE WHEN V_DAYS - ZNJ_JMCS <= 0 THEN 0
                ELSE NVL(ROUND((V_DAYS - ZNJ_JMCS) * YJE * ZNJBL,2),0)
            END;
  END;
  ELSIF MIAN_ZNJ = '3' THEN --比例减免3
  BEGIN
     V_ZNJ := CASE WHEN V_DAYS <= 0 THEN 0
                ELSE NVL(ROUND(ROUND(V_DAYS *  YJE * ZNJBL,2) * (1 - ZNJ_JMCS),2),0)
            END;
  END;
  ELSIF MIAN_ZNJ = '4' THEN --定额减免4
  BEGIN
     V_ZNJ := CASE WHEN V_DAYS <= 0 THEN 0
                ELSE NVL(ROUND(V_DAYS * YJE * ZNJBL,2),0) - ZNJ_JMCS
            END;
     IF V_ZNJ < 0 THEN
        V_ZNJ := 0;
     END IF;
  END;
  ELSE   --不予减免
  BEGIN
     V_ZNJ := CASE WHEN V_DAYS <= 0 THEN 0
                ELSE NVL(ROUND(V_DAYS * YJE * ZNJBL,2),0)
              END;
  END;
  END IF;
  -- 滞纳金大于应缴金额时,滞纳金=应缴金额
  IF V_ZNJ > YJE THEN
     V_ZNJ := YJE;
  END IF;
  return V_ZNJ;
end GET_ZNJ;

本文转自杨海龙的博客博客51CTO博客,原文链接http://blog.51cto.com/7218743/1546473如需转载请自行联系原作者


IT达仁

版权声明:本文内容由阿里云实名注册用户自发贡献,版权归原作者所有,阿里云开发者社区不拥有其著作权,亦不承担相应法律责任。具体规则请查看《阿里云开发者社区用户服务协议》和《阿里云开发者社区知识产权保护指引》。如果您发现本社区中有涉嫌抄袭的内容,填写侵权投诉表单进行举报,一经查实,本社区将立刻删除涉嫌侵权内容。

分享:
数据库
使用钉钉扫一扫加入圈子
+ 订阅

分享数据库前沿,解构实战干货,推动数据库技术变革

其他文章
最新文章
相关文章