المساعدة فى ترحيل الاعضاء الذين مر عليهم 3 سنوات من التاريخ الحالى

[أكسس وبس]

معلش كمل جميلك حضرتك والاخوة كل الى عنده خبرة عشان ده لجمعية ايتام وقف لله تعالى

تم تعديل مارس 31, 2018 بواسطه أكسس وبس

[مسفر]

 

لا  يمكن الحذف من الجدول الرئيسي بشرط يكون بجدول فرعي هذا والله أعلم 

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

 

والله اعلم 

 

[أكسس وبس]

طيب وايه الحل نضيف حقل زى ما حضرتك عملت خانة اختيار وتكون مشروط بفترة 3 سنوات

اخى الكريم شوف مشاركة الاخ يوسف مؤذن

اقتباس

السلام عليكم و رحمة الله و بركاته
بعد الإطلاع على الجدوال المنية و البنية ..
اخبرك بان العملية حسب طلبك غير ممكنة

اولا استخدمت رقم التعريف بالموظف أو العضو أو سمه ماشئت ( ترقيم تلقائي )و هنا بدأ الخطأ

ثم ربطت الاشتراكات مع مع الاعضاء ( أم حسب ما سميته الموظفون ) برقم التعريف ( و الذي هو رقم تلقائي )  - و هذا خطأ آخر

ثم تطلب أن يتم نقل نقل العضو لجدول آخر و هو Member 

عملية النقل يعني أنك ترغب بعمل حذف للموظف ( حسبما اسميه من جدول الموظفين )

و هنا الخطأ الثالث .. هذا سيؤدي لحذف كافت الاشتراكات للسنوات السابقة من سجل الاشتراكات

و عندما ترغب بإعادة الموظف ( لن تعود الاشتراكات ) 

------

الحل 

ابسط مما تقول 

نقم بإضافة حقل جديد بأسم ( موقوف ) على سبيل المثال من نوع Ballon قيمته صح أو خطأ

ثم تبني استعلام للموظفين بظهر كافة البيانات بشرط أن يكون حقل ( موقوف ) False

ثم إذا ما تم التوقف عن الاشتراك لمدة ثلاثة اعوام 

يقوم البرنامج بصورة تلقائية أو يدوياً حسب رغبتك بوضع علامة (صح ) في حقل ( موقوف ) 

بهذا لن يظهر الاسم ضمن الاشتراكات

و للإستعلام عن الاعظاء الموقوفين ( تبني نفس الاستعلام السابق ) و لكن على تكون قيمة حقل ( موقوف ) True

و إنتهت المعضلة التي تتطالب بها 

و بالتوفيق

فديو توضيحي

جمعية.mdb

بس الاخ يوسف عملها تظهر وتختفى انا عاوزها زى ما فى الشغل الاخير ممكن نضيف حقل خانة اختيار ونسميه Up3years اذا زاد عن 3 سنوات يتم الترحيل مع الحذف

[أكسس وبس]

الموضوع صعب والا ايه

[مسفر]

 

لا تستعجل أنا والشباب لابد أن يكون لدينا ما يشغلنا سنحاول اليوم أن ننهي الموضوع فإن لم نستطع أخبرناك بذلك 

 

[مسفر]

 

هي مجرد فكرة  

 

 

 

جمعية.rar

[أكسس وبس]

اشكرك يااخى جارى التجريب وسوف اوافيك بالنتيجة

تمام فكرة كويسة ممكن نمشي على كده وشوية نعمله ضغطه واحدة وتكون للكل لان عدد الاعضاء حوالى 3000 عضو او اكثر منهم حوالى 1300 غير منتظم والباقى منتظم فممكن نمشى على كده لان امين الجمعية مستعجل

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

وكمان التعديل والحذف وخاصة للاشتراكات مش يكون مطلق منعا للاختلاسات وعلى الاقل يكون على حسب المستخدم

ووجهة نظرك فى البرنامج عام وليك وجهة فى البرنامج شوفها

تم تعديل أبريل 1, 2018 بواسطه أكسس وبس

[أكسس وبس]

اخى الكريم

فى حالة أن العضو يريد دفع الاشتراكات المتأخرة والغرامات فى نموذج Members2 نريد ترحيله مرة اخرى الى جدول الاساسي Members والاشتراكات الاساسي Eshtrak والله مستحى منك

