Ten artykuł dotyczy systemu Microsoft Dynamics NAV dla następujących krajów i ustawień regionalnych języka.
-
Angielski (Kanada) (en-ca)
-
Angielski (Stany Zjednoczone) (en-us)
-
Hiszpański (Meksyk) (es-mx)
-
Francuski (Kanada) (fr-ca)
Objawy
Załóżmy, że należy zastosować poprawkę 2801174 wersja północnoamerykański dla systemu Microsoft Dynamics NAV 2009. Podczas księgowania faktury w walucie obcej i zaksięgowaniu płatności w walucie lokalnej, zrealizowany zysk lub stratę nie jest widoczna w podatku od wartości dodanej (VAT) poprawnie. Ten problem występuje w następujących produktach:
-
Północnoamerykański wersji systemu Microsoft Dynamics NAV 2009 R2
-
Północnoamerykański wersji dodatku Service Pack 1 dla systemu Microsoft Dynamics NAV 2009
Rozwiązanie
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.
Informacje dotyczące instalacji
Firma Microsoft podaje przykłady programowania wyłącznie, bez jakichkolwiek gwarancji wyrażonych wprost lub domyślnie. To obejmuje, ale nie jest ograniczona, ustawowej rękojmi co do przydatności handlowej lub przydatności do określonego celu. W tym artykule założono, że użytkownik zna demonstrowany język programowania oraz narzędzia, które są używane do tworzenia i debugowania procedur. Wykwalifikowani pracownicy pomocy technicznej firmy Microsoft mogą pomóc w wyjaśnieniu, jak działa określona procedura, ale nie będą modyfikować tych przykładów ani dodawać funkcjonalności i konstruować procedur w celu zaspokojenia określonych potrzeb użytkownika.
Uwaga Przed zainstalowaniem tej poprawki należy zweryfikować, że wszyscy użytkownicy klienta Microsoft Navision są wylogowani systemu. Dotyczy to również użytkowników klienta Microsoft Navision Application Services (NAS). Powinny być użytkownika klienta, który jest zalogowany w momencie wdrożyć tę poprawkę.
Aby wdrożyć tę poprawkę, musi mieć licencję deweloperską.
Firma Microsoft zaleca, aby do konta użytkownika w oknie identyfikatorów logowania systemu Windows lub w oknie identyfikatorów logowania bazy danych być przypisany identyfikator roli "SUPER". Jeśli konto użytkownika nie można przypisać Identyfikatora roli "SUPER", należy sprawdzić, czy konto użytkownika ma następujące uprawnienia:
-
Uprawnienie Modyfikacja dla obiektu, który będzie zmieniany.
-
Uprawnienie Execute obiektu 5210 identyfikator obiektu systemu i dla obiektu 9015 identyfikator obiektu systemu .
Uwaga Nie trzeba mieć prawa do magazynów danych, chyba że konieczne jest przeprowadzenie naprawy danych.
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:
-
Zmień kod w applycustledgentry działają w dziennika gł. -codeunit linii Post (12) w następujący sposób:
Istniejący kod...CalcCurrencyRealizedGainLoss(
NewCVLedgEntryBuf,DtldCVLedgEntryBuf,
GenJnlLine,AppliedAmount,AppliedAmountLCY,RealizedGainLossLCY);
// Delete the following lines.
VATRealizedGainLossLCY := RealizedGainLossLCY;
CalcCurrencyRealizedGainLoss(
OldCVLedgEntryBuf,DtldCVLedgEntryBuf,GenJnlLine,-OldAppliedAmount,-AppliedAmountLCY,RealizedGainLossLCY);
// End of the deleted lines.
CalcApplication(
NewCVLedgEntryBuf,OldCVLedgEntryBuf,DtldCVLedgEntryBuf,
...Kod zastępczy
...CalcCurrencyRealizedGainLoss(
NewCVLedgEntryBuf,DtldCVLedgEntryBuf,
GenJnlLine,AppliedAmount,AppliedAmountLCY,RealizedGainLossLCY);
// Add the following lines.
CalcCurrencyRealizedGainLoss(
OldCVLedgEntryBuf,DtldCVLedgEntryBuf,GenJnlLine,-OldAppliedAmount,-AppliedAmountLCY,RealizedGainLossLCY);
VATRealizedGainLossLCY := RealizedGainLossLCY;
// End of the added lines.
CalcApplication(
NewCVLedgEntryBuf,OldCVLedgEntryBuf,DtldCVLedgEntryBuf,
... -
Zmień kod w funkcji CustUnrealizedVAT w dziennika gł.-codeunit linii Post (12) w następujący sposób:
Istniejący kod...//what is LCY value of VAT and VAT Base at posting date (cash basis)
IF (VATPostingSetup."Unrealized VAT Type" = VATPostingSetup."Unrealized VAT Type"::"Cash Basis") AND
(GainLossLCY <> 0) THEN BEGIN
VATBaseFCY := ROUND(
CurrExchRate.ExchangeAmtLCYToFCY(
PostingDate,CustLedgEntry2."Currency Code",VATBase,CustLedgEntry2."Original Currency Factor"));
...Kod zastępczy
...//what is LCY value of VAT and VAT Base at posting date (cash basis)
IF (VATPostingSetup."Unrealized VAT Type" = VATPostingSetup."Unrealized VAT Type"::"Cash Basis") AND
(GainLossLCY <> 0) THEN BEGIN
// Add the following lines.
IF CurrencyFactor = 1 THEN
CurrencyFactor := CurrExchRate.ExchangeRate(PostingDate,CustLedgEntry2."Currency Code");
// End of the added lines.
VATBaseFCY := ROUND(
CurrExchRate.ExchangeAmtLCYToFCY(
PostingDate,CustLedgEntry2."Currency Code",VATBase,CustLedgEntry2."Original Currency Factor"));
...
-
Zmień kod w ApplyVendLedgEntryfunkcja w dziennika gł.-codeunit linii Post (12) w następujący sposób:
Istniejący kod...CalcCurrencyRealizedGainLoss(
NewCVLedgEntryBuf,DtldCVLedgEntryBuf,
GenJnlLine,AppliedAmount,AppliedAmountLCY,RealizedGainLossLCY);
// Delete the following lines.
VATRealizedGainLossLCY := RealizedGainLossLCY;
CalcCurrencyRealizedGainLoss(
OldCVLedgEntryBuf,DtldCVLedgEntryBuf,
GenJnlLine,-OldAppliedAmount,-AppliedAmountLCY,RealizedGainLossLCY);
// End of the deleted lines.
CalcApplication(
NewCVLedgEntryBuf,OldCVLedgEntryBuf,DtldCVLedgEntryBuf,
...Kod zastępczy
...CalcCurrencyRealizedGainLoss(
NewCVLedgEntryBuf,DtldCVLedgEntryBuf,
GenJnlLine,AppliedAmount,AppliedAmountLCY,RealizedGainLossLCY);
// Add the following lines.
CalcCurrencyRealizedGainLoss(
OldCVLedgEntryBuf,DtldCVLedgEntryBuf,
GenJnlLine,-OldAppliedAmount,-AppliedAmountLCY,RealizedGainLossLCY);
VATRealizedGainLossLCY := RealizedGainLossLCY;
// End of the added lines.
CalcApplication(
NewCVLedgEntryBuf,OldCVLedgEntryBuf,DtldCVLedgEntryBuf,
... -
Zmień kod w VendUnrealizedVATfunkcja w dziennika gł.-codeunit linii Post (12) w następujący sposób:
Istniejący kod...IF (VATPostingSetup."Unrealized VAT Type" = VATPostingSetup."Unrealized VAT Type"::"Cash Basis") AND
(GainLossLCY <> 0)
THEN BEGIN
VATBaseFCY := ROUND(
CurrExchRate.ExchangeAmtLCYToFCY(
PostingDate,VendLedgEntry2."Currency Code",VATBase,VendLedgEntry2."Original Currency Factor"));
...Kod zastępczy
...IF (VATPostingSetup."Unrealized VAT Type" = VATPostingSetup."Unrealized VAT Type"::"Cash Basis") AND
(GainLossLCY <> 0)
THEN BEGIN
// Add the following lines.
IF CurrencyFactor = 1 THEN
CurrencyFactor := CurrExchRate.ExchangeRate(PostingDate,VendLedgEntry2."Currency Code");
// End of the added lines.
VATBaseFCY := ROUND(
CurrExchRate.ExchangeAmtLCYToFCY(
PostingDate,VendLedgEntry2."Currency Code",VATBase,VendLedgEntry2."Original Currency Factor"));
...
Wymagania wstępne
Musi mieć jedną z następujących produktów, w celu zastosowania tej poprawki:
-
Północnoamerykański wersji systemu Microsoft Dynamics NAV 2009 R2
-
Północnoamerykański wersji dodatku Service Pack 1 dla systemu Microsoft Dynamics NAV 2009
Informacje dotyczące usuwania
Nie można usunąć tej poprawki.
Stan
Firma Microsoft potwierdziła, że jest to problem występujący w produktach firmy Microsoft wymienionych w sekcji „Dotyczy”.
Uwaga Jest to artykuł " szybkiej publikacji" tworzony bezpośrednio przez organizację pomocy technicznej firmy Microsoft. Informacje zawarte w niniejszym dokumencie są dostarczane jako odpowiedź na pojawiające się problemy. W wyniku przyspieszonego udostępnienia, materiały te mogą zawierać błędy typograficzne i mogą być zmieniane w dowolnym czasie bez uprzedzenia. Zobacz Warunki użytkowania w celu uzyskania innych informacji.
