delphi4arab منتديات دلفي للعرب

السلام عليكم
عندي مشكلة و ما عرفت كيف احلها
انا الان اعمل على برنامج صغير لتسيير مخزن .
قمت بانشاء قاعدة بيانات اكسس و ربطتها مع الدلفي
عندي جدول خاص بالمخزن يحتوي على (رقم السلعة - اسم السلعة - الكمية المخزنة - السعر).
الجدول الثاني يحتوي على الفاتورة (رقم الفاتورة -تاريخ الفاتورة -واسم العميل - و رقم السلعة - و الكمية المباعة) .وكل فاتورة بها سلع معينة راح تخرج من المخزن .
اريد ان احدث كمية السلعة المتواجدة في المخزن يعني كلما اقوم بعملية بيع اعود لجدول المخزن اجد الكمية نقصت .
كيف اربط الكمية بين المخزنة في المخزن و الكمية المباعة في الفاتورة ,
مثلا كمية السلعة 1 .في المخزن هي 50 . انا قمت بعملية بيع و وضعت الكمية 20 .عندما اعود للمخزن اجدها نفقصت و اصبحت 30.
يمكن باستعلام sql و update او مش عارف المهم هل من افكار او حلول ..
وشكرااا
[img]

[/img][img=500x500]

[/img]

الكمية متعلقة بفواتير الدخول والخروج
الكمية الحالية = مجموع فواتير الدخول للمادة - مجموع فواتير الخروج لهذه المادة

السلام عليكم
مثال توضيحي:

كود :
// open the table
ADOTable1.Open;  // Mode = dsBrowse
// Enter in Edit mode
ADOTable1.Edit;   //Mode = dsEdit
// Change field values
ADOTAble1.FieldByName('Qut').AsInteger := ADOTAble1.FieldByName('Qut').AsInteger-20;
...
// Try to save
try 
  ADOTable1.Post;
except
  // Capture the error
  // Show Message
  //...
end;

http://delphi4arab.net/forum/showthread.php?tid=2230

hamza101110

onexite

لؤي

محمد عبد العزيز