[أكسس وبس]

شكلك مليت متى

[أكسس وبس]

فين الاحبة

[مسفر]

 

ضع الكود في الزر التالي وطبق على البقية اذا احببت 

 

On Error GoTo Err_أمر32_Click
DoCmd.GoToRecord , , acNext
Err_أمر32_Click:
MsgBox ("هذا آخر سجل ")
 Exit Sub

 

لمنع ظهور الرسالة 

 

[يوسف مؤذن]

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

فديو توضيحي

جمعية.mdb

الحل هنا

اعتقد انك لم تتطلع على البنسخة ابدا

[أكسس وبس]

اخى الكريم مسفر واخى الكريم يوسف

اولا اشكركم ولا تكفى كلمة شكر ولكن ضغط امين الجمعية ويريد عمل يمنع وجود اختلاسات

اخى الكريم يوسف انا والله جربت نسختك ولكن فى جدول Eshtrak حنضيف حقل اسمه DateEshtrakend وهو نهاية الاشتراك لان الاشتراك بيكون لسنة ليس النسة التى تبدأ من 1/1/2017 حتى 31/12/2017 مثلا ولكن السنة تكون من مثلاً 1/7/2017 حتى 30/6/2018  فيكون سنة الاشتراك هنا 2017/2018 وليس 2017

اريد ان اعطيك مثال لكى يتضح لك الامر اذا كان هناك عضو وليكن محمود

كان مشترك فى 2013/2014 يعنى من  1/7/2013/  حتى 30/6/2014

ومشترك فى 2014/2015 يعنى من 1/7/2014 حتى 30/6/2015

هنا اريد ان احسب الفترة التى انقصت من 30/6/2015 حتى تاريخ اليوم اذا وصلت المدة الى 3 سنوات او اكثر يتم ترحيله الى جدول اخر بنفس حقول جدول البيانات الاول حتى لا يظهر ضمن جدول الذين ينتظمون فى السداد

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

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

[مسفر]

تفضل قاعدتك وأعتقد أنتهى موضوعك 

أولا لا بد من ضغط زر تجهيز حتى يتسنى لنا تكملة الباقي من الازرار 

https://up.top4top.net/downloadf-82270wbp1-rar.html

 

هذا والله أعلم وأجل 

 

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

أتمنى أن يكون هذا مطلوبك 

تم تعديل أبريل 2, 2018 بواسطه مسفر

[أكسس وبس]

اخى الكريم اشكرك واجعل صدرك واسع ويجعل هذا العمل فى ميزان أعمالك

سوف اقوم بتجربته ان شاء الله وسوف اجاريك بالنتيجة

[مسفر]

ولابد من تنظيف الجدول المؤقت فلابد من وضع استعلام حذف بعد كل عملية تجهيز وترحيل فلا بد من وضع استعلام حذف لما يحتويه الجدول S_MM

[أكسس وبس]

اخى الكريم مسفر جزاك الله خيراً

عمل جميل واتمنى ان يكون الاخ يوسف راضى عني ولا يزعل منى وجزاه الله خيراً

اخى مسفر بقى شئ واحد

فى نموذج Members2 هذا النموذج يظهر به اسماء من تم ترحيلهم الى جدول Members2 واشتراكاتهم الى جدول Eshtrak2

اخى انا عملت خصائص النموذج الرئيسي ان لا يكون هناك اى اضافات للاعضاء او تعديل بيانات ولكن اريد ان يكون هناك اضافات اشتراكات المتأخرة للنموذج الفرعى Eshtrak2 بجانب الغرامات هناك نوعان من الغرامات

1- غرامة تأخير وبها 3 انواع

1- 20% من قيمة الاشتراك السنوى اذا تأخر سنة واحدة

2- 50% من قيمة الاشتراك السنوى اذا تأخر سنتان

3- 100% من قيمة الاشتراك السنوى اذا تأخر ثلاث سنوات او اكثر

يعنى انا لو اخر سنة اشتراك 2015/2016لو اخر نهاية اشتراك 30/6/2016 ادفع اشتراك سنة 2016/2017 20ج + 20% 4 = 24

2- النوع الثانى غرامة عدم حضو جمعية عمومية

