SPÓJNE błędu, jeśli Księgowanie faktury w arkuszu weksli (cartera) w sprzedaży w hiszpańskiej wersji systemu Microsoft Dynamics NAV 2009

Podczas próby Księgowanie faktury w arkuszu weksli (cartera) z walutą po stronie sprzedaży w hiszpańskiej wersji systemu Microsoft Dynamics NAV 2009, pojawi się następujący komunikat o błędzie:

"Nie można ukończyć transakcji, ponieważ spowoduje powstanie niezgodności w tabeli Zapis K/G. Sprawdź miejsce i sposób użycia funkcji CONSISTENT jest używany w transakcji Aby znaleźć przyczynę błędu. Skontaktuj się z administrator systemu. Tabele można oznaczane jako niespójne podczas przeprowadzania złożonych zadań, takich jak księgowanie. Zapobiega to danych niepoprawnie zaktualizowane."

To występuje tylko podczas "Dodatkowej waluty raportowania" = Waluta. Wykonaj kroki opisane w sekcji zmiany kodu , aby rozwiązać ten problem. Ten problem występuje w następujących produktach:

W wersji hiszpańskiej dla systemu Microsoft Dynamics NAV 2009 R2
W wersji hiszpańskiej dla dodatku SP1 dla programu 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. Nie będą jednak 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 systemu Microsoft Dynamics NAV są wylogowani systemu. Obejmuje to usług systemu Microsoft Dynamics NAV aplikacji serwera (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 9015 identyfikator obiektu systemu

obiekt.

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. Przed zastosowaniem zmiany, zaimportuj wszystkie aktualizacje SEPA.

Aby rozwiązać ten problem, Zmień kod w funkcji PostReceivableDocs w dziennika gł.-Post wiersza Codeunit (12) w następujący sposób:

Istniejący kod 1

...END;

    LOCAL PROCEDURE PostReceivableDocs@1100003(EntryUnapplied@1100001 : Boolean);
    BEGIN
      // es0012.begin
      IF (DocAmountLCY <> 0) OR (DiscDocAmountLCY <> 0) OR (CollDocAmountLCY <> 0) OR (RejDocAmountLCY <> 0) OR
...

Kod zastępczy 1

...END;

    LOCAL PROCEDURE PostReceivableDocs@1100003(EntryUnapplied@1100001 : Boolean);

// Add the following lines.
VAR
DocAmountAddCurr@1100003 : Decimal;
// End of the added lines.

    BEGIN
      // es0012.begin
      IF (DocAmountLCY <> 0) OR (DiscDocAmountLCY <> 0) OR (CollDocAmountLCY <> 0) OR (RejDocAmountLCY <> 0) OR
...

Istniejący kod 2

...NextEntryNo := NextEntryNo - 1;
      // es0012.end
      IF DocAmountLCY <> 0 THEN BEGIN
        IF (GenJnlLine."Applies-to Doc. Type" = GenJnlLine."Applies-to Doc. Type"::Invoice) OR
          EntryUnapplied
        THEN BEGIN
...

Kod zastępczy 2

...NextEntryNo := NextEntryNo - 1;
      // es0012.end
      IF DocAmountLCY <> 0 THEN BEGIN

// Add the following lines.
IF GenJnlLine."Currency Code" = AddCurrency.Code THEN
DocAmountAddCurr := GenJnlLine.Amount
ELSE
DocAmountAddCurr := DocAmtCalcAddCurrency(DocAmountLCY);
// End of the added lines.

        IF (GenJnlLine."Applies-to Doc. Type" = GenJnlLine."Applies-to Doc. Type"::Invoice) OR
          EntryUnapplied
        THEN BEGIN...

Istniejący kod 3

... EntryUnapplied
        THEN BEGIN
          CustPostingGr.TESTFIELD("Receivables Account");

// Delete the following line.
InitGLEntry(CustPostingGr."Receivables Account",DocAmountLCY,DocAmtCalcAddCurrency(DocAmountLCY),TRUE,TRUE);
// End of the deleted line.

          GLEntry."Bal. Account Type" := GenJnlLine."Bal. Account Type";
          GLEntry."Bal. Account No." := GenJnlLine."Bal. Account No.";
          InsertGLEntry(TRUE);
...

Kod zastępczy 3

... EntryUnapplied
        THEN BEGIN
          CustPostingGr.TESTFIELD("Receivables Account");

// Add the following line.
InitGLEntry(CustPostingGr."Receivables Account",DocAmountLCY,DocAmountAddCurr,TRUE,TRUE);
// End of the added line.

          GLEntry."Bal. Account Type" := GenJnlLine."Bal. Account Type";
          GLEntry."Bal. Account No." := GenJnlLine."Bal. Account No.";
          InsertGLEntry(TRUE);
...

Istniejący kod 4

... InsertGLEntry(TRUE);
        END ELSE BEGIN
          CustPostingGr.TESTFIELD("Bills Account");

// Delete the following line.
InitGLEntry(CustPostingGr."Bills Account",DocAmountLCY,DocAmtCalcAddCurrency(DocAmountLCY),TRUE,TRUE);
// End of the deleted line.

          GLEntry."Bal. Account Type" := GenJnlLine."Bal. Account Type";
          GLEntry."Bal. Account No." := GenJnlLine."Bal. Account No.";
          InsertGLEntry(TRUE);
...

Kod zastępczy 4

...InsertGLEntry(TRUE);
        END ELSE BEGIN
          CustPostingGr.TESTFIELD("Bills Account");

// Add the following line.
InitGLEntry(CustPostingGr."Bills Account",DocAmountLCY,DocAmountAddCurr,TRUE,TRUE);
// End of the added line.

          GLEntry."Bal. Account Type" := GenJnlLine."Bal. Account Type";
          GLEntry."Bal. Account No." := GenJnlLine."Bal. Account No.";
          InsertGLEntry(TRUE);
...

Wymagania wstępne

Musi mieć jedną z następujących produktów, w celu zastosowania tej poprawki:

W wersji hiszpańskiej dla systemu Microsoft Dynamics NAV 2009 R2
W wersji hiszpańskiej dla dodatku SP1 dla programu 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żytkowaniadla innych względów.