هل من طريقة لايجاد الانقاص التراكمي

[أبو العقاب]

السلام عليكم أحبائي

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

ولكن حاولت التعديل ليشمل الانقاص التراكمي فلم أفلح

في المرفق برنامج مبيعات

والبحث برقم السلعة

لو أدخلت الرقم 111 تظهر المعلومات اسم السلعة : تمر وكذلك سعرها والكمية و...

وعند الضغط على زر تحديث تبدأ عملية البحث مرة أخرى

ما أريده هو : لو أدخلت الرقم 111 تظهر كمية السلعة 1 والكمية الموجودة 10 إذا المتبقية 9

لو عاودنا البحث بعد الضغط على زر تحديث وأدخلت الرقم 111 أريد أن تكون الكمية المتبقية 8

أي أن يتم الانقاص من المرة السّابقة للبحث ( لأن الكمية المتبقية من البحث السابق 9 إذا يجب أن تكون في المرة التالية 8)

بمعنى : كل عملية بحث بعد الضغط على زر تحديث يتم الانقاص

وآمل أن يكون مرادي واضحا أخوتي

ملفي.rar

[أبو العقاب]

صعب؟؟؟؟

[أحمد خلف]

اخي الكريم " أبو العقاب "

في الأكسس لا يوجد مستحيل ولكن المسألة محتاجة صبر.

فهذا ملفك بعد التعديل وارجو منك اعادة النظر في بناء برنامجك لأنه من وجهة نظري انه غير منطقي.

عموما ارجو ان يكون هذا طلبك.

2ملفي.rar

[أبو العقاب]

أخي الكريم أحمد

أشكرك وأحييك

أولا : لم عطلت زر التحديث ، وأصبح المجموع التراكمي والانقاص التراكمي بدون الزر( أي أن الزر لا يعيد البحث من جديد)

ثانيا : ما هو غير المنطقي في البرنامج؟؟!

ثالثا : الكود التالي تم وضعه في حدث بعد التحديث لحقل البحث (a)

gt = Nz(gt, 0) + Nz(Me.sum1, 0)

b = gt

وهو يحسب المجموع التراكمي داخل الحقل b بعد تعريف gt

كيف نعدّل ذلك الكود ليحسب الانقاص التراكمي داخل الحقل qu

أظن ان المسألة ليست صعبة

وأشكرك ثانية أخي أحمد

[Bluemind]

اخوي

لماذا كل مره يتم البحث فيها يتم انقاص الكمية؟؟؟!!!!

هذا هو غير المنطقي من وجهه نظري

ماذا تحاول الوصول اليه؟؟

[أبو العقاب]

أخي الكريم Bluemind

أشكرك وأشكر من تفاعل وسيتفاعل مع هذا الموضوع

لنفترض أن الزبون اشترى كمية 1 من السلعة التي رقمها 111

وتم طباعة التقرير بالمشتريات وانتهى الأمر إذا الكمية المتبقية 10 - 1 = 9 تمام

جاء زبون آخر نضغط زر تحديث

ثم اشترى الزبون الآخر من السلعة التي رقمها 111 إذا هذه المرة تكون الكمية المتبقية 9 - 1 = 8

وهكذا ...........

[أحمد خلف]

اولا السلام عليكم

(لنفترض أن الزبون اشترى كمية 1 من السلعة التي رقمها 111

وتم طباعة التقرير بالمشتريات وانتهى الأمر إذا الكمية المتبقية 10 - 1 = 9 تمام

جاء زبون آخر نضغط زر تحديث

ثم اشترى الزبون الآخر من السلعة التي رقمها 111 إذا هذه المرة تكون الكمية المتبقية 9 - 1 = 8

وهكذا ..........)

وهذا اخي ابو العقاب ما اسمية غير منطقي :

1- انك قمت بعمل جدولين جدول اساسي به البيانات والجدول الاخر يتم وضع نتيجة البحث به والغير منطقي في هذا انة في كل مرة يتم البحث عن الكمية الموجودة البدائية وليست الكمية الموجودة الفعلية.

2- لقد قمت بوضع كود في زر التحديث بالنموذج يقوم بحذف نتيجة البحث والتي وضعت في الجدول وهذا ما لا افهمه.

[أبو العقاب]

ولكن ألا تلاحظ أنه في كل بحث يحسب المجموع التراكمي

لم لا يحسب الانقاص التراكمي؟؟؟

[أبو العقاب]

توصّلت للحل من الأستاذة زهرة

وكان الحل هو وضع الكود التالي في زر تحديث

DoCmd.RunSQL "UPDATE tb1 SET tb1.count2 = [Forms]![frm1]![count2]-1 WHERE (((tb1.n)=[forms]![frm1]![s]))"

وإليكم الملف للاستفادة منه

وبارك الله بكم على محاولاتكم الطيبة والمباركة

za-ملفي-UP2.rar

[أحمد خلف]

اخي الفاضل ابو العقاب

الا تري ان المشكلة ما تزال قائمة حيث انه عند طلب كمية من السلعة 111 فأنه يتم البحث عن الكميه الموجودة ولتكن 5 ويكون الرصيد يساوي 5 - الكمية المطلوبه وعندما يتم البحث عن السلعة 111 في نفس المرة في الصف التالي او في عملية اخري تكون الكمية الموجودة كذلك 5 وهذا غير منطقي حيث من المفترض ان تكون الكمية الموجودة ما تبقي من العملية الأولي وما لا افهمه عند الضغط علي زر تحديث لماذا يتم حذف الطلبات؟؟؟؟؟

[أبو العقاب]

الخلل هو أنه عند كل بحث ضع المؤشر على الحقل الذي اسمه n

يتم الانقاص ولمن يرغب في تعديل ذلك فلا يبخل علينا

جرب البحث وضع الؤشر على الحقل n وجرب النتيجة

تم تعديل فبراير 15, 2012 بواسطه أبو العقاب

[أحمد خلف]

حتي الان انت لم تفهم ماذا اريد ان اقول

انا لا اعني ان عملية الانقاص لا تتم عند كتابة الكود ولكني اعني انه عند كل عملية تقوم ببيع السلعة111 لاشخاص مختلفين تكون نتيجة البحث عن السلعة من حيث الكمية الموجودة هي هي 5 في كل مرة مع انة من المفترض ان الكمية الموجودة لابد وان تنقص في كل مرة يتم بيع كمية منها.

ارجو ان تكون المعلومة وصلت.

[أبو العقاب]

أخي أحمد

أشكرك على متابعتك للموضوع

أظن أنني توصلت للحل وبإمكانك التأكد

وهو وضع الكود السابق (في المشاركة 9) في حدث بعد التحديث للنموذج

ولكن ظهرت لي مشكلة وهو عند كل بحث تظهر رسالة " أنت على وشك تحديث صفوف ..."

هلا نتعاون لحلها؟؟

تابع المرفق يرحمك الله

ملفي.rar

[أحمد خلف]

كدة اصبحت منطقية

ومشكلتك حلها بسيط جدا

ضع هذا الكود في حدث بعد التحديث لمربع نص البحث (DoCmd.SetWarnings False)

ويوضع هذا الكود قبل جميع الأكواد المكتوبة اي بعد جملة (Private Sub a_AfterUpdate()) l

[أبو العقاب]

حيّاك الله أخ أحمد

هيك زبطت مية مية

لك كل تحية