Otomatik mutabakat için IBAN Hollanda Microsoft Dynamics NAV 2009 sürümünde çalışmıyor

Düzeltme bilgileri

Artık Microsoft tarafından desteklenen bir düzeltme sağlanmaktadır. Ancak bunun yalnızca bu makalede anlatılan sorunu düzeltmesi amaçlanmıştır. Yalnızca bu özel sorunla karşılaşmış olan sistemlere uygulayın. Bu düzeltme ek sınama uygulanabilir. Bu nedenle, bu sorundan ciddi bir şekilde etkilenmiyorsanız, Microsoft Dynamics NAV 2009 sonraki hizmet paketini veya, bu düzeltmeyi içeren bir sonraki Microsoft Dynamics NAV sürümü için beklemek öneririz.

Not: Özel durumlarda, destek aramaları teknik destek uzmanı Microsoft Dynamics ve ilgili ürünlere yönelik iptal edilebilir çözeceğini giderleri belirleyen belirli bir güncelleştirmenin sorununuzu. Ek destek sorularına ve söz konusu güncelleştirme için geçerli olmayan sorunlara normal destek ücretleri uygulanır.

Yükleme bilgileri

Microsoft, programlama örneklerini yalnızca gösterim amacıyla zımni veya açık garanti olmadan sağlar. Bu, satılabilirlik veya belirli bir amaca uygunluk açısından zımni garantileri içerir ancak bunlarla sınırlı değildir. Bu makale, gösterilen programlama dilini, yordamları oluşturmak ve yordamlardan hata ayıklamak için kullanılan araçları bildiğinizi varsayar. Microsoft destek mühendisleri belirli bir yordamın işlevselliğinin açıklanmasına yardımcı olabilir. Ancak, işlevsellik sağlamak veya yordamlar, belirli gereksinimlerinizi karşılayacak şekilde geliştirmek amacıyla bu örnekleri değiştirmezler.

Not: Bu düzeltmeyi yüklemeden önce tüm Microsoft Dynamics NAV istemci kullanıcıların sistem kaydedildiğini doğrulayın. Bu, Microsoft Dynamics NAV uygulama sunucusu (NAS) hizmetleri içerir. Bu düzeltmeyi uyguladığınızda yalnızca istemci kullanıcının oturum açmış olması gerekir.

Bu düzeltmeyi uygulamak için bir geliştirici lisansı olması gerekir.

Kullanıcı hesabının Windows oturumu açma penceresini veya veritabanı oturumu açma penceresi "Süper" rol kimliği atanması öneririz Kullanıcı hesabı "Süper" rol Kimliği atanamaz, kullanıcı hesabı aşağıdaki izinlere sahip olduğunu doğrulamanız gerekir:

• Nesnenin, değiştirme değişiklik yapma izni.

• Sistem nesne kimliği 9015 ve Sistem nesnesi kimliği 5210 nesne için Execute izni
  
  nesne.

Not: Veri onarım gerçekleştirmek zorunda sürece veri depoları haklarına sahip olmanız gerekmez.

Kod değişiklikleri

Not: Her zaman, uygulamadan önce test kodu denetimli bir ortamda üretim bilgisayarlarınıza düzeltmeler giderir.

Bu sorunu gidermek için şu adımları izleyin:

1. CBG hesap ekstresi mutabakatını codeuint (11000006) Özellikleri'nde kodu aşağıdaki gibi değiştirin:
   Varolan kodu

   ...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 değiştirme

   ...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. Global değişkenler kodunda CBG hesap ekstresi mutabakatını codeuint (11000006) aşağıdaki gibi değiştirin:
   Varolan kodu 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];
   ...
   

   Değiştirme kodu 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];
   ...
   

   Varolan kodu 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;
   ...
   

   Değiştirme kodu 2

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

   Varolan kodu 3

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

   Değiştirme kodu 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. Hesap ekstresi mutabakatını CBG codeuint (11000006) MatchCBGStatementLine işlevinde kodu aşağıdaki gibi değiştirin:
   Varolan kodu 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];
   ...
   

   Değiştirme kodu 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];
   ...
   

   Varolan kodu 2

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

   Değiştirme kodu 2

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

   Varolan kodu 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.");
   ...
   

   Değiştirme kodu 3

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

   Varolan kodu 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":
   ...
   

   Değiştirme kodu 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":
   ...
   

   Varolan kodu 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":
   ...
   

   Değiştirme kodu 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":
   ...
   

   Varolan kodu 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;
   ...
   

   Değiştirme kodu 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;
   ...
   

   Varolan kodu 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;
   ...
   

   Değiştirme kodu 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;
   ...
   

   Varolan kodu 8

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

   Değiştirme kodu 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
   ...
   

   Varolan kodu 9

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

   Değiştirme kodu 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. Hesap ekstresi mutabakatını CBG codeuint (11000006) SplitAccountnumber işlevinde kodu aşağıdaki gibi değiştirin:
   Varolan kodu

   ...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 değiştirme

   ...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. Hesap ekstresi mutabakatını CBG codeuint (11000006) FindNAC işlevinde kodu aşağıdaki gibi değiştirin:
   Varolan kodu 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;
   ...
   

   Değiştirme kodu 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;
   ...
   

   Varolan kodu 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");
   ...
   

   Değiştirme kodu 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");
   ...
   

   Varolan kodu 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");
   ...
   

   Değiştirme kodu 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. Hesap ekstresi mutabakatını CBG codeuint (11000006) MakeTempfile işlevinde kodu aşağıdaki gibi değiştirin:
   Varolan kodu

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

   Kod değiştirme

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

7. Hesap ekstresi mutabakatını CBG codeuint (11000006) GetTransactionModeFilter işlevinde kodu aşağıdaki gibi değiştirin:
   Varolan kodu 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
   ...
   

   Değiştirme kodu 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
   ...
   

   Varolan kodu 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
   ...
   

   Değiştirme kodu 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. Hesap ekstresi mutabakatını CBG codeuint (11000006) SetHideMessages işlevinde kodu aşağıdaki gibi değiştirin:
   Varolan kodu

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

   Kod değiştirme

   ...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.
     }
   }
   ...
   

Önkoşullar

Bu düzeltmeyi uygulamak için aşağıdaki ürünlerden birine sahip olmalıdır:

• Microsoft Dynamics NAV 2009 R2 Felemenkçe sürümü

• Microsoft Dynamics NAV 2009 SP1 Felemenkçe sürümü

Kaldırma bilgileri

Bu düzeltmeyi kaldıramazsınız.