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

[Amr Ashraf]

7 ساعات مضت, رمهان said:

هل تم اغلاق الطلب الاول ؟

ماهو طلبك الثاني ؟

بالتوفيق

جزاك الله خير يا غالى تم اغلاق الطلب الاول وبالنسبة للطلب الثانى : 

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

للعلم انا طبقت فكرة قد تقوم بالمطلوب لكنى متشوق لرؤية فكرتك لحل الموضوع :)

[رمهان]

3 ساعات مضت, Amr Ashraf said:

جزاك الله خير يا غالى تم اغلاق الطلب الاول وبالنسبة للطلب الثانى : 

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

للعلم انا طبقت فكرة قد تقوم بالمطلوب لكنى متشوق لرؤية فكرتك لحل الموضوع :)

تمام .. قيد التنفيذ

[رمهان]

يظهر استفسار الان

رقم الصرف مثلا 147 موجود بجدول  Order_Top . تمام هنا . ولكن الكمية والصنف تظهر بجدول اخر هو Order_Sub . ووجدت العلاقة راس باطراف اي ممكن ان يكون طلب الصرف له اكثر من كمية وصنف . والسؤال ماهو المعيار للتقيد اذا اصبح لطلب الصرف اكثر من كمية لصنف مكرر ؟ ام ان التكرار لن يحصل لنفس الصنف اي لاصناف اخرى وبكميات اخرى ؟

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

تحياتي

[Amr Ashraf]

8 ساعات مضت, رمهان said:

يظهر استفسار الان

رقم الصرف مثلا 147 موجود بجدول  Order_Top . تمام هنا . ولكن الكمية والصنف تظهر بجدول اخر هو Order_Sub . ووجدت العلاقة راس باطراف اي ممكن ان يكون طلب الصرف له اكثر من كمية وصنف . والسؤال ماهو المعيار للتقيد اذا اصبح لطلب الصرف اكثر من كمية لصنف مكرر ؟ ام ان التكرار لن يحصل لنفس الصنف اي لاصناف اخرى وبكميات اخرى ؟

 

تمام استاذى وبالنسبة لسؤالك لا لن يتكرر صنف واحد فى نفس طلب الصرف ولكنها اصناف اخرى بكميات اخرى ولكن طبعا قد تتساوى الكميات المطلوبة لأصناف مختلفة مثلا مطلوب من الصنف أ عدد 10 ومطلوب من الصنف ب عدد 10 أيضاً

8 ساعات مضت, رمهان said:

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

تحياتي

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

[رمهان]

جرب 

Private Sub out_BeforeUpdate(Cancel As Integer)
If Out > DLookup("qty", "order_sub", "code='" & [Code] & "' and id='" & Me.Parent!Combo51 & "'") Then Cancel = MsgBox("الكمية اكبر من المتوفر")
End Sub

ويمكنك حذف الحدث بعد التحديث للعنصر

 

بالتوفيق

[Amr Ashraf]

58 دقائق مضت, رمهان said:

جرب 

Private Sub out_BeforeUpdate(Cancel As Integer)
If Out > DLookup("qty", "order_sub", "code='" & [Code] & "' and id='" & Me.Parent!Combo51 & "'") Then Cancel = MsgBox("الكمية اكبر من المتوفر")
End Sub

ويمكنك حذف الحدث بعد التحديث للعنصر

 

بالتوفيق

فعلت كما طلبت استاذى لكنها لم تنجح للاسف وجربتها ايضا فى AfterUpdate ولم يحدث شيئ حاولت اعدل على الكود بحيث يكون شكله هكذا 

 

Private Sub out_AfterUpdate
dim s as string
s = DLookup("qty", "order_sub", "code='" & & "' and id='" & Me.Parent!Combo51 & "'")

	If out <> s Then cancel = MsgBox("?????? ???? ?? ???????")

	End Sub

    لكن لم ينفع ايضا  ممكن تطبقها على هذا المثال ؟ جزاك الله خير
 

New (2).rar

 

تم تعديل ديسمبر 16, 2016 بواسطه Amr Ashraf

[رمهان]

تفضل .. انظر الحدث قبل التحديث للمنصرف

ولا حظ ان الصنف مكرر لنفس الامر 3

 

بالتوفيق

New (2).rar

[Amr Ashraf]

10 دقائق مضت, رمهان said:

تفضل .. انظر الحدث قبل التحديث للمنصرف

ولا حظ ان الصنف مكرر لنفس الامر 3

 

بالتوفيق

New (2).rar

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

تم تعديل ديسمبر 16, 2016 بواسطه Amr Ashraf

[رمهان]

1 دقيقه مضت, Amr Ashraf said:

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

ايش رايك انه عند دبل كليك على الصنف لا تظهر الا الاصناف التي بجدول ال  Order_Sub   في النموذج . وبهذا لن يتم اختيار صنف غيرموجود !

واذا حبيت زي ماطلبت مش مشكلة نعملها لانه ممكن كتابة الكود يدوي وليس اختيار من انموذج

الان ماذا تقرر ؟

[Amr Ashraf]

34 دقائق مضت, رمهان said:

ايش رايك انه عند دبل كليك على الصنف لا تظهر الا الاصناف التي بجدول ال  Order_Sub   في النموذج . وبهذا لن يتم اختيار صنف غيرموجود !

واذا حبيت زي ماطلبت مش مشكلة نعملها لانه ممكن كتابة الكود يدوي وليس اختيار من انموذج

الان ماذا تقرر ؟

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

تم تعديل ديسمبر 16, 2016 بواسطه Amr Ashraf

[رمهان]

14 دقائق مضت, Amr Ashraf said:

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

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

[Amr Ashraf]

22 دقائق مضت, رمهان said:

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

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

[رمهان]

اسف اقصد النموذج الذي يظهر عند النقر المزدوج

[Amr Ashraf]

3 دقائق مضت, رمهان said:

اسف اقصد النموذج الذي يظهر عند النقر المزدوج

لم استطع تطبيق الفكرة 

[رمهان]

انظر مصدر سجلات انموذج Search_Guide_Out

 

New (2).rar

[Amr Ashraf]

3 دقائق مضت, رمهان said:

انظر مصدر سجلات انموذج Search_Guide_Out

 

New (2).rar

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