Nesprávný účet hlavní knihy se použije, když zaúčtujete platbu k vyrovnání faktury, kde byla použita "Plná DPH", pokud je povoleno nastavení "Upravit o slevu za platbu" ve formuláři "Nastavení hlavní knihy" v aplikaci Microsoft Dynamics NAV 2009

Platí pro
Dynamics NAV 2009 Dynamics NAV 2009 Service Pack 1

Rychle publikované články poskytují informace přímo od organizace podpory Microsoftu. Zde obsažené informace jsou vytvářeny jako reakce na nová nebo jedinečná témata nebo jsou určeny k doplnění dalších informací znalostní báze Knowledge Base.

Tento článek platí pro Microsoft Dynamics NAV pro všechny země a všechna jazyková národní prostředí.

Příznaky

Předpokládejme, že zaškrtávací políčko Úprava platební slevy je zaškrtnuto na kartě Obecné ve formuláři Nastavení hlavní knihy v aplikaci Microsoft Dynamics NAV 2009. Pokud zaúčtujete platbu za účelem uplatnění faktury, kde byla použita "Plná DPH", a odečtete slevu z platby, kde musíte upravit DPH o slevu pro platbu, použije se nesprávný účet hlavní knihy. Položka pro úpravu "Plná DPH" je zaregistrována pro debetní účet slevy z platby místo účtu pro zvýhodněnou platbu v položkách hlavní knihy.

Ř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 na další verzi, která obsahuje tuto opravu hotfix.

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í.

Chcete-li nainstalovat tuto opravu hotfix, změňte kód v gen. Jnl.-Post Line kódová jednotka (12).