اذا تأخرت عن حضور الجمعية العمومية ادفع عن كل سنة 50% من قيمة اشتراك يعنى لو محضرتش فى 2015/2016 و 2016/2017 ادفع 10 عن كل سنة بعد اضافة الاشتراكات المتأخرة والغرامات يتم ترحيلي الى جدول الاساسي Members واشتراكاتي جدول  Eshtrak ارجو ان لا اكون ثقيل فى طلبي والله المستعان

اخى بالنسبة للنموذج Members2 لم يكون فيه اى اضافة اعضاء حتى لا يتكرر رقم العضوية للعضو الواحد

[مسفر]

انا ما فهمت شي من كلامك على الاطلاق 

هالحين استعادة المحذوف مبنية على شروط وليس كما فعلنا من قبل على كلامك انت فقط ذكرت حذف واستعادة بدون شروط مقيدة للاستعادة 

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

أما أن تاتي الأفكار فهذا يؤخر العمل وربما يعطل بعض النوافذ ونستبدل ونغير 

أضف ما تريد على القاعدة المرسلة لك الاخيرة بدون حذف وإنما بإضافة ما ذكرت ليتسنى لنا التفكير والعمل على اساس ذلك إن استطعنا 

 

والله ولي التوفيق 

[أكسس وبس]

اخى الكريم الله يكرمك دنيا واخرة

بالنسبة للترحيل اذا مر عليه 3 سنوات او اكثر دى الحمدلله انحلت

اما فى حالة من مر عليه 3 سنوات  ويريد تسديد الاشتراكات المتأخرة والغرامات فى هذه الحالة يكون المدة اقل من 3 سنوات فيتم استعادته بناء على هذه المدة مرة اخرى الى الجدول الرئيسي

 

[مسفر]

أملأ القاعدة بإعضاء حذفوا البعض منهم يستعاد والبعض لا يستعاد يبقى لانه لم يدفع أو يحضر عندك شرطين مو شرط واحد 

خطط هل لا بد من تحقيق كليهما أو أحدهما للاستعادة 

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

[أكسس وبس]

اخى ضفت جدول الغرامات ونموذج الغرامات مع نموذج Members2

جمعية اخر.rar

[مسفر]

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

ماذا تكتب في جميع الخانات 20%  واخوتها هل تكتب في خانة النص 20% أم ماذا تكتب ؟

تم تعديل أبريل 2, 2018 بواسطه مسفر

[أكسس وبس]

اخى الكريم

بعد تسديد الاشتراكات فى نموذج Members2 للعضو

مثلاً سليمان

فى جدول الاشتراكات

2014/2015                 20                      25/12/2014                         30/6/2015            كده سنة

2015/2016                 20                      20/2/2016                          30/6/2016             كده سنة

2016/2017                20                      11/12/2016                         30/6/2017              كده سنة

نيجى على الغرامات

نلاقيه وصل لـ 3 سنوات

نضع فى حقل غرامة 100% 20ج من غير معادلة

ثم نضع فى حقل جمعية عمومية 10ج من غير معادلة

مفروض بعد سداد الاشتراكات اخر نهاية اشتراك 30/6/2017 اقل من 3 سنوات يرحل سليمان لجدول Members وهكذا

 

ونخلى مفتاح حفظ او مجرد اغلاق النموذج يرحل او الاسهل

وهذا جدول الغرامات يتم ادخال البيانات بدون معادلات لان نسب الغرامات تتغير حسب قرار مجلس الادارة

غرامة 20% سنة                    غرامة 50% سنتان                 غرامة 100% ثلاث سنوات او اكثر                       غرامة جمعية عمومية

                                                                                                           20                                              10

تم تعديل أبريل 2, 2018 بواسطه أكسس وبس

[مسفر]

أقل من ثلاث سنوات من وين تحسب هو رحل لانه من ثلاث سنوات فأكثر هل نعيد العملية الحسابية مرة آخرى ؟

[مسفر]

أقل من ثلاث سنوات من وين تحسب هو رحل لانه من ثلاث سنوات فأكثر هل نعيد العملية الحسابية مرة آخرى ؟

على العموم جرب افتح نموذج Members 2  واعمل تسديد لسليمان وضع علامة صح على تم التسديد واضغط حفظ 

ستجد سليمان رحل للجدول الرئيسي مع اشتراكاته السابقة كلها 

والله أعلم