Po uruchomieniu zadania wsadowego Dopasowywanie kursu wymiany dla konta bankowego w polskiej wersji programu Microsoft Dynamics NAV 2009 R2 można nieoczekiwanie uruchomić raport Oblicz różnice między wymianami (12302)

Dotyczy
Microsoft Dynamics NAV 2009 R2

Ten artykuł dotyczy funkcji Microsoft Dynamics NAV dla ustawień regionalnych języka polskiego (pl).

Objawy

Załóżmy, że uruchomisz zadanie wsadowe Dopasuj kurs wymiany dla konta bankowego w polskiej wersji programu Microsoft Dynamics NAV 2009 R2. W takiej sytuacji możesz nieoczekiwanie uruchomić raport Calculate Exchange Differences (12302) dla konta bankowego.

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 objaśnieniu funkcjonalności określonej procedury, ale nie zmodyfikują tych przykładów w celu zapewnienia dodatkowych funkcji ani skonstruowania procedur spełniających określone wymagania.

Uwaga Przed zainstalowaniem tej poprawki sprawdź, czy wszyscy użytkownicy klienckich usługi Microsoft Navision wylogowali się z systemu. Dotyczy to również użytkowników klienckich usług Microsoft Navision Application Services (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 obiektu System Object ID 9015.

                
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:

  1. Zmień kod w sekcji Pola w tabeli Konto bankowe (270) w następujący sposób:
    Istniejący kod

    ...
    { 111 ; ;SWIFT Code ;Code20 ;CaptionML=ENU=SWIFT Code }
    
    // Delete the following lines.
    { 12301; ;Cash/Bank Report Mandatory;Boolean ;OnValidate=VAR
    CashBankReport@1170000 : Record 12300;
    BEGIN
    IF NOT "Cash/Bank Report Mandatory" THEN BEGIN
    BankAccLedgEntry.SETCURRENTKEY("Bank Account No.","Cash/Bank Report Cons. No.","Cash/Bank Report Position");
    BankAccLedgEntry.SETRANGE("Bank Account No.","No.");
    BankAccLedgEntry.SETFILTER("Cash/Bank Report Cons. No.",'<>0');
    IF BankAccLedgEntry.FIND('-') THEN
    ERROR(Text12300,"Cash/Bank Report Mandatory",FIELDNAME("Cash/Bank Report Mandatory"),
    BankAccLedgEntry.TABLENAME,CashBankReport.TABLENAME);
    END;
    // End of the lines.
    
    END;
    ...
    

    Kod zastępczy

    ...
    { 111 ; ;SWIFT Code ;Code20 ;CaptionML=ENU=SWIFT Code }
    
    // Add the following lines.
    { 12301; ;Cash/Bank Report Mandatory;Boolean ;OnValidate=BEGIN
    CheckCashBankRepMandatory;
    // End of the lines.
    
    END;
    ...
    
  2. Zmień kod w funkcji CheckCashBankRepMandatory w tabeli Konto bankowe (270) w następujący sposób:
    Istniejący kod

    ...
    BEGIN
    ...
    

    Kod zastępczy

    ...
    // Add the following lines.
    LOCAL PROCEDURE CheckCashBankRepMandatory@1170000();
    VAR
    CashBankReport@1170000 : Record 12300;
    ExchRateAdjmtReg@1170001 : Record 86;
    BEGIN
    IF "Cash/Bank Report Mandatory" THEN BEGIN
    IF HasExchRateAdjmtReg THEN
    RaiseCashBankRepErr(ExchRateAdjmtReg.TABLECAPTION)
    END ELSE
    IF HasCashBankLedgEntries THEN
    RaiseCashBankRepErr(CashBankReport.TABLECAPTION);
    END;
    LOCAL PROCEDURE HasExchRateAdjmtReg@1170006() : Boolean;
    VAR
    ExchRateAdjmtReg@1170000 : Record 86;
    BEGIN
    ExchRateAdjmtReg.SETRANGE("Account Type",ExchRateAdjmtReg."Account Type"::"Bank Account");
    ExchRateAdjmtReg.SETRANGE("Account No.","No.");
    EXIT(NOT ExchRateAdjmtReg.ISEMPTY);
    END;
    LOCAL PROCEDURE HasCashBankLedgEntries@1170007() : Boolean;
    VAR
    BankAccLedgEntry@1170000 : Record 271;
    BEGIN
    IF NOT BankAccLedgEntry.RECORDLEVELLOCKING THEN
    BankAccLedgEntry.SETCURRENTKEY("Bank Account No.","Cash/Bank Report Cons. No.","Cash/Bank Report Position");
    BankAccLedgEntry.SETRANGE("Bank Account No.","No.");
    BankAccLedgEntry.SETFILTER("Cash/Bank Report Cons. No.",'<>0');
    EXIT(NOT BankAccLedgEntry.ISEMPTY);
    END;
    LOCAL PROCEDURE RaiseCashBankRepErr@1170001(RelatedTableCaption@1170000 : Text[80]);
    BEGIN
    ERROR(
    Text12300,"Cash/Bank Report Mandatory",FIELDCAPTION("Cash/Bank Report Mandatory"),
    BankAccLedgEntry.TABLECAPTION,RelatedTableCaption)
    END;
    // End of the lines.
    
    BEGIN
    ...
    
  3. Zmień kod w sekcji Element danych numer 3 w raporcie Dostosowywanie kursów wymiany (595) w następujący sposób:
    Istniejący kod

    ...
    DataItemTable=Table270;
    
    // Delete the following line.
    DataItemTableView=SORTING(Bank Acc. Posting Group);
    
    OnPreDataItem=BEGIN
    ...
    

    Kod zastępczy

    ...
    DataItemTable=Table270;
    
    // Add the following lines.
    DataItemTableView=SORTING(Bank Acc. Posting Group)
    WHERE(Cash/Bank Report Mandatory=FILTER(No));
    // End of the lines.
    
    OnPreDataItem=BEGIN
    ...
    
  4. Zmień kod w sekcji Element danych numer 1 w raporcie Oblicz różnice między programami Exchange (12302) w następujący sposób:
    Istniejący kod

    ...
    DataItemTable=Table270;
    OnPreDataItem=BEGIN
    ...
    

    Kod zastępczy

    ...
    DataItemTable=Table270;
    
    // Add the following lines.
    DataItemTableView=SORTING(No.)
    WHERE(Cash/Bank Report Mandatory=FILTER(Yes));
    // End of the lines.
    
    OnPreDataItem=BEGIN
    ...
    

          

Wymagania wstępne

Aby zastosować tę poprawkę, musisz mieć zainstalowaną polską 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.