Automatyczne uzgadnianie nie działa w przypadku IBAN w holenderskiej wersji programu 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.

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.

Aby rozwiązać ten problem, wykonaj następujące kroki:

1. Zmień kod w właściwości w uzgadnianiu wyciągu z konta CBG uzgadnianiu wyciągu z konta (11000006) w następujący sposób:
   Istniejący kod

   ...CBGStatementRec@1000000 : Record 11400;
             BEGIN
               ResetNumbers;
   
   // Delete the following lines.
              IF CBGStatementRec.FIND('-') THEN BEGIN
                REPEAT
                  MatchCBGStatement(CBGStatementRec);
                UNTIL CBGStatementRec.NEXT() = 0;
              END;
   // End of the deleted lines.
   
             END;
   
     }
   ...
   

   Kod zastępczy

   ...CBGStatementRec@1000000 : Record 11400;
             BEGIN
               ResetNumbers;
   
   // Add the following lines.
              IF CBGStatementRec.FIND('-') THEN
                REPEAT
                  MatchCBGStatement(CBGStatementRec);
                UNTIL CBGStatementRec.NEXT = 0;
   // End of the added lines.
   
             END;
   
     }
   ...
   

2. Zmień kod w zmiennych globalnych w uzgadnianiu wyciągu z konta CBG uzgadnianiu wyciągu z konta (11000006) w następujący sposób:
   Istniejący kod 1

   ...PostDesRec@1000016 : Record 11000006;
         PaymenthistorylineRec@1000017 : Record 11000002;
         TransactionModeRec@1000018 : Record 11000004;
   
   // Delete the following lines.
        Tab@1000019 : Text[2];
        BankaccountNo@1000020 : ARRAY [5] OF Code[40];
        Name@1000021 : Code[40];
   // End of the deleted lines.
   
         Address@1000022 : Code[40];
         City@1000023 : Code[40];
         Identification@1000024 : Code[40];
   ...
   

   Kod zastępczy 1

   ...PostDesRec@1000016 : Record 11000006;
         PaymenthistorylineRec@1000017 : Record 11000002;
         TransactionModeRec@1000018 : Record 11000004;
   
   // Add the following lines.
        TempBankAccount@1000025 : Record 270;
        Name@1000021 : Code[80];
   // End of the added lines.
   
         Address@1000022 : Code[40];
         City@1000023 : Code[40];
         Identification@1000024 : Code[40];
   ...
   

   Istniejący kod 2

   ...Address@1000022 : Code[40];
         City@1000023 : Code[40];
         Identification@1000024 : Code[40];
   
   // Delete the following lines.
        Invoicenumber@1000025 : Text[250];
        Len@1000026 : Integer;
        NumberOfPossibleBankAccounts@1000027 : Integer;
   // End of the deleted lines.
   
         NumberOfDocumentNumbers@1000028 : Integer;
         NumberOfLinesProcessed@1000029 : Integer;
         NumberOfLinesChanged@1000030 : Integer;
   ...
   

   Kod zastępczy 2

   ...Address@1000022 : Code[40];
         City@1000023 : Code[40];
         Identification@1000024 : Code[40];
         NumberOfDocumentNumbers@1000028 : Integer;
         NumberOfLinesProcessed@1000029 : Integer;
         NumberOfLinesChanged@1000030 : Integer;
   ...
   

   Istniejący kod 3

   ...Window@1000040 : Dialog;
         LocalFunctionalityMgt@1000041 : Codeunit 11400;
         HideMessages@1000042 : Boolean;
   
       PROCEDURE MatchCBGStatement@1000000(CBGStatementRec@1000000 : Record 11400);
       VAR
   ...
   

   Kod zastępczy 3

   ...Window@1000040 : Dialog;
         LocalFunctionalityMgt@1000041 : Codeunit 11400;
         HideMessages@1000042 : Boolean;
   
   // Add the following line.
        BankAccountCharsToKeep@1000019 : Text[250];
   
       PROCEDURE MatchCBGStatement@1000000(CBGStatementRec@1000000 : Record 11400);
       VAR
   ...
   

