مقارنة قيمة حقل بناتج إستعلام

اخي الفاضل Nasser_2005

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

ارجو ان يكون المثال بالمرفق هو ما تبحث عنه فالرسالة سوف تظهر عند فقدان التركيز لمربع النص الخاص بالحقل qout بالنموذج

اخوك

يوسف احمد

copare.rar

وهذا مثال آخر لعمل حقل Total من استعلام تحديد وجعل هذا الإستعلام كمصدر لنموذج ادخال البيانات

شكراً لك

copare1.rar

السلام عليكم ورحمة الله وبركاته ..

أعتذر كل الاعتذار عن التأخر على الرد ، وأشكر لك أخ يوسف على اهتمامك ،

ولكن لم يكن في مثالك ما أريد حيث لم أوضح جيداً طلبي ولكن سأعيد صياغته كتالي:

في هذا البرنامج جدول به حقل ( الحد الأدنى ) أريد أن أقارن قيمته مع قيمة حقل (الكمية المتبقية) وهي حاصل خصم الكمية المدخلة

مع المصروفة(الكمية المتبقية ليس لها حقل وأنما من استعلام والمطلوب هو أن تخرج رسالة في حال قيمة الحد الأدنى أكبر من المتبقي

وذلك عند تشغيل البرنامج مع العلم تم النظر إلى بعض البرامج مثل(StockControl) ولم أستطع الإستفادة منها.

مرفق البرنامج

والشكر الجزيل لكم

_________________.rar

اخي الفاضل ناصر

تم التعديل حسب الطريقة التالية

1. تم انشاء استعلام جديد يدعى Q-Low-Item مبني على استعلام الكمية المتبقية Q-REMAIN وتم اضافة جدول النوع item اليه نظرا لوجود حقل الحد الادنى به وتم ربطه مع حقل النوع item_name في الاستعلام .

2. تم انشاء نموذج جديد مبني على الاستعلام Q-Low-Item

3. تم وضع كود في حدث عند الفتح للنموذج الجديد ويدعى frm-Low-Item لمقارنة قيمة الحد الادني مع قيمة الكمية المتبقية وظهور رسالة تنبيه بذلك ثم اغلاق النموذج حسب الكود

Private Sub Form_Open(Cancel As Integer)
If Me.low_limit > c Then
MsgBox "  اخي الفاضل قيمة الحد الادني هي   " & [low_limit].Value & "  وقيمة الكمية المتبقية هي  " & [c].Value & "   من النوع   " & [item_type]
End If
DoCmd.Close
End Sub

4. الغرض من هذا كله هو اظهار الرسالة فقط

5. تم وضع كود فتح النموذج frm-Low-Item في حدث تحميل النموذج الرئيسي MAIN_FORM حيث ستظهر فقط رسالة التنبيه ثم تختفي ويفتح النموذج الرئيسي حسب الكود

Private Sub Form_Load()
DoCmd.OpenForm "frm-Low-Item", acNormal
End Sub

6. الان عند فتح البرنامج ستظهر رسالة التنبيه بقيمة الحد الادنى وقيمة الكمية المتبقية من النوع المطلوب

وهذا ملفك بعد التعديل

STORE_UP.rar

اختكم

زهره

أخت زهرة كل الشكر الجزيل لك على إهتمامك

بالنسبة لتعديلات في هي مناسبة جداً ولكن في الكود تتم المقارنة مرة واحدة على أول (item)

بحيث لو نقصت الكمية في ال(item) الثاني لن تخرج الرسالة

ولك عظيم الإمتنان

اخي الفاضل ناصر

الظاهر ان الرسائل لا تنفع في مثل هذه الحالة لانه يوجد لديك عدة اصناف وهذا ما جعلني اغير الفكره

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

الان حاول زيادة الكميات او تقليل الاصناف الاخرى وانظر النتيجه

الملف بعد التعديل

STORE_UP2.rar

الأخت زهرة

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

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

كما أدعو الله عز وجل أن يوفقك في حياتك وآخرتك.