Das Feld "Vorauszahlung Amt ohne Mehrwertsteuer" wird falsch berechnet, nachdem Sie den Wert "Vorauszahlung %" in einer Bestellung geändert haben, obwohl Sie Hotfix-2558516 in Microsoft Dynamics NAV 2009 anwenden.

Gilt für
Microsoft Dynamics NAV 2009 R2 Dynamics NAV 2009 Service Pack 1

Dieser Artikel gilt für Microsoft Dynamics NAV für alle Länder und gebietsschemas aller Sprachen.

Symptome

Betrachten Sie das folgende Szenario in Microsoft Dynamics NAV 2009:

  • Sie wenden Hotfix-2558516 an.
      Weitere Informationen finden Sie im folgenden Artikel der Microsoft Knowledge Base:
    2558516 Das Feld "Vorauszahlung Amt ohne Mehrwertsteuer" wird falsch berechnet, nachdem Sie den Wert "Vorauszahlung %" in einer Bestellung in Microsoft Dynamics NAV 2009 geändert haben.
  • Sie buchen eine Vorauszahlungsrechnung für eine Bestellung, für die das Feld Vorauszahlung % angegeben ist.
  • Sie versenden teilweise und stellen einige Einheiten für die Bestellung in Rechnung.
  • Sie öffnen die Bestellung erneut.
  • Sie ändern den Wert %der Vorauszahlung in der Bestellung.

In diesem Szenario wird das Feld Vorauszahlung Amt ohne MwSt. falsch berechnet.
Dieses Problem tritt in den folgenden Produkten auf:

  • Microsoft Dynamics NAV 2009 R2
  • Microsoft Dynamics NAV 2009 Service Pack 1 (SP1)

      

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 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 Microsoft Support-Spezialisten können bei der Erläuterung der Funktionalität bestimmter Prozeduren helfen, jedoch werden sie diese Beispiele nicht in Bezug auf eine erweiterte Funktionalität verändern, noch werden sie Prozeduren entwickeln, die auf Ihre besonderen Bedürfnisse zugeschnitten sind.

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.
Gehen Sie wie folgt vor, um das Problem zu beheben:

  1. Ändern Sie den Code in der UpdateAmounts-Funktion in der Sales Line-Tabelle (37) wie folgt:
    Vorhandener Code

    ...
    FIELDERROR("Unit Price",STRSUBSTNO(Text047,FIELDCAPTION("Prepayment %")));
    END;
    IF SalesHeader."Document Type" <> SalesHeader."Document Type"::Invoice THEN BEGIN
    "Prepayment VAT Difference" := 0;
    
    // Delete the following lines.
    IF "Quantity Invoiced" = 0 THEN BEGIN
    "Prepmt. Line Amount" := ROUND("Line Amount" * "Prepayment %" / 100,Currency."Amount Rounding Precision");
    IF "Prepmt. Line Amount" < "Prepmt. Amt. Inv." THEN
    FIELDERROR("Prepmt. Line Amount",STRSUBSTNO(Text049,"Prepmt. Amt. Inv."));
    END ELSE BEGIN
    IF "Prepayment %" <> 0 THEN
    "Prepmt. Line Amount" := "Prepmt. Amt. Inv." +
    ROUND("Line Amount" * (Quantity - "Quantity Invoiced") / Quantity * "Prepayment %" / 100,
    Currency."Amount Rounding Precision")
    ELSE
    "Prepmt. Line Amount" := ROUND("Line Amount" * "Prepayment %" / 100,Currency."Amount Rounding Precision");
    IF "Prepmt. Line Amount" > "Line Amount" THEN
    FIELDERROR("Prepmt. Line Amount",STRSUBSTNO(Text049,"Prepmt. Line Amount"));
    END;
    // End of the lines.
    
    END;
    InitOutstandingAmount;
    IF (CurrFieldNo <> 0) AND
    NOT ((Type = Type::Item) AND (CurrFieldNo = FIELDNO("No.")) AND (Quantity <> 0) AND
    ...
    

    Ersetzungscode

    ...
    FIELDERROR("Unit Price",STRSUBSTNO(Text047,FIELDCAPTION("Prepayment %")));
    END;
    IF SalesHeader."Document Type" <> SalesHeader."Document Type"::Invoice THEN BEGIN
    "Prepayment VAT Difference" := 0;
    
    // Add the following lines.
    "Prepmt. Line Amount" := ROUND("Line Amount" * "Prepayment %" / 100,Currency."Amount Rounding Precision");
    IF "Prepmt. Line Amount" < "Prepmt. Amt. Inv." THEN
    FIELDERROR("Prepmt. Line Amount",STRSUBSTNO(Text049,"Prepmt. Amt. Inv."));
    // End of the lines.
    
    END;
    InitOutstandingAmount;
    IF (CurrFieldNo <> 0) AND
    NOT ((Type = Type::Item) AND (CurrFieldNo = FIELDNO("No.")) AND (Quantity <> 0) AND
    ...
    
  2. Ändern Sie den Code in der UpdateAmounts-Funktion in der Einkaufszeilentabelle (39) wie folgt:
    Vorhandener Code

    ...
    FIELDERROR("Direct Unit Cost",STRSUBSTNO(Text043,FIELDCAPTION("Prepayment %")));
    END;
    IF PurchHeader."Document Type" <> PurchHeader."Document Type"::Invoice THEN BEGIN
    "Prepayment VAT Difference" := 0;
    
    // Delete the following lines.
    IF "Quantity Invoiced" = 0 THEN BEGIN
    "Prepmt. Line Amount" := ROUND("Line Amount" * "Prepayment %" / 100,Currency."Amount Rounding Precision");
    IF "Prepmt. Line Amount" < "Prepmt. Amt. Inv." THEN
    FIELDERROR("Prepmt. Line Amount",STRSUBSTNO(Text037,"Prepmt. Amt. Inv."));
    END ELSE BEGIN
    IF "Prepayment %" <> 0 THEN
    "Prepmt. Line Amount" := "Prepmt. Amt. Inv." +
    ROUND("Line Amount" * (Quantity - "Quantity Invoiced") / Quantity * "Prepayment %" / 100,
    Currency."Amount Rounding Precision")
    ELSE
    "Prepmt. Line Amount" := ROUND("Line Amount" * "Prepayment %" / 100,Currency."Amount Rounding Precision");
    IF "Prepmt. Line Amount" > "Line Amount" THEN
    FIELDERROR("Prepmt. Line Amount",STRSUBSTNO(Text037,"Prepmt. Line Amount"));
    END;
    // End of the lines.
    
    END;
    IF PurchHeader.Status = PurchHeader.Status::Released THEN
    UpdateVATAmounts;
    ...
    

    Ersetzungscode

    ...
    FIELDERROR("Direct Unit Cost",STRSUBSTNO(Text043,FIELDCAPTION("Prepayment %")));
    END;
    IF PurchHeader."Document Type" <> PurchHeader."Document Type"::Invoice THEN BEGIN
    "Prepayment VAT Difference" := 0;
    
    // Add the following lines.
    "Prepmt. Line Amount" := ROUND("Line Amount" * "Prepayment %" / 100,Currency."Amount Rounding Precision");
    IF "Prepmt. Line Amount" < "Prepmt. Amt. Inv." THEN
    FIELDERROR("Prepmt. Line Amount",STRSUBSTNO(Text037,"Prepmt. Amt. Inv."));
    // End of the lines.
    
    END;
    IF PurchHeader.Status = PurchHeader.Status::Released THEN
    UpdateVATAmounts;
    ...
    
  3. Ändern Sie den Code in der Funktion Code in Sales-Post Codeunit (442) wie folgt:
    Vorhandener Code

    ...
    REPEAT
    IF SalesLine."Prepmt. Line Amount" <> SalesLine."Prepmt. Amt. Inv." THEN BEGIN
    SalesLine."Prepmt. Amt. Inv." := SalesLine."Prepmt. Line Amount";
    SalesLine."Prepmt. Amount Inv. Incl. VAT" := SalesLine."Prepmt. Amt. Incl. VAT";
    
    // Delete the following line.
    SalesLine.CalcPrepaymentToDeduct;
    
    SalesLine."Prepmt VAT Diff. to Deduct" :=
    SalesLine."Prepmt VAT Diff. to Deduct" + SalesLine."Prepayment VAT Difference";
    SalesLine."Prepayment VAT Difference" := 0;
    SalesLine.MODIFY;
    ...
    

    Ersetzungscode

    ...
    REPEAT
    IF SalesLine."Prepmt. Line Amount" <> SalesLine."Prepmt. Amt. Inv." THEN BEGIN
    SalesLine."Prepmt. Amt. Inv." := SalesLine."Prepmt. Line Amount";
    SalesLine."Prepmt. Amount Inv. Incl. VAT" := SalesLine."Prepmt. Amt. Incl. VAT";
    
    // Add the following line.
    SalesLine."Prepmt Amt to Deduct" := SalesLine."Prepmt. Amt. Inv." - SalesLine."Prepmt Amt Deducted";
    
    SalesLine."Prepmt VAT Diff. to Deduct" :=
    SalesLine."Prepmt VAT Diff. to Deduct" + SalesLine."Prepayment VAT Difference";
    SalesLine."Prepayment VAT Difference" := 0;
    SalesLine.MODIFY;
    ...
    
  4. Ändern Sie den Code in der Codefunktion in Purchase-Post Codeunit (444) wie folgt:
    Vorhandener Code

    ...
    REPEAT
    IF PurchLine."Prepmt. Line Amount" <> PurchLine."Prepmt. Amt. Inv." THEN BEGIN
    PurchLine."Prepmt. Amt. Inv." := PurchLine."Prepmt. Line Amount";
    PurchLine."Prepmt. Amount Inv. Incl. VAT" := PurchLine."Prepmt. Amt. Incl. VAT";
    
    // Delete the following line.
    PurchLine.CalcPrepaymentToDeduct;
    
    PurchLine."Prepmt VAT Diff. to Deduct" :=
    PurchLine."Prepmt VAT Diff. to Deduct" + PurchLine."Prepayment VAT Difference";
    PurchLine."Prepayment VAT Difference" := 0;
    PurchLine.MODIFY;
    ...
    

    Ersetzungscode

    ...
    REPEAT
    IF PurchLine."Prepmt. Line Amount" <> PurchLine."Prepmt. Amt. Inv." THEN BEGIN
    PurchLine."Prepmt. Amt. Inv." := PurchLine."Prepmt. Line Amount";
    PurchLine."Prepmt. Amount Inv. Incl. VAT" := PurchLine."Prepmt. Amt. Incl. VAT";
    
    // Add the following line.
    PurchLine."Prepmt Amt to Deduct" := PurchLine."Prepmt. Amt. Inv." - PurchLine."Prepmt Amt Deducted";
    
    PurchLine."Prepmt VAT Diff. to Deduct" :=
    PurchLine."Prepmt VAT Diff. to Deduct" + PurchLine."Prepayment VAT Difference";
    PurchLine."Prepayment VAT Difference" := 0;
    PurchLine.MODIFY;
    ...
    

Voraussetzungen

Sie müssen eines der folgenden Produkte installiert haben, um diesen Hotfix anwenden zu können:

  • Microsoft Dynamics NAV 2009 R2
  • Microsoft Dynamics NAV 2009 Service Pack 1 (SP1)

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.