3. Zmień kod w funkcji MatchCBGStatementLine w uzgadnianiu wyciągu z konta CBG uzgadnianiu wyciągu z konta (11000006) w następujący sposób:
   Istniejący kod 1

   ...PROCEDURE MatchCBGStatementLine@1000001(CBGStatementRec@1000000 : Record 11400;VAR CBGStatementlineRec@1000001 : Record 11401);
       VAR
         RecChanged@1000002 : Boolean;
   
   // Delete the following line.
        Found@1000003 : Boolean;
   
         PaymentHistoryFound@1000004 : Boolean;
         i@1000005 : Integer;
         strFilter@1000006 : Text[250];
   ...
   

   Kod zastępczy 1

   ...PROCEDURE MatchCBGStatementLine@1000001(CBGStatementRec@1000000 : Record 11400;VAR CBGStatementlineRec@1000001 : Record 11401);
       VAR
         RecChanged@1000002 : Boolean;
         PaymentHistoryFound@1000004 : Boolean;
         i@1000005 : Integer;
         strFilter@1000006 : Text[250];
   ...
   

   Istniejący kod 2

   ...NumberOfLinesProcessed := NumberOfLinesProcessed + 1;
         RecChanged := FALSE;
   
   -     CLEAR(BankaccountNo);
         CLEAR(Name);
         CLEAR(Address);
         CLEAR(City);
   ...
   

   Kod zastępczy 2

   ...NumberOfLinesProcessed := NumberOfLinesProcessed + 1;
         RecChanged := FALSE;
   
   // Add the following line.
        CLEAR(TempBankAccount);
   
         CLEAR(Name);
         CLEAR(Address);
         CLEAR(City);
   ...
   

   Istniejący kod 3

   ...CLEAR(Address);
         CLEAR(City);
         CLEAR(Identification);
   
   // Delete the following line.
        NumberOfPossibleBankAccounts := 0;
   
         PostDesRec.SETRANGE("Journal Template Name", CBGStatementlineRec."Journal Template Name");
         PostDesRec.SETRANGE("CBG Statement No.", CBGStatementlineRec."No.");
   ...
   

   Kod zastępczy 3

   ...CLEAR(Address);
         CLEAR(City);
         CLEAR(Identification);
   
         PostDesRec.SETRANGE("Journal Template Name", CBGStatementlineRec."Journal Template Name");
         PostDesRec.SETRANGE("CBG Statement No.", CBGStatementlineRec."No.");
   ...
   

   Istniejący kod 4

   ...PostDesRec.SETRANGE("CBG Statement No.", CBGStatementlineRec."No.");
         PostDesRec.SETRANGE("CBG Statement Line No.", CBGStatementlineRec."Line No.");
   
   // Delete the following line.
        IF PostDesRec.FIND('-') THEN BEGIN
   
           REPEAT
             CASE PostDesRec."Information Type" OF
               PostDesRec."Information Type"::"Description and Sundries":
   ...
   

   Kod zastępczy 4

   ...PostDesRec.SETRANGE("CBG Statement No.", CBGStatementlineRec."No.");
         PostDesRec.SETRANGE("CBG Statement Line No.", CBGStatementlineRec."Line No.");
   
   // Add the following line.
        IF PostDesRec.FIND('-') THEN
   
           REPEAT
             CASE PostDesRec."Information Type" OF
               PostDesRec."Information Type"::"Description and Sundries":
   ...
   

   Istniejący kod 5

   ...REPEAT
             CASE PostDesRec."Information Type" OF
               PostDesRec."Information Type"::"Description and Sundries":
   
   // Delete the following lines.
                IF NOT SplitAccountnumber(PostDesRec.Description) THEN
                  SplitInvoicenumber(PostDesRec.Description);
              PostDesRec."Information Type"::"Account No. Balancing Account":
                SplitAccountnumber(PostDesRec.Description);
   // End of the dle
   
               PostDesRec."Information Type"::"Name Acct. Holder":
                 Name := PostDesRec.Description;
               PostDesRec."Information Type"::"Address Acct. Holder":
   ...
   

   Kod zastępczy 5

   ...REPEAT
             CASE PostDesRec."Information Type" OF
               PostDesRec."Information Type"::"Description and Sundries":
   
   // Add the following lines.
                SplitAccountNumber(PostDesRec.Description);
              PostDesRec."Information Type"::"Account No. Balancing Account":
                AddPossibleBankAccount(PostDesRec.Description);
   // End of the added lines.
   
               PostDesRec."Information Type"::"Name Acct. Holder":
                 Name := PostDesRec.Description;
               PostDesRec."Information Type"::"Address Acct. Holder":
   ...
   

   Istniejący kod 6

   ...Identification := PostDesRec.Description;
             END;
           UNTIL PostDesRec.NEXT = 0;
   
   // Delete the following lines.
        END;
   
        IF CBGStatementlineRec."Account No." = '' THEN BEGIN
          FOR i := 1 TO 5 DO BEGIN
            IF BankaccountNo[i] <> '' THEN BEGIN
              IF CBGStatementlineRec.Credit > 0 THEN BEGIN
                IF FindAccountnumber(BankaccountNo[i], TempRec."Source Type"::Customer,CBGStatementlineRec."Account No.") THEN BEGIN
   // End of the deleted lines.
   
                   CBGStatementlineRec."Account Type" := CBGStatementlineRec."Account Type"::Customer;
                   CBGStatementlineRec.VALIDATE("Account No.", CBGStatementlineRec."Account No.");
                   CBGStatementlineRec."Reconciliation Status" := CBGStatementlineRec."Reconciliation Status"::Changed;
   ...
   

   Kod zastępczy 6

   ...Identification := PostDesRec.Description;
             END;
           UNTIL PostDesRec.NEXT = 0;
   
   // Add the following lines.
        IF CBGStatementlineRec."Account No." = '' THEN BEGIN
          IF TempBankAccount.FINDFIRST THEN
            REPEAT
              IF TempBankAccount.IBAN <> '' THEN BEGIN
              IF CBGStatementlineRec.Credit > 0 THEN BEGIN
                  IF FindAccountnumber(TempBankAccount.IBAN,TempRec."Source Type"::Customer,CBGStatementlineRec."Account No.") THEN BEGIN
   // End of the added lines.
   
                   CBGStatementlineRec."Account Type" := CBGStatementlineRec."Account Type"::Customer;
                   CBGStatementlineRec.VALIDATE("Account No.", CBGStatementlineRec."Account No.");
                   CBGStatementlineRec."Reconciliation Status" := CBGStatementlineRec."Reconciliation Status"::Changed;
   ...
   

   Istniejący kod 7

   ...RecChanged := TRUE;
                 END;
               END ELSE BEGIN
   
   // Delete the following line.
                IF FindAccountnumber(BankaccountNo[i], TempRec."Source Type"::Vendor,CBGStatementlineRec."Account No.") THEN BEGIN
   
                   CBGStatementlineRec."Account Type" := CBGStatementlineRec."Account Type"::Vendor;
                   CBGStatementlineRec.VALIDATE("Account No.", CBGStatementlineRec."Account No.");
                   CBGStatementlineRec."Reconciliation Status" := CBGStatementlineRec."Reconciliation Status"::Changed;
   ...
   

   Kod zastępczy 7

   ...RecChanged := TRUE;
                 END;
               END ELSE BEGIN
   
   // Add the following line.
                  IF FindAccountnumber(TempBankAccount.IBAN,TempRec."Source Type"::Vendor,CBGStatementlineRec."Account No.") THEN BEGIN
   
                   CBGStatementlineRec."Account Type" := CBGStatementlineRec."Account Type"::Vendor;
                   CBGStatementlineRec.VALIDATE("Account No.", CBGStatementlineRec."Account No.");
                   CBGStatementlineRec."Reconciliation Status" := CBGStatementlineRec."Reconciliation Status"::Changed;
   ...
   

   Istniejący kod 8

   ...END;
               END;
             END;
   
   // Delete the following line.
          END;
   
           IF NOT RecChanged THEN BEGIN
             IF Name <> '' THEN BEGIN
               IF CBGStatementlineRec.Credit > 0 THEN BEGIN
   ...
   

   Kod zastępczy 8

   ...END;
               END;
             END;
   
   // Add the following line.
            UNTIL TempBankAccount.NEXT = 0;
   
           IF NOT RecChanged THEN BEGIN
             IF Name <> '' THEN BEGIN
               IF CBGStatementlineRec.Credit > 0 THEN BEGIN
   ...
   

   Istniejący kod 9

   ...END;
         END;
   
   // Delete the following lines.
        IF RecChanged THEN BEGIN
          CBGStatementlineRec.MODIFY(TRUE);
   // End of the deleted lines.
   
         END;
       END;
   ...
   

   Kod zastępczy 9

   ...END;
         END;
   
   // Add the following lines.
        IF RecChanged THEN
          CBGStatementlineRec.MODIFY(TRUE);
      END;
   
      PROCEDURE SplitAccountNumber@1000002(strBuf@1000001 : Text[250]);
      VAR
        AccNo@1000003 : Text[30];
      BEGIN
        IF LocalFunctionalityMgt.CheckBankAccNo(COPYSTR(strBuf,1,30),'',AccNo) THEN
          AddPossibleBankAccount(AccNo);
      END;
   
      PROCEDURE FindAccountnumber@1000004("Account Name"@1000001 : Code[80];"Source Type"@1000002 : Integer;VAR Sourcenumber@1000003 : Code[20]) found@1000000 : Boolean;
      BEGIN
        TempRec.SETRANGE("Data Type",TempRec."Data Type"::Bankaccount);
        TempRec.SETRANGE("Source Type","Source Type");
        TempRec.SETRANGE(Word,"Account Name");
        IF TempRec.FIND('-') THEN BEGIN
          Sourcenumber := TempRec."Source No.";
          EXIT(TRUE);
   // End of the added lines.
   
         END;
       END;
   ...
   

