稅別:內含,外加 計算

在開發進貨流程當中,就會遇到廠商稅別的這問題!
內含稅,外加稅,免稅,零稅
在網路上g了好久,總算找到一個計算公式;真是的,稅計算-國稅局都不會用簡單一點嗎? 讓google能輕易g到啊
不然要人家開發的,還要先去找會計師問? 浪費時間(發牢騷嗯~)

底下為內含稅,外加稅的計算公式:
價內稅：稅款=含稅價格*稅率
價外稅：稅款=（含稅價格/（1+稅率））*稅率=不含稅價格*稅率
因為增值稅是價外稅，所以應繳增值稅＝含稅價格/（1+稅率））*稅率=不含稅價格*稅率

至於免稅,零稅的話;就不用再處理了
-----
另外底下一些片段,都是各處網站搜集到的;留下來自己要參考用的

Option Compare Database

Private Sub Form_AfterUpdate()
Call CountTax
End Sub

Public Function CountTax()
Select Case Application.Forms("frm進貨作業")![稅別]
Case "應稅"
Application.Forms("frm進貨作業")![未稅價] = Val(Application.Forms("frm進貨作業").Controls("Child12").Form.合計 & "")
Application.Forms("frm進貨作業")![稅額] = Val(Application.Forms("frm進貨作業")![未稅價]) * 0.05
Application.Forms("frm進貨作業")![含稅總價] = Val(Application.Forms("frm進貨作業")![未稅價]) * 1.05

Case "免稅"
Application.Forms("frm進貨作業")![未稅價] = Val(Application.Forms("frm進貨作業").Controls("Child12").Form.合計 & "")
Application.Forms("frm進貨作業")![稅額] = 0
Application.Forms("frm進貨作業")![含稅總價] = Application.Forms("frm進貨作業")![未稅價]

End Select
End Function

AR系統中每一筆應收帳款有明細金額與總金額
其中每一項明細金額與總額都有三個欄位﹕未稅金額﹑稅額﹑含稅金額

依據稅別的性質(內含稅 or 外加稅)﹐AR總額的計算邏輯有不同
1.內含稅﹕則加總各項明細含稅金額計算總含稅金額﹐再反除稅率計算總未稅金額﹔
2.外加稅﹕則加總各項明細未稅金額﹐再乘以稅率計算總稅額及含稅金額



預交日： 某種訂單的預計交貨日期，如果超過了預計交貨日期，系統會自動進行應交未交貨品的報警訊息。
品號、品名、規格：是指貨品的具體描述。
庫位：指存放某種貨品的地方，可以按倉庫設置，也可以按照明細格子進行設置，以便貨品的存放。
單價： 貨品的採購或銷售單價。
數量： 某種業務單據所涉及的貨品的數量。
金額： 單價×數量。
未稅金額：不含稅的金額。
稅金：金額-未稅金額。