Käytä asiakasmerkintöjä -lomakkeen ja Käytä toimittajan tapahtumia -lomakkeen Saldo-kenttä ja "Maksu. Levy. Summa" -kenttä näyttävät virheellisiä arvoja, jos käytät maksua useisiin avoimiin asiakirjoihin Microsoft Dynamics NAV :ssa.

Käytetään kohteeseen
Dynamics NAV 2009 Dynamics NAV 2009 Service Pack 1 Microsoft Dynamics NAV 5.0 Microsoft Dynamics NAV 5.0 Service Pack 1

Tämä artikkeli koskee Microsoft Dynamics NAV -ohjelmaa kaikissa maissa ja kaikilla kielialueilla.

Ongelman ilmenemistapa

Jos käytät maksua useisiin avoimiin asiakirjoihin Microsoft Dynamics NAV :ssa, Saldo-kentässä ja Maksu. Levy. Käytä asiakasmerkintöjä -lomakkeen (232) ja Käytä toimittajamerkintöjä -lomakkeen (233) Summa-kentässä näkyy virheellisiä arvoja.
Tämä ongelma ilmenee seuraavissa tuotteissa:

  • Microsoft Dynamics NAV 2009 Service Pack 1
  • Microsoft Dynamics NAV 2009
  • Microsoft Dynamics NAV 5.0 Service Pack 1
  • Microsoft Dynamics NAV 5.0

Ratkaisu

Hotfix-tiedot

Tuettu hotfix-korjaus on nyt saatavilla Microsoftilta. Sen tarkoituksena on kuitenkin korjata vain tässä artikkelissa kuvattu ongelma. Käytä sitä vain järjestelmissä, joissa on tämä ongelma. Tämä hotfix-korjaus voi saada lisätestejä. Jos ongelma ei siis vaikuta sinuun vakavasti, suosittelemme odottamaan seuraavaa Microsoft Dynamics NAV 2009 Service Pack -pakettia tai seuraavaa Microsoft Dynamics NAV -versiota, joka sisältää tämän hotfix-korjauksen.

Huomautus Erityistapauksissa tukipuheluista tavallisesti aiheutuvat maksut voidaan peruuttaa, jos Microsoft Dynamicsin ja siihen liittyvien tuotteiden teknisen tuen asiantuntija määrittää, että tietty päivitys ratkaisee ongelmasi. Tavanomaiset tukikustannukset koskevat muita tukikysymyksiä ja -ongelmia, jotka eivät ole oikeutettuja kyseiseen päivitykseen.

            
          

Asennustiedot

Microsoft tarjoaa ohjelmointiesimerkkejä vain havainnollistamista varten ilman ilmaistua tai oletettua takuuta. Tämä sisältää muun muassa oletetut takuut soveltuvuudesta kaupankäynnin kohteeksi tai sopivuudesta tiettyyn tarkoitukseen. Tässä artikkelissa oletetaan, että tunnet ohjelmointikielen, jota esitellään, sekä työkalut, joita käytetään toimintosarjojen luomiseen ja virheenkorjaukseen. Microsoftin tukihenkilöt voivat auttaa selittämään tietyn menettelyn toiminnallisuuden, mutta he eivät muokkaa näitä esimerkkejä niin, että ne tarjoaisivat lisätoimintoja tai laativat menetelmiä erityisvaatimusten täyttämiseksi.

Huomautus Varmista ennen tämän hotfix-korjauksen asentamista, että kaikki Microsoft Navision -asiakasohjelman käyttäjät ovat kirjautuneet ulos järjestelmästä. Tämä koskee myös Microsoft Navision Application Services (NAS) -asiakaskäyttäjiä. Sinun pitäisi olla ainoa asiakaskäyttäjä, joka on kirjautunut sisään, kun otat tämän hotfix-korjauksen käyttöön.

Jotta voit ottaa tämän hotfix-korjauksen käyttöön, sinulla on oltava kehittäjän käyttöoikeus.

