本文適用於義大利語 (Microsoft Dynamics NAV,) 語言地點。
症狀
假設您在義大利版 Microsoft Dynamics NAV 的增值稅 (VAT) 帳單群組的增值稅計算類型欄位中選擇了反向徵收增值稅值。 你可以透過發布群組來為歐盟 (歐盟) 供應商開立購買發票。 在這種情況下,如果反向徵收的增值稅交易部分是增值稅不可扣除的,則一般登記表中所記錄的交易是錯誤的。
此問題發生於以下產品:
- Microsoft Dynamics NAV 2009 R2 的義大利版本
- Microsoft Dynamics NAV 2009 服務包 1 (SP1) 的義大利版本
- 義大利版的 Microsoft Dynamics NAV 5.0 服務包 1 (SP1)
解決方式
Hotfix 資訊
Microsoft 現在已經支援熱修補程式。 然而,這僅是為了修正本文所描述的問題。 只應用在遇到這個特定問題的系統上。 此熱修補可能會進行額外測試。 因此,如果你沒有受到這個問題嚴重影響,我們建議你等待下一個包含此熱修補的 Microsoft Dynamics NAV 服務包或下一個 Microsoft Dynamics NAV 版本。
注意:在特殊情況下,若 Microsoft Dynamics 及相關產品的技術支援專業人員判斷特定更新能解決您的問題,通常因支援電話而產生的費用可能會被取消。 一般來說,如果有所描述之特定更新無法解決的其他支援問題,才會收取支援費用。
安裝資訊
Microsoft 僅提供圖例的程式設計範例,不含明示或暗示的擔保。 這包括 (但不限於) 適用于特定目的之可操作性或適用性的暗示擔保。 本文假設您熟悉正在示範的程式設計語言,以及用來建立和進行程式偵錯工具的工具。 Microsoft 技術支援工程師可以協助說明特定程序的功能,但不會修改這些範例以提供附加功能或建構程序來滿足您的特定需求。
注意:安裝此熱修補程式前,請確認所有 Microsoft Navision 用戶端使用者都已登出系統。 這包括Microsoft Navision 應用服務 (NAS) 用戶端使用者。 當你實施這個熱修補時,應該只有你一個登入的客戶端使用者。
要實作這個熱修補,你必須擁有開發者授權。
我們建議在 Windows 登入視窗或資料庫登入視窗中,將使用者帳號分配「SUPER」角色 ID。 若使用者帳號無法被指派「SUPER」角色 ID,您必須驗證該帳號擁有以下權限:
- 你要更改的物件的修改權限。
- 系統物件 ID 5210 的執行權限,以及系統物件 ID 9015 的執行權限。
注意:除非你必須進行資料修復,否則你不必擁有資料儲存的權利。
法規變更
注意:在將修正程式套用到生產電腦之前,務必在受控環境中測試修正。
為了解決此問題,請將 InsertVAT 碼單元 (12) 中的 InsertVAT 函式中程式碼更改如下:
現行法規1
...
VATEntry."Entry No." := NextVATEntryNo;
VATEntry.Type := VATEntry.Type::Sale;
VATEntry."Reverse Sales VAT" := TRUE;
// Delete the following lines.
VATEntry.Base := -(VATEntry.Base + VATEntry."Nondeductible Base");
VATEntry."Nondeductible Base" := 0;
VATEntry.Amount := -(VATEntry.Amount + VATEntry."Nondeductible Amount");
VATEntry."Nondeductible Amount" := 0;
VATEntry."Deductible %" := 100;
VATEntry."Additional-Currency Base" :=
-(VATEntry."Additional-Currency Base" + VATEntry."Add. Curr. Nondeductible Base");
VATEntry."Add. Curr. Nondeductible Base" := 0;
VATEntry."Additional-Currency Amount" :=
-(VATEntry."Additional-Currency Amount" + VATEntry."Add. Curr. Nondeductible Amt.");
VATEntry."Add. Curr. Nondeductible Amt." := 0;
// End of the lines.
IF GenJnlLine."Reverse Sales VAT No." <> '' THEN BEGIN
VATEntry."Document No." := GenJnlLine."Reverse Sales VAT No.";
VATEntry."No. Series" := GenJnlLine."Reverse Sales VAT No. Series";
...
替換代碼1
...
VATEntry."Entry No." := NextVATEntryNo;
VATEntry.Type := VATEntry.Type::Sale;
VATEntry."Reverse Sales VAT" := TRUE;
// Add the following lines.
VATEntry.Base := -VATEntry.Base;
VATEntry."Nondeductible Base" := -VATEntry."Nondeductible Base";
VATEntry.Amount := -VATEntry.Amount;
VATEntry."Nondeductible Amount" := -VATEntry."Nondeductible Amount";
VATEntry."Additional-Currency Base" := -VATEntry."Additional-Currency Base";
VATEntry."Add. Curr. Nondeductible Base" := -VATEntry."Add. Curr. Nondeductible Base";
VATEntry."Additional-Currency Amount" := -VATEntry."Additional-Currency Amount";
VATEntry."Add. Curr. Nondeductible Amt." := -VATEntry."Add. Curr. Nondeductible Amt.";
// End of the lines.
IF GenJnlLine."Reverse Sales VAT No." <> '' THEN BEGIN
VATEntry."Document No." := GenJnlLine."Reverse Sales VAT No.";
VATEntry."No. Series" := GenJnlLine."Reverse Sales VAT No. Series";
...
現有的第二號法規
...
VATPostingSetup."Purchase VAT Account",
VATAmount,SrcCurrVATAmount,TRUE,TRUE);
InsertGLEntry(TRUE);
// Delete the following lines.
END;
VATPostingSetup.TESTFIELD("Reverse Chrg. VAT Acc.");
InitGLEntry(
VATPostingSetup."Reverse Chrg. VAT Acc.",
-GLEntryVATAmount,-SrcCurrGLEntryVATAmt,TRUE,TRUE);
InsertGLEntry(TRUE);
IF "Deductible %" <> 100 THEN BEGIN
IF VATPostingSetup."Nondeductible VAT Account" = '' THEN BEGIN
IF "Account Type" <> GenJnlLine."Account Type"::"Fixed Asset" THEN
InitGLEntry(
"Account No.",
NondeducVATAmount,SrcCurrNondeducVATAmount,TRUE,TRUE)
ELSE
InitGLEntry(
FAUndGlAccNo,
NondeducVATAmount,SrcCurrNondeducVATAmount,TRUE,TRUE);
END ELSE BEGIN
VATPostingSetup.TESTFIELD("Nondeductible VAT Account");
InitGLEntry(
VATPostingSetup."Nondeductible VAT Account",
NondeducVATAmount,SrcCurrNondeducVATAmount,TRUE,TRUE);
END;
// End of the lines.
InsertGLEntry(TRUE);
END;
...
替換代碼2
...
VATPostingSetup."Purchase VAT Account",
VATAmount,SrcCurrVATAmount,TRUE,TRUE);
InsertGLEntry(TRUE);
// Add the following lines.
VATPostingSetup.TESTFIELD("Reverse Chrg. VAT Acc.");
InitGLEntry(
VATPostingSetup."Reverse Chrg. VAT Acc.",
-VATAmount,-SrcCurrVATAmount,TRUE,TRUE);
InsertGLEntry(TRUE);
END;
IF "Deductible %" <> 100 THEN BEGIN
IF VATPostingSetup."Nondeductible VAT Account" = '' THEN BEGIN
IF "Account Type" <> GenJnlLine."Account Type"::"Fixed Asset" THEN BEGIN // IT0001
InitGLEntry(
"Account No.",
NondeducVATAmount,SrcCurrNondeducVATAmount,TRUE,TRUE);
InsertGLEntry(TRUE);
InitGLEntry(
"Account No.",
-NondeducVATAmount,-SrcCurrNondeducVATAmount,TRUE,TRUE);
InsertGLEntry(TRUE);
END ELSE BEGIN
InitGLEntry(
FAUndGlAccNo,
NondeducVATAmount,SrcCurrNondeducVATAmount,TRUE,TRUE);
InsertGLEntry(TRUE);
InitGLEntry(
FAUndGlAccNo,
-NondeducVATAmount,-SrcCurrNondeducVATAmount,TRUE,TRUE);
InsertGLEntry(TRUE);
END;
END ELSE BEGIN
VATPostingSetup.TESTFIELD("Nondeductible VAT Account");
InitGLEntry(
VATPostingSetup."Nondeductible VAT Account",
NondeducVATAmount,SrcCurrNondeducVATAmount,TRUE,TRUE);
InsertGLEntry(TRUE);
InitGLEntry(
VATPostingSetup."Nondeductible VAT Account",
-NondeducVATAmount,-SrcCurrNondeducVATAmount,TRUE,TRUE);
// End of the lines.
InsertGLEntry(TRUE);
END;
...
現行法規3
...
InsertGLEntry(TRUE);
END;
END;
END;
VATPostingSetup."VAT Calculation Type"::"Sales Tax":
...
替代代碼3
InsertGLEntry(TRUE);
END;
// Add the following line.
END;
END;
END;
VATPostingSetup."VAT Calculation Type"::"Sales Tax":
...
先決條件
您必須安裝以下其中一款產品才能套用此熱修補:
- Microsoft Dynamics NAV 2009 R2 的義大利版本
- Microsoft Dynamics NAV 2009 服務包 1 (SP1) 的義大利版本
- 義大利版的 Microsoft Dynamics NAV 5.0 服務包 1 (SP1)
移除資訊
你無法移除這個熱修正。
狀態
Microsoft 已確認這是「適用對象」一節中列出的 Microsoft 產品中的問題。
注意本文為 Microsoft 支援單位內部直接建立的「快速發佈」文章。 此處包含的資訊是以其現況提供,用於回應新產生的問題。 由於快速發佈,資料可能包含拼字錯誤,並可能會隨時修訂,不另行通知。 請參閱使用條款以瞭解其他相關考量。