تحدث هذه المشكلة عند استيراد كشف حساب بنكي مع كامت في إصدار اللغة الهولندية من Microsoft Dynamics NAV 2009. بالإضافة إلى ذلك، لا يصلح "إدخال دفتر الأستاذ العميل" المفتوحة تلقائياً. اتبع الخطوات الموجودة في المقطع تغييرات التعليمات البرمجية لحل هذه المشكلة. تحدث هذه المشكلة في المنتجات التالية:
-
إصدار اللغة الهولندية من Microsoft Dynamics NAV 2009 R2
-
إصدار اللغة الهولندية من Microsoft Dynamics NAV 2009 Service Pack 1 (SP1)
الحل
معلومات الإصلاح العاجل
الآن يتوفر إصلاح عاجل معتمد من Microsoft. ومع ذلك، هو فقط لتصحيح المشكلة الموضحة في هذه المقالة. تطبيقها فقط على الأنظمة التي تواجه هذه المشكلة بالتحديد. قد يتم إجراء اختبارات إضافية على هذا الإصلاح العاجل. ولذلك، إذا لم يكن تأثير المشكلة كبيرا، نوصي بالانتظار حتى الإصدار التالي من حزمة الخدمة Microsoft Dynamics NAV 2009 أو الإصدار Microsoft Dynamics التنقل التالي الذي يحتوي على هذا الإصلاح العاجل.
ملاحظة: في بعض الحالات، يحدد المصروفات التي تحتسب عادة لدعم قد يتم إلغاء المكالمات إذا "أخصائي الدعم التقني" ل Microsoft Dynamics والمنتجات ذات الصلة أن تحديثًا معيناً سوف يعمل على حل المشكلة. سيتم اضافة تكاليف الدعم المعتادة على أسئلة الدعم الإضافية والمشاكل التي لا يأهل على حلها للتحديث المطلوب.
معلومات التثبيت
تقدم Microsoft أمثلة برمجية للتوضيح فقط، دون أي ضمان صريح أو ضمني. هذا يتضمن، على سبيل المثال لا الحصر، الضمانات الضمنية الخاصة بالتسويق أو الملاءمة لغرض معين. تفترض هذه المقالة أنك معتاد على لغة البرمجة التي يتم شرحها والأدوات المستخدمة لإنشاء الإجراءات وتصحيحها. يساعد مهندسو الدعم لدى Microsoft شرح وظيفة إجراء محدد. ومع ذلك، لن يقوموا بتعديل هذه الأمثلة لتقديم وظيفة إضافية أو إنشاء إجراءات تستوفي متطلبات محددة.
ملاحظة: قبل تثبيت هذا الإصلاح العاجل، تأكد من تسجيل خروج النظام كافة المستخدمين عميل Microsoft Dynamics التنقل. ويشمل ذلك خدمات Microsoft Dynamics NAV تطبيق الملقم (NAS). يجب أن يكون عميل فقط المستخدم الذي تم تسجيل دخوله عند تطبيق هذا الإصلاح العاجل.
لتطبيق هذا الإصلاح العاجل، يجب أن يكون لديك ترخيص مطور.
نوصي بأن تعيين حساب المستخدم في إطار عمليات تسجيل دخول Windows أو في إطار "قاعدة بيانات تسجيل الدخول" بمعرف دور "رئيسي". إذا كان حساب المستخدم لا يمكن تعيين معرف دور "سوبر"، يجب التحقق من أن حساب المستخدم يملك الأذونات التالية:
-
إذن "تعديل" للكائن الذي سيتم تغيير.
-
إذن Execute للكائن 5210 معرف كائن النظام و نظام 9015 معرف الكائن
الكائن.
ملاحظة: ليس لديك حق لمخازن البيانات ما لم يكن لديك لإجراء إصلاح البيانات.
تغييرات التعليمات البرمجية
ملاحظة: دوماً التعليمات البرمجية للاختبار إصلاح في بيئة تسيطر عليها قبل تطبيق إصلاحات لأجهزة الكمبيوتر الإنتاج.
لحل هذه المشكلة، اتبع الخطوات التالية.
-
تغيير التعليمات البرمجية في خصائص كوديوينت تسوية كشف CBG (11000006) كما يلي:
التعليمات البرمجية الموجودة...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;
}
...استبدال التعليمات البرمجية
...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;
}
... -
تغيير التعليمات البرمجية في "المتغيرات العمومية" في كوديوينت تسوية كشف CBG (11000006) كما يلي:
التعليمات البرمجية الموجودة 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];
...استبدال رمز 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];
...التعليمات البرمجية الموجودة 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;
...استبدال رمز 2
...Address@1000022 : Code[40];
City@1000023 : Code[40];
Identification@1000024 : Code[40];
NumberOfDocumentNumbers@1000028 : Integer;
NumberOfLinesProcessed@1000029 : Integer;
NumberOfLinesChanged@1000030 : Integer;
...التعليمات البرمجية الموجودة 3
...Window@1000040 : Dialog;
LocalFunctionalityMgt@1000041 : Codeunit 11400;
HideMessages@1000042 : Boolean;
PROCEDURE MatchCBGStatement@1000000(CBGStatementRec@1000000 : Record 11400);
VAR
...استبدال رمز 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
... -
تغيير التعليمات البرمجية في وظيفة ماتشكبجستاتيمينتليني في كوديوينت تسوية كشف CBG (11000006) كما يلي:
التعليمات البرمجية الموجودة 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];
...استبدال رمز 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];
...التعليمات البرمجية الموجودة 2
...NumberOfLinesProcessed := NumberOfLinesProcessed + 1;
RecChanged := FALSE;
- CLEAR(BankaccountNo);
CLEAR(Name);
CLEAR(Address);
CLEAR(City);
...استبدال رمز 2
...NumberOfLinesProcessed := NumberOfLinesProcessed + 1;
RecChanged := FALSE;
// Add the following line.
CLEAR(TempBankAccount);
CLEAR(Name);
CLEAR(Address);
CLEAR(City);
...التعليمات البرمجية الموجودة 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.");
...استبدال رمز 3
...CLEAR(Address);
CLEAR(City);
CLEAR(Identification);
PostDesRec.SETRANGE("Journal Template Name", CBGStatementlineRec."Journal Template Name");
PostDesRec.SETRANGE("CBG Statement No.", CBGStatementlineRec."No.");
...التعليمات البرمجية الموجودة 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":
...استبدال رمز 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":
...التعليمات البرمجية الموجودة 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":
...استبدال رمز 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":
...التعليمات البرمجية الموجودة 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;
...استبدال رمز 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;
...التعليمات البرمجية الموجودة 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;
...رمز الاستبدال 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;
...التعليمات البرمجية الموجودة 8
...END;
END;
END;
// Delete the following line.
END;
IF NOT RecChanged THEN BEGIN
IF Name <> '' THEN BEGIN
IF CBGStatementlineRec.Credit > 0 THEN BEGIN
...استبدال رمز 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
...التعليمات البرمجية الموجودة 9
...END;
END;
// Delete the following lines.
IF RecChanged THEN BEGIN
CBGStatementlineRec.MODIFY(TRUE);
// End of the deleted lines.
END;
END;
...استبدال التعليمات البرمجية 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;
... -
تغيير التعليمات البرمجية في وظيفة سبليتاككونتنومبير في كوديوينت تسوية كشف CBG (11000006) كما يلي:
التعليمات البرمجية الموجودة...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;
...استبدال التعليمات البرمجية
...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;
... -
تغيير التعليمات البرمجية في وظيفة فيندناك في كوديوينت تسوية كشف CBG (11000006) كما يلي:
التعليمات البرمجية الموجودة 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;
...استبدال رمز 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;
...التعليمات البرمجية الموجودة 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");
...استبدال رمز 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");
...التعليمات البرمجية الموجودة 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");
...استبدال رمز 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");
... -
تغيير التعليمات البرمجية في وظيفة ماكيتيمبفيلي في كوديوينت تسوية كشف CBG (11000006) كما يلي:
التعليمات البرمجية الموجودة...VAR
NumberRec@1000000 : Integer;
RecNumerator@1000001 : Integer;
// Delete the following line.
BankAccountCharsToKeep@1000002 : Text[50];
BEGIN
BankAccountCharsToKeep := 'ABCDEFGHIJKLMNOPQRSTUVWYXZ0123456789';
TempRec.RESET();
...استبدال التعليمات البرمجية
...VAR
NumberRec@1000000 : Integer;
RecNumerator@1000001 : Integer;
BEGIN
BankAccountCharsToKeep := 'ABCDEFGHIJKLMNOPQRSTUVWYXZ0123456789';
TempRec.RESET();
... -
تغيير التعليمات البرمجية في وظيفة جيترانساكتيونموديفيلتير في كوديوينت تسوية كشف CBG (11000006) كما يلي:
التعليمات البرمجية الموجودة 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
...استبدال رمز 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
...التعليمات البرمجية الموجودة 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
...استبدال رمز 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
... -
تغيير التعليمات البرمجية في وظيفة سيثيديميساجيس في كوديوينت تسوية كشف CBG (11000006) كما يلي:
التعليمات البرمجية الموجودة...HideMessages := HideMessages2;
END;
// Delete the following lines.
BEGIN
{
// Bankafschriften matchen, automatisch boekstuk(regels) vereffenen
}
// End of the deleted lines.
END.
}
}
...استبدال التعليمات البرمجية
...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.
}
}
...
المتطلبات الأساسية
يجب أن يكون لديك أحد المنتجات التالية مثبتة لتطبيق هذا الإصلاح العاجل:
-
إصدار اللغة الهولندية من Microsoft Dynamics NAV 2009 R2
-
إصدار اللغة الهولندية من Microsoft Dynamics NAV 2009 SP1
معلومات الإزالة
لا يمكنك إزالة هذا الإصلاح العاجل.
الحالة
أقرت Microsoft أن هذه مشكلة في منتجات Microsoft المسردة في قسم "ينطبق على".
ملاحظة: وهذا المقال "النشر السريع" التي تم إنشاؤها مباشرة من داخل مؤسسة دعم Microsoft. وتقدم المعلومات الواردة في هذه الوثيقة كاستجابه للمسائل الناشئة. نتيجة للسرعة في توفيره، قد تتضمن الأخطاء المطبعية المواد ويمكن مراجعة في أي وقت دون سابق إنذار. راجع شروط الاستخداملاعتبارات أخرى.
