Ilość wynosi zero, podczas gdy wartość nie jest zero, po uruchomieniu raporcie Wycena zapasów w systemie Microsoft Dynamics NAV 2009

Informacje o poprawce

Obsługiwana poprawka jest obecnie udostępniana przez firmę Microsoft. Jednak to jest przeznaczona tylko do usunięcia problemu opisanego w tym artykule. Zastosuj ją tylko w systemach, w których występuje ten problem. Ta poprawka może być wciąż w fazie testowania. Jeśli dany system nie jest poważnie narażony na ten problem, firma Microsoft zaleca, aby poczekać na następny dodatek service pack dla systemu Microsoft Dynamics NAV 2009 lub następną wersję systemu Microsoft Dynamics NAV, zawierający tę poprawkę.

Uwaga W wyjątkowych przypadkach opłaty, telefonujący do pomocy technicznej mogą zostać anulowane, jeśli pomocy technicznej dla systemu Microsoft Dynamics i produktów powiązanych Określa, że określonej aktualizacji, można rozwiązać swój problem. Koszty obsługi zwykłych zastosuje się do dodatkowych pytań i problemów, których nie można rozwiązać przy użyciu określonej aktualizacji.

Zmiany kodu

Uwaga Zawsze test poprawki kodu w kontrolowanym środowisku przed zastosowaniem poprawki na komputerach produkcyjnych.
Aby rozwiązać ten problem, wykonaj następujące kroki:

1. Dodawanie nowych parametrów typu boolean FixedApplication do funkcji SetValuationDateAllValueEntrie w elemencie dzien.-codeunit linii Post (22) w następujący sposób:

   PROCEDURE SetValuationDateAllValueEntrie@95(ItemLedgerEntryNo@1000 : Integer;ValuationDate@1001 : Date;FixedApplication@1003 : Boolean);

2. Zmień kod w funkcji SetValuationDateAllValueEntrie w elemencie dzien.-codeunit linii Post (22) w następujący sposób:
   Istniejący kod

   ...        IF FINDSET THEN
             REPEAT
               IF ("Valuation Date" <> "Posting Date") OR
   
   // Delete the following line.
                  ("Valuation Date" < ValuationDate) 
   
               THEN BEGIN
                 "Valuation Date" := ValuationDate;
                 MODIFY;
               END;
             UNTIL NEXT = 0;
   ...
   
   

   Kod zastępczy

   ...        IF FINDSET THEN
             REPEAT
               IF ("Valuation Date" <> "Posting Date") OR
   
   // Add the following lines.
                  ("Valuation Date" < ValuationDate) OR     // Add an OR in this condition. 
                  (("Valuation Date" > ValuationDate) AND FixedApplication) // Add a new condition.
   // End of the lines.
   
               THEN BEGIN
                 "Valuation Date" := ValuationDate;
                 MODIFY;
               END;
             UNTIL NEXT = 0;
   ...
   
   

3. Zmień kod w funkcji Cofnij rozliczenie w elemencie dzien.-codeunit linii Post (22) w następujący sposób:
   Istniejący kod

   ...// Delete the following line.
          SetValuationDateAllValueEntrie(CostItemLedgEntry."Entry No.",Valuationdate);
   ...
   
   

   Kod zastępczy

   ...// Add the following line.
          SetValuationDateAllValueEntrie(CostItemLedgEntry."Entry No.",Valuationdate,FALSE); 
   ...
   
   

4. Zmień kod w funkcji CostApply w elemencie dzien.-codeunit linii Post (22) w następujący sposób:
   Istniejący kod

   ...// Delete the following line.
          SetValuationDateAllValueEntrie(GlobalItemLedgEntry."Entry No.",ValueEntry."Valuation Date"); 
   ...
   
   

   Kod zastępczy

   ...// Add the following line.
          SetValuationDateAllValueEntrie(GlobalItemLedgEntry."Entry No.",ValueEntry."Valuation Date",FALSE);   
   ...
   
   

5. Zmień kod w funkcji GetValuationDate w elemencie dzien.-codeunit linii Post (22) w następujący sposób:
   Istniejący kod

   ...        IF Positive THEN BEGIN
             IF (ValueEntry."Posting Date" < OldValueEntry."Valuation Date") OR
                (ItemJnlLine."Applies-to Entry" <> 0)
   
   // Delete the following lines.
             THEN BEGIN
               ValueEntry."Valuation Date" := OldValueEntry."Valuation Date";
               SetValuationDateAllValueEntrie(ValueEntry."Item Ledger Entry No.",OldValueEntry."Valuation Date");
             END ELSE
             BEGIN
               ValueEntry."Valuation Date" := ValueEntry."Posting Date";
               SetValuationDateAllValueEntrie(ValueEntry."Item Ledger Entry No.",ValueEntry."Posting Date");
             END
   // End of the lines.
   ...
   
   

   Kod zastępczy

   ...        IF Positive THEN BEGIN
             IF (ValueEntry."Posting Date" < OldValueEntry."Valuation Date") OR
                (ItemJnlLine."Applies-to Entry" <> 0)
   
   // Add the following lines.
             THEN BEGIN
               ValueEntry."Valuation Date" := OldValueEntry."Valuation Date";
               SetValuationDateAllValueEntrie(
                 ValueEntry."Item Ledger Entry No.",
                 OldValueEntry."Valuation Date",
                 ItemJnlLine."Applies-to Entry" <> 0)
             END ELSE BEGIN
               ValueEntry."Valuation Date" := ValueEntry."Posting Date";
               SetValuationDateAllValueEntrie(
                 ValueEntry."Item Ledger Entry No.",
                 ValueEntry."Posting Date",
                 ItemJnlLine."Applies-to Entry" <> 0)
             END
   // End of the lines.
   ...