4. Zmień kod w funkcji SplitAccountnumber w uzgadnianiu wyciągu z konta CBG uzgadnianiu wyciągu z konta (11000006) w następujący sposób:
   Istniejący kod

   ...END;
       END;
   
   // Delete the following lines.
      PROCEDURE SplitAccountnumber@1000002(VAR strBuf@1000001 : Text[250]) result@1000000 : Boolean;
      VAR
        strHlpBuf@1000002 : Text[250];
        AccNo@1000003 : Text[30];
      BEGIN
        result := LocalFunctionalityMgt.CheckBankAccNo(COPYSTR(strBuf,1,30), '', AccNo);
        IF result THEN BEGIN
          NumberOfPossibleBankAccounts := NumberOfPossibleBankAccounts + 1;
          BankaccountNo[NumberOfPossibleBankAccounts] :=
                          LocalFunctionalityMgt.CharacterFilter(AccNo,'0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZ');
        END;
      END;
   
      PROCEDURE SplitInvoicenumber@1000003(strBuf@1000000 : Text[250]);
      BEGIN
      END;
   
      PROCEDURE FindAccountnumber@1000004("Account Name"@1000001 : Code[80];"Source Type"@1000002 : Integer;VAR Sourcenumber@1000003 : Code[20]) found@1000000 : Boolean;
      BEGIN
        TempRec.SETRANGE(TempRec."Data Type", TempRec."Data Type"::Bankaccount);
        TempRec.SETRANGE(TempRec."Source Type", "Source Type");
        TempRec.SETRANGE(TempRec.Word, "Account Name");
        IF TempRec.FIND('-') THEN BEGIN
          Sourcenumber := TempRec."Source No.";
          EXIT(TRUE);
        END;
      END;
   // End of the deleted lines.
   
       PROCEDURE FindNAC@1000005(Name@1000001 : Code[80];Address@1000002 : Code[80];City@1000003 : Code[80];"Source Type"@1000004 : Integer;VAR SourcenumberFound@1000005 : Code[20]) found@1000000 : Boolean;
       VAR
         NameResultTemp@1000006 : TEMPORARY Record 11000008;
   ...
   

   Kod zastępczy

   ...END;
       END;
   
       PROCEDURE FindNAC@1000005(Name@1000001 : Code[80];Address@1000002 : Code[80];City@1000003 : Code[80];"Source Type"@1000004 : Integer;VAR SourcenumberFound@1000005 : Code[20]) found@1000000 : Boolean;
       VAR
         NameResultTemp@1000006 : TEMPORARY Record 11000008;
   ...
   

