Dieser Artikel bezieht sich auf Microsoft Dynamics NAV für das Gebietsschema spanisch (es).
Symptome
Angenommen, Sie haben hotfix 2547942 in Microsoft Dynamics NAV angewendet. Die spanische MwSt.-Erklärung 349 exportiert jedoch weiterhin die Beträge in der Währung, die im Dokument verwendet wird, und nicht in der lokalen Währung. Wenn ein Kunde oder ein Kreditor keinen Währungscode im Karte hat, aber ein Dokument einschließlich einer Währung gebucht wird, sind die in der 349-Erklärung exportierten Beträge falsch, da der exportierte Betrag in der Im Dokument verwendeten Währung und nicht in der lokalen Währung ist, die der Benutzer den Steuerbehörden melden muss.
Dieses Problem tritt in den folgenden Produkten auf:
- Microsoft Dynamics NAV 2013
- Microsoft Dynamics NAV 2009 R2
- Microsoft Dynamics NAV 2009 Service Pack 1
Lösung
Hotfixinformationen
Ein unterstützter Hotfix ist jetzt bei Microsoft verfügbar. Es dient jedoch nur zur Behebung des problems, das in diesem Artikel beschrieben wird. Wenden Sie sie nur auf Systeme an, bei denen dieses spezifische Problem auftritt. Dieser Hotfix erhält möglicherweise zusätzliche Tests. Wenn Sie von diesem Problem nicht stark betroffen sind, empfiehlt es sich daher, auf das nächste Microsoft Dynamics NAV 2013 Service Pack oder die nächste Microsoft Dynamics NAV-Version zu warten, die diesen Hotfix enthält.
Hinweis In besonderen Fällen können Gebühren, die normalerweise für Supportanrufe anfallen, storniert werden, wenn ein Technischer Supportmitarbeiter für Microsoft Dynamics und zugehörige Produkte feststellt, dass ihr Problem durch ein bestimmtes Update behoben wird. PLEASE DO NOT TRANSLATE. DOES NOT APPLY TO GERMAN.
Informationen zur Installation
Microsoft stellt Programmierbeispiele nur zur Veranschaulichung zur Verfügung, ohne ausdrückliche oder stillschweigende Garantie. Dies schließt die stillschweigende Gewährleistung der Marktgängigkeit oder der Eignung für einen bestimmten Zweck ein, ist aber nicht darauf beschränkt. In diesem Artikel wird davon ausgegangen, dass Sie mit der vorgestellten Programmiersprache und den Werkzeugen zum Erstellen und Debuggen von Prozeduren vertraut sind. Die Support-Techniker von Microsoft können Ihnen die Funktionalität eines bestimmten Verfahrens erklären. Sie werden diese Beispiele jedoch nicht ändern, um zusätzliche Funktionen bereitzustellen oder Verfahren zu konstruieren, die Ihren speziellen Anforderungen entsprechen.
Hinweis Überprüfen Sie vor der Installation dieses Hotfixs, ob alle Microsoft Navision-Clientbenutzer vom System abgemeldet sind. Dies schließt Microsoft Navision Application Services (NAS)-Clientbenutzer ein. Sie sollten der einzige Clientbenutzer sein, der angemeldet ist, wenn Sie diesen Hotfix implementieren.
Um diesen Hotfix implementieren zu können, benötigen Sie eine Entwicklerlizenz.
Es wird empfohlen, dem Benutzerkonto im Fenster Windows-Anmeldungen oder im Fenster Datenbankanmeldungen die Rollen-ID "SUPER" zuzuweisen. Wenn dem Benutzerkonto die Rollen-ID "SUPER" nicht zugewiesen werden kann, müssen Sie überprüfen, ob das Benutzerkonto über die folgenden Berechtigungen verfügt:
- Die Berechtigung Ändern für das Objekt, das Sie ändern.
- Die Execute-Berechtigung für das Systemobjekt-ID 5210-Objekt und für das Systemobjekt-ID 9015-Objekt.
Hinweis Sie benötigen keine Rechte für die Datenspeicher, es sei denn, Sie müssen eine Datenreparatur durchführen.
Codeänderungen
Hinweis Testen Sie Codekorrekturen immer in einer kontrollierten Umgebung, bevor Sie die Korrekturen auf Ihre Produktionscomputer anwenden.
Um dieses Problem zu beheben, ändern Sie den Code im Bericht Make 349 Declaration (10710). Führen Sie hierzu die folgenden Schritte aus:
Ändern Sie den Code in der GetPostedCountryLocCode-Funktion wie folgt:
Vorhandener Code 1... REPEAT IF SalesInvLines."Location Code" <> '' THEN BEGIN IF Location.GET(SalesInvLines."Location Code") THEN EUCountryLinesLocationCode := FindEUCountryRegionCode(Location."Country/Region Code"); IF EUCountryLinesLocationCode THEN BEGIN // Delete the following line. AmountToIncludeIn349 := AmountToIncludeIn349 + SalesInvLines.Amount; IF GetCountryfromLocation(SalesInvLines."Location Code") <> CountryCode THEN LocationDifferentCountryCode := TRUE; TempSalesInvLines := SalesInvLines; TempSalesInvLines.INSERT; END; ...Ersetzungscode 1
... REPEAT IF SalesInvLines."Location Code" <> '' THEN BEGIN IF Location.GET(SalesInvLines."Location Code") THEN EUCountryLinesLocationCode := FindEUCountryRegionCode(Location."Country/Region Code"); IF EUCountryLinesLocationCode THEN BEGIN // Add the following lines. AmountToIncludeIn349 += GetExportedAmountIn349(SalesInvHeader."Currency Code", SalesInvHeader."Currency Factor",SalesInvLines."Line Amount"); // End of the lines. IF GetCountryfromLocation(SalesInvLines."Location Code") <> CountryCode THEN LocationDifferentCountryCode := TRUE; TempSalesInvLines := SalesInvLines; TempSalesInvLines.INSERT; END; ...Vorhandener Code 2
... TempSalesInvLines.INSERT; END; END ELSE IF CompInforShipToCountryCode THEN BEGIN EUCountryLinesLocationCode := TRUE; // Delete the following line. AmountToIncludeIn349 := AmountToIncludeIn349 + SalesInvLines.Amount; TempSalesInvLines := SalesInvLines; TempSalesInvLines.INSERT; END; UNTIL SalesInvLines.NEXT = 0; END; ...Ersetzungscode 2
... TempSalesInvLines.INSERT; END; END ELSE IF CompInforShipToCountryCode THEN BEGIN EUCountryLinesLocationCode := TRUE; // Add the following lines. AmountToIncludeIn349 += GetExportedAmountIn349(SalesInvHeader."Currency Code", SalesInvHeader."Currency Factor",SalesInvLines."Line Amount"); // End of the lines. TempSalesInvLines := SalesInvLines; TempSalesInvLines.INSERT; END; UNTIL SalesInvLines.NEXT = 0; END; ...Vorhandener Code 3
... REPEAT IF PurchInvLines."Location Code" <> '' THEN BEGIN IF Location.GET(PurchInvLines."Location Code") THEN EUCountryLinesLocationCode := FindEUCountryRegionCode(Location."Country/Region Code"); IF EUCountryLinesLocationCode THEN BEGIN // Delete the following line. AmountToIncludeIn349 := AmountToIncludeIn349 + PurchInvLines.Amount; IF GetCountryfromLocation(PurchInvLines."Location Code") <> CountryCode THEN LocationDifferentCountryCode := TRUE; TempPurchInvLines := PurchInvLines; TempPurchInvLines.INSERT; END; ...Ersatzcode 3
... REPEAT IF PurchInvLines."Location Code" <> '' THEN BEGIN IF Location.GET(PurchInvLines."Location Code") THEN EUCountryLinesLocationCode := FindEUCountryRegionCode(Location."Country/Region Code"); IF EUCountryLinesLocationCode THEN BEGIN // Add the following lines. AmountToIncludeIn349 += GetExportedAmountIn349(PurchInvHeader."Currency Code", PurchInvHeader."Currency Factor",PurchInvLines."Line Amount"); // End of the lines. IF GetCountryfromLocation(PurchInvLines."Location Code") <> CountryCode THEN LocationDifferentCountryCode := TRUE; TempPurchInvLines := PurchInvLines; TempPurchInvLines.INSERT; END; ...Vorhandener Code 4
... TempPurchInvLines.INSERT; END; END ELSE IF CompInforShipToCountryCode THEN BEGIN EUCountryLinesLocationCode := TRUE; // Delete the following line. AmountToIncludeIn349 := AmountToIncludeIn349 + PurchInvLines.Amount; TempPurchInvLines := PurchInvLines; TempPurchInvLines.INSERT; END; UNTIL PurchInvLines.NEXT = 0; END; ...Ersatzcode 4
... TempPurchInvLines.INSERT; END; END ELSE IF CompInforShipToCountryCode THEN BEGIN EUCountryLinesLocationCode := TRUE; // Add the following lines. AmountToIncludeIn349 += GetExportedAmountIn349(PurchInvHeader."Currency Code", PurchInvHeader."Currency Factor",PurchInvLines."Line Amount"); // End of the lines. TempPurchInvLines := PurchInvLines; TempPurchInvLines.INSERT; END; UNTIL PurchInvLines.NEXT = 0; END; ...Ändern Sie den Code in der Funktion GetExportedAmountIn349 wie folgt:
Vorhandener Code... BEGIN IF DeliveryOperationCode = DeliveryOperationCode::" " THEN DeliveryOperationCode := DeliveryOperationCode::E; END; BEGIN END. } RDLDATA { ...Ersetzungscode
... BEGIN IF DeliveryOperationCode = DeliveryOperationCode::" " THEN DeliveryOperationCode := DeliveryOperationCode::E; END; // Add the following lines. LOCAL PROCEDURE GetExportedAmountIn349@1100014(CurrencyCode@1100008 : Code[20];CurrencyFactor@1100009 : Decimal;LineAmount@1100010 : Decimal) : Decimal; VAR Currency@1100001 : Record 4; BEGIN IF CurrencyCode <> '' THEN BEGIN Currency.GET(CurrencyCode); EXIT(ROUND(LineAmount / CurrencyFactor,Currency."Amount Rounding Precision")) END; EXIT(LineAmount); END; // End of the lines. BEGIN END. } RDLDATA { ...
Voraussetzungen
Sie müssen eines der folgenden Produkte installiert haben, um diesen Hotfix anwenden zu können:
- Microsoft Dynamics NAV 2013
- Microsoft Dynamics NAV 2009 R2
- Microsoft Dynamics NAV 2009 Service Pack 1
Informationen zur Deinstallation
Sie können diesen Hotfix nicht entfernen.
Status
Microsoft hat bestätigt, dass dies ein Problem bei den Microsoft-Produkten ist, die im Abschnitt „Gilt für“ aufgeführt sind.
Hinweis: Dies ist ein Artikel vom Typ "SCHNELL VERÖFFENTLICHEN", der direkt in der Microsoft-Supportorganisation erstellt wurde. Die Informationen in diesem Artikel werden ohne Gewähr als Reaktion auf auftretende Probleme bereitgestellt. Aufgrund ihrer schnellen Bereitstellung können sie typografische Fehler enthalten und jederzeit ohne vorherige Ankündigung geändert werden. Andere Überlegungen finden Sie unter Nutzungsbedingungen.