Suosittelemme, että käyttäjätilille, joka on Windowsin kirjautumisikkunassa tai Tietokannan kirjautumiset -ikkunassa, määritetään "SUPER"-roolitunnus. Jos käyttäjätilille ei voi määrittää "SUPER"-roolitunnusta, sinun on varmistettava, että käyttäjätilillä on seuraavat käyttöoikeudet:

  • Muutettavan objektin Muokkaa-käyttöoikeus.
  • System Object ID 5210 -objektin ja System Object ID 9015 -objektin Suoritus-oikeus.

                
Huomautus Sinulla ei tarvitse olla oikeuksia tietosäilöihin, ellei sinun tarvitse korjata tietoja.

Koodin muutokset

Huomautus Testaa koodikorjaukset aina valvotussa ympäristössä, ennen kuin otat korjaukset käyttöön tuotantotietokoneissasi.
Voit ratkaista tämän ongelman seuraavasti:

  1. Muuta HandlChosenEntries-funktion Koodia Asiakastapahtumat-lomakkeessa (232) seuraavasti:
    Aiemmin luotu koodi

    ...
      IF (ABS(CurrentAmount - PossiblePmtDisc) > ABS(AppliedCustLedgEntryTemp."Remaining Amount" -
        AppliedCustLedgEntryTemp."Remaining Pmt. Disc. Possible"))
      THEN BEGIN
        PmtDiscAmount := PmtDiscAmount + AppliedCustLedgEntryTemp."Remaining Pmt. Disc. Possible";
        CurrentAmount := CurrentAmount + AppliedCustLedgEntryTemp."Remaining Amount" -
          AppliedCustLedgEntryTemp."Remaining Pmt. Disc. Possible";
      END ELSE IF (ABS(CurrentAmount - PossiblePmtDisc) = ABS(AppliedCustLedgEntryTemp."Remaining Amount" -
        AppliedCustLedgEntryTemp."Remaining Pmt. Disc. Possible"))
      THEN BEGIN
        PmtDiscAmount := PmtDiscAmount + AppliedCustLedgEntryTemp."Remaining Pmt. Disc. Possible" + PossiblePmtDisc;
        CurrentAmount := CurrentAmount + AppliedCustLedgEntryTemp."Remaining Amount" -
          AppliedCustLedgEntryTemp."Remaining Pmt. Disc. Possible" - PossiblePmtDisc;
   PossiblePmtDisc := 0;
        AppliedAmount := AppliedAmount + CorrectionAmount;
      END ELSE IF (FromZeroGenJnl) THEN BEGIN
        PmtDiscAmount := PmtDiscAmount + AppliedCustLedgEntryTemp."Remaining Pmt. Disc. Possible";
        CurrentAmount := CurrentAmount +
          AppliedCustLedgEntryTemp."Remaining Amount" - AppliedCustLedgEntryTemp."Remaining Pmt. Disc. Possible";
      END ELSE BEGIN
        IF (CurrentAmount + AppliedCustLedgEntryTemp."Remaining Amount" >= 0) <> (CurrentAmount >= 0) THEN BEGIN
          PmtDiscAmount := PmtDiscAmount + PossiblePmtDisc;
          CurrentAmount := CurrentAmount - PossiblePmtDisc; DELETE LINE
          AppliedAmount := AppliedAmount + CorrectionAmount;
        END;
        CurrentAmount := CurrentAmount + AppliedCustLedgEntryTemp."Remaining Amount";
        PossiblePmtDisc := AppliedCustLedgEntryTemp."Remaining Pmt. Disc. Possible";
      END;
    END ELSE BEGIN
      IF (((CurrentAmount - PossiblePmtDisc + AppliedCustLedgEntryTemp."Amount to Apply") * CurrentAmount) <= 0) THEN BEGIN
        PmtDiscAmount := PmtDiscAmount + PossiblePmtDisc;
        CurrentAmount := CurrentAmount - PossiblePmtDisc;
        PossiblePmtDisc := 0;
        AppliedAmount := AppliedAmount + CorrectionAmount;
      END;
      CurrentAmount := CurrentAmount + AppliedCustLedgEntryTemp."Amount to Apply";
    END;
  END ELSE BEGIN
    AppliedCustLedgEntryTemp.SETRANGE(Positive);
    AppliedCustLedgEntryTemp.FINDFIRST;
  END;
