Dieser Artikel gilt für die folgenden Gebietsschemas und Microsoft.
-
Englisch (Kanada) (En-ca)
-
Englisch (USA) (En-us)
-
Spanisch (Mexiko) (es-Mx)
-
Französisch (Kanada) (fr-ca)
Problembeschreibung
Angenommen Sie, Sie CAD als BW Reporting Wert in der Finanzbuchhaltung Einrichtung in der nordamerikanischen Version von Microsoft Dynamics NAV 2009 im Dialogfeld festgelegt. Wenn Sie eine Rechnung buchen, die Mehrwertsteuer enthält, erhalten Sie folgende Fehlermeldung:
Die Transaktion kann nicht abgeschlossen werden, da es eine Inkonsistenz in der Tabelle Sachposten hervorrufen würde. Überprüfen Sie, wo und wie die Funktion CONSISTENT in der Transaktion verwendet wird, den Grund für den Fehler finden.
Dieses Problem tritt in den folgenden Produkten auf:
-
Die nordamerikanische Version von Microsoft Dynamics NAV 2009 R2
-
Die nordamerikanische Version des Service Pack 1 für Microsoft Dynamics NAV 2009
Problemlösung
Hotfix-Informationen
Ein unterstützter Hotfix ist inzwischen von Microsoft erhältlich. Allerdings ist es lediglich zur Behebung dieses Problems. Wenden Sie es nur auf Systeme an, bei denen dieses spezielle Problem auftritt. Dieser Hotfix wird möglicherweise noch getestet. Wenn Ihr System durch dieses Problem nicht schwerwiegend beeinträchtigt ist, empfehlen wir, dass Sie warten auf das nächste Servicepack für Microsoft Dynamics NAV 2009 oder die nächste Microsoft Dynamics NAV-Version, die diesen Hotfix enthält.
Hinweis In besonderen Fällen bestimmt Gebühren fallen normalerweise Support aufrufen Wenn Experte Support für Microsoft Dynamics und zugehörige Produkte storniert werden können, dass ein bestimmtes Update Ihr Problem behebt. Die normalen Supportkosten gilt für zusätzliche Supportfragen und Probleme, die nicht für das betreffende Update qualifizieren.
Informationen zur Installation
Microsoft bietet Programmierbeispiele lediglich zur Veranschaulichung, ohne ausdrückliche oder konkludente Gewährleistung. Dies beinhaltet, ist jedoch nicht beschränkt auf, konkludente Gewährleistungen der Tauglichkeit oder Eignung für einen bestimmten Zweck. Dieser Artikel setzt voraus, dass Sie mit der von Beispielen verwendeten Programmiersprache und den Tools, die zum Erstellen und Debuggen von Prozeduren verwendet werden, vertraut sind. Microsoft-Supportmitarbeiter können bei der Erläuterung der Funktionalität bestimmter Prozeduren helfen, sie werden jedoch diese Beispiele nicht verändern um eine erweiterte Funktionalität aufzuzeigen oder Prozeduren entwickeln, die Ihren Anforderungen entsprechen.
Hinweis Bevor Sie diesen Hotfix installieren, stellen Sie sicher, dass alle Microsoft Navision-Clientbenutzer vom System abgemeldet werden. Dies gilt auch für Clientbenutzer der Microsoft Navision Application Services (NAS). Sie sollte nur-Client-Benutzers, der angemeldet ist, wenn Sie diesen Hotfix installieren.
Muss eine Entwicklerlizenz verfügen, um diesen Hotfix installieren können.
Es wird empfohlen, das Benutzerkonto im Fenster Windows-Benutzernamen oder im Fenster Datenbank-Anmeldenamen "SUPER" Rollen-ID zugewiesen werden Wenn das Benutzerkonto die Rollen-ID "SUPER" nicht zugeordnet werden kann, müssen Sie sicherstellen, dass das Benutzerkonto die folgenden Berechtigungen verfügt:
-
Änderungsberechtigung für das Objekt, das Sie ändern.
-
Ausführungsberechtigung für System Object ID 5210 und System Object ID 9015 -Objekt.
Hinweis Sie müssen keine Rechte für die Datenspeicher haben, es sei denn, Sie müssen eine Datenreparatur durchführen.
Ändern von Code
Hinweis Testen Sie Programmcodeverbesserungen generell erst in einem Testsytem, bevor Sie sie im Produktionssystem verwenden.
Gehen Sie folgendermaßen vor, um dieses Problem zu beheben:
-
Ändern Sie den Code in Felder in der Tabelle Sales Tax Betragszeile (10011) wie folgt:
Vorhandener code...ESM=Es Informe jurisdicci¢n;
FRC=Est une juridiction fiscale;
ENC=Is Report-to Jurisdiction];
Editable=No }
}
KEYS
{
{ ;Tax Area Code for Key,Tax Jurisdiction Code,Tax %,Tax Group Code,Expense/Capitalize,Tax Type,Use Tax;
...Neuer code
...
ESM=Es Informe jurisdicci¢n;
FRC=Est une juridiction fiscale;
ENC=Is Report-to Jurisdiction];
Editable=No }
// Add the following line.
{ 10044; ;Tax Base Amount FCY ;Decimal }
// End of the added line.
}
KEYS
{
{ ;Tax Area Code for Key,Tax Jurisdiction Code,Tax %,Tax Group Code,Expense/Capitalize,Tax Type,Use Tax;
... -
Ändern Sie den Code in der Funktion PostSalesTaxToGL in die Codeunit Vertrieb-Beitrag (80) wie folgt:
Vorhandener code...END;
GenJnlLine."Tax Jurisdiction Code" := TempSalesTaxAmtLine."Tax Jurisdiction Code";
IF TempSalesTaxAmtLine."Tax Amount" <> 0 THEN BEGIN
RemSalesTaxSrcAmt := RemSalesTaxSrcAmt +
// Delete the following lines.
CurrExchRate.ExchangeAmtLCYToFCY(
UseDate,SalesHeader."Currency Code",TempSalesTaxAmtLine."Tax Amount",SalesHeader."Currency Factor");
// End of the deleted lines.
GenJnlLine."Source Curr. VAT Amount" :=
SalesTaxCalculate.ArithmeticRound(RemSalesTaxSrcAmt,Currency."Amount Rounding Precision");
RemSalesTaxSrcAmt := RemSalesTaxSrcAmt - GenJnlLine."Source Curr. VAT Amount";
RemSalesTaxAmt := RemSalesTaxAmt + TempSalesTaxAmtLine."Tax Amount";
...Neuer code
...END;
GenJnlLine."Tax Jurisdiction Code" := TempSalesTaxAmtLine."Tax Jurisdiction Code";
IF TempSalesTaxAmtLine."Tax Amount" <> 0 THEN BEGIN
RemSalesTaxSrcAmt := RemSalesTaxSrcAmt +
// Add the following lines.
TempSalesTaxAmtLine."Tax Base Amount FCY" * TempSalesTaxAmtLine."Tax %" / 100;
// End of the added lines.
GenJnlLine."Source Curr. VAT Amount" :=
SalesTaxCalculate.ArithmeticRound(RemSalesTaxSrcAmt,Currency."Amount Rounding Precision");
RemSalesTaxSrcAmt := RemSalesTaxSrcAmt - GenJnlLine."Source Curr. VAT Amount";
RemSalesTaxAmt := RemSalesTaxAmt + TempSalesTaxAmtLine."Tax Amount";
... -
Ändern Sie den Code in der Funktion PostSalesTaxToGL in Purch.-Post Codeunit (90) wie folgt:
Vorhandener code...END;
GenJnlLine."Tax Jurisdiction Code" := TempSalesTaxAmtLine."Tax Jurisdiction Code";
IF TempSalesTaxAmtLine."Tax Amount" <> 0 THEN BEGIN
RemSalesTaxSrcAmt := RemSalesTaxSrcAmt +
// Delete the following lines.
CurrExchRate.ExchangeAmtLCYToFCY(
Usedate,PurchHeader."Currency Code",TempSalesTaxAmtLine."Tax Amount",PurchHeader."Currency Factor");
// End of the deleted lines.
GenJnlLine."Source Curr. VAT Amount" :=
SalesTaxCalculate.ArithmeticRound(RemSalesTaxSrcAmt,Currency."Amount Rounding Precision");
RemSalesTaxSrcAmt := RemSalesTaxSrcAmt - GenJnlLine."Source Curr. VAT Amount";
RemSalesTaxAmt := RemSalesTaxAmt + TempSalesTaxAmtLine."Tax Amount";
...Neuer code
...END;
GenJnlLine."Tax Jurisdiction Code" := TempSalesTaxAmtLine."Tax Jurisdiction Code";
IF TempSalesTaxAmtLine."Tax Amount" <> 0 THEN BEGIN
RemSalesTaxSrcAmt := RemSalesTaxSrcAmt +
// Add the following line.
TempSalesTaxAmtLine."Tax Base Amount FCY" * TempSalesTaxAmtLine."Tax %" / 100;
// End of the added line.
GenJnlLine."Source Curr. VAT Amount" :=
SalesTaxCalculate.ArithmeticRound(RemSalesTaxSrcAmt,Currency."Amount Rounding Precision");
RemSalesTaxSrcAmt := RemSalesTaxSrcAmt - GenJnlLine."Source Curr. VAT Amount";
RemSalesTaxAmt := RemSalesTaxAmt + TempSalesTaxAmtLine."Tax Amount";
... -
Ändern Sie den Code in der Funktion PostProvincialSalesTaxToGL in Purch.-Post Codeunit (90) wie folgt:
Vorhandener code...TaxJurisdiction.TESTFIELD("Tax Account (Purchases)");
GenJnlLine."Account No." := TaxJurisdiction."Tax Account (Purchases)";
END;
GenJnlLine.Amount := GenJnlLine."VAT Amount";
// Delete the following lines.
GenJnlLine."Source Curr. VAT Base Amount" := 0;
GenJnlLine."VAT Base Amount (LCY)" := 0;
GenJnlLine."VAT Base Amount" := 0;
GenJnlLine."Source Curr. VAT Amount" := 0;
// End of the deleted lines.
GenJnlLine."VAT Amount (LCY)" := 0;
GenJnlLine."VAT Amount" := 0;
GenJnlLine.Quantity := 0;
GenJnlLine."VAT Difference" := 0;
...Neuer code
...TaxJurisdiction.TESTFIELD("Tax Account (Purchases)");
GenJnlLine."Account No." := TaxJurisdiction."Tax Account (Purchases)";
END;
GenJnlLine.Amount := GenJnlLine."VAT Amount";
// Add the following lines.
GenJnlLine."Source Currency Amount" := GenJnlLine."Source Curr. VAT Amount";
GenJnlLine."Source Curr. VAT Base Amount" := 0;
GenJnlLine."VAT Base Amount (LCY)" := 0;
GenJnlLine."VAT Base Amount" := 0;
// End of the added lines.
GenJnlLine."VAT Amount (LCY)" := 0;
GenJnlLine."VAT Amount" := 0;
GenJnlLine.Quantity := 0;
GenJnlLine."VAT Difference" := 0;
... -
Ändern Sie den Code in der Funktion AddSalesLine Mehrwertsteuer berechnen Codeunit (398) wie folgt:
Vorhandener Code 1..."Round Tax" := TaxArea."Round Tax";
TaxJurisdiction.GET("Tax Jurisdiction Code");
"Is Report-to Jurisdiction" := ("Tax Jurisdiction Code" = TaxJurisdiction."Report-to Jurisdiction");
END;
// Delete the following line.
"Tax Base Amount" := (SalesLine."Line Amount" - SalesLine."Inv. Discount Amount") / ExchangeFactor;
// End of the deleted line.
"Line Amount" := SalesLine."Line Amount" / ExchangeFactor;
"Tax Liable" := SalesLine."Tax Liable";
Quantity := SalesLine."Quantity (Base)";
"Invoice Discount Amount" := SalesLine."Inv. Discount Amount";
...Neuer Code 1
..."Round Tax" := TaxArea."Round Tax";
TaxJurisdiction.GET("Tax Jurisdiction Code");
"Is Report-to Jurisdiction" := ("Tax Jurisdiction Code" = TaxJurisdiction."Report-to Jurisdiction");
END;
// Add the following line.
SetTaxBaseAmount(TempSalesTaxLine,SalesLine."Line Amount" - SalesLine."Inv. Discount Amount",ExchangeFactor,FALSE);
// End of the added line.
"Line Amount" := SalesLine."Line Amount" / ExchangeFactor;
"Tax Liable" := SalesLine."Tax Liable";
Quantity := SalesLine."Quantity (Base)";
"Invoice Discount Amount" := SalesLine."Inv. Discount Amount";
...Vorhandener Code 2
...END ELSE BEGIN
"Line Amount" := "Line Amount" + (SalesLine."Line Amount" / ExchangeFactor);
IF SalesLine."Tax Liable" THEN
"Tax Liable" := SalesLine."Tax Liable";
// Delete the following line.
"Tax Base Amount" := "Tax Base Amount" + ((SalesLine."Line Amount" - SalesLine."Inv. Discount Amount") / ExchangeFactor);
// End of the deleted line.
"Tax Amount" := 0;
Quantity := Quantity + SalesLine."Quantity (Base)";
"Invoice Discount Amount" := "Invoice Discount Amount" + SalesLine."Inv. Discount Amount";
MODIFY;
...Neuer Code 2
...END ELSE BEGIN
"Line Amount" := "Line Amount" + (SalesLine."Line Amount" / ExchangeFactor);
IF SalesLine."Tax Liable" THEN
"Tax Liable" := SalesLine."Tax Liable";
// Add the following line.
SetTaxBaseAmount(TempSalesTaxLine,SalesLine."Line Amount" - SalesLine."Inv. Discount Amount",ExchangeFactor,TRUE);
// End of the added line.
"Tax Amount" := 0;
Quantity := Quantity + SalesLine."Quantity (Base)";
"Invoice Discount Amount" := "Invoice Discount Amount" + SalesLine."Inv. Discount Amount";
MODIFY;
... -
Ändern Sie den Code in der Funktion AddSalesInvoiceLines Mehrwertsteuer berechnen Codeunit (398) wie folgt:
Vorhandener Code 1..."Is Report-to Jurisdiction" :=
("Tax Jurisdiction Code" = TaxJurisdiction."Report-to Jurisdiction");
END;
"Line Amount" := SalesInvoiceLine."Line Amount" / ExchangeFactor;
// Delete the following line.
"Tax Base Amount" := SalesInvoiceLine."VAT Base Amount" / ExchangeFactor;
// End of the deleted line.
Quantity := SalesInvoiceLine.Quantity;
"Tax Liable" := SalesInvoiceLine."Tax Liable";
"Calculation Order" := TaxAreaLine."Calculation Order";
InsertRec := TRUE;
...Neuer Code 1
..."Is Report-to Jurisdiction" :=
("Tax Jurisdiction Code" = TaxJurisdiction."Report-to Jurisdiction");
END;
"Line Amount" := SalesInvoiceLine."Line Amount" / ExchangeFactor;
// Add the following line.
SetTaxBaseAmount(TempSalesTaxLine,SalesInvoiceLine."VAT Base Amount",ExchangeFactor,FALSE);
// End of the added line.
Quantity := SalesInvoiceLine.Quantity;
"Tax Liable" := SalesInvoiceLine."Tax Liable";
"Calculation Order" := TaxAreaLine."Calculation Order";
InsertRec := TRUE;
...Vorhandener Code 2
...InsertRec := TRUE;
INSERT;
END ELSE BEGIN
"Line Amount" := "Line Amount" + (SalesInvoiceLine."Line Amount" / ExchangeFactor);
// Delete the following line.
"Tax Base Amount" := "Tax Base Amount" + (SalesInvoiceLine."VAT Base Amount" / ExchangeFactor);
// End of the deleted line.
Quantity := Quantity + SalesInvoiceLine.Quantity;
IF SalesInvoiceLine."Tax Liable" THEN
"Tax Liable" := SalesInvoiceLine."Tax Liable";
InsertRec := FALSE;
...Neuer Code 2
...InsertRec := TRUE;
INSERT;
END ELSE BEGIN
"Line Amount" := "Line Amount" + (SalesInvoiceLine."Line Amount" / ExchangeFactor);
// Add the following line.
SetTaxBaseAmount(TempSalesTaxLine,SalesInvoiceLine."VAT Base Amount",ExchangeFactor,TRUE);
// End of the added line.
Quantity := Quantity + SalesInvoiceLine.Quantity;
IF SalesInvoiceLine."Tax Liable" THEN
"Tax Liable" := SalesInvoiceLine."Tax Liable";
InsertRec := FALSE;
... -
Ändern Sie den Code in der Funktion AddSalesCrMemoLines Mehrwertsteuer berechnen Codeunit (398) wie folgt:
Vorhandener Code 1..."Is Report-to Jurisdiction" :=
("Tax Jurisdiction Code" = TaxJurisdiction."Report-to Jurisdiction");
END;
"Line Amount" := SalesCrMemoLine."Line Amount" / ExchangeFactor;
// Delete the following line.
"Tax Base Amount" := SalesCrMemoLine."VAT Base Amount" / ExchangeFactor;
// End of the deleted line.
Quantity := SalesCrMemoLine.Quantity;
"Tax Liable" := SalesCrMemoLine."Tax Liable";
"Calculation Order" := TaxAreaLine."Calculation Order";
InsertRec := TRUE;
...Neuer Code 1
..."Is Report-to Jurisdiction" :=
("Tax Jurisdiction Code" = TaxJurisdiction."Report-to Jurisdiction");
END;
"Line Amount" := SalesCrMemoLine."Line Amount" / ExchangeFactor;
// Add the following line.
SetTaxBaseAmount(TempSalesTaxLine,SalesCrMemoLine."VAT Base Amount",ExchangeFactor,FALSE);
// End of the added line.
Quantity := SalesCrMemoLine.Quantity;
"Tax Liable" := SalesCrMemoLine."Tax Liable";
"Calculation Order" := TaxAreaLine."Calculation Order";
InsertRec := TRUE;
...Vorhandener Code 2
...InsertRec := TRUE;
INSERT;
END ELSE BEGIN
"Line Amount" := "Line Amount" + (SalesCrMemoLine."Line Amount" / ExchangeFactor);
// Delete the following line.
"Tax Base Amount" := "Tax Base Amount" + (SalesCrMemoLine."VAT Base Amount" / ExchangeFactor);
// End of the deleted line.
Quantity := Quantity + SalesCrMemoLine.Quantity;
IF SalesCrMemoLine."Tax Liable" THEN
"Tax Liable" := SalesCrMemoLine."Tax Liable";
InsertRec := FALSE;
...Neuer Code 2
...InsertRec := TRUE;
INSERT;
END ELSE BEGIN
"Line Amount" := "Line Amount" + (SalesCrMemoLine."Line Amount" / ExchangeFactor);
// Add the following line.
SetTaxBaseAmount(TempSalesTaxLine,SalesCrMemoLine."VAT Base Amount",ExchangeFactor,TRUE);
// End of the added line.
Quantity := Quantity + SalesCrMemoLine.Quantity;
IF SalesCrMemoLine."Tax Liable" THEN
"Tax Liable" := SalesCrMemoLine."Tax Liable";
InsertRec := FALSE;
... -
Ändern Sie den Code in der Funktion AddPurchLine Mehrwertsteuer berechnen Codeunit (398) wie folgt:
Vorhandener Code 1..."Round Tax" := TaxArea."Round Tax";
TaxJurisdiction.GET("Tax Jurisdiction Code");
"Is Report-to Jurisdiction" := ("Tax Jurisdiction Code" = TaxJurisdiction."Report-to Jurisdiction");
END;
// Delete the following line.
"Tax Base Amount" := (PurchLine."Line Amount" - PurchLine."Inv. Discount Amount") / ExchangeFactor;
// End of the deleted line.
"Line Amount" := PurchLine."Line Amount" / ExchangeFactor;
"Tax Liable" := PurchLine."Tax Liable";
"Use Tax" := PurchLine."Use Tax";
...Neuer Code 1
..."Round Tax" := TaxArea."Round Tax";
TaxJurisdiction.GET("Tax Jurisdiction Code");
"Is Report-to Jurisdiction" := ("Tax Jurisdiction Code" = TaxJurisdiction."Report-to Jurisdiction");
END;
// Add the following line.
SetTaxBaseAmount(TempSalesTaxLine,PurchLine."Line Amount" - PurchLine."Inv. Discount Amount",ExchangeFactor,FALSE);
// End of the added line.
"Line Amount" := PurchLine."Line Amount" / ExchangeFactor;
"Tax Liable" := PurchLine."Tax Liable";
"Use Tax" := PurchLine."Use Tax";
...Vorhandener Code 2
...END ELSE BEGIN
"Line Amount" := "Line Amount" + (PurchLine."Line Amount" / ExchangeFactor);
IF PurchLine."Tax Liable" THEN
"Tax Liable" := PurchLine."Tax Liable";
// Delete the following line.
"Tax Base Amount" := "Tax Base Amount" + ((PurchLine."Line Amount" - PurchLine."Inv. Discount Amount") / ExchangeFactor);
// End of the deleted line.
"Tax Amount" := 0;
Quantity := Quantity + PurchLine."Quantity (Base)";
"Invoice Discount Amount" := "Invoice Discount Amount" + PurchLine."Inv. Discount Amount";
MODIFY;
...Neuer Code 2
...END ELSE BEGIN
"Line Amount" := "Line Amount" + (PurchLine."Line Amount" / ExchangeFactor);
IF PurchLine."Tax Liable" THEN
"Tax Liable" := PurchLine."Tax Liable";
// Add the following line.
SetTaxBaseAmount(TempSalesTaxLine,PurchLine."Line Amount" - PurchLine."Inv. Discount Amount",ExchangeFactor,TRUE);
// End of the added line.
"Tax Amount" := 0;
Quantity := Quantity + PurchLine."Quantity (Base)";
"Invoice Discount Amount" := "Invoice Discount Amount" + PurchLine."Inv. Discount Amount";
MODIFY;
... -
Ändern Sie den Code in der Funktion AddPurchInvoiceLines Mehrwertsteuer berechnen Codeunit (398) wie folgt:
Vorhandener Code 1..."Is Report-to Jurisdiction" :=
("Tax Jurisdiction Code" = TaxJurisdiction."Report-to Jurisdiction");
END;
"Line Amount" := PurchInvLine."Line Amount" / ExchangeFactor;
// Delete the following line.
"Tax Base Amount" := PurchInvLine."VAT Base Amount" / ExchangeFactor;
// End of the deleted line.
Quantity := PurchInvLine.Quantity;
"Tax Liable" := PurchInvLine."Tax Liable";
"Use Tax" := PurchInvLine."Use Tax";
...Neuer Code 1
..."Is Report-to Jurisdiction" :=
("Tax Jurisdiction Code" = TaxJurisdiction."Report-to Jurisdiction");
END;
"Line Amount" := PurchInvLine."Line Amount" / ExchangeFactor;
// Add the following line.
SetTaxBaseAmount(TempSalesTaxLine,PurchInvLine."VAT Base Amount",ExchangeFactor,FALSE);
// End of the added line.
Quantity := PurchInvLine.Quantity;
"Tax Liable" := PurchInvLine."Tax Liable";
"Use Tax" := PurchInvLine."Use Tax";
...Vorhandener Code 2
...InsertRec := TRUE;
INSERT;
END ELSE BEGIN
"Line Amount" := "Line Amount" + (PurchInvLine."Line Amount" / ExchangeFactor);
// Delete the following line.
"Tax Base Amount" := "Tax Base Amount" + (PurchInvLine."VAT Base Amount" / ExchangeFactor);
// End of the deleted line.
Quantity := Quantity + PurchInvLine.Quantity;
IF PurchInvLine."Tax Liable" THEN
"Tax Liable" := PurchInvLine."Tax Liable";
InsertRec := FALSE;
...Neuer Code 2
...InsertRec := TRUE;
INSERT;
END ELSE BEGIN
"Line Amount" := "Line Amount" + (PurchInvLine."Line Amount" / ExchangeFactor);
// Add the following line.
SetTaxBaseAmount(TempSalesTaxLine,PurchInvLine."VAT Base Amount",ExchangeFactor,TRUE);
// End of the added line.
Quantity := Quantity + PurchInvLine.Quantity;
IF PurchInvLine."Tax Liable" THEN
"Tax Liable" := PurchInvLine."Tax Liable";
InsertRec := FALSE;
... -
Ändern Sie den Code in der Funktion AddPurchCrMemoLines Mehrwertsteuer berechnen Codeunit (398) wie folgt:
Vorhandener Code 1..."Is Report-to Jurisdiction" :=
("Tax Jurisdiction Code" = TaxJurisdiction."Report-to Jurisdiction");
END;
"Line Amount" := PurchCrMemoLine."Line Amount" / ExchangeFactor;
// Delete the following line.
"Tax Base Amount" := PurchCrMemoLine."VAT Base Amount" / ExchangeFactor;
// End of the deleted line.
Quantity := PurchCrMemoLine.Quantity;
"Tax Liable" := PurchCrMemoLine."Tax Liable";
"Use Tax" := PurchCrMemoLine."Use Tax";
...Neuer Code 1
..."Is Report-to Jurisdiction" :=
("Tax Jurisdiction Code" = TaxJurisdiction."Report-to Jurisdiction");
END;
"Line Amount" := PurchCrMemoLine."Line Amount" / ExchangeFactor;
// Add the following line.
SetTaxBaseAmount(TempSalesTaxLine,PurchCrMemoLine."VAT Base Amount",ExchangeFactor,FALSE);
// End of the added line.
Quantity := PurchCrMemoLine.Quantity;
"Tax Liable" := PurchCrMemoLine."Tax Liable";
"Use Tax" := PurchCrMemoLine."Use Tax";
...Vorhandener Code 2
...InsertRec := TRUE;
INSERT;
END ELSE BEGIN
"Line Amount" := "Line Amount" + (PurchCrMemoLine."Line Amount" / ExchangeFactor);
// Delete the following line.
"Tax Base Amount" := "Tax Base Amount" + (PurchCrMemoLine."VAT Base Amount" / ExchangeFactor);
// End of the deleted line.
Quantity := Quantity + PurchCrMemoLine.Quantity;
IF PurchCrMemoLine."Tax Liable" THEN
"Tax Liable" := PurchCrMemoLine."Tax Liable";
InsertRec := FALSE;
...Neuer Code 2
...InsertRec := TRUE;
INSERT;
END ELSE BEGIN
"Line Amount" := "Line Amount" + (PurchCrMemoLine."Line Amount" / ExchangeFactor);
// Add the following line.
SetTaxBaseAmount(TempSalesTaxLine,PurchCrMemoLine."VAT Base Amount",ExchangeFactor,TRUE);
// End of the added line.
Quantity := Quantity + PurchCrMemoLine.Quantity;
IF PurchCrMemoLine."Tax Liable" THEN
"Tax Liable" := PurchCrMemoLine."Tax Liable";
InsertRec := FALSE;
... -
Ändern Sie den Code in der Funktion AddServiceLine Mehrwertsteuer berechnen Codeunit (398) wie folgt:
Vorhandener Code 1..."Round Tax" := TaxArea."Round Tax";
TaxJurisdiction.GET("Tax Jurisdiction Code");
"Is Report-to Jurisdiction" := ("Tax Jurisdiction Code" = TaxJurisdiction."Report-to Jurisdiction");
END;
// Delete the following line.
"Tax Base Amount" := (ServiceLine."Line Amount" - ServiceLine."Inv. Discount Amount") / ExchangeFactor;
// End of the deleted line.
"Line Amount" := ServiceLine."Line Amount" / ExchangeFactor;
"Tax Liable" := ServiceLine."Tax Liable";
Quantity := ServiceLine."Quantity (Base)";
"Invoice Discount Amount" := ServiceLine."Inv. Discount Amount";
...Neuer Code 1
..."Round Tax" := TaxArea."Round Tax";
TaxJurisdiction.GET("Tax Jurisdiction Code");
"Is Report-to Jurisdiction" := ("Tax Jurisdiction Code" = TaxJurisdiction."Report-to Jurisdiction");
END;
// Add the following line.
SetTaxBaseAmount(TempSalesTaxLine,ServiceLine."Line Amount" - ServiceLine."Inv. Discount Amount",ExchangeFactor,FALSE);
// End of the added line.
"Line Amount" := ServiceLine."Line Amount" / ExchangeFactor;
"Tax Liable" := ServiceLine."Tax Liable";
Quantity := ServiceLine."Quantity (Base)";
"Invoice Discount Amount" := ServiceLine."Inv. Discount Amount";
...Vorhandener Code 2
...END ELSE BEGIN
"Line Amount" := "Line Amount" + (ServiceLine."Line Amount" / ExchangeFactor);
IF ServiceLine."Tax Liable" THEN
"Tax Liable" := ServiceLine."Tax Liable";
// Delete the following line.
"Tax Base Amount" :=
"Tax Base Amount" + ((ServiceLine."Line Amount" - ServiceLine."Inv. Discount Amount") / ExchangeFactor);
// End of the deleted line.
"Tax Amount" := 0;
Quantity := Quantity + ServiceLine."Quantity (Base)";
"Invoice Discount Amount" := "Invoice Discount Amount" + ServiceLine."Inv. Discount Amount";
MODIFY;
...Neuer Code 2
...END ELSE BEGIN
"Line Amount" := "Line Amount" + (ServiceLine."Line Amount" / ExchangeFactor);
IF ServiceLine."Tax Liable" THEN
"Tax Liable" := ServiceLine."Tax Liable";
// Add the following line.
SetTaxBaseAmount(TempSalesTaxLine,ServiceLine."Line Amount" - ServiceLine."Inv. Discount Amount",ExchangeFactor,TRUE);
// End of the added line.
"Tax Amount" := 0;
Quantity := Quantity + ServiceLine."Quantity (Base)";
"Invoice Discount Amount" := "Invoice Discount Amount" + ServiceLine."Inv. Discount Amount";
MODIFY;
... -
Ändern Sie den Code in der Funktion AddServInvoiceLines Mehrwertsteuer berechnen Codeunit (398) wie folgt:
Vorhandener Code 1..."Is Report-to Jurisdiction" :=
("Tax Jurisdiction Code" = TaxJurisdiction."Report-to Jurisdiction");
END;
"Line Amount" := ServInvLine."Line Amount" / ExchangeFactor;
// Delete the following lines.
"Tax Base Amount" := ServInvLine."VAT Base Amount" / ExchangeFactor;
Quantity := ServInvLine.Quantity;
"Tax Liable" := ServInvLine."Tax Liable";
// End of the deleted line.
"Calculation Order" := TaxAreaLine."Calculation Order";
InsertRec := TRUE;
INSERT;
...Neuer Code 1
..."Is Report-to Jurisdiction" :=
("Tax Jurisdiction Code" = TaxJurisdiction."Report-to Jurisdiction");
END;
"Line Amount" := ServInvLine."Line Amount" / ExchangeFactor;
// Add the following lines.
SetTaxBaseAmount(TempSalesTaxLine,ServInvLine."VAT Base Amount",ExchangeFactor,FALSE);
Quantity := ServInvLine.Quantity;
"Tax Liable" := ServInvLine."Tax Liable";
// End of the added lines.
"Calculation Order" := TaxAreaLine."Calculation Order";
InsertRec := TRUE;
INSERT;
...Vorhandener Code 2
...InsertRec := TRUE;
INSERT;
END ELSE BEGIN
"Line Amount" := "Line Amount" + (ServInvLine."Line Amount" / ExchangeFactor);
// Delete the following line.
"Tax Base Amount" := "Tax Base Amount" + (ServInvLine."VAT Base Amount" / ExchangeFactor);
// End of the deleted line.
Quantity := Quantity + ServInvLine.Quantity;
IF ServInvLine."Tax Liable" THEN
"Tax Liable" := ServInvLine."Tax Liable";
InsertRec := FALSE;
...Neuer Code 2
...InsertRec := TRUE;
INSERT;
END ELSE BEGIN
"Line Amount" := "Line Amount" + (ServInvLine."Line Amount" / ExchangeFactor);
// Add the following line.
SetTaxBaseAmount(TempSalesTaxLine,ServInvLine."VAT Base Amount",ExchangeFactor,TRUE);
// End of the added line.
Quantity := Quantity + ServInvLine.Quantity;
IF ServInvLine."Tax Liable" THEN
"Tax Liable" := ServInvLine."Tax Liable";
InsertRec := FALSE;
... -
Ändern Sie den Code in der Funktion AddServCrMemoLines Mehrwertsteuer berechnen Codeunit (398) wie folgt:
Vorhandener Code 1..."Is Report-to Jurisdiction" :=
("Tax Jurisdiction Code" = TaxJurisdiction."Report-to Jurisdiction");
END;
"Line Amount" := ServCrMemoLine."Line Amount" / ExchangeFactor;
// Delete the following line.
"Tax Base Amount" := ServCrMemoLine."VAT Base Amount" / ExchangeFactor;
// End of the deleted line.
Quantity := ServCrMemoLine.Quantity;
"Tax Liable" := ServCrMemoLine."Tax Liable";
"Calculation Order" := TaxAreaLine."Calculation Order";
...Neuer Code 1
..."Is Report-to Jurisdiction" :=
("Tax Jurisdiction Code" = TaxJurisdiction."Report-to Jurisdiction");
END;
"Line Amount" := ServCrMemoLine."Line Amount" / ExchangeFactor;
// Add the following line.
SetTaxBaseAmount(TempSalesTaxLine,ServCrMemoLine."VAT Base Amount",ExchangeFactor,FALSE);
// End of the added line.
Quantity := ServCrMemoLine.Quantity;
"Tax Liable" := ServCrMemoLine."Tax Liable";
"Calculation Order" := TaxAreaLine."Calculation Order";
...Vorhandener Code 2
...InsertRec := TRUE;
INSERT;
END ELSE BEGIN
"Line Amount" := "Line Amount" + (ServCrMemoLine."Line Amount" / ExchangeFactor);
// Delete the following line.
"Tax Base Amount" := "Tax Base Amount" + (ServCrMemoLine."VAT Base Amount" / ExchangeFactor);
// End of the deleted line.
Quantity := Quantity + ServCrMemoLine.Quantity;
IF ServCrMemoLine."Tax Liable" THEN
"Tax Liable" := ServCrMemoLine."Tax Liable";
InsertRec := FALSE;
...Neuer Code 2
...InsertRec := TRUE;
INSERT;
END ELSE BEGIN
"Line Amount" := "Line Amount" + (ServCrMemoLine."Line Amount" / ExchangeFactor);
// Add the following line.
SetTaxBaseAmount(TempSalesTaxLine,ServCrMemoLine."VAT Base Amount",ExchangeFactor,TRUE);
// End of the added line.
Quantity := Quantity + ServCrMemoLine.Quantity;
IF ServCrMemoLine."Tax Liable" THEN
"Tax Liable" := ServCrMemoLine."Tax Liable";
InsertRec := FALSE;
... -
Fügen Sie eine Funktion SetTaxBaseAmount Mehrwertsteuer berechnen Codeunit (398) wie folgt:
LOCAL PROCEDURE SetTaxBaseAmount@1020031(VAR SalesTaxAmountLine@1020001 : Record 10011;Value@1020000 : Decimal;ExchangeFactor@1020002 : Decimal;Increment@1020003 : Boolean); BEGIN
WITH SalesTaxAmountLine DO BEGIN
IF Increment THEN
"Tax Base Amount FCY" += Value
ELSE
"Tax Base Amount FCY" := Value;
"Tax Base Amount" := "Tax Base Amount FCY" / ExchangeFactor;
END;
END;
Voraussetzungen
Sie müssen eines der folgenden Produkte verfügen, um diesen Hotfix installieren:
-
Die nordamerikanische Version von Microsoft Dynamics NAV 2009 R2
-
Die nordamerikanische Version des Service Pack 1 für Microsoft Dynamics NAV 2009
Informationen zur Deinstallation
Dieser Hotfix kann nicht entfernt werden.
Status
Microsoft hat bestätigt, dass es sich um ein Problem bei den Microsoft-Produkten handelt, die im Abschnitt „Eigenschaften“ aufgeführt sind.
Hinweis Dies ist ein im Schnellverfahren veröffentlichter Artikel, der direkt in der Microsoft Support-Organisation erstellt wurde. Die hierin enthaltenen Informationen werden ohne Mängelgewähr in Reaktion auf neue Probleme bereitgestellt. Aufgrund der schnellen Bereitstellung kann das Material möglicherweise typografische Fehler enthalten und jederzeit ohne vorherige Ankündigung geändert werden. Weitere Hinweise finden Sie unter Geschäftsbedingungen .
