رسالة تنبيه عند التكرار

[husseinharby]

السلام عليكم

في نموج sale 

اريد رسالة تحذير عند تكرار نفس الصنف في خانة الصنف

Downloads.rar

[Ahmed_J]

السلام عليكم

اخي العزيز النموذج مصدر سجلاتة استعلام

تفضل التعديل وفيه رسالة تنبيه اما الاستمرار باضافة الصنف او الغاء اضافة الصنف المكرر

اتمنى ان يكون المطلوب

تحياتي

 

yasser_10.accdb

تم تعديل مارس 13, 2023 بواسطه Ahmed_J

[Eng.Qassim]

5 ساعات مضت, husseinharby said:

اريد رسالة تحذير عند تكرار نفس الصنف في خانة الصنف

شغل استاذ احمد رائع ..لكن ممكن تفهمنا ليه تريد رسالة تحذير ؟

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

[husseinharby]

عفوا استاذ @Ahmed_J

لكن الرسالة تظهر عند كتابة اي صنف حتي لو غير مكرر

والهدف من طلبي @Eng.Qassim هو انني اقوم بكتابة فواتير من اصناف كثيرة قد تصل الي 50 صنف ووارد ان اقوم بتكرار نفس الصنف عن طريق الخطأ

لذلك اريد تنبيهي برسالة 

تم تعديل مارس 14, 2023 بواسطه husseinharby

[Ahmed_J]

اخي العزيز

انا قلت لك ان النموذج مصدر سجلاته الاستعلام 

وفي النموذج  (sale ) مصدر سجلاته  الاستعلام (sale_sub_query)

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

ووافني بالنتيجة

تحياتي

 

[husseinharby]

استاذ احمد 

ارجو الاخذ في الاعتبار تعدد الفواتير 

لقد قمت بحذف كل البيانات الموجودة في الاستعلام ولكن ليس هذا هو السبب

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

 

تم تعديل مارس 14, 2023 بواسطه husseinharby

[Ahmed_J]

اخي العزيز

هل تقصد ان رسالة التنبيه بتكرار الصنف تعتمد على النموذج sale  فقط وليس على التكرار  في اي جدول او استعلام؟ 

تم تعديل مارس 14, 2023 بواسطه Ahmed_J

[husseinharby]

رسالة التكرار تعتمد علي نموذج sale فقط وتعتمد ايضا علي كل فاتورة علي حدة

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

 

[متقاعد]

2 ساعات مضت, husseinharby said:

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

جرب

 

yasser_10.accdb

[husseinharby]

شكرا اخي الفاضل هذا هو المطلوب

[husseinharby]

@متقاعد

اخي الفاضل طلب اخر ان امكن

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

 

[متقاعد]

2 ساعات مضت, husseinharby said:

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

نعم ممكن

ولكن ستجد ان رقم السجل لا يعكس الترتيب الحقيقي للسجلات لكونك استخدمت ترقيم تلقائي غير مشروط فمثلا قد تجد ان الصنف رقم 2 في الفاتورة 10 رقمه 80 مثلا

ولتلافي عملت حقل ترقيم بشرط رقم الفاتورة

الملف مرفق بعد التعديل مع اني اتحفظ على الطريقة واتفق مع رأي الاستاذ @Eng.Qassim

في 13‏/3‏/2023 at 22:41, Eng.Qassim said:

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

ولكن ربما لك فكره اخرى

 

yasser_10(1).accdb

[متقاعد]

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

Dim x As String
x = Me.item.Column(0)
Me.id_item = Nz(DMax("[id_item]", "details", "[sale_id]=" & Me.Parent!sale_id), 0) + 1
    If DCount("*", "sale_sub_query", "[sale_id]=" & [sale_id] & " and [item]='" & Me.item & "'") > 0 Then
    Me.Undo
    DoCmd.FindRecord x, , True, , True
MsgBox "هذا الصنف موجود رقم السجل" & " " & Me.id_item, , "صنف مكرر"
End If

الملف مرفق

 

 

yasser_10(3).accdb