...

    Korvaava koodi

    ...
      IF (ABS(CurrentAmount) > ABS(AppliedCustLedgEntryTemp."Remaining Amount" -
        AppliedCustLedgEntryTemp."Remaining Pmt. Disc. Possible"))
      THEN BEGIN
        PmtDiscAmount := PmtDiscAmount + AppliedCustLedgEntryTemp."Remaining Pmt. Disc. Possible";
        CurrentAmount := CurrentAmount + AppliedCustLedgEntryTemp."Remaining Amount" -
          AppliedCustLedgEntryTemp."Remaining Pmt. Disc. Possible";
      END ELSE IF (ABS(CurrentAmount) = ABS(AppliedCustLedgEntryTemp."Remaining Amount" -
        AppliedCustLedgEntryTemp."Remaining Pmt. Disc. Possible"))
      THEN BEGIN
        PmtDiscAmount := PmtDiscAmount + AppliedCustLedgEntryTemp."Remaining Pmt. Disc. Possible" + PossiblePmtDisc;
        CurrentAmount := CurrentAmount + AppliedCustLedgEntryTemp."Remaining Amount" -
          AppliedCustLedgEntryTemp."Remaining Pmt. Disc. Possible" - PossiblePmtDisc;
        PossiblePmtDisc := 0;
        AppliedAmount := AppliedAmount + CorrectionAmount;
      END ELSE IF (FromZeroGenJnl) THEN BEGIN
        PmtDiscAmount := PmtDiscAmount + AppliedCustLedgEntryTemp."Remaining Pmt. Disc. Possible";
        CurrentAmount := CurrentAmount +
          AppliedCustLedgEntryTemp."Remaining Amount" - AppliedCustLedgEntryTemp."Remaining Pmt. Disc. Possible";
      END ELSE BEGIN
        IF (CurrentAmount + AppliedCustLedgEntryTemp."Remaining Amount" >= 0) <> (CurrentAmount >= 0) THEN BEGIN
          PmtDiscAmount := PmtDiscAmount + PossiblePmtDisc;
          AppliedAmount := AppliedAmount + CorrectionAmount;
        END;
        CurrentAmount := CurrentAmount + AppliedCustLedgEntryTemp."Remaining Amount" -
          AppliedCustLedgEntryTemp."Remaining Pmt. Disc. Possible";
        PossiblePmtDisc := AppliedCustLedgEntryTemp."Remaining Pmt. Disc. Possible";
      END;
    END ELSE BEGIN
      IF (((CurrentAmount - PossiblePmtDisc + AppliedCustLedgEntryTemp."Amount to Apply") * CurrentAmount) <= 0) THEN BEGIN
        PmtDiscAmount := PmtDiscAmount + PossiblePmtDisc;
        CurrentAmount := CurrentAmount - PossiblePmtDisc;
        PossiblePmtDisc := 0;
        AppliedAmount := AppliedAmount + CorrectionAmount;
      END;
      CurrentAmount := CurrentAmount + AppliedCustLedgEntryTemp."Amount to Apply";
    END;
  END ELSE BEGIN
   AppliedCustLedgEntryTemp.SETRANGE(Positive);
    AppliedCustLedgEntryTemp.FINDFIRST;
  END;