5. Zmień kod w funkcji FindNAC w uzgadnianiu wyciągu z konta CBG uzgadnianiu wyciągu z konta (11000006) w następujący sposób:
   Istniejący kod 1

   ...AddressResultTemp.SETCURRENTKEY("Source Type", "Source No.");
         CityResultTemp.SETCURRENTKEY("Source Type", "Source No.");
   
   // Delete the following lines.
        TempRec.SETRANGE(TempRec."Source Type", "Source Type");
        TempRec.SETRANGE(TempRec."Data Type", TempRec."Data Type"::Name);
        TempRec.SETRANGE(TempRec.Word, COPYSTR(Name,1,20));
   // End of the deleted lines.
   
         IF TempRec.FIND('-') THEN
           REPEAT
             NameResultTemp := TempRec;
   ...
   

   Kod zastępczy 1

   ...AddressResultTemp.SETCURRENTKEY("Source Type", "Source No.");
         CityResultTemp.SETCURRENTKEY("Source Type", "Source No.");
   
   // Add the following lines.
        TempRec.SETRANGE("Source Type","Source Type");
        TempRec.SETRANGE("Data Type",TempRec."Data Type"::Name);
        TempRec.SETRANGE(Word,COPYSTR(Name,1,20));
   // End of the added lines.
   
         IF TempRec.FIND('-') THEN
           REPEAT
             NameResultTemp := TempRec;
   ...
   

   Istniejący kod 2

   ...NameResultTemp.INSERT;
           UNTIL TempRec.NEXT = 0;
   
   // Delete the following lines.
        TempRec.RESET();
        TempRec.SETRANGE(TempRec."Source Type", "Source Type");
        TempRec.SETRANGE(TempRec."Data Type", TempRec."Data Type"::Street);
        TempRec.SETRANGE(TempRec.Word, COPYSTR(Address,1,20));
   // End of the deleted lines.
   
         IF TempRec.FIND('-') THEN
           REPEAT
             NameResultTemp.SETRANGE("Source Type",TempRec."Source Type");
   ...
   

   Kod zastępczy 2

   ...NameResultTemp.INSERT;        UNTIL TempRec.NEXT = 0;
   
   // Add the following lines.
        TempRec.RESET;
        TempRec.SETRANGE("Source Type","Source Type");
        TempRec.SETRANGE("Data Type",TempRec."Data Type"::Street);
        TempRec.SETRANGE(Word,COPYSTR(Address,1,20));
   // End of the added lines.
   
         IF TempRec.FIND('-') THEN
           REPEAT
             NameResultTemp.SETRANGE("Source Type",TempRec."Source Type");
   ...
   

   Istniejący kod 3

   ...END;
           UNTIL TempRec.NEXT = 0;
   
   // Delete the following lines.
        TempRec.RESET();
        TempRec.SETRANGE(TempRec."Source Type", "Source Type");
        TempRec.SETRANGE(TempRec."Data Type", TempRec."Data Type"::City);
        TempRec.SETRANGE(TempRec.Word, COPYSTR(City,1,20));
   // End of the deleted lines.
   
         IF TempRec.FIND('-') THEN
           REPEAT
             AddressResultTemp.SETRANGE("Source Type",TempRec."Source Type");
   ...
   

   Kod zastępczy 3

   ...END;
           UNTIL TempRec.NEXT = 0;
   
   // Add the following lines.
        TempRec.RESET;
        TempRec.SETRANGE("Source Type","Source Type");
        TempRec.SETRANGE("Data Type",TempRec."Data Type"::City);
        TempRec.SETRANGE(Word,COPYSTR(City,1,20));
   // End of the added lines.
   
         IF TempRec.FIND('-') THEN
           REPEAT
             AddressResultTemp.SETRANGE("Source Type",TempRec."Source Type");
   ...
   

