Tento článek se týká aplikace Microsoft Dynamics NAV pro národní jazyk Maďarština (hu).
Příznaky
Předpokládá se použití opravy hotfix 2664466 v maďarské verzi aplikace Microsoft Dynamics NAV 2009 R2. Při výpočtu statistiky faktury zaúčtované faktury, částka daně z přidané hodnoty (DPH) je zaokrouhlena nesprávně.
Další informace o opravě hotfix 2664466 klepnutím na následující číslo článku databáze Microsoft Knowledge Base:
2664466 částku DPH je nesprávné při zaúčtování faktury v cizí měně v maďarské verzi Microsoft Dynamics NAV 5.0 Service Pack 1
Řešení
Informace o opravě hotfix
Podporovaná oprava hotfix je nyní k dispozici od společnosti Microsoft. Však je určena pouze k odstranění problému popsaného v tomto článku. Použijte ji pouze u systémů, ve kterých dochází k tomuto konkrétnímu problému. Tato oprava hotfix může být dále testována. Proto pokud jste závažně tento problém, doporučujeme počkat na další aktualizaci service pack produktu Microsoft Dynamics NAV 2009 nebo další verze produktu Microsoft Dynamics NAV, která obsahuje tuto opravu hotfix.
Poznámka: Ve zvláštních případech poplatky, které jsou třeba obvykle zaplatit za telefonní hovory mohou být stornovány, jestliže pracovník technické podpory společnosti Microsoft Dynamics a souvisejících produktů Určuje, že konkrétní aktualizace odstraní váš problém. Výdaje na technickou podporu použije dalších otázek a problémů, které nelze vyřešit konkrétní aktualizací.
Informace o instalaci
Společnost Microsoft poskytuje ukázky programování pouze pro ilustraci bez žádné záruky výslovně uvedené nebo odvozené. To zahrnuje, ale není omezen pouze na předpokládané záruky obchodovatelnosti nebo vhodnosti pro určitý účel. Tento článek předpokládá, že jste obeznámeni s programovacím jazykem, který je předmětem ukázky a s nástroji, které slouží k vytvoření a ladění skriptu. Pracovníci podpory společnosti Microsoft mohou vysvětlit funkce určitého postupu. Nemohou však následující příklady rozšířit o další funkce nebo konstrukce podle konkrétních požadavků.
Poznámka: Před instalací této opravy hotfix ověřte, že všichni uživatelé klienta Microsoft Dynamics NAV odhlášeni systému. To zahrnuje služby Microsoft Dynamics NAV Application Server (NAS). Je třeba klienta pouze uživatel přihlášený při implementaci opravy hotfix.
Chcete-li implementovat tuto opravu hotfix, musí mít licenci vývojáře.
Doporučujeme, aby uživatelský účet v okně přihlášení systému Windows nebo v okně přihlášení databáze přidělí "SUPER" ID role. Pokud uživatelský účet nelze přiřadit ID role "SUPER", musíte ověřit, že uživatelský účet má následující oprávnění:
-
Změnit oprávnění pro objekt, který budete měnit.
-
Oprávnění ke spuštění pro System Object ID 5210 objekt a System Object ID 9015
objektu.
Poznámka: Nemáte práva k úložištím dat. Pokud nebudete provádět opravu dat.
Změny kódu
Poznámka: Vždy otestujte opravy kódu v kontrolovaném prostředí před instalací opravy v provozních počítačích.
Chcete-li vyřešit tento problém, postupujte takto:
-
Změňte kód v poli v tabulce Prodejní řádek (37) takto:
Existující kód 1...
// Delete the following line.
CalcVATToReport(SalesHeader,"VAT Base Amount","Amount Including VAT" - "VAT Base Amount",
// End of the deleted line.
"VAT Base Amt. to Report (LCY)","VAT Amount to Report (LCY)");
...Změněný kód 1
...
// Add the following line.
CalcVATToReport(SalesHeader,"VAT Base Amount","Amount Including VAT",
// End of the added line.
"VAT Base Amt. to Report (LCY)","VAT Amount to Report (LCY)");
...Existující kód 2
...
// Delete the following line.
CalcVATToReport(SalesHeader,"VAT Base Amount","Amount Including VAT" - "VAT Base Amount",
// End of the deleted line.
"VAT Base Amt. to Report (LCY)","VAT Amount to Report (LCY)");
...Náhradní kód 2
...
// Add the following line.
CalcVATToReport(SalesHeader,"VAT Base Amount","Amount Including VAT",
// End of the added line.
"VAT Base Amt. to Report (LCY)","VAT Amount to Report (LCY)");
... -
Změňte kód v UpdateVATAmounts funkce v tabulce Prodejní řádek (37) takto:
Existující kód...
// Delete the following line.
CalcVATToReport(SalesHeader,"VAT Base Amount","Amount Including VAT" - "VAT Base Amount",
// End of the deleted line.
"VAT Base Amt. to Report (LCY)","VAT Amount to Report (LCY)");
...Změněný kód
...
// Add the following line.
CalcVATToReport(SalesHeader,"VAT Base Amount","Amount Including VAT",
// End of the added line.
"VAT Base Amt. to Report (LCY)","VAT Amount to Report (LCY)");
... -
Změňte kód UpdateVATOnLines funkce v tabulce Prodejní řádek (37) takto:
Existující kód..."VAT Base Amount" := NewVATBaseAmount;
// Delete the following line.
CalcVATToReport(SalesHeader,"VAT Base Amount","Amount Including VAT" - "VAT Base Amount",
// End of the deleted line.
"VAT Base Amt. to Report (LCY)","VAT Amount to Report (LCY)");
...Změněný kód
..."VAT Base Amount" := NewVATBaseAmount;
// Add the following line.
CalcVATToReport(SalesHeader,"VAT Base Amount","Amount Including VAT",
// End of the added line.
"VAT Base Amt. to Report (LCY)","VAT Amount to Report (LCY)");
... -
Změňte kód ve funkci CalcVATAmountLines v tabulce Prodejní řádek (37) takto:
Existující kód...
// Delete the following line.CalcVATToReport(SalesHeader,"VAT Base","VAT Amount" - "VAT Difference",
// End of the deleted line.
"VAT Base Amt. to Report (LCY)","VAT Amount to Report (LCY)");
...Změněný kód
...
// Add the following line.
CalcVATToReport(SalesHeader,"VAT Base","Amount Including VAT" - "VAT Difference",
// End of the added line.
"VAT Base Amt. to Report (LCY)","VAT Amount to Report (LCY)");
... -
Změňte kód v CalcVATToReportpracovat v tabulce Prodejní řádek (37) takto:
Existující kód 1...
// Delete the following line.
PROCEDURE CalcVATToReport@1360001(SalesHeader@1360000 : Record 36;VATBaseAmount@1360001 : Decimal;VATAmount@1360002 : Decimal;VAR VATBaseAmountToReport@1360003 : Decimal;VAR VATAmountToReport@1360004 : Decimal);
// End of the deleted line.
BEGIN
...Změněný kód 1
...
// Add the following lines.
PROCEDURE CalcVATToReport@1360001(SalesHeader@1360000 : Record 36;VATBaseAmount@1360001 : Decimal;AmtInclVAT@1360005 : Decimal;VAR VATBaseAmountToReport@1360003 : Decimal;VAR VATAmountToReport@1360004 : Decimal);
VAR
AmountLCY@1360006 : Decimal;
AmtInclVATLCY@1360007 : Decimal;
// End of the added lines.
BEGIN
...Existující kód 2
...ROUND(VATBaseAmount / SalesHeader."VAT Currency Factor");
// Delete the following lines.
VATAmountToReport :=
ROUND(VATAmount / SalesHeader."VAT Currency Factor");
END ELSE BEGIN
VATBaseAmountToReport := VATBaseAmount;
VATAmountToReport := VATAmount;
// End of the deleted lines.
END;
...Náhradní kód 2
...ROUND(VATBaseAmount / SalesHeader."VAT Currency Factor");
// Add the following lines.
AmountLCY :=
ROUND(VATBaseAmount / SalesHeader."VAT Currency Factor");
AmtInclVATLCY :=
ROUND(AmtInclVAT / SalesHeader."VAT Currency Factor");
VATAmountToReport :=
AmtInclVATLCY - AmountLCY;
END ELSE BEGIN
VATBaseAmountToReport := VATBaseAmount;
VATAmountToReport := AmtInclVAT - VATBaseAmount;
// End of the added lines.
END;
... -
Změňte kód v poli v tabulce Nákupní řádek (39) takto:
Existující kód 1...
// Delete the following line.
CalcVATToReport(PurchHeader,"VAT Base Amount","Amount Including VAT" - "VAT Base Amount",
// End of the deleted line.
"VAT Base Amt. to Report (LCY)","VAT Amount to Report (LCY)","VAT % (Non Deductible)");
...Změněný kód 1
...
// Add the following line.
CalcVATToReport(PurchHeader,"VAT Base Amount","Amount Including VAT",
// End of the added line.
"VAT Base Amt. to Report (LCY)","VAT Amount to Report (LCY)","VAT % (Non Deductible)");
...Existující kód 2
...
// Delete the following line.
CalcVATToReport(PurchHeader,"VAT Base Amount","Amount Including VAT" - "VAT Base Amount",
// End of the deleted line.
"VAT Base Amt. to Report (LCY)","VAT Amount to Report (LCY)","VAT % (Non Deductible)");
...Náhradní kód 2
...
// Add the following line.
CalcVATToReport(PurchHeader,"VAT Base Amount","Amount Including VAT",
// End of the added line.
"VAT Base Amt. to Report (LCY)","VAT Amount to Report (LCY)","VAT % (Non Deductible)");
... -
Změňte kód v UpdateVATAmounts funkce v tabulce Nákupní řádek (39) takto:
Existující kód...
// Delete the following line.
CalcVATToReport(PurchHeader,"VAT Base Amount","Amount Including VAT" - "VAT Base Amount",
// End of the deleted line.
"VAT Base Amt. to Report (LCY)","VAT Amount to Report (LCY)","VAT % (Non Deductible)");
...Změněný kód
...
// Add the following line.
CalcVATToReport(PurchHeader,"VAT Base Amount","Amount Including VAT",
// End of the added line.
"VAT Base Amt. to Report (LCY)","VAT Amount to Report (LCY)","VAT % (Non Deductible)");
... -
Změňte kód UpdateVATOnLines funkce v tabulce Nákupní řádek (39) takto:
Existující kód...END;
// Delete the following line.
CalcVATToReport(PurchHeader,"VAT Base Amount","Amount Including VAT",
// End of the deleted line.
"VAT Base Amt. to Report (LCY)","VAT Amount to Report (LCY)","VAT % (Non Deductible)");
...Změněný kód
...END;
// Add the following line.
CalcVATToReport(PurchHeader,"VAT Base Amount","Amount Including VAT",
// End of the added line.
"VAT Base Amt. to Report (LCY)","VAT Amount to Report (LCY)","VAT % (Non Deductible)");
... -
Změňte kód CalcVATAmountLines v tabulce Nákupní řádek (39) takto:
Existující kód...
// Delete the following line.
CalcVATToReport(PurchHeader,"VAT Base","VAT Amount" - "VAT Difference",
// End of the deleted line.
"VAT Base Amt. to Report (LCY)","VAT Amount to Report (LCY)","VAT % (Non Deductible)");
...Změněný kód
...
// Add the following line.
CalcVATToReport(PurchHeader,"VAT Base","Amount Including VAT" - "VAT Difference",
// End of the added line.
"VAT Base Amt. to Report (LCY)","VAT Amount to Report (LCY)","VAT % (Non Deductible)");
... -
Změňte kód ve funkci CalcVATToReport v tabulce Nákupní řádek (39) takto:
Existující kód 1...
// Delete the following lines.
PROCEDURE CalcVATToReport@1360000(PurchHeader@1360000 : Record 38;VATBaseAmount@1360001 : Decimal;VATAmount@1360002 : Decimal;VAR VATBaseAmountToReport@1360003 : Decimal;VAR VATAmountToReport@1360004 : Decimal;NonDeductableVATPct@1360005 : Decimal);
VAR
NonDeductableVATAmount@1360006 : Decimal;
BEGIN
NonDeductableVATAmount := VATAmount * NonDeductableVATPct / 100;
// End of the deleted lines.
IF PurchHeader."Currency Code" <> '' THEN BEGIN
...Změněný kód 1
...
// Add the following lines.
PROCEDURE CalcVATToReport@1360000(PurchHeader@1360000 : Record 38;VATBaseAmount@1360001 : Decimal;AmtInclVAT@1360007 : Decimal;VAR VATBaseAmountToReport@1360003 : Decimal;VAR VATAmountToReport@1360004 : Decimal;NonDeductableVATPct@1360005 : Decimal);
VAR
NonDeductableVATAmount@1360006 : Decimal;
AmountLCY@1360008 : Decimal;
AmtInclVATLCY@1360009 : Decimal;
BEGIN
NonDeductableVATAmount := (AmtInclVAT - VATBaseAmount) * NonDeductableVATPct / 100;
// End of the added lines.
IF PurchHeader."Currency Code" <> '' THEN BEGIN
...Existující kód 2
...ROUND((VATBaseAmount + NonDeductableVATAmount) / PurchHeader."VAT Currency Factor");
// Delete the following lines.
VATAmountToReport :=
ROUND((VATAmount - NonDeductableVATAmount) / PurchHeader."VAT Currency Factor");
END ELSE BEGIN
VATBaseAmountToReport := VATBaseAmount + ROUND(NonDeductableVATAmount);
VATAmountToReport := VATAmount - ROUND(NonDeductableVATAmount);
// End of the deleted lines.
END
...Náhradní kód 2
...ROUND((VATBaseAmount + NonDeductableVATAmount) / PurchHeader."VAT Currency Factor");
// Add the following lines.
AmountLCY :=
ROUND(VATBaseAmount / PurchHeader."VAT Currency Factor");
AmtInclVATLCY :=
ROUND(AmtInclVAT / PurchHeader."VAT Currency Factor");
VATAmountToReport :=
AmtInclVATLCY - AmountLCY - ROUND(NonDeductableVATAmount / PurchHeader."VAT Currency Factor");
END ELSE BEGIN
VATBaseAmountToReport := VATBaseAmount + ROUND(NonDeductableVATAmount);
VATAmountToReport := AmtInclVAT - VATBaseAmount - ROUND(NonDeductableVATAmount);
// End of the added lines.
END
... -
Změňte kód do polí v tabulce Řádek servisu (5902) takto:
Existující kód 1...
// Delete the following line.
CalcVATToReport(ServHeader,"VAT Base Amount","Amount Including VAT" - "VAT Base Amount",
// End of the deleted line.
"VAT Base Amt. to Report (LCY)","VAT Amount to Report (LCY)");
...Změněný kód 1
...
// Add the following line.CalcVATToReport(ServHeader,"VAT Base Amount","Amount Including VAT",
// End of the added line.
"VAT Base Amt. to Report (LCY)","VAT Amount to Report (LCY)");
...Existující kód 2
...
// Delete the following line.
CalcVATToReport(ServHeader,"VAT Base Amount","Amount Including VAT" - "VAT Base Amount",
// End of the deleted line.
"VAT Base Amt. to Report (LCY)","VAT Amount to Report (LCY)");
...Náhradní kód 2
...
// Add the following line.
CalcVATToReport(ServHeader,"VAT Base Amount","Amount Including VAT",
// End of the added line.
"VAT Base Amt. to Report (LCY)","VAT Amount to Report (LCY)");
... -
Změňte kód v UpdateVATAmounts funkce v tabulce Řádek servisu (5902) takto:
Existující kód...
// Delete the following line.
CalcVATToReport(ServHeader,"VAT Base Amount","Amount Including VAT" - "VAT Base Amount",
// End of the deleted line.
"VAT Base Amt. to Report (LCY)","VAT Amount to Report (LCY)");
...Změněný kód
...
// Add the following line.
CalcVATToReport(ServHeader,"VAT Base Amount","Amount Including VAT",
// End of the added line.
"VAT Base Amt. to Report (LCY)","VAT Amount to Report (LCY)");
... -
Změňte kód ve funkci CalcVATAmountLines v tabulce Řádek servisu (5902) takto:
Existující kód...
// Delete the following line.
CalcVATToReport(ServHeader,"VAT Base","VAT Amount" - "VAT Difference",
// End of the deleted line.
"VAT Base Amt. to Report (LCY)","VAT Amount to Report (LCY)");
...Změněný kód
...
// Add the following line.CalcVATToReport(ServHeader,"VAT Base","Amount Including VAT" - "VAT Difference",
// End of the added line.
"VAT Base Amt. to Report (LCY)","VAT Amount to Report (LCY)");
... -
Změňte kód UpdateVATOnLines funkce v tabulce Řádek servisu (5902) takto:
Existující kód..."VAT Base Amount" := NewVATBaseAmount;
// Delete the following line.
CalcVATToReport(ServHeader,"VAT Base Amount","Amount Including VAT" - "VAT Base Amount",
// End of the deleted line.
"VAT Base Amt. to Report (LCY)","VAT Amount to Report (LCY)");
...Změněný kód
..."VAT Base Amount" := NewVATBaseAmount;
// Add the following line.
CalcVATToReport(ServHeader,"VAT Base Amount","Amount Including VAT",
// End of the added line.
"VAT Base Amt. to Report (LCY)","VAT Amount to Report (LCY)");
... -
Změňte kód ve funkci CalcVATToReport v tabulce Řádek servisu (5902) takto:
Existující kód 1...
// Delete the following line.
PROCEDURE CalcVATToReport@1360000(ServHeader@1360004 : Record 5900;VATBaseAmount@1360003 : Decimal;VATAmount@1360002 : Decimal;VAR VATBaseAmountToReport@1360001 : Decimal;VAR VATAmountToReport@1360000 : Decimal);
// End of the deleted line.
BEGIN
...Změněný kód 1
...
// Add the following lines.
PROCEDURE CalcVATToReport@1360000(ServHeader@1360004 : Record 5900;VATBaseAmount@1360003 : Decimal;AmtInclVAT@1360007 : Decimal;VAR VATBaseAmountToReport@1360001 : Decimal;VAR VATAmountToReport@1360000 : Decimal);
VAR
AmountLCY@1360005 : Decimal;
AmtInclVATLCY@1360006 : Decimal;
// End of the added lines.
BEGIN
...Existující kód 2
...ROUND(VATBaseAmount / ServHeader."VAT Currency Factor");
// Delete the following lines.
VATAmountToReport :=
ROUND(VATAmount / ServHeader."VAT Currency Factor");
END ELSE BEGIN
VATBaseAmountToReport := VATBaseAmount;
VATAmountToReport := VATAmount;
// End of the deleted lines.
END;
...Náhradní kód 2
...ROUND(VATBaseAmount / ServHeader."VAT Currency Factor");
// Add the following lines.
AmountLCY :=
ROUND(VATBaseAmount / ServHeader."VAT Currency Factor");
AmtInclVATLCY :=
ROUND(AmtInclVAT / ServHeader."VAT Currency Factor");
VATAmountToReport :=
AmtInclVATLCY - AmountLCY;
END ELSE BEGIN
VATBaseAmountToReport := VATBaseAmount;
VATAmountToReport := AmtInclVAT - VATBaseAmount;
// End of the added lines.
END;
... -
Změňte kód v DivideAmount funkce v procedura prodeje Post (80) takto:
Existující kód 1...LOCAL PROCEDURE DivideAmount@8(QtyType@1000 : 'General,Invoicing,Shipping';SalesLineQty@1001 : Decimal);
// Delete the following lines.
VAR
TotalVATBaseAmtLCY@1360001 : Decimal;
TotalVATAmountLCY@1360000 : Decimal;
// End of the deleted lines.
BEGIN
...Změněný kód 1
...LOCAL PROCEDURE DivideAmount@8(QtyType@1000 : 'General,Invoicing,Shipping';SalesLineQty@1001 : Decimal);
BEGIN
...Existující kód 2
...END;
// Delete the following lines.
TempVATAmountLineRemainder."Calc VAT Base Amount to Report" :=
TempVATAmountLineRemainder."Calc VAT Base Amount to Report" + "VAT Base Amount";
TempVATAmountLineRemainder."Calc VAT Amount to Report" :=
TempVATAmountLineRemainder."Calc VAT Amount to Report" + "Amount Including VAT" - "VAT Base Amount" - "VAT Difference";
CalcVATToReport(SalesHeader,
TempVATAmountLineRemainder."Calc VAT Base Amount to Report",
TempVATAmountLineRemainder."Calc VAT Amount to Report",
TotalVATBaseAmtLCY,TotalVATAmountLCY);
"VAT Base Amt. to Report (LCY)" := TotalVATBaseAmtLCY - TempVATAmountLineRemainder."VAT Base Amt. to Report (LCY)";
"VAT Amount to Report (LCY)" := TotalVATAmountLCY - TempVATAmountLineRemainder."VAT Amount to Report (LCY)";
TempVATAmountLineRemainder."VAT Base Amt. to Report (LCY)" := TotalVATBaseAmtLCY;
TempVATAmountLineRemainder."VAT Amount to Report (LCY)" := TotalVATAmountLCY;
// End of the deleted lines.
...Náhradní kód 2
...END;
// Add the following line.
CalcRoundedVATToReport(SalesLine,SalesHeader);
// End of the added line.
... -
Vytvoření funkce v procedura prodeje Post (80) takto:
LOCAL PROCEDURE CalcRoundedVATToReport@1360026(VAR SalesLine@1360002 : Record 37;SalesHeader@1360003 : Record 36);VAR
TotalVATBaseAmtLCY@1360005 : Decimal;
TotalVATAmountLCY@1360004 : Decimal;
BEGIN
WITH SalesLine DO BEGIN
TempVATAmountLineRemainder."Calc VAT Base Amount to Report" +=
"VAT Base Amount";
TempVATAmountLineRemainder."Calc VAT Amount to Report" +=
"Amount Including VAT";
CalcVATToReport(SalesHeader,
TempVATAmountLineRemainder."Calc VAT Base Amount to Report",
TempVATAmountLineRemainder."Calc VAT Amount to Report",
TotalVATBaseAmtLCY,TotalVATAmountLCY);
"VAT Base Amt. to Report (LCY)" := TotalVATBaseAmtLCY - TempVATAmountLineRemainder."VAT Base Amt. to Report (LCY)";
"VAT Amount to Report (LCY)" := TotalVATAmountLCY - TempVATAmountLineRemainder."VAT Amount to Report (LCY)";
TempVATAmountLineRemainder."VAT Base Amt. to Report (LCY)" := TotalVATBaseAmtLCY;
TempVATAmountLineRemainder."VAT Amount to Report (LCY)" := TotalVATAmountLCY;
END;
END; -
Změňte kód v DivideAmount funkce v nák.-zaúčtování procedura (90) takto:
Existující kód 1...LOCAL PROCEDURE DivideAmount@8(QtyType@1000 : 'General,Invoicing,Shipping';PurchLineQty@1001 : Decimal);
// Delete the following lines.
VAR
TotalVATBaseAmtLCY@1360001 : Decimal;
TotalVATAmountLCY@1360000 : Decimal;
// End of the deleted lines.
BEGIN
...Změněný kód 1
...LOCAL PROCEDURE DivideAmount@8(QtyType@1000 : 'General,Invoicing,Shipping';PurchLineQty@1001 : Decimal);
BEGIN
...Existující kód 2
...END;
// Delete the following lines.
TempVATAmountLineRemainder."Calc VAT Base Amount to Report" :=
TempVATAmountLineRemainder."Calc VAT Base Amount to Report" + "VAT Base Amount";
TempVATAmountLineRemainder."Calc VAT Amount to Report" :=
TempVATAmountLineRemainder."Calc VAT Amount to Report" + "Amount Including VAT" - "VAT Base Amount" - "VAT Difference";
PurchLine.CalcVATToReport(PurchHeader,
TempVATAmountLineRemainder."Calc VAT Base Amount to Report",
TempVATAmountLineRemainder."Calc VAT Amount to Report",
TotalVATBaseAmtLCY,TotalVATAmountLCY,"VAT % (Non Deductible)");
"VAT Base Amt. to Report (LCY)" := TotalVATBaseAmtLCY - TempVATAmountLineRemainder."VAT Base Amt. to Report (LCY)";
"VAT Amount to Report (LCY)" := TotalVATAmountLCY - TempVATAmountLineRemainder."VAT Amount to Report (LCY)";
TempVATAmountLineRemainder."VAT Base Amt. to Report (LCY)" := TotalVATBaseAmtLCY;
TempVATAmountLineRemainder."VAT Amount to Report (LCY)" := TotalVATAmountLCY;
// End of the deleted lines.
...Náhradní kód 2
...END;
// Add the following line.
CalcRoundedVATToReport(PurchLine,PurchHeader);
// End of the added line.
... -
Vytvoření funkce v v nák.-Post procedura (90) takto:
LOCAL PROCEDURE CalcRoundedVATToReport@1360026(VAR PurchLine@1360002 : Record 39;PurchHeader@1360003 : Record 38);VAR
TotalVATBaseAmtLCY@1360005 : Decimal;
TotalVATAmountLCY@1360004 : Decimal;
BEGIN
WITH PurchLine DO BEGIN
TempVATAmountLineRemainder."Calc VAT Base Amount to Report" +=
"VAT Base Amount";
TempVATAmountLineRemainder."Calc VAT Amount to Report" +=
"Amount Including VAT";
CalcVATToReport(PurchHeader,
TempVATAmountLineRemainder."Calc VAT Base Amount to Report",
TempVATAmountLineRemainder."Calc VAT Amount to Report",
TotalVATBaseAmtLCY,TotalVATAmountLCY,"VAT % (Non Deductible)");
"VAT Base Amt. to Report (LCY)" := TotalVATBaseAmtLCY - TempVATAmountLineRemainder."VAT Base Amt. to Report (LCY)";
"VAT Amount to Report (LCY)" := TotalVATAmountLCY - TempVATAmountLineRemainder."VAT Amount to Report (LCY)";
TempVATAmountLineRemainder."VAT Base Amt. to Report (LCY)" := TotalVATBaseAmtLCY;
TempVATAmountLineRemainder."VAT Amount to Report (LCY)" := TotalVATAmountLCY;
END;
END; -
Změňte kód v DivideAmount funkce v procedura správce částky Serv (5986) takto:
Existující kód 1...ChargeableQty@1006 : Decimal;
// Delete the following lines.
TotalVATBaseAmtLCY@1360001 : Decimal;
TotalVATAmountLCY@1360000 : Decimal;
// End of the deleted lines.
BEGIN
...Změněný kód 1
...ChargeableQty@1006 : Decimal;
BEGIN
...Existující kód 2
...END;
// Delete the following lines.
TempVATAmountLineRemainder."Calc VAT Base Amount to Report" :=
TempVATAmountLineRemainder."Calc VAT Base Amount to Report" + "VAT Base Amount";
TempVATAmountLineRemainder."Calc VAT Amount to Report" :=
TempVATAmountLineRemainder."Calc VAT Amount to Report" + "Amount Including VAT" - "VAT Base Amount" - "VAT Difference";
CalcVATToReport(ServiceHeader,
TempVATAmountLineRemainder."Calc VAT Base Amount to Report",
TempVATAmountLineRemainder."Calc VAT Amount to Report",
TotalVATBaseAmtLCY,TotalVATAmountLCY);
"VAT Base Amt. to Report (LCY)" := TotalVATBaseAmtLCY - TempVATAmountLineRemainder."VAT Base Amt. to Report (LCY)";
"VAT Amount to Report (LCY)" := TotalVATAmountLCY - TempVATAmountLineRemainder."VAT Amount to Report (LCY)";
TempVATAmountLineRemainder."VAT Base Amt. to Report (LCY)" := TotalVATBaseAmtLCY;
TempVATAmountLineRemainder."VAT Amount to Report (LCY)" := TotalVATAmountLCY;
// End of the deleted lines.
...Náhradní kód 2
...END;
// Add the following line.
CalcRoundedVATToReport(ServiceLine,TempVATAmountLineRemainder,ServHeader);
// End of the added line.
... -
Vytvoření funkce v v procedura Serv částky správce (5986) takto:
LOCAL PROCEDURE CalcRoundedVATToReport@1360001(VAR ServiceLine@1360002 : Record 5902;VAR TempVATAmountLineRemainder@1360004 : Record 290;ServHeader@1360003 : Record 5900);VAR
TotalVATBaseAmtLCY@1360006 : Decimal;
TotalVATAmountLCY@1360005 : Decimal;
BEGIN
WITH ServiceLine DO BEGIN
TempVATAmountLineRemainder."Calc VAT Base Amount to Report" +=
"VAT Base Amount";
TempVATAmountLineRemainder."Calc VAT Amount to Report" +=
"Amount Including VAT";
CalcVATToReport(ServHeader,
TempVATAmountLineRemainder."Calc VAT Base Amount to Report",
TempVATAmountLineRemainder."Calc VAT Amount to Report",
TotalVATBaseAmtLCY,TotalVATAmountLCY);
"VAT Base Amt. to Report (LCY)" := TotalVATBaseAmtLCY - TempVATAmountLineRemainder."VAT Base Amt. to Report (LCY)";
"VAT Amount to Report (LCY)" := TotalVATAmountLCY - TempVATAmountLineRemainder."VAT Amount to Report (LCY)";
TempVATAmountLineRemainder."VAT Base Amt. to Report (LCY)" := TotalVATBaseAmtLCY;
TempVATAmountLineRemainder."VAT Amount to Report (LCY)" := TotalVATAmountLCY;
END;
END;
Předpoklady
Maďarské verzi aplikace Microsoft Dynamics NAV 2009 R2 nainstalovali tuto opravu hotfix, musí mít.
Informace o odinstalaci
Tato oprava hotfix nelze odebrat.
Stav
Společnost Microsoft potvrdila, že se jedná o problém v produktech společnosti Microsoft, které jsou uvedeny v části "Platí pro".
Poznámka: Toto je článek "Rychlé publikování" vytvářen přímo v rámci odborné pomoci společnosti Microsoft. Informace obsažené v tomto dokumentu jsou poskytovány tak, jak je v reakci na vznikající problémy. V důsledku rychlosti v jeho zpřístupnění materiály, mohou obsahovat typografické chyby a mohou být upraveny kdykoli bez předchozího upozornění. Viz Podmínky použitípro další aspekty.