...

  2. Tee vastaava koodimuutos Käytä toimittajan merkintöjä -lomakkeen HandlChosenEntries-funktiossa (233). Muutettu koodi on seuraava:

    ...
            IF (ABS(CurrentAmount) > ABS(AppliedVendLedgEntryTemp."Remaining Amount" - // This line is changed.
              AppliedVendLedgEntryTemp."Remaining Pmt. Disc. Possible"))
            THEN BEGIN
              PmtDiscAmount := PmtDiscAmount + AppliedVendLedgEntryTemp."Remaining Pmt. Disc. Possible";
              CurrentAmount := CurrentAmount + AppliedVendLedgEntryTemp."Remaining Amount" -
                AppliedVendLedgEntryTemp."Remaining Pmt. Disc. Possible";
            END ELSE IF (ABS(CurrentAmount) = ABS(AppliedVendLedgEntryTemp."Remaining Amount" - // This line is changed.
              AppliedVendLedgEntryTemp."Remaining Pmt. Disc. Possible"))
            THEN BEGIN
              PmtDiscAmount := PmtDiscAmount + AppliedVendLedgEntryTemp."Remaining Pmt. Disc. Possible" + PossiblePmtdisc;
              CurrentAmount := CurrentAmount + AppliedVendLedgEntryTemp."Remaining Amount" -
                AppliedVendLedgEntryTemp."Remaining Pmt. Disc. Possible" - PossiblePmtdisc;
              PossiblePmtdisc := 0;
              AppliedAmount := AppliedAmount + CorrectionAmount;
            END ELSE IF FromZeroGenJnl THEN BEGIN
              PmtDiscAmount := PmtDiscAmount + AppliedVendLedgEntryTemp."Remaining Pmt. Disc. Possible";
              CurrentAmount := CurrentAmount +
                AppliedVendLedgEntryTemp."Remaining Amount" - AppliedVendLedgEntryTemp."Remaining Pmt. Disc. Possible";
            END ELSE BEGIN
              IF (CurrentAmount + AppliedVendLedgEntryTemp."Remaining Amount" >= 0) <> (CurrentAmount >= 0) THEN BEGIN
                PmtDiscAmount := PmtDiscAmount + PossiblePmtdisc;
                // CurrentAmount := CurrentAmount - PossiblePmtdisc; // This line is deleted.
                AppliedAmount := AppliedAmount + CorrectionAmount;
              END;
              CurrentAmount := CurrentAmount + AppliedVendLedgEntryTemp."Remaining Amount" - // This line is changed.
                AppliedVendLedgEntryTemp."Remaining Pmt. Disc. Possible"; // This line is added
              PossiblePmtdisc := AppliedVendLedgEntryTemp."Remaining Pmt. Disc. Possible";
            END;
          END ELSE BEGIN
            IF (((CurrentAmount - PossiblePmtdisc + AppliedVendLedgEntryTemp."Amount to Apply") * CurrentAmount) <= 0) THEN BEGIN
...

Edellytykset

Sinulla on oltava asennettuna jokin seuraavista tuotteista, jotta voit käyttää tätä hotfix-korjausta:

  • Microsoft Dynamics NAV 2009 Service Pack 1
  • Microsoft Dynamics NAV 2009
  • Microsoft Dynamics NAV 5.0 Service Pack 1
  • Microsoft Dynamics NAV 5.0

Poistotiedot

Et voi poistaa tätä hotfix-korjausta.

Tila

Microsoft on vahvistanut tämän olevan ongelma niissä Microsoftin tuotteissa, jotka ovat listattuna Koskee seuraavia tuotteita -osiossa.

Huomautus Tämä on FAST PUBLISH -artikkeli, joka on luotu suoraan Microsoftin tukiorganisaatiosta. Tässä annetut tiedot annetaan sellaisenaan vastauksena uusiin ongelmiin. Koska materiaalit ovat nopeasti käytettävissä, ne voivat sisältää typografisia virheitä, ja niitä voidaan muuttaa milloin tahansa ilman ennakkoilmoitusta. Lisätietoja on ohjeaiheessa Käyttöehdot .