Ten artykuł dotyczy funkcji Microsoft Dynamics NAV w przypadku ustawień regionalnych języka węgierskiego (hu).
Objawy
Załóżmy, że poprawkę przedpłaty stosuje się TFS326659 w węgierskiej wersji programu Microsoft Dynamics NAV 2009 R2. W przypadku zaksięgowania faktury z wyprzedzeniem dla klienta przy użyciu waluty obcej wartość Advances (LCY) na karcie klienta wynosi 0,01. Oczekujesz, że wartość Advances (LCY) będzie równa zero.
Aby uzyskać więcej informacji na temat TFS326659 poprawki przedpłaty, zobacz następujące informacje:
TFS326659 Aktualizacja przedpłaty dla systemu Microsoft Dynamics NAV 2009 R2 — Węgry
Rozwiązanie
Informacje dotyczące poprawek
Obsługiwana poprawka jest teraz dostępna od firmy Microsoft. Jednak jego celem jest tylko naprawienie problemu opisanego w tym artykule. Zastosuj ją tylko do systemów, w których występuje ten konkretny problem. Ta poprawka może wymagać dodatkowych testów. Dlatego jeśli ten problem cię nie dotyczy poważnie, zalecamy poczekanie na kolejny dodatek Service Pack dla oprogramowania Microsoft Dynamics NAV 2009 lub następną wersję microsoft Dynamics NAV zawierającą tę poprawkę.
Uwaga W specjalnych przypadkach opłaty, które zwykle naliczane są w związku z połączeniami pomocy technicznej, mogą zostać anulowane, jeśli specjalista pomocy technicznej w zakresie oprogramowania Microsoft Dynamics i produktów pokrewnych ustali, że określona aktualizacja rozwiąże problem. Typowe koszty pomocy technicznej będą miały zastosowanie do dodatkowych pytań dotyczących pomocy technicznej i problemów, które nie kwalifikują się do określonej aktualizacji.
Informacje o instalacji
Firma Microsoft udostępnia przykłady programowania wyłącznie w celach ilustracyjnych, bez gwarancji wyrażonej lub dorozumianej. To obejmuje między innymi dorozumiane gwarancje przydatności handlowej lub przydatności do określonego celu. W tym artykule założono, że znasz język programowania, który jest demonstrowany, oraz narzędzia, które są używane do tworzenia i debugowania procedur. Inżynierowie pomocy technicznej firmy Microsoft mogą pomóc w wyjaśnieniu funkcjonalności danej procedury. Nie będą jednak modyfikować tych przykładów, aby zapewnić dodatkową funkcjonalność lub konstruować procedur spełniających specyficzne wymagania użytkownika.
Uwaga Przed zainstalowaniem tej poprawki upewnij się, że wszyscy użytkownicy kliencki programu Microsoft Dynamics NAV wylogowali się z systemu. Dotyczy to usług Microsoft Dynamics NAV Application Server (NAS). Należy być jedynym użytkownikiem klienckim, który jest zalogowany podczas implementowania tej poprawki.
Aby zaimplementować tę poprawkę, musisz mieć licencję dewelopera.
Zalecamy przypisanie do konta użytkownika w oknie Logowania systemu Windows lub w oknie Logowania bazy danych identyfikator roli "SUPER". Jeśli do konta użytkownika nie można przypisać identyfikatora roli "SUPER", należy sprawdzić, czy konto użytkownika ma następujące uprawnienia:
Uprawnienie Modyfikuj dla obiektu, który ma zostać zmieniony.
Uprawnienie Execute dla obiektu System Object ID 5210 i identyfikatora obiektu systemowego 9015
Obiektu.
Uwaga Nie musisz mieć praw do magazynów danych, chyba że musisz wykonać naprawę danych.
Zmiany kodu
Uwaga Przed zastosowaniem poprawek do komputerów produkcyjnych należy zawsze testować poprawki kodu w środowisku kontrolowanym.
Aby rozwiązać ten problem, wykonaj następujące czynności:
Zmień kod w funkcji PostCust w gen. Jnl.-Post Line Codeunit (12) w następujący sposób:
Istniejący kod 1... CustLedgEntry."Prepayment Type" := "Prepayment Type"; // Delete the following lines. IF CustLedgEntry.Prepayment AND (CustLedgEntry."Document Type" = CustLedgEntry."Document Type"::Payment) AND (CustLedgEntry."Prepayment Type" = CustLedgEntry."Prepayment Type"::Advance) // End of the deleted lines. THEN BEGIN ...Kod zastępczy 1
... CustLedgEntry."Prepayment Type" := "Prepayment Type"; // Add the following lines. IF IsAdvancePrepayment(CustLedgEntry.Prepayment,CustLedgEntry."Prepayment Type") AND (CustLedgEntry."Document Type" = CustLedgEntry."Document Type"::Payment) // End of the added lines. THEN BEGIN ...Istniejący kod 2
... DtldCVLedgEntryBuf.Advance := // Delete the following line. CustLedgEntry.Prepayment AND (CustLedgEntry."Prepayment Type" = CustLedgEntry."Prepayment Type"::Advance); // End of the deleted line. TransferCustLedgEntry(CVLedgEntryBuf,CustLedgEntry,TRUE); ...Kod zastępczy 2
... DtldCVLedgEntryBuf.Advance := // Add the following line. IsAdvancePrepayment(CustLedgEntry.Prepayment,CustLedgEntry."Prepayment Type"); // End of the added line. TransferCustLedgEntry(CVLedgEntryBuf,CustLedgEntry,TRUE); ...Zmień kod w funkcji PostVend w gen. Jnl.-Post Line Codeunit (12) w następujący sposób:
Istniejący kod 1... VendLedgEntry."Prepayment Type" := "Prepayment Type"; // Delete the following lines. IF VendLedgEntry.Prepayment AND (VendLedgEntry."Document Type" = VendLedgEntry."Document Type"::Payment) AND (VendLedgEntry."Prepayment Type" = VendLedgEntry."Prepayment Type"::Advance) // End of the deleted lines. THEN BEGIN ...Kod zastępczy 1
... VendLedgEntry."Prepayment Type" := "Prepayment Type"; // Add the following lines. IF IsAdvancePrepayment(VendLedgEntry.Prepayment,VendLedgEntry."Prepayment Type") AND (VendLedgEntry."Document Type" = VendLedgEntry."Document Type"::Payment) // End of the added lines. THEN BEGIN ...Istniejący kod 2
... DtldCVLedgEntryBuf.Advance := // Delete the following line. VendLedgEntry.Prepayment AND (VendLedgEntry."Prepayment Type" = VendLedgEntry."Prepayment Type"::Advance); // End of the deleted line. TransferVendLedgEntry(CVLedgEntryBuf,VendLedgEntry,TRUE); ...Kod zastępczy 2
... DtldCVLedgEntryBuf.Advance := // Add the following line. IsAdvancePrepayment(VendLedgEntry.Prepayment,VendLedgEntry."Prepayment Type"); // End of the added line. TransferVendLedgEntry(CVLedgEntryBuf,VendLedgEntry,TRUE); ...Zmień kod w funkcji CalcCurrencyRealizedGainLoss w gen. Jnl.-Post Line Codeunit (12) w następujący sposób:
Istniejący kod... DtldCVLedgEntryBuf.Advance := // Delete the following line. CVLedgEntryBuf.Prepayment AND (CVLedgEntryBuf."Prepayment Type" = CVLedgEntryBuf."Prepayment Type"::Advance); // End of the deleted line. IF RealizedGainLossLCY < 0 THEN BEGIN ...Kod zastępczy
... DtldCVLedgEntryBuf.Advance := // Add the following line. IsAdvancePrepayment(CVLedgEntryBuf.Prepayment,CVLedgEntryBuf."Prepayment Type"); // End of the added line. IF RealizedGainLossLCY < 0 THEN BEGIN ...Zmień kod w funkcji CalcApplication w gen. Jnl.-Post Line Codeunit (12) w następujący sposób:
Istniejący kod 1... DtldCVLedgEntryBuf.Advance := // Delete the following line. OldCVLedgEntryBuf.Prepayment AND (OldCVLedgEntryBuf."Prepayment Type" = OldCVLedgEntryBuf."Prepayment Type"::Advance); // End of the deleted line. InsertDtldCVLedgEntry(DtldCVLedgEntryBuf,OldCVLedgEntryBuf,FALSE); ...Kod zastępczy 1
... DtldCVLedgEntryBuf.Advance := // Add the following line. IsAdvancePrepayment(OldCVLedgEntryBuf.Prepayment,OldCVLedgEntryBuf."Prepayment Type"); // End of the added line. InsertDtldCVLedgEntry(DtldCVLedgEntryBuf,OldCVLedgEntryBuf,FALSE); ...Istniejący kod 2
... DtldCVLedgEntryBuf.Advance := // Delete the following line. NewCVLedgEntryBuf.Prepayment AND (NewCVLedgEntryBuf."Prepayment Type" = NewCVLedgEntryBuf."Prepayment Type"::Advance); // End of the deleted line. InsertDtldCVLedgEntry(DtldCVLedgEntryBuf,NewCVLedgEntryBuf,FALSE); ...Kod zastępczy 2
... DtldCVLedgEntryBuf.Advance := // Add the following line. IsAdvancePrepayment(NewCVLedgEntryBuf.Prepayment,NewCVLedgEntryBuf."Prepayment Type"); // End of the added line. InsertDtldCVLedgEntry(DtldCVLedgEntryBuf,NewCVLedgEntryBuf,FALSE); ...Zmień kod w funkcji CalcAmtLCYAdjustment w genie. Jnl.-Post Line Codeunit (12) w następujący sposób:
Istniejący kod... DtldCVLedgEntryBuf."Entry Type"::"Correction of Remaining Amount"; DtldCVLedgEntryBuf."Amount (LCY)" := AdjustedAmountLCY - CVLedgEntryBuf."Remaining Amt. (LCY)"; ...Kod zastępczy
... DtldCVLedgEntryBuf."Entry Type"::"Correction of Remaining Amount"; // Add the following lines. DtldCVLedgEntryBuf.Advance := IsAdvancePrepayment(CVLedgEntryBuf.Prepayment,CVLedgEntryBuf."Prepayment Type"); // End of the added lines. DtldCVLedgEntryBuf."Amount (LCY)" := AdjustedAmountLCY - CVLedgEntryBuf."Remaining Amt. (LCY)"; ...Zmień kod w funkcji PostDtldCustLedgEntries w gen. Jnl.-Post Line Codeunit (12) w następujący sposób:
Istniejący kod 1... GenJnlLine."Posting Group", // Delete the following lines. GenJnlLine.Prepayment AND (GenJnlLine."Prepayment Type" = GenJnlLine."Prepayment Type"::Advance)); // End of the deleted lines. IF CustLedgEntryInserted OR (TotalAmountLCY <> 0) OR ...Kod zastępczy 1
... GenJnlLine."Posting Group", // Add the following line. IsAdvancePrepayment(GenJnlLine.Prepayment,GenJnlLine."Prepayment Type")); // End of the added line. IF CustLedgEntryInserted OR (TotalAmountLCY <> 0) OR ...Istniejący kod 2
...GenJnlLine."Posting Group", // Delete the following lines. GenJnlLine.Prepayment AND (GenJnlLine."Prepayment Type" = GenJnlLine."Prepayment Type"::Advance)); // End of the deleted lines.IF CustLedgEntryInserted OR (TotalAmountLCY <> 0) OR ...Kod zastępczy 2
...GenJnlLine."Posting Group", // Add the following line. IsAdvancePrepayment(GenJnlLine.Prepayment,GenJnlLine."Prepayment Type")); // End of the added line.IF CustLedgEntryInserted OR (TotalAmountLCY <> 0) OR ...Zmień kod w funkcji GetReceivablesAccNo w gen. Jnl.-Post Line Codeunit (12) w następujący sposób:
Istniejący kod... CustLedgEntry."Customer Posting Group", // Delete the following lines. CustLedgEntry.Prepayment AND (CustLedgEntry."Prepayment Type" = CustLedgEntry."Prepayment Type"::Advance))); // End of the deleted lines. END; ...Kod zastępczy
... CustLedgEntry."Customer Posting Group", // Add the following line. IsAdvancePrepayment(CustLedgEntry.Prepayment,CustLedgEntry."Prepayment Type"))); // End of the added line. END; ...Zmień kod w funkcji GetPayablesAccNo w gen. Jnl.-Post Line Codeunit (12) w następujący sposób:
Istniejący kod... VendLedgEntry."Vendor Posting Group", // Delete the following lines. VendLedgEntry.Prepayment AND (VendLedgEntry."Prepayment Type" = VendLedgEntry."Prepayment Type"::Advance))); // End of the deleted lines. END;Kod zastępczy
... VendLedgEntry."Vendor Posting Group", // Add the following line. IsAdvancePrepayment(VendLedgEntry.Prepayment,VendLedgEntry."Prepayment Type"))); // End of the added line. END; ...
Wymagania wstępne
Aby zastosować tę poprawkę, musisz mieć zainstalowaną węgierską wersję oprogramowania Microsoft Dynamics NAV 2009 R2.
Informacje o usunięciu
Nie można usunąć tej poprawki.
Stan
Firma Microsoft potwierdziła, że jest to problem dotyczący produktów firmy Microsoft wymienionych w sekcji „Dotyczy”.
Uwaga Jest to artykuł "SZYBKIE PUBLIKOWANIE" utworzony bezpośrednio z poziomu organizacji pomocy technicznej firmy Microsoft. Informacje zawarte w niniejszym artykule są dostarczane w stanie odpowiadającym na pojawiające się problemy. Ze względu na szybkość jego udostępnienia materiały mogą zawierać błędy typograficzne i mogą zostać poprawione w dowolnym momencie bez powiadomienia. Zobacz Warunki użytkowania , aby zapoznać się z innymi zagadnieniami.