6. Zmień kod w funkcji MakeTempfile w uzgadnianiu wyciągu z konta CBG uzgadnianiu wyciągu z konta (11000006) w następujący sposób:
   Istniejący kod

   ...VAR
         NumberRec@1000000 : Integer;
         RecNumerator@1000001 : Integer;
   
   // Delete the following line.
        BankAccountCharsToKeep@1000002 : Text[50];
   
       BEGIN
         BankAccountCharsToKeep := 'ABCDEFGHIJKLMNOPQRSTUVWYXZ0123456789';
         TempRec.RESET();
   ...
   

   Kod zastępczy

   ...VAR
         NumberRec@1000000 : Integer;
         RecNumerator@1000001 : Integer;
       BEGIN
         BankAccountCharsToKeep := 'ABCDEFGHIJKLMNOPQRSTUVWYXZ0123456789';
         TempRec.RESET();
   ...
   

7. Zmień kod w funkcji GetTransactionModeFilter w uzgadnianiu wyciągu z konta CBG uzgadnianiu wyciągu z konta (11000006) w następujący sposób:
   Istniejący kod 1

   ...LOCAL PROCEDURE GetTransactionModeFilter@1000012(VAR CBGStatementLineRec@1000000 : Record 11401;VAR strFilter@1000001 : Text[250];Account_Type@1000002 : Integer);
       VAR
         CBGStatementRec@1000003 : Record 11400;
   
   // Delete the following line.
        BankAccountRec@1000004 : Record 270;
   
       BEGIN
         strFilter := '';
         IF CBGStatementRec.GET(CBGStatementLineRec."Journal Template Name",CBGStatementLineRec."No.") THEN BEGIN
   ...
   

   Kod zastępczy 1

   ...LOCAL PROCEDURE GetTransactionModeFilter@1000012(VAR CBGStatementLineRec@1000000 : Record 11401;VAR strFilter@1000001 : Text[250];Account_Type@1000002 : Integer);
       VAR
         CBGStatementRec@1000003 : Record 11400;
       BEGIN
         strFilter := '';
         IF CBGStatementRec.GET(CBGStatementLineRec."Journal Template Name",CBGStatementLineRec."No.") THEN BEGIN
   ...
   

   Istniejący kod 2

   ...strFilter := '';
         IF CBGStatementRec.GET(CBGStatementLineRec."Journal Template Name",CBGStatementLineRec."No.") THEN BEGIN
           TransactionModeRec.SETRANGE("Account Type", Account_Type);
   
   // Delete the following line.
          TransactionModeRec.SETRANGE(TransactionModeRec."Our Bank", CBGStatementRec."Account No.");
   
           IF TransactionModeRec.FIND('-') THEN BEGIN
             strFilter := '''''';
             REPEAT
   ...
   

   Kod zastępczy 2

   ...strFilter := '';
         IF CBGStatementRec.GET(CBGStatementLineRec."Journal Template Name",CBGStatementLineRec."No.") THEN BEGIN
           TransactionModeRec.SETRANGE("Account Type", Account_Type);
   
   // Add the following line.
          TransactionModeRec.SETRANGE("Our Bank",CBGStatementRec."Account No.");
   
           IF TransactionModeRec.FIND('-') THEN BEGIN
             strFilter := '''''';
             REPEAT
   ...
   

