Tento článek se týká aplikace Microsoft Dynamics NAV pro národní prostředí v italštině.
Příznaky
Předpokládejme, že vyberete hodnotu DPH jako přenesení daňové povinnosti v poli Typ výpočtu DPH ve skupině zaúčtování daně z přidané hodnoty (DPH) v italské verzi aplikace Microsoft Dynamics NAV. Zaúčtujete nákupní fakturu pro dodavatele v Evropské unii (EU) pomocí skupiny účtování. V této situaci, pokud je transakce přenesení daňové povinnosti částečně neodpočitatelná z DPH, transakce, která je zaúčtována v tabulce obecných položek, je nesprávná.
K tomuto problému dochází u následujících produktů:
- Italská verze aplikace Microsoft Dynamics NAV 2009 R2
- Italská verze aplikace Microsoft Dynamics NAV 2009 Service Pack 1 (SP1)
- Italská verze Microsoft Dynamics NAV 5.0 Service Pack 1 (SP1)
Řešení
Informace o opravě hotfix
Od Microsoftu je teď k dispozici podporovaná oprava hotfix. Účelem je však pouze vyřešení problému, který je popsán v tomto článku. Aplikujte ho jenom na systémy, ve kterých dochází k tomuto konkrétnímu problému. Tato oprava hotfix může projít dalším testováním. Pokud se vás tedy tento problém vážně netýká, doporučujeme počkat na další aktualizaci Service Pack pro Microsoft Dynamics NAV nebo další verzi Microsoft Dynamics NAV, která tuto opravu hotfix obsahuje.
Poznámka: Ve zvláštních případech mohou být poplatky, které jsou obvykle účtovány za telefonická hovory podpory, zrušeny, pokud pracovník technické podpory pro řešení Microsoft Dynamics a související produkty zjistí, že konkrétní aktualizace vyřeší váš problém. Další dotazy a problémy týkající se podpory, které se netýkají této konkrétní opravy, podléhají běžným sazbám za podporu.
Informace o instalaci
Společnost Microsoft poskytuje příklady programování pouze pro ilustraci, bez záruky, ať už vyjádřené nebo předpokládané. To zahrnuje, ale není omezeno na, předpokládané záruky prodejnosti nebo vhodnosti pro konkrétní účel. Tento článek předpokládá, že jste obeznámeni s programovacím jazykem, který je předváděn, a s nástroji, které se používají k vytváření a ladění procedur. Pracovníci technické podpory Microsoftu vám můžou pomoct vysvětlit funkčnost určitého postupu, ale nebudou tyto příklady upravovat za účelem poskytování dalších funkcí nebo konstrukce procedur, které by splňovaly vaše konkrétní požadavky.
Poznámka: Před instalací této opravy hotfix ověřte, zda jsou všichni uživatelé klienta Microsoft Navision odhlášeni ze systému. To zahrnuje i uživatele klienta Microsoft Navision Application Services (NAS). Měli byste být jediným klientským uživatelem, který je přihlášen při implementaci této opravy hotfix.
K implementaci této opravy hotfix musíte mít vývojářskou licenci.
Doporučujeme, aby uživatelské účtu v okně Windows Přihlášení nebo v okně Přihlášení k databázi bylo přiřazeno ID role "SUPER". Pokud nelze uživatelskému účtu přiřadit ID role "SUPER", je nutné ověřit, zda má uživatelský účet následující oprávnění:
- Oprávnění k úpravám objektu, který budete měnit.
- Oprávnění ke spuštění pro objekt s ID systémového objektu 5210 a pro objekt s ID systémového objektu 9015.
Poznámka: K úložištím dat nemusíte mít práva, ledaže byste museli provádět opravu dat.
Změny kódu
Poznámka: Před použitím oprav v produkčních počítačích vždy otestujte opravy kódu v kontrolovaném prostředí.
Tento problém vyřešíte tak, že následujícím způsobem změníte kód ve funkci VložitDPH v jednotce kódu VložitDPH (12):
Existující kód 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";
...
Náhradní kód 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";
...
Existující kód 2
...
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;
...
Náhradní kód 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;
...
Existující kód 3
...
InsertGLEntry(TRUE);
END;
END;
END;
VATPostingSetup."VAT Calculation Type"::"Sales Tax":
...
Náhradní kód 3
InsertGLEntry(TRUE);
END;
// Add the following line.
END;
END;
END;
VATPostingSetup."VAT Calculation Type"::"Sales Tax":
...
Požadavky
Chcete-li nainstalovat tuto opravu hotfix, musíte mít nainstalovaný některý z následujících produktů:
- Italská verze aplikace Microsoft Dynamics NAV 2009 R2
- Italská verze aplikace Microsoft Dynamics NAV 2009 Service Pack 1 (SP1)
- Italská verze Microsoft Dynamics NAV 5.0 Service Pack 1 (SP1)
Informace o odebrání
Tuto opravu hotfix nelze odebrat.
Stav
Společnost Microsoft potvrdila, že se jedná o problém produktů Microsoft, které jsou uvedeny v sekci Platí pro.
Poznámka: Toto je článek určený k rychlému zveřejnění, který byl vytvořen přímo v rámci organizace podpory společnosti Microsoft. Zde uvedené informace jsou poskytovány tak, jak jsou, jako reakce na nově vznikající potíže. Vzhledem k rychlosti, s jakou byl článek zpřístupněn, mohou příslušné materiály obsahovat typografické chyby a mohou být kdykoli bez předchozího upozornění revidovány. Další okolnosti viz Podmínky použití .