حساب المتبقى على عميل

[rmdnhsn]

 

عندى جدول اسمه [Customers] للعملاء مكون من 3حقول

الحقل الاول: كود العميل

الحقل الثانى: اسم العميل

الحقل الثالث: الفلوس المتبقية عند العميل

------------------------------

 

وعندى جدول اسمه [Money] للفلوس التى نتحصل عليها من العملاء ومكون من 3 حقول

الحقل الاول: كود الحركة

الحقل الثانى: كود العميل

الحقل الثالث: الفلوس التى دفعها العميل

------------------------------

قمت بعمل علاقة رأس بأطراف بين الجدولين السابقين

------------------------------

 

قمت بانشاء فورم لجدول [Money] وفيه حقلين من جدول [Customers] اسم العميل والمبلغ المتبقى عليه

قمت بكتابة الكود التالى 

Private Sub Money_AfterUpdate()

[Forms]![Money]![Money_Customers] = [Forms]![Money]![Money_Customers] - [Forms]![Money]![Money]

End Sub

بحيث عند كتابة مبلغ دفعه العميل فى حقل الـ[Money] يتم طرحه من المبلغ المتبقى عليه ويظهر فى الحقل الخاص بالجدول الاول

وبالفعل يعمل معى بشكل جيد عند كتابة رقم والانتقال لخلية اخرى يتم طرحه من المبلغ المتبقى عليه

------------------------------

 

ولكن المشكلة ماذا لو أردت تصحيح المبلغ مرة أخرى!!

سيتم طرحه أيضاً من المبلغ المتبقى على العميل وهذا غير منطقى

أرجو المساعدة فى جعله يعمل بشكل صحيح

قاعدة البيانات مرفقة للاطلاع

وجزاكم الله خيراً

Customers.accdb

[qassim-t]

اخي العزيز...اجعل الحقول غير منظمة حتى لايتم حفظها في الجدول قبل الخروج من النموذج او ضغط زر حفظ وبهذا يمكنك التعديل عليها

 

[عبدالله كاظم]

ما يحتاج تحفظ المتبقي على العميل. اللي تحتاجه تعمل جمع للي دفعه العميل وتنقصه من القيمة الاجمالية. هذا والله أعلم

شوف الملف التالي

Customers.accdb

تم تعديل مايو 26, 2018 بواسطه عبدالله كاظم