8. Zmień kod w funkcji SetHideMessages w uzgadnianiu wyciągu z konta CBG uzgadnianiu wyciągu z konta (11000006) w następujący sposób:
   Istniejący kod

   ...HideMessages := HideMessages2;
       END;
   
   // Delete the following lines.
      BEGIN
      {
   
        // Bankafschriften matchen, automatisch boekstuk(regels) vereffenen
      }
   // End of the deleted lines.
   
       END.
     }
   }
   ...
   

   Kod zastępczy

   ...HideMessages := HideMessages2;
       END;
   
   // Add the following lines.
      LOCAL PROCEDURE AddPossibleBankAccount@1000018(AccountNumber@1000000 : Text[30]);
      BEGIN
        TempBankAccount.INIT;
        TempBankAccount.VALIDATE(TempBankAccount."No.",FORMAT(TempBankAccount.COUNT + 1));
        TempBankAccount.IBAN := LocalFunctionalityMgt.CharacterFilter(AccountNumber,BankAccountCharsToKeep);
        TempBankAccount.INSERT;
      END;
   
      BEGIN
   // End of the added lines.
   
       END.
     }
   }
   ...
   

Wymagania wstępne

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

• Holenderskiej wersji programu Microsoft Dynamics NAV 2009 R2

• Holenderskiej wersji dodatku SP1 dla programu Microsoft Dynamics NAV 2009

Informacje dotyczące usuwania

Nie można usunąć tej poprawki.