Postupujte takto:

  1. Následujícím způsobem změňte kód ve funkci PostDtldCustLedgEnts:
    Existující kód 1

    …
                          GenPostingSetup.GET(
                            DtldCVLedgEntryBuf."Gen. Bus. Posting Group",
                            DtldCVLedgEntryBuf."Gen. Prod. Posting Group");
                          IF (DtldCVLedgEntryBuf."Amount (LCY)" <= 0) THEN BEGIN
                            GenPostingSetup.TESTFIELD("Sales Pmt. Disc. Debit Acc.");
                            PaymentDiscAcc := GenPostingSetup."Sales Pmt. Disc. Debit Acc.";
                          END ELSE BEGIN
    …
    
    

    Náhradní kód 1

    …
                          GenPostingSetup.GET(
                            DtldCVLedgEntryBuf."Gen. Bus. Posting Group",
                            DtldCVLedgEntryBuf."Gen. Prod. Posting Group");
                          IF (DtldCVLedgEntryBuf."Amount (LCY)" <= 0) AND
                             (DtldCVLedgEntryBuf."VAT Amount (LCY)" <= 0)
                          THEN BEGIN
                            GenPostingSetup.TESTFIELD("Sales Pmt. Disc. Debit Acc.");
                            PaymentDiscAcc := GenPostingSetup."Sales Pmt. Disc. Debit Acc.";
                          END ELSE BEGIN
    …
    
    

    Existující kód 2

    …
                          IF GLSetup."Payment Tolerance Posting" =
                            GLSetup."Payment Tolerance Posting"::"Payment Tolerance Accounts"
                          THEN BEGIN
                            IF (DtldCVLedgEntryBuf."Amount (LCY)" <= 0) THEN BEGIN
                              GenPostingSetup.TESTFIELD("Sales Pmt. Tol. Debit Acc.");
                              PaymentTolAcc := GenPostingSetup."Sales Pmt. Tol. Debit Acc.";
                            END ELSE BEGIN
    …
    
    

    Náhradní kód 2

    …
                          IF GLSetup."Payment Tolerance Posting" =
                            GLSetup."Payment Tolerance Posting"::"Payment Tolerance Accounts"
                          THEN BEGIN
                            IF (DtldCVLedgEntryBuf."Amount (LCY)" <= 0) AND
                               (DtldCVLedgEntryBuf."VAT Amount (LCY)" <= 0)
                            THEN BEGIN
                              GenPostingSetup.TESTFIELD("Sales Pmt. Tol. Debit Acc.");
                              PaymentTolAcc := GenPostingSetup."Sales Pmt. Tol. Debit Acc.";
                            END ELSE BEGIN
    …
    
    

    Existující kód 3

    …
                          END ELSE IF GLSetup."Payment Tolerance Posting" =
                            GLSetup."Payment Tolerance Posting"::"Payment Discount Accounts"
                          THEN BEGIN
                            IF (DtldCVLedgEntryBuf."Amount (LCY)" <= 0) THEN BEGIN
                              GenPostingSetup.TESTFIELD("Sales Pmt. Disc. Debit Acc.");
                              PaymentTolAcc := GenPostingSetup."Sales Pmt. Disc. Debit Acc.";
                            END ELSE BEGIN
    …
    
    

    Náhradní kód 3

    …
                          END ELSE IF GLSetup."Payment Tolerance Posting" =
                            GLSetup."Payment Tolerance Posting"::"Payment Discount Accounts"
                          THEN BEGIN
                            IF (DtldCVLedgEntryBuf."Amount (LCY)" <= 0) AND
                               (DtldCVLedgEntryBuf."VAT Amount (LCY)" <= 0)
                            THEN BEGIN
                              GenPostingSetup.TESTFIELD("Sales Pmt. Disc. Debit Acc.");
                              PaymentTolAcc := GenPostingSetup."Sales Pmt. Disc. Debit Acc.";
                            END ELSE BEGIN
    …
    
    

    Existující kód 4

    …
                          IF GLSetup."Pmt. Disc. Tolerance Posting" =
                            GLSetup."Pmt. Disc. Tolerance Posting"::"Payment Tolerance Accounts"
                          THEN BEGIN
                            IF (DtldCVLedgEntryBuf."Amount (LCY)" <= 0) THEN BEGIN
                              GenPostingSetup.TESTFIELD("Sales Pmt. Tol. Debit Acc.");
                              PaymentTolAcc := GenPostingSetup."Sales Pmt. Tol. Debit Acc.";
                            END ELSE BEGIN
    …
    
    

    Náhradní kód 4

    …
                          IF GLSetup."Pmt. Disc. Tolerance Posting" =
                            GLSetup."Pmt. Disc. Tolerance Posting"::"Payment Tolerance Accounts"
                          THEN BEGIN
                            IF (DtldCVLedgEntryBuf."Amount (LCY)" <= 0) AND
                               (DtldCVLedgEntryBuf."VAT Amount (LCY)" <= 0)
                            THEN BEGIN
                              GenPostingSetup.TESTFIELD("Sales Pmt. Tol. Debit Acc.");
                              PaymentTolAcc := GenPostingSetup."Sales Pmt. Tol. Debit Acc.";
                            END ELSE BEGIN
    …
    
    

    Existující kód 5

    …
                          END ELSE IF GLSetup."Pmt. Disc. Tolerance Posting" =
                            GLSetup."Pmt. Disc. Tolerance Posting"::"Payment Discount Accounts"
                          THEN BEGIN
                            IF (DtldCVLedgEntryBuf."Amount (LCY)" <= 0) THEN BEGIN
                              GenPostingSetup.TESTFIELD("Sales Pmt. Disc. Debit Acc.");
                              PaymentTolAcc := GenPostingSetup."Sales Pmt. Disc. Debit Acc.";
                            END ELSE BEGIN
    …
    
    

    Náhradní kód 5

    …
                          END ELSE IF GLSetup."Pmt. Disc. Tolerance Posting" =
                            GLSetup."Pmt. Disc. Tolerance Posting"::"Payment Discount Accounts"
                          THEN BEGIN
                            IF (DtldCVLedgEntryBuf."Amount (LCY)" <= 0) AND
                               (DtldCVLedgEntryBuf."VAT Amount (LCY)" <= 0)
                            THEN BEGIN
                              GenPostingSetup.TESTFIELD("Sales Pmt. Disc. Debit Acc.");
                              PaymentTolAcc := GenPostingSetup."Sales Pmt. Disc. Debit Acc.";
                            END ELSE BEGIN
    …
    
    
  2. Následujícím způsobem změňte kód ve funkci AutoEntrForDtldCustLedgEnts:
    Existující kód 1

    …
                  GenPostingSetup.GET(
                    DtldCVLedgEntryBuf."Gen. Bus. Posting Group",
                    DtldCVLedgEntryBuf."Gen. Prod. Posting Group");
                  IF DtldCVLedgEntryBuf."Amount (LCY)" > 0 THEN BEGIN
                    GenPostingSetup.TESTFIELD("Sales Pmt. Disc. Debit Acc.");
                    AccNo := GenPostingSetup."Sales Pmt. Disc. Debit Acc.";
                  END ELSE BEGIN
    …
    
    

    Náhradní kód 1

    …
                  GenPostingSetup.GET(
                    DtldCVLedgEntryBuf."Gen. Bus. Posting Group",
                    DtldCVLedgEntryBuf."Gen. Prod. Posting Group");
                  IF (DtldCVLedgEntryBuf."Amount (LCY)" > 0) OR
                     (DtldCVLedgEntryBuf."VAT Amount (LCY)" > 0)
                  THEN BEGIN
                    GenPostingSetup.TESTFIELD("Sales Pmt. Disc. Debit Acc.");
                    AccNo := GenPostingSetup."Sales Pmt. Disc. Debit Acc.";
                  END ELSE BEGIN
    …
    
    
    

    Existující kód 2

    …
                    DtldCVLedgEntryBuf."Gen. Prod. Posting Group");
                  CASE GLSetup."Payment Tolerance Posting" OF
                    GLSetup."Payment Tolerance Posting"::"Payment Tolerance Accounts":
                      IF DtldCVLedgEntryBuf."Amount (LCY)" > 0 THEN BEGIN
                        GenPostingSetup.TESTFIELD("Sales Pmt. Tol. Debit Acc.");
                        AccNo := GenPostingSetup."Sales Pmt. Tol. Debit Acc.";
                      END ELSE BEGIN
    …
    
    

    Náhradní kód 2

    …
                    DtldCVLedgEntryBuf."Gen. Prod. Posting Group");
                  CASE GLSetup."Payment Tolerance Posting" OF
                    GLSetup."Payment Tolerance Posting"::"Payment Tolerance Accounts":
                      IF (DtldCVLedgEntryBuf."Amount (LCY)" > 0) OR
                         (DtldCVLedgEntryBuf."VAT Amount (LCY)" > 0)
                      THEN BEGIN
                        GenPostingSetup.TESTFIELD("Sales Pmt. Tol. Debit Acc.");
                        AccNo := GenPostingSetup."Sales Pmt. Tol. Debit Acc.";
                      END ELSE BEGIN
    …
    
    

    Existující kód 3

     …
                        AccNo := GenPostingSetup."Sales Pmt. Tol. Credit Acc.";
                      END;
                    GLSetup."Payment Tolerance Posting"::"Payment Discount Accounts":
                      IF DtldCVLedgEntryBuf."Amount (LCY)" > 0 THEN BEGIN
                        GenPostingSetup.TESTFIELD("Sales Pmt. Disc. Debit Acc.");
                        AccNo := GenPostingSetup."Sales Pmt. Disc. Debit Acc.";
                      END ELSE BEGIN
    …
    
    

    Náhradní kód 3

    …
                        AccNo := GenPostingSetup."Sales Pmt. Tol. Credit Acc.";
                      END;
                    GLSetup."Payment Tolerance Posting"::"Payment Discount Accounts":
                      IF (DtldCVLedgEntryBuf."Amount (LCY)" > 0) OR
                         (DtldCVLedgEntryBuf."VAT Amount (LCY)" > 0)
                      THEN BEGIN
                        GenPostingSetup.TESTFIELD("Sales Pmt. Disc. Debit Acc.");
                        AccNo := GenPostingSetup."Sales Pmt. Disc. Debit Acc.";
                      END ELSE BEGIN
    …
    
    
    

    Existující kód 4

    …
                    DtldCVLedgEntryBuf."Gen. Prod. Posting Group");
                  CASE GLSetup."Pmt. Disc. Tolerance Posting" OF
                    GLSetup."Pmt. Disc. Tolerance Posting"::"Payment Tolerance Accounts":
                      IF DtldCVLedgEntryBuf."Amount (LCY)" > 0 THEN BEGIN
                        GenPostingSetup.TESTFIELD("Sales Pmt. Tol. Debit Acc.");
                        AccNo := GenPostingSetup."Sales Pmt. Tol. Debit Acc.";
                      END ELSE BEGIN
    …
    
    

    Náhradní kód 4

    …
                    DtldCVLedgEntryBuf."Gen. Prod. Posting Group");
                  CASE GLSetup."Pmt. Disc. Tolerance Posting" OF
                    GLSetup."Pmt. Disc. Tolerance Posting"::"Payment Tolerance Accounts":
                      IF (DtldCVLedgEntryBuf."Amount (LCY)" > 0) OR
                         (DtldCVLedgEntryBuf."VAT Amount (LCY)" > 0)
                      THEN BEGIN
                        GenPostingSetup.TESTFIELD("Sales Pmt. Tol. Debit Acc.");
                        AccNo := GenPostingSetup."Sales Pmt. Tol. Debit Acc.";
                      END ELSE BEGIN
    …
    
    
    

    Existující kód 5

    …
                        AccNo := GenPostingSetup."Sales Pmt. Tol. Credit Acc.";
                      END;
                    GLSetup."Pmt. Disc. Tolerance Posting"::"Payment Discount Accounts":
                      IF DtldCVLedgEntryBuf."Amount (LCY)" > 0 THEN BEGIN
                        GenPostingSetup.TESTFIELD("Sales Pmt. Disc. Debit Acc.");
                        AccNo := GenPostingSetup."Sales Pmt. Disc. Debit Acc.";
                      END ELSE BEGIN
    …
    
    
    

    Náhradní kód 5

    …
                        AccNo := GenPostingSetup."Sales Pmt. Tol. Credit Acc.";
                      END;
                    GLSetup."Pmt. Disc. Tolerance Posting"::"Payment Discount Accounts":
                      IF (DtldCVLedgEntryBuf."Amount (LCY)" > 0) OR
                         (DtldCVLedgEntryBuf."VAT Amount (LCY)" > 0)
                      THEN BEGIN
                        GenPostingSetup.TESTFIELD("Sales Pmt. Disc. Debit Acc.");
                        AccNo := GenPostingSetup."Sales Pmt. Disc. Debit Acc.";
                      END ELSE BEGIN
    …
    
    
    
    
    
  3. Následujícím způsobem změňte kód ve funkci PostDtldVendLedgEnts:
    Existující kód 1

    …
                          GenPostingSetup.GET(
                            DtldCVLedgEntryBuf."Gen. Bus. Posting Group",
                            DtldCVLedgEntryBuf."Gen. Prod. Posting Group");
                          IF (DtldCVLedgEntryBuf."Amount (LCY)" <= 0) THEN BEGIN
                            GenPostingSetup.TESTFIELD("Purch. Pmt. Disc. Debit Acc.");
                            PaymentDiscAcc := GenPostingSetup."Purch. Pmt. Disc. Debit Acc.";
                          END ELSE BEGIN
    …
    
    

    Náhradní kód 1

    …
                          GenPostingSetup.GET(
                            DtldCVLedgEntryBuf."Gen. Bus. Posting Group",
                            DtldCVLedgEntryBuf."Gen. Prod. Posting Group");
                          IF (DtldCVLedgEntryBuf."Amount (LCY)" <= 0) AND
                             (DtldCVLedgEntryBuf."VAT Amount (LCY)" <= 0)
                          THEN BEGIN
                            GenPostingSetup.TESTFIELD("Purch. Pmt. Disc. Debit Acc.");
                            PaymentDiscAcc := GenPostingSetup."Purch. Pmt. Disc. Debit Acc.";
                          END ELSE BEGIN
    …
    
    

    Existující kód 2

    …
                          IF GLSetup."Payment Tolerance Posting" =
                            GLSetup."Payment Tolerance Posting"::"Payment Tolerance Accounts"
                          THEN BEGIN
                            IF (DtldCVLedgEntryBuf."Amount (LCY)" <= 0) THEN BEGIN
                              GenPostingSetup.TESTFIELD("Purch. Pmt. Tol. Debit Acc.");
                              PaymentTolAcc := GenPostingSetup."Purch. Pmt. Tol. Debit Acc.";
                            END ELSE BEGIN
    …
    
    

    Náhradní kód 2

    …
                          IF GLSetup."Payment Tolerance Posting" =
                            GLSetup."Payment Tolerance Posting"::"Payment Tolerance Accounts"
                          THEN BEGIN
                            IF (DtldCVLedgEntryBuf."Amount (LCY)" <= 0) AND
                               (DtldCVLedgEntryBuf."VAT Amount (LCY)" <= 0)
                            THEN BEGIN
                              GenPostingSetup.TESTFIELD("Purch. Pmt. Tol. Debit Acc.");
                              PaymentTolAcc := GenPostingSetup."Purch. Pmt. Tol. Debit Acc.";
                            END ELSE BEGIN
    …
    
    

    Existující kód 3

    …
                          END ELSE IF GLSetup."Payment Tolerance Posting" =
                            GLSetup."Payment Tolerance Posting"::"Payment Discount Accounts"
                          THEN BEGIN
                            IF (DtldCVLedgEntryBuf."Amount (LCY)" <= 0) THEN BEGIN
                              GenPostingSetup.TESTFIELD("Purch. Pmt. Disc. Debit Acc.");
                              PaymentTolAcc := GenPostingSetup."Purch. Pmt. Disc. Debit Acc.";
                            END ELSE BEGIN
    …
    
    

    Náhradní kód 3

    …
                          END ELSE IF GLSetup."Payment Tolerance Posting" =
                            GLSetup."Payment Tolerance Posting"::"Payment Discount Accounts"
                          THEN BEGIN
                            IF (DtldCVLedgEntryBuf."Amount (LCY)" <= 0) AND
                               (DtldCVLedgEntryBuf."VAT Amount (LCY)" <= 0)
                            THEN BEGIN
                              GenPostingSetup.TESTFIELD("Purch. Pmt. Disc. Debit Acc.");
                              PaymentTolAcc := GenPostingSetup."Purch. Pmt. Disc. Debit Acc.";
                            END ELSE BEGIN
    …
    
    

    Existující kód 4

    …
                          IF GLSetup."Pmt. Disc. Tolerance Posting" =
                            GLSetup."Pmt. Disc. Tolerance Posting"::"Payment Tolerance Accounts"
                          THEN BEGIN
                            IF (DtldCVLedgEntryBuf."Amount (LCY)" <= 0) THEN BEGIN
                              GenPostingSetup.TESTFIELD("Purch. Pmt. Tol. Debit Acc.");
                              PaymentTolAcc := GenPostingSetup."Purch. Pmt. Tol. Debit Acc.";
                            END ELSE BEGIN
    …
    
    

    Náhradní kód 4

    …
                          IF GLSetup."Pmt. Disc. Tolerance Posting" =
                            GLSetup."Pmt. Disc. Tolerance Posting"::"Payment Tolerance Accounts"
                          THEN BEGIN
                            IF (DtldCVLedgEntryBuf."Amount (LCY)" <= 0) AND
                               (DtldCVLedgEntryBuf."VAT Amount (LCY)" <= 0)
                            THEN BEGIN
                              GenPostingSetup.TESTFIELD("Purch. Pmt. Tol. Debit Acc.");
                              PaymentTolAcc := GenPostingSetup."Purch. Pmt. Tol. Debit Acc.";
                            END ELSE BEGIN
    …
    
    

    Existující kód 5

    …
                          END ELSE IF GLSetup."Pmt. Disc. Tolerance Posting" =
                            GLSetup."Pmt. Disc. Tolerance Posting"::"Payment Discount Accounts"
                          THEN BEGIN
                            IF (DtldCVLedgEntryBuf."Amount (LCY)" <= 0) THEN BEGIN
                              GenPostingSetup.TESTFIELD("Purch. Pmt. Disc. Debit Acc.");
                              PaymentTolAcc := GenPostingSetup."Purch. Pmt. Disc. Debit Acc.";
                            END ELSE BEGIN
    …
    
    

    Náhradní kód 5

    …
                          END ELSE IF GLSetup."Pmt. Disc. Tolerance Posting" =
                            GLSetup."Pmt. Disc. Tolerance Posting"::"Payment Discount Accounts"
                          THEN BEGIN
                            IF (DtldCVLedgEntryBuf."Amount (LCY)" <= 0) AND
                               (DtldCVLedgEntryBuf."VAT Amount (LCY)" <= 0)
                            THEN BEGIN
                              GenPostingSetup.TESTFIELD("Purch. Pmt. Disc. Debit Acc.");
                              PaymentTolAcc := GenPostingSetup."Purch. Pmt. Disc. Debit Acc.";
                            END ELSE BEGIN
    …
    
    
  4. Následujícím způsobem změňte kód ve funkci AutoEntrForDtldVendLedgEnts:
    Existující kód 1

    …
                  GenPostingSetup.GET(
                    DtldCVLedgEntryBuf."Gen. Bus. Posting Group",
                    DtldCVLedgEntryBuf."Gen. Prod. Posting Group");
                  IF DtldCVLedgEntryBuf."Amount (LCY)" > 0 THEN BEGIN
                    GenPostingSetup.TESTFIELD("Purch. Pmt. Disc. Debit Acc.");
                    AccNo := GenPostingSetup."Purch. Pmt. Disc. Debit Acc.";
                  END ELSE BEGIN
    …
    
    

    Náhradní kód 1

    …
                  GenPostingSetup.GET(
                    DtldCVLedgEntryBuf."Gen. Bus. Posting Group",
                    DtldCVLedgEntryBuf."Gen. Prod. Posting Group");
                  IF (DtldCVLedgEntryBuf."Amount (LCY)" > 0) OR
                     (DtldCVLedgEntryBuf."VAT Amount (LCY)" > 0)
                  THEN BEGIN
                    GenPostingSetup.TESTFIELD("Purch. Pmt. Disc. Debit Acc.");
                    AccNo := GenPostingSetup."Purch. Pmt. Disc. Debit Acc.";
                  END ELSE BEGIN
    …
    
    

    Existující kód 2

    …
                  CASE GLSetup."Payment Tolerance Posting" OF
                    GLSetup."Payment Tolerance Posting"::"Payment Tolerance Accounts":
                      BEGIN
                        IF DtldCVLedgEntryBuf."Amount (LCY)" > 0 THEN BEGIN
                          GenPostingSetup.TESTFIELD("Purch. Pmt. Tol. Debit Acc.");
                          AccNo := GenPostingSetup."Purch. Pmt. Tol. Debit Acc.";
                        END ELSE BEGIN
    …
    
    
    

    Náhradní kód 2

    …
                  CASE GLSetup."Payment Tolerance Posting" OF
                    GLSetup."Payment Tolerance Posting"::"Payment Tolerance Accounts":
                      BEGIN
                        IF (DtldCVLedgEntryBuf."Amount (LCY)" > 0) OR
                           (DtldCVLedgEntryBuf."VAT Amount (LCY)" > 0)
                        THEN BEGIN
                          GenPostingSetup.TESTFIELD("Purch. Pmt. Tol. Debit Acc.");
                          AccNo := GenPostingSetup."Purch. Pmt. Tol. Debit Acc.";
                        END ELSE BEGIN
    …
    
    
    

    Existující kód 3

    …
                      END;
                    GLSetup."Payment Tolerance Posting"::"Payment Discount Accounts":
                      BEGIN
                        IF DtldCVLedgEntryBuf."Amount (LCY)" > 0 THEN BEGIN
                          GenPostingSetup.TESTFIELD("Purch. Pmt. Disc. Debit Acc.");
                          AccNo := GenPostingSetup."Purch. Pmt. Disc. Debit Acc.";
                        END ELSE BEGIN
    …
    
    
    

    Náhradní kód 3

    …
                      END;
                    GLSetup."Payment Tolerance Posting"::"Payment Discount Accounts":
                      BEGIN
                        IF (DtldCVLedgEntryBuf."Amount (LCY)" > 0) OR
                           (DtldCVLedgEntryBuf."VAT Amount (LCY)" > 0)
                        THEN BEGIN
                          GenPostingSetup.TESTFIELD("Purch. Pmt. Disc. Debit Acc.");
                          AccNo := GenPostingSetup."Purch. Pmt. Disc. Debit Acc.";
                        END ELSE BEGIN
    …
    
    

    Existující kód 4

    …
                  CASE GLSetup."Pmt. Disc. Tolerance Posting" OF
                    GLSetup."Pmt. Disc. Tolerance Posting"::"Payment Tolerance Accounts":
                      BEGIN
                        IF DtldCVLedgEntryBuf."Amount (LCY)" > 0 THEN BEGIN
                          GenPostingSetup.TESTFIELD("Purch. Pmt. Tol. Debit Acc.");
                          AccNo := GenPostingSetup."Purch. Pmt. Tol. Debit Acc.";
                        END ELSE BEGIN
    …
    
    

    Náhradní kód 4

    …
                  CASE GLSetup."Pmt. Disc. Tolerance Posting" OF
                    GLSetup."Pmt. Disc. Tolerance Posting"::"Payment Tolerance Accounts":
                      BEGIN
                        IF (DtldCVLedgEntryBuf."Amount (LCY)" > 0) OR
                           (DtldCVLedgEntryBuf."VAT Amount (LCY)" > 0)
                        THEN BEGIN
                          GenPostingSetup.TESTFIELD("Purch. Pmt. Tol. Debit Acc.");
                          AccNo := GenPostingSetup."Purch. Pmt. Tol. Debit Acc.";
                        END ELSE BEGIN
    …
    
    

    Existující kód 5

    …
                      END;
                    GLSetup."Pmt. Disc. Tolerance Posting"::"Payment Discount Accounts":
                      BEGIN
                        IF DtldCVLedgEntryBuf."Amount (LCY)" > 0 THEN BEGIN
                          GenPostingSetup.TESTFIELD("Purch. Pmt. Disc. Debit Acc.");
                          AccNo := GenPostingSetup."Purch. Pmt. Disc. Debit Acc.";
                        END ELSE BEGIN
    …
    
    
    

    Náhradní kód 5

    …
                      END;
                    GLSetup."Pmt. Disc. Tolerance Posting"::"Payment Discount Accounts":
                      BEGIN
                        IF (DtldCVLedgEntryBuf."Amount (LCY)" > 0) OR
                           (DtldCVLedgEntryBuf."VAT Amount (LCY)" > 0)
                        THEN BEGIN
                          GenPostingSetup.TESTFIELD("Purch. Pmt. Disc. Debit Acc.");
                          AccNo := GenPostingSetup."Purch. Pmt. Disc. Debit Acc.";
                        END ELSE BEGIN
    …
    
    

