الفريق العربي للبرمجةأرشيف المنتديات · 2000 – 2023
نسخة أرشيفية للقراءة فقط — التسجيل والمشاركة مغلقان، والمحتوى محفوظ كما كان.

كود تحديث

مغلق
بدأه حارث في 11 أكتوبر 2001 · 14 رد · 942 مشاهدة · في مراجعة المواضيع
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

لدي برنامج صندوق خيري في عائلة ليست صغيرة (أكثر من 280 سجل) ، وهناك رسوم اشتراك على أفراد العائلة ، ولدي حقل في الجدول المسجلة به الاسماء مضمونه: هل هو مطالب بالاشتراك ؟ ، والقيمة نعم أو لا .

وتحديد المطالبين بالاشتراك يكون بالنظر إلى الوظيفة ، فيعفى الطلاب ومن هم بلا عمل أو ذوي دخول محدودة .

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

DoCmd.RunSQL "UPDATE [Names] SET [Names].N = 0 " _

& " WHERE (((Names.J)= " & "طالب" & " Or (Names.J)= " & "بدون" & ")) OR (((Names.F)= " & "معفى" & "));"

حيث N هو حقل المطالبة : هل هو مطالب أو لا ، J حقل العمل ، F حقل الفئة : أي مقدار المبلغ الذي يدفعه ، إما أ ، أو ب ، أو ج ، أو معفى

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

#2

الأخ حارث

أرسل لي الملف على البريد وسأرى المشكلة إن شاء الله .

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

من يريد معلومات عن الفكرة زودته بها وقد ذكرت هذا الكلام هنا لما وجدناه نحن أعضاء الصندوق من فوائد فيه فأصبح الواحد يقترض الآلاف ويسدد بدون زيادة أو منه من أحد لذا أحببت طرح الفكرة للمهتمين .

وللجميع التحية

#3

أخي أبو حمود أذا ممكن ترسلي جزاك الله خير

المعلومات الكافية حوله

#4

أخي أبو حمود

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

أولا .. يعلم الله أني أحبك في الله

----------------------

مرحبا بفكرتك يا أبو الجمايل .. حفظك الله

إذا ممكن إفادتى عن الصندوق و هل له سن محدد

محبك / أبو زيد

#5

الأخوة

تجدون رابط للنظام الأساسي ملف مستند وورد :

http://mypage.ayna.com/h_h123/Box.zip

الأخ ابو زيد

أحبك الله الذي أحببتني فيه .

وسأكتب بعض الأشياء التي تم إقرارها من قبل المجلس التأسيسي للصندوق .

وللجميع التحية

#6

أرجو أن توضح أيضاً مدى شرعية الطريقة التي يقوم عليها عمل الصندوق .

#7

تم سؤال شيخين فأجازا الطريقة وقد عدل أحدهما في بعض الأنظمة التي رأى فيها مخالفة شرعية والنظام الآن حسب تعديله وتوجيهه ، وقد ناقشتهم في مسألة القرض الذي يجر نفعا وقد قالا (طريقة الصندوق ليست داخلة في هذه المسألة) وإن شئت أخبرتك بإسميهم .

ولك تحياتي

#8

حاولت فتح المستند ولكن لم يفتح

#9

الأخ طلال

قصدك الرابط والا المستند ؟

ولك تحياتي

#10

اقصد المستند أما الملف فقد تم تحميله و هو مضغوط بس عند طلب فتح المستند في word يأخذ وقت كبير ثم لا يفتح

#11

المستند معمول بوورد 2000 هل أحد من الأخوة واجه المشكلة آمل إجابتكم .

عموما سأرسل الملف على بريدك .

ولك تحياتي

#12

السلام عليكم

بالرغم من أن الحديث إتجه الي الصناديق ، فمرفق طيه الكود الصحيح لطلب الأخ الذي طرح السؤال ، و آسف لتغيير مجري الحديث علي الرغم من اهميته

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

DoCmd.RunSQL "UPDATE [Names] SET [Names].n = 0 WHERE (((Names.j)= 'معلم' Or (Names.j)='بدون')) OR (((Names.f)='معفي'));"

[code/]

و من الواضح أن سبب اللبس هو إستخدام ' بدلاً من "

مصراوي

#13

الأخ مصراوي : جزاك الله خير ، طبقت ما ذكرته وانحلت المشكلة ، جعل الله ذلك في موازين حسناتك .

الأخ أبو حمود : آسف على التأخر في الرد لظروف خاصة، وجزاك الله خير على اهتمامك ، وقد آرسلت القاعدة إليك بعد تطبيقي ما ذكره الأخ مصراوي .

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

جزاك الله على الملف كل خير ، وجعله في موازين حسناتك ، والدال على الخير كفاعله .

#14

الأخوه

هذه بعض القرارات التنظيمية للمجلس التأسيسي للصندوق :

1- تحديد أقل مبلغ للاشتراك الشهري بـ 300 ريال .

2- تحديد 1000 ريال رسم اشتراك عضوية .

3- أقل مبلغ لتسديد قرض 400 ريال .

4- يحق للعضو اقتراض ثلاثة أضعاف ما دفعه من اشتراكات شهرية

5- طريقة التسديد للمقترضين (الطريقة السابقة):

حسب النسبة التي تأخذها من رأس المال تسددها نفس النسبة مضاف إليها 7% .

سأشرح الطريقة بمثال :

عضو يطلب قرض بمبلغ 5000 ريال

ورأس مال الصندوق 30.000

فلحساب النسبة = 5000×100÷30000 = 16%

كسور النسبة تحذف .

يضاف لها 7% = 16+7= 23%

إذا كان راتب العضو مثلا 4000 ريال

المبلغ = 4000×23÷100= 920 ريال .

عدد الأقساط = 5000÷920= 5 وباقي المبلغ دفعه لوحده .

الطريقة الحالية :

يسأل العضو عن المبلغ الذي يستطيع سداده فإذا قال 600 ريال شهريا نضرب 600×18 شهر لمعرفة أقصى مبلغ يمكن الحصول عليه يعني كل قرض يجب أن لا يتجاوز تسديده 18 شهر وكذلك لا يحق للعضو اقتراض مبلغ يتجاوز 50% من رأس مال الصندوق لوحده وكذلك لا يسمح له بتجاوز مبلغ ثلاثة أضعاف ما دفعه .

هناك أمور أخرى ولكن هذه أهمها .

وإذا فيه أي سؤال أو استفسار فأنا مستعد للإجابة .

وقد تجاوز رأس مال الصندوق لـ 40000 ريال في مدة سنة وستة أشهر وقدم في خلال 6 أشهر فقط ما يقارب 10 قروض تجاوزت مبالغها 60000 ريال .

وللجميع التحية

#15

السلام عليكم

هل لدى أحد منكم برنامج جاهز لإدارة الصندوق؟

فأنا أحتاج لبرنامج كهذا...

وشكرا سلفا

هذا الموضوع مغلق.

مواضيع مشابهة