create or replace function FN_PersonalIncomeTax(p_IncomeValue number)
                        RETURN number
 /*
***************************************************************************************
  过程名称: 计算个人所得税
    过程ID:
      分类：公用
  入口参数:
  出口参数:
            IncomeValue number(18,2) =应税收入
     
   返回值:  应交税额

  关联资源:
    调用方:
  功能描述:
  作者：
  日期
****************************************************************************************
*/
as
    --局部变量
   v_Tax                number(36,2); --应纳个人所得税税额
   v_ChargeAbleTax      number(36,2);--应纳税所得额－扣除标准
   v_Taxrate            number(36,2);--税率
   v_TaxBalance         number(36,2);--速算扣除数

begin

/*
应纳个人所得税税额=（应纳税所得额－扣除标准）*适用税率　-　速算扣除数

扣除标准2000元/月（2008年3月1日起调高为2000元）

个人所得税计算公式
1不超过500元的部分，             税率5%，      速算扣除数为0；
2超过500元至2000元的部分，       税率10%，     速算扣除数为25
3超过2000元至5000元的部分，      税率15 %，    速算扣除数为125
4超过5000元至20000元的部分，     税率20 %，    速算扣除数为375
5超过20000元至40000元的部分，    税率25%，     速算扣除数为1375
6超过40000元至60000元的部分，    税率30%，     速算扣除数为3375
7超过60000元至80000元的部分，    税率35%，     速算扣除数为6375
8超过80000元至100000元的部分，   税率40%，     速算扣除数为10375
9超过100000元的部分，            税率45%，     速算扣除数为15375
*/
   v_tax:=0;
   v_ChargeAbleTax :=p_IncomeValue-2000; --扣除标准2000元
 
  if v_ChargeAbleTax< 0  then
     v_Taxrate :=0;v_TaxBalance:=0;
  end if;  
  if v_ChargeAbleTax>0  and v_ChargeAbleTax<=500 then
     v_Taxrate :=0.05;v_TaxBalance:=0;
  end if;
  if v_ChargeAbleTax>500  and v_ChargeAbleTax<=2000 then
    v_Taxrate :=0.1;v_TaxBalance:=25;
  end if;
  if v_ChargeAbleTax>2000  and v_ChargeAbleTax<=5000  then
     v_Taxrate :=0.15;v_TaxBalance:=125;
  end if;
  if v_ChargeAbleTax>5000  and v_ChargeAbleTax<=20000  then
     v_Taxrate :=0.2;v_TaxBalance:=375;
  end if;
  if v_ChargeAbleTax>20000  and v_ChargeAbleTax<=40000  then
     v_Taxrate :=0.25;v_TaxBalance:=1375;
  end if;
  if v_ChargeAbleTax>40000  and v_ChargeAbleTax<=60000  then
     v_Taxrate :=0.3;v_TaxBalance:=3375;
  end if;
  if v_ChargeAbleTax>60000  and v_ChargeAbleTax<=80000  then
     v_Taxrate :=0.35;v_TaxBalance:=6375;
  end if;
  if v_ChargeAbleTax>80000  and v_ChargeAbleTax<=100000  then
     v_Taxrate :=0.4;v_TaxBalance:=10375;
  end if;
  if v_ChargeAbleTax>100000 then
     v_Taxrate :=0.45;v_TaxBalance:=15375;
  end if;
 

   v_tax:=v_ChargeAbleTax*v_Taxrate-v_TaxBalance;
   
   return v_tax;

EXCEPTION
    WHEN OTHERS THEN
          RETURN v_tax; --SQL 错误
end;
/

本文转自tiasys博客园博客，原文链接：http://www.cnblogs.com/tiasys/archive/2009/06/03/1495096.html，如需转载请自行联系原作者