Požadavky

Abyste mohli tuto opravu hotfix použít, musíte mít nainstalovanou aplikaci Microsoft Dynamics NAV 2009 Service Pack 1.

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.

SPOLEČNOST MICROSOFT A JEJÍ DODAVATELÉ NENESOU ŽÁDNOU ZODPOVĚDNOST A NEPOSKYTUJÍ ŽÁDNÉ ZÁRUKY ZA VHODNOST, SPOLEHLIVOST NEBO PŘESNOST INFORMACÍ OBSAŽENÝCH V DOKUMENTECH A SOUVISEJÍCÍ GRAFICE PUBLIKOVANÝCH NA TOMTO WEBU ("MATERIÁLY") PRO ŽÁDNÝ ÚČEL.

MATERIÁLY MOHOU OBSAHOVAT TECHNICKÉ NEPŘESNOSTI NEBO TYPOGRAFICKÉ CHYBY A MOHOU BÝT KDYKOLI BEZ UPOZORNĚNÍ OPRAVENY. V MAXIMÁLNÍM ROZSAHU POVOLENÉM PLATNÝMI ZÁKONY SE MICROSOFT A JEJÍ DODAVATELÉ ZŘÍKAJÍ A VYLUČUJÍ VEŠKERÁ PROHLÁŠENÍ, ZÁRUKY A PODMÍNKY, AŤ UŽ VÝSLOVNÉ, PŘEDPOKLÁDANÉ NEBO ZÁKONNÉ, VČETNĚ, ALE NIKOLI VÝHRADNĚ, PROHLÁŠENÍ, ZÁRUK NEBO PODMÍNEK VLASTNICTVÍ, NEPORUŠENÍ PRÁV, USPOKOJIVÉHO STAVU NEBO KVALITY, PRODEJNOSTI A VHODNOSTI PRO URČITÝ ÚČEL VE VZTAHU K MATERIÁLŮM.