توفر المقالات المنشورة بسرعة معلومات مباشرة من داخل مؤسسة دعم Microsoft. يتم إنشاء المعلومات الواردة هنا استجابة للمواضيع الناشئة أو الفريدة، أو تهدف إلى استكمال معلومات قاعدة المعارف الأخرى.
تنطبق هذه المقالة على Microsoft Dynamics NAV لجميع البلدان وجميع اللغات المحلية.
الأعراض
افترض أن خانة الاختيار ضبط خصم الدفع محددة في علامة التبويب عام في نموذج إعداد دفتر الأستاذ العام في Microsoft Dynamics NAV 2009. إذا قمت بنشر دفعة لتطبيق فاتورة حيث تم استخدام "ضريبة القيمة المضافة الكاملة" وقمت بخصم خصم الدفع حيث يجب عليك ضبط ضريبة القيمة المضافة لخصم الدفع، يتم استخدام حساب G/L غير صحيح. يتم تسجيل إدخال تعديل "ضريبة القيمة المضافة الكاملة" لحساب خصم خصم الدفع بدلا من حساب ائتمان خصم الدفع في إدخالات G/L.
الدقة
معلومات الإصلاح العاجل
يتوفر الآن إصلاح عاجل مدعوم من Microsoft. ومع ذلك، فإنه يهدف فقط إلى تصحيح المشكلة الموضحة في هذه المقالة. قم بتطبيقه فقط على الأنظمة التي تواجه هذه المشكلة المحددة. قد يتلقى الإصلاح العاجل هذا اختبارا إضافيا. لذلك، إذا لم تتأثر بشدة بهذه المشكلة، نوصي بالانتظار حتى حزمة خدمة Microsoft Dynamics NAV التالية أو الإصدار التالي الذي يحتوي على هذا الإصلاح العاجل.
ملاحظة في حالات خاصة، قد يتم إلغاء الرسوم التي يتم تكبدها عادة لمكالمات الدعم إذا حدد محترف الدعم التقني ل Microsoft Dynamics والمنتجات ذات الصلة أن تحديثا معينا سيحل مشكلتك. سيتم تطبيق تكاليف الدعم المعتادة على أسئلة الدعم الإضافية والمشكلات غير المؤهلة للتحديث المحدد المعني.
معلومات التثبيت
توفر Microsoft أمثلة برمجة للتوضيح فقط، دون ضمان سواء تم التعبير عنه أو تضمينه. وهذا يشمل، على سبيل المثال لا الحصر، الضمانات الضمنية للقابلية التجارية أو اللياقة البدنية لغرض معين. تفترض هذه المقالة أنك على دراية بلغة البرمجة التي يتم توضيحها ومع الأدوات المستخدمة لإنشاء إجراءات وتصحيح الأخطاء. يمكن لمهندسي دعم Microsoft المساعدة في شرح وظائف إجراء معين، لكنهم لن يعدلوا هذه الأمثلة لتوفير وظائف إضافية أو إجراءات بناء لتلبية متطلباتك المحددة.
ملاحظة قبل تثبيت هذا الإصلاح العاجل، تحقق من تسجيل خروج جميع مستخدمي عميل Microsoft Navision من النظام. يتضمن ذلك مستخدمي عميل Microsoft Navision Application Services (NAS). يجب أن تكون المستخدم العميل الوحيد الذي قام بتسجيل الدخول عند تنفيذ هذا الإصلاح العاجل.
لتنفيذ هذا الإصلاح العاجل، يجب أن يكون لديك ترخيص مطور.
نوصي بتعيين معرف دور "SUPER" لحساب المستخدم في نافذة تسجيلات الدخول إلى Windows أو في نافذة تسجيلات دخول قاعدة البيانات. إذا تعذر تعيين معرف دور "SUPER" لحساب المستخدم، فيجب عليك التحقق من أن حساب المستخدم لديه الأذونات التالية:
- إذن تعديل للكائن الذي ستقوم بتغييره.
- إذن Execute للكائن System Object ID 5210 ولعنصر System Object ID 9015.
ملاحظة ليس لديك حقوق في مخازن البيانات ما لم يكن لديك لإجراء إصلاح البيانات.
تغييرات التعليمات البرمجية
ملاحظة اختبر دائما إصلاحات التعليمات البرمجية في بيئة خاضعة للرقابة قبل تطبيق الإصلاحات على أجهزة الكمبيوتر الإنتاجية.
لتثبيت هذا الإصلاح العاجل، قم بتغيير التعليمات البرمجية في Gen. Jnl.-Post Line codeunit (12).
اتبع هذه الخطوات للقيام بذلك:
تغيير التعليمات البرمجية في الدالة PostDtldCustLedgEntries كما يلي:
التعليمات البرمجية الموجودة 1… GenPostingSetup.GET( DtldCVLedgEntryBuf."Gen. Bus. Posting Group", DtldCVLedgEntryBuf."Gen. Prod. Posting Group"); IF (DtldCVLedgEntryBuf."Amount (LCY)" <= 0) THEN BEGIN GenPostingSetup.TESTFIELD("Sales Pmt. Disc. Debit Acc."); PaymentDiscAcc := GenPostingSetup."Sales Pmt. Disc. Debit Acc."; END ELSE BEGIN …رمز الاستبدال 1
… GenPostingSetup.GET( DtldCVLedgEntryBuf."Gen. Bus. Posting Group", DtldCVLedgEntryBuf."Gen. Prod. Posting Group"); IF (DtldCVLedgEntryBuf."Amount (LCY)" <= 0) AND (DtldCVLedgEntryBuf."VAT Amount (LCY)" <= 0) THEN BEGIN GenPostingSetup.TESTFIELD("Sales Pmt. Disc. Debit Acc."); PaymentDiscAcc := GenPostingSetup."Sales Pmt. Disc. Debit Acc."; END ELSE BEGIN …التعليمات البرمجية الموجودة 2
… IF GLSetup."Payment Tolerance Posting" = GLSetup."Payment Tolerance Posting"::"Payment Tolerance Accounts" THEN BEGIN IF (DtldCVLedgEntryBuf."Amount (LCY)" <= 0) THEN BEGIN GenPostingSetup.TESTFIELD("Sales Pmt. Tol. Debit Acc."); PaymentTolAcc := GenPostingSetup."Sales Pmt. Tol. Debit Acc."; END ELSE BEGIN …رمز الاستبدال 2
… IF GLSetup."Payment Tolerance Posting" = GLSetup."Payment Tolerance Posting"::"Payment Tolerance Accounts" THEN BEGIN IF (DtldCVLedgEntryBuf."Amount (LCY)" <= 0) AND (DtldCVLedgEntryBuf."VAT Amount (LCY)" <= 0) THEN BEGIN GenPostingSetup.TESTFIELD("Sales Pmt. Tol. Debit Acc."); PaymentTolAcc := GenPostingSetup."Sales Pmt. Tol. Debit Acc."; END ELSE BEGIN …التعليمات البرمجية الموجودة 3
… END ELSE IF GLSetup."Payment Tolerance Posting" = GLSetup."Payment Tolerance Posting"::"Payment Discount Accounts" THEN BEGIN IF (DtldCVLedgEntryBuf."Amount (LCY)" <= 0) THEN BEGIN GenPostingSetup.TESTFIELD("Sales Pmt. Disc. Debit Acc."); PaymentTolAcc := GenPostingSetup."Sales Pmt. Disc. Debit Acc."; END ELSE BEGIN …رمز الاستبدال 3
… END ELSE IF GLSetup."Payment Tolerance Posting" = GLSetup."Payment Tolerance Posting"::"Payment Discount Accounts" THEN BEGIN IF (DtldCVLedgEntryBuf."Amount (LCY)" <= 0) AND (DtldCVLedgEntryBuf."VAT Amount (LCY)" <= 0) THEN BEGIN GenPostingSetup.TESTFIELD("Sales Pmt. Disc. Debit Acc."); PaymentTolAcc := GenPostingSetup."Sales Pmt. Disc. Debit Acc."; END ELSE BEGIN …التعليمات البرمجية الموجودة 4
… IF GLSetup."Pmt. Disc. Tolerance Posting" = GLSetup."Pmt. Disc. Tolerance Posting"::"Payment Tolerance Accounts" THEN BEGIN IF (DtldCVLedgEntryBuf."Amount (LCY)" <= 0) THEN BEGIN GenPostingSetup.TESTFIELD("Sales Pmt. Tol. Debit Acc."); PaymentTolAcc := GenPostingSetup."Sales Pmt. Tol. Debit Acc."; END ELSE BEGIN …رمز الاستبدال 4
… IF GLSetup."Pmt. Disc. Tolerance Posting" = GLSetup."Pmt. Disc. Tolerance Posting"::"Payment Tolerance Accounts" THEN BEGIN IF (DtldCVLedgEntryBuf."Amount (LCY)" <= 0) AND (DtldCVLedgEntryBuf."VAT Amount (LCY)" <= 0) THEN BEGIN GenPostingSetup.TESTFIELD("Sales Pmt. Tol. Debit Acc."); PaymentTolAcc := GenPostingSetup."Sales Pmt. Tol. Debit Acc."; END ELSE BEGIN …التعليمات البرمجية الموجودة 5
… END ELSE IF GLSetup."Pmt. Disc. Tolerance Posting" = GLSetup."Pmt. Disc. Tolerance Posting"::"Payment Discount Accounts" THEN BEGIN IF (DtldCVLedgEntryBuf."Amount (LCY)" <= 0) THEN BEGIN GenPostingSetup.TESTFIELD("Sales Pmt. Disc. Debit Acc."); PaymentTolAcc := GenPostingSetup."Sales Pmt. Disc. Debit Acc."; END ELSE BEGIN …رمز الاستبدال 5
… END ELSE IF GLSetup."Pmt. Disc. Tolerance Posting" = GLSetup."Pmt. Disc. Tolerance Posting"::"Payment Discount Accounts" THEN BEGIN IF (DtldCVLedgEntryBuf."Amount (LCY)" <= 0) AND (DtldCVLedgEntryBuf."VAT Amount (LCY)" <= 0) THEN BEGIN GenPostingSetup.TESTFIELD("Sales Pmt. Disc. Debit Acc."); PaymentTolAcc := GenPostingSetup."Sales Pmt. Disc. Debit Acc."; END ELSE BEGIN …تغيير التعليمات البرمجية في الدالة AutoEntrForDtldCustLedgEntries كما يلي:
التعليمات البرمجية الموجودة 1… GenPostingSetup.GET( DtldCVLedgEntryBuf."Gen. Bus. Posting Group", DtldCVLedgEntryBuf."Gen. Prod. Posting Group"); IF DtldCVLedgEntryBuf."Amount (LCY)" > 0 THEN BEGIN GenPostingSetup.TESTFIELD("Sales Pmt. Disc. Debit Acc."); AccNo := GenPostingSetup."Sales Pmt. Disc. Debit Acc."; END ELSE BEGIN …رمز الاستبدال 1
… GenPostingSetup.GET( DtldCVLedgEntryBuf."Gen. Bus. Posting Group", DtldCVLedgEntryBuf."Gen. Prod. Posting Group"); IF (DtldCVLedgEntryBuf."Amount (LCY)" > 0) OR (DtldCVLedgEntryBuf."VAT Amount (LCY)" > 0) THEN BEGIN GenPostingSetup.TESTFIELD("Sales Pmt. Disc. Debit Acc."); AccNo := GenPostingSetup."Sales Pmt. Disc. Debit Acc."; END ELSE BEGIN …التعليمات البرمجية الموجودة 2
… DtldCVLedgEntryBuf."Gen. Prod. Posting Group"); CASE GLSetup."Payment Tolerance Posting" OF GLSetup."Payment Tolerance Posting"::"Payment Tolerance Accounts": IF DtldCVLedgEntryBuf."Amount (LCY)" > 0 THEN BEGIN GenPostingSetup.TESTFIELD("Sales Pmt. Tol. Debit Acc."); AccNo := GenPostingSetup."Sales Pmt. Tol. Debit Acc."; END ELSE BEGIN …رمز الاستبدال 2
… DtldCVLedgEntryBuf."Gen. Prod. Posting Group"); CASE GLSetup."Payment Tolerance Posting" OF GLSetup."Payment Tolerance Posting"::"Payment Tolerance Accounts": IF (DtldCVLedgEntryBuf."Amount (LCY)" > 0) OR (DtldCVLedgEntryBuf."VAT Amount (LCY)" > 0) THEN BEGIN GenPostingSetup.TESTFIELD("Sales Pmt. Tol. Debit Acc."); AccNo := GenPostingSetup."Sales Pmt. Tol. Debit Acc."; END ELSE BEGIN …التعليمات البرمجية الموجودة 3
… AccNo := GenPostingSetup."Sales Pmt. Tol. Credit Acc."; END; GLSetup."Payment Tolerance Posting"::"Payment Discount Accounts": IF DtldCVLedgEntryBuf."Amount (LCY)" > 0 THEN BEGIN GenPostingSetup.TESTFIELD("Sales Pmt. Disc. Debit Acc."); AccNo := GenPostingSetup."Sales Pmt. Disc. Debit Acc."; END ELSE BEGIN …رمز الاستبدال 3
… AccNo := GenPostingSetup."Sales Pmt. Tol. Credit Acc."; END; GLSetup."Payment Tolerance Posting"::"Payment Discount Accounts": IF (DtldCVLedgEntryBuf."Amount (LCY)" > 0) OR (DtldCVLedgEntryBuf."VAT Amount (LCY)" > 0) THEN BEGIN GenPostingSetup.TESTFIELD("Sales Pmt. Disc. Debit Acc."); AccNo := GenPostingSetup."Sales Pmt. Disc. Debit Acc."; END ELSE BEGIN …التعليمات البرمجية الموجودة 4
… DtldCVLedgEntryBuf."Gen. Prod. Posting Group"); CASE GLSetup."Pmt. Disc. Tolerance Posting" OF GLSetup."Pmt. Disc. Tolerance Posting"::"Payment Tolerance Accounts": IF DtldCVLedgEntryBuf."Amount (LCY)" > 0 THEN BEGIN GenPostingSetup.TESTFIELD("Sales Pmt. Tol. Debit Acc."); AccNo := GenPostingSetup."Sales Pmt. Tol. Debit Acc."; END ELSE BEGIN …رمز الاستبدال 4
… DtldCVLedgEntryBuf."Gen. Prod. Posting Group"); CASE GLSetup."Pmt. Disc. Tolerance Posting" OF GLSetup."Pmt. Disc. Tolerance Posting"::"Payment Tolerance Accounts": IF (DtldCVLedgEntryBuf."Amount (LCY)" > 0) OR (DtldCVLedgEntryBuf."VAT Amount (LCY)" > 0) THEN BEGIN GenPostingSetup.TESTFIELD("Sales Pmt. Tol. Debit Acc."); AccNo := GenPostingSetup."Sales Pmt. Tol. Debit Acc."; END ELSE BEGIN …التعليمات البرمجية الموجودة 5
… AccNo := GenPostingSetup."Sales Pmt. Tol. Credit Acc."; END; GLSetup."Pmt. Disc. Tolerance Posting"::"Payment Discount Accounts": IF DtldCVLedgEntryBuf."Amount (LCY)" > 0 THEN BEGIN GenPostingSetup.TESTFIELD("Sales Pmt. Disc. Debit Acc."); AccNo := GenPostingSetup."Sales Pmt. Disc. Debit Acc."; END ELSE BEGIN …رمز الاستبدال 5
… AccNo := GenPostingSetup."Sales Pmt. Tol. Credit Acc."; END; GLSetup."Pmt. Disc. Tolerance Posting"::"Payment Discount Accounts": IF (DtldCVLedgEntryBuf."Amount (LCY)" > 0) OR (DtldCVLedgEntryBuf."VAT Amount (LCY)" > 0) THEN BEGIN GenPostingSetup.TESTFIELD("Sales Pmt. Disc. Debit Acc."); AccNo := GenPostingSetup."Sales Pmt. Disc. Debit Acc."; END ELSE BEGIN …تغيير التعليمات البرمجية في الدالة PostDtldVendLedgEntries كما يلي:
التعليمات البرمجية الموجودة 1… GenPostingSetup.GET( DtldCVLedgEntryBuf."Gen. Bus. Posting Group", DtldCVLedgEntryBuf."Gen. Prod. Posting Group"); IF (DtldCVLedgEntryBuf."Amount (LCY)" <= 0) THEN BEGIN GenPostingSetup.TESTFIELD("Purch. Pmt. Disc. Debit Acc."); PaymentDiscAcc := GenPostingSetup."Purch. Pmt. Disc. Debit Acc."; END ELSE BEGIN …رمز الاستبدال 1
… GenPostingSetup.GET( DtldCVLedgEntryBuf."Gen. Bus. Posting Group", DtldCVLedgEntryBuf."Gen. Prod. Posting Group"); IF (DtldCVLedgEntryBuf."Amount (LCY)" <= 0) AND (DtldCVLedgEntryBuf."VAT Amount (LCY)" <= 0) THEN BEGIN GenPostingSetup.TESTFIELD("Purch. Pmt. Disc. Debit Acc."); PaymentDiscAcc := GenPostingSetup."Purch. Pmt. Disc. Debit Acc."; END ELSE BEGIN …التعليمات البرمجية الموجودة 2
… IF GLSetup."Payment Tolerance Posting" = GLSetup."Payment Tolerance Posting"::"Payment Tolerance Accounts" THEN BEGIN IF (DtldCVLedgEntryBuf."Amount (LCY)" <= 0) THEN BEGIN GenPostingSetup.TESTFIELD("Purch. Pmt. Tol. Debit Acc."); PaymentTolAcc := GenPostingSetup."Purch. Pmt. Tol. Debit Acc."; END ELSE BEGIN …رمز الاستبدال 2
… IF GLSetup."Payment Tolerance Posting" = GLSetup."Payment Tolerance Posting"::"Payment Tolerance Accounts" THEN BEGIN IF (DtldCVLedgEntryBuf."Amount (LCY)" <= 0) AND (DtldCVLedgEntryBuf."VAT Amount (LCY)" <= 0) THEN BEGIN GenPostingSetup.TESTFIELD("Purch. Pmt. Tol. Debit Acc."); PaymentTolAcc := GenPostingSetup."Purch. Pmt. Tol. Debit Acc."; END ELSE BEGIN …التعليمات البرمجية الموجودة 3
… END ELSE IF GLSetup."Payment Tolerance Posting" = GLSetup."Payment Tolerance Posting"::"Payment Discount Accounts" THEN BEGIN IF (DtldCVLedgEntryBuf."Amount (LCY)" <= 0) THEN BEGIN GenPostingSetup.TESTFIELD("Purch. Pmt. Disc. Debit Acc."); PaymentTolAcc := GenPostingSetup."Purch. Pmt. Disc. Debit Acc."; END ELSE BEGIN …رمز الاستبدال 3
… END ELSE IF GLSetup."Payment Tolerance Posting" = GLSetup."Payment Tolerance Posting"::"Payment Discount Accounts" THEN BEGIN IF (DtldCVLedgEntryBuf."Amount (LCY)" <= 0) AND (DtldCVLedgEntryBuf."VAT Amount (LCY)" <= 0) THEN BEGIN GenPostingSetup.TESTFIELD("Purch. Pmt. Disc. Debit Acc."); PaymentTolAcc := GenPostingSetup."Purch. Pmt. Disc. Debit Acc."; END ELSE BEGIN …التعليمات البرمجية الموجودة 4
… IF GLSetup."Pmt. Disc. Tolerance Posting" = GLSetup."Pmt. Disc. Tolerance Posting"::"Payment Tolerance Accounts" THEN BEGIN IF (DtldCVLedgEntryBuf."Amount (LCY)" <= 0) THEN BEGIN GenPostingSetup.TESTFIELD("Purch. Pmt. Tol. Debit Acc."); PaymentTolAcc := GenPostingSetup."Purch. Pmt. Tol. Debit Acc."; END ELSE BEGIN …رمز الاستبدال 4
… IF GLSetup."Pmt. Disc. Tolerance Posting" = GLSetup."Pmt. Disc. Tolerance Posting"::"Payment Tolerance Accounts" THEN BEGIN IF (DtldCVLedgEntryBuf."Amount (LCY)" <= 0) AND (DtldCVLedgEntryBuf."VAT Amount (LCY)" <= 0) THEN BEGIN GenPostingSetup.TESTFIELD("Purch. Pmt. Tol. Debit Acc."); PaymentTolAcc := GenPostingSetup."Purch. Pmt. Tol. Debit Acc."; END ELSE BEGIN …التعليمات البرمجية الموجودة 5
… END ELSE IF GLSetup."Pmt. Disc. Tolerance Posting" = GLSetup."Pmt. Disc. Tolerance Posting"::"Payment Discount Accounts" THEN BEGIN IF (DtldCVLedgEntryBuf."Amount (LCY)" <= 0) THEN BEGIN GenPostingSetup.TESTFIELD("Purch. Pmt. Disc. Debit Acc."); PaymentTolAcc := GenPostingSetup."Purch. Pmt. Disc. Debit Acc."; END ELSE BEGIN …رمز الاستبدال 5
… END ELSE IF GLSetup."Pmt. Disc. Tolerance Posting" = GLSetup."Pmt. Disc. Tolerance Posting"::"Payment Discount Accounts" THEN BEGIN IF (DtldCVLedgEntryBuf."Amount (LCY)" <= 0) AND (DtldCVLedgEntryBuf."VAT Amount (LCY)" <= 0) THEN BEGIN GenPostingSetup.TESTFIELD("Purch. Pmt. Disc. Debit Acc."); PaymentTolAcc := GenPostingSetup."Purch. Pmt. Disc. Debit Acc."; END ELSE BEGIN …تغيير التعليمات البرمجية في الدالة AutoEntrForDtldVendLedgEntries كما يلي:
التعليمات البرمجية الموجودة 1… GenPostingSetup.GET( DtldCVLedgEntryBuf."Gen. Bus. Posting Group", DtldCVLedgEntryBuf."Gen. Prod. Posting Group"); IF DtldCVLedgEntryBuf."Amount (LCY)" > 0 THEN BEGIN GenPostingSetup.TESTFIELD("Purch. Pmt. Disc. Debit Acc."); AccNo := GenPostingSetup."Purch. Pmt. Disc. Debit Acc."; END ELSE BEGIN …رمز الاستبدال 1
… GenPostingSetup.GET( DtldCVLedgEntryBuf."Gen. Bus. Posting Group", DtldCVLedgEntryBuf."Gen. Prod. Posting Group"); IF (DtldCVLedgEntryBuf."Amount (LCY)" > 0) OR (DtldCVLedgEntryBuf."VAT Amount (LCY)" > 0) THEN BEGIN GenPostingSetup.TESTFIELD("Purch. Pmt. Disc. Debit Acc."); AccNo := GenPostingSetup."Purch. Pmt. Disc. Debit Acc."; END ELSE BEGIN …التعليمات البرمجية الموجودة 2
… CASE GLSetup."Payment Tolerance Posting" OF GLSetup."Payment Tolerance Posting"::"Payment Tolerance Accounts": BEGIN IF DtldCVLedgEntryBuf."Amount (LCY)" > 0 THEN BEGIN GenPostingSetup.TESTFIELD("Purch. Pmt. Tol. Debit Acc."); AccNo := GenPostingSetup."Purch. Pmt. Tol. Debit Acc."; END ELSE BEGIN …رمز الاستبدال 2
… CASE GLSetup."Payment Tolerance Posting" OF GLSetup."Payment Tolerance Posting"::"Payment Tolerance Accounts": BEGIN IF (DtldCVLedgEntryBuf."Amount (LCY)" > 0) OR (DtldCVLedgEntryBuf."VAT Amount (LCY)" > 0) THEN BEGIN GenPostingSetup.TESTFIELD("Purch. Pmt. Tol. Debit Acc."); AccNo := GenPostingSetup."Purch. Pmt. Tol. Debit Acc."; END ELSE BEGIN …التعليمات البرمجية الموجودة 3
… END; GLSetup."Payment Tolerance Posting"::"Payment Discount Accounts": BEGIN IF DtldCVLedgEntryBuf."Amount (LCY)" > 0 THEN BEGIN GenPostingSetup.TESTFIELD("Purch. Pmt. Disc. Debit Acc."); AccNo := GenPostingSetup."Purch. Pmt. Disc. Debit Acc."; END ELSE BEGIN …رمز الاستبدال 3
… END; GLSetup."Payment Tolerance Posting"::"Payment Discount Accounts": BEGIN IF (DtldCVLedgEntryBuf."Amount (LCY)" > 0) OR (DtldCVLedgEntryBuf."VAT Amount (LCY)" > 0) THEN BEGIN GenPostingSetup.TESTFIELD("Purch. Pmt. Disc. Debit Acc."); AccNo := GenPostingSetup."Purch. Pmt. Disc. Debit Acc."; END ELSE BEGIN …التعليمات البرمجية الموجودة 4
… CASE GLSetup."Pmt. Disc. Tolerance Posting" OF GLSetup."Pmt. Disc. Tolerance Posting"::"Payment Tolerance Accounts": BEGIN IF DtldCVLedgEntryBuf."Amount (LCY)" > 0 THEN BEGIN GenPostingSetup.TESTFIELD("Purch. Pmt. Tol. Debit Acc."); AccNo := GenPostingSetup."Purch. Pmt. Tol. Debit Acc."; END ELSE BEGIN …رمز الاستبدال 4
… CASE GLSetup."Pmt. Disc. Tolerance Posting" OF GLSetup."Pmt. Disc. Tolerance Posting"::"Payment Tolerance Accounts": BEGIN IF (DtldCVLedgEntryBuf."Amount (LCY)" > 0) OR (DtldCVLedgEntryBuf."VAT Amount (LCY)" > 0) THEN BEGIN GenPostingSetup.TESTFIELD("Purch. Pmt. Tol. Debit Acc."); AccNo := GenPostingSetup."Purch. Pmt. Tol. Debit Acc."; END ELSE BEGIN …التعليمات البرمجية الموجودة 5
… END; GLSetup."Pmt. Disc. Tolerance Posting"::"Payment Discount Accounts": BEGIN IF DtldCVLedgEntryBuf."Amount (LCY)" > 0 THEN BEGIN GenPostingSetup.TESTFIELD("Purch. Pmt. Disc. Debit Acc."); AccNo := GenPostingSetup."Purch. Pmt. Disc. Debit Acc."; END ELSE BEGIN …رمز الاستبدال 5
… END; GLSetup."Pmt. Disc. Tolerance Posting"::"Payment Discount Accounts": BEGIN IF (DtldCVLedgEntryBuf."Amount (LCY)" > 0) OR (DtldCVLedgEntryBuf."VAT Amount (LCY)" > 0) THEN BEGIN GenPostingSetup.TESTFIELD("Purch. Pmt. Disc. Debit Acc."); AccNo := GenPostingSetup."Purch. Pmt. Disc. Debit Acc."; END ELSE BEGIN …
المتطلبات الأساسية
يجب أن يكون لديك Microsoft Dynamics NAV 2009 Service Pack 1 مثبتا لتطبيق هذا الإصلاح العاجل.
معلومات الإزالة
لا يمكنك إزالة هذا الإصلاح العاجل.
الحالة
لقد أكدت Microsoft على أن هذه مشكلة في منتجات Microsoft المُدرجة في القسم "ينطبق على".
لا تقدم MICROSOFT و/أو مورديها أي إقرارات أو ضمانات حول ملاءمة المعلومات الواردة في المستندات والرسومات ذات الصلة المنشورة على هذا الموقع ("المواد") أو موثوقيتها أو دقتها لأي غرض.
قد تتضمن المواد عدم الدقة التقنية أو الأخطاء المطبعية ويمكن مراجعتها في أي وقت دون إشعار. إلى الحد الأقصى الذي يسمح به القانون المعمول به، تتنازل MICROSOFT و/أو مورديها عن جميع التمثيلات والضمانات والشروط وتستبعدها سواء كانت صريحة أو ضمنية أو قانونية، بما في ذلك على سبيل المثال لا الحصر التمثيلات أو الضمانات أو شروط الملكية أو عدم التعدي أو الشرط المرضي أو الجودة والتاجر واللياقة لغرض معين، فيما يتعلق بالمواد.