jjafferr قام بنشر مايو 3, 2015 قام بنشر مايو 3, 2015 (معدل) السلام عليكم أخي كريمو الجدول السابق tbl_Avoid تم إحالته الى التقاعد ، فلذلك فهو غير موجود في البرنامج ، العمل كله وببساطة في الجدول tbl_Loans اعمل قرض لكريمو ، وستلاحظ ان البرنامج عمل سجل كل شهر بطريقة مستقله في الجدول tbl_Loans ، قم بإعادة ترتيب الاقتطاع ، وعند الانتهاء من التنفيذ ، سترى ان السجلات في الجدول tbl_Loans تتمتشى مع التغيرات. رجاء تجربة هذه الخطوة ، لأن هذه الخطوة هي الاساس في البرنامج الان. أضف موظف آخر ، أضف نوع آخر من القروض للموظف ، ... الخطوات التاليه عليّ: 1. عندما يريد موظف تسديد اي مبلغ ، فيجب ان تخبرني كيف اقوم بالعمل ، الخطوات التاليه عليك: 1. عمل استعلام (ومن ثم تقرير) لحساب موعد دفع القروض ، والمتبقي منها ، 2. ان تعمل نفس الشئ بالنسبة لبقية القروض (اي استعمل الكود الذي عملناه لـ Cridi ، استعمله لـ Elect و بقية انواع القروض ، وطبعا انا معك للمساندة ) جعفر 11.3.FrmDiscountReport.mdb.zip تم تعديل مايو 3, 2015 بواسطه jjafferr
jjafferr قام بنشر مايو 3, 2015 قام بنشر مايو 3, 2015 الخطوات التاليه عليّ: 1. عندما يريد موظف تسديد اي مبلغ ، فيجب ان تخبرني كيف اقوم بالعمل ، مثلا: موظف عنده قرض 20,000 ، لمدة عشر اشهر ، بسداد 2,000 لكل شهر. الشهر السداد 11-2014 2000 12-2014 2000 1-2015 2000 2-2015 2000 3-2015 2000 4-2015 2000 5-2015 6-2015 7-2015 8-2015 سدد 2,000 لكل شهر ، وبقي عليه 8,000 ، الآن يريد ان يدفع 5,000 : هل اسدد من النهاية: 8-2015 2000 7-2015 2000 6-2015 1000 او اسدد من الشهر التالي للدفع: 5-2015 0 6-2015 1000 7-2015 2000 8-2015 2000 او كيف؟ جعفر
jjafferr قام بنشر مايو 3, 2015 قام بنشر مايو 3, 2015 بعد الرد على سؤالي السابق ، وهل ممكن دمج جدول Cridi وجدول ElectroMeng ، مع إضافة نوع القرض (وستكون Cridi او ElectrMeng او حتى اي شئ جديد في المستقبل) ، فاذا تم هذا ، فالمسألة ستقلل من عملك بين النماذج والجداول والتقارير ، وسيكون نموذج واحد وجدول واحد جعفر
كريمو2 قام بنشر مايو 3, 2015 الكاتب قام بنشر مايو 3, 2015 شكرا لك لك أي واستاذي جعفر لقد لا حظت المرفق وإتضح لي ان تعديلك الا في الجدول tbl_Loans ومن خلال رؤية هذا الأخير ومنح قرض لـ كريمو 1 إتضح لي ان مابي الصورة ومن جهة أخرى طلبت مني إكمال الإستعلام الخاص بذالك فلم اصل الى حل أما التقرير فهو ينتج من الإستعلام أما الفورم frm_Avoid_Dates فقد غطلعت عليه ووجدته لاينفذ تعديل التوقيف ارجو منك ان نمشي خطوة بخطوة واوضح لك ألأمر وشكرا لك أخي عن كل مجهوداتك
كريمو2 قام بنشر مايو 3, 2015 الكاتب قام بنشر مايو 3, 2015 الخطوات التاليه عليّ: 1. عندما يريد موظف تسديد اي مبلغ ، فيجب ان تخبرني كيف اقوم بالعمل ، مثلا: موظف عنده قرض 20,000 ، لمدة عشر اشهر ، بسداد 2,000 لكل شهر. الشهر السداد سدد 2,000 لكل شهر ، وبقي عليه 8,000 ، الآن يريد ان يدفع 5,000 : هل اسدد من النهاية: 8-2015 2000 7-2015 2000 6-2015 1000 او اسدد من الشهر التالي للدفع: 5-2015 0 6-2015 1000 7-2015 2000 8-2015 2000 او كيف؟ جعفر شكر لك نترك الفكرة زوجية احسن من الفردية التسديد الأخير يكون كالتالي 5-2015 4000 وتبقى 4000 هذه الـ 4000 اذا اراد ان تقتطع له خلال الشهر الموالي فتكون 6-2015 4000 ويبقى 0 وإذا اراد ان يتم الإقتطاع وفقا لما كان معمول به يكون 6-2015 2000 ويبقى 2000 7-2015 2000 ويبقى 0 وبعد لا يظهر هذا الموظف في الإقتطاعات لأنه اتم كل الإقتطاعات هذه الإجابة عن الأولى
كريمو2 قام بنشر مايو 3, 2015 الكاتب قام بنشر مايو 3, 2015 بعد الرد على سؤالي السابق ، وهل ممكن دمج جدول Cridi وجدول ElectroMeng ، مع إضافة نوع القرض (وستكون Cridi او ElectrMeng او حتى اي شئ جديد في المستقبل) ، فاذا تم هذا ، فالمسألة ستقلل من عملك بين النماذج والجداول والتقارير ، وسيكون نموذج واحد وجدول واحد جعفر في الحقيقة إذا كانت البرمجة سهلة فلابأس يتم إدماجهما معا وكل واحد وتسميته الخاصة
jjafferr قام بنشر مايو 3, 2015 قام بنشر مايو 3, 2015 (معدل) عذرا على الخطأ جرب هذه النسخة ، وقد عملت الاستعلام qry_Loans ، وتفتحه من النموذج (شوف الصورة): طبعا تقدر تمسح كل شئ من الجداول وتبدأ من جديد ، جربه لوسمحت 1. انت تريد ان تعطي الاختيار للمموظف في عملية سداد المبلغ ، وهو يختار الاشهر؟ اذا كان الموضوع كذلك ، فيجب ان تقوم بالعملية يدويا ، فالبرنامج لا يستطيع معرفة الاشهر بهذه الطريقة!! 2. بالنسبة لتوزيع المبلغ ، فاعتقد بأن يوزع على الاشهر ، بقيمة قسط الشهر ، وليس أكثر (هذا سيسهل عملية التقرير ، وكل رقم سيكون بشهره) ، اما اذا لم نلتزم بتوزيع الاشهر حسب القسط ، فمعناه مثلا: قسط 8-2015 هو 2000 ، ولكنه دفع 4000 ، فمعناه يجب علينا ان نجمع الارقام تراكميا للحصول على الرقم النهائي ، بينما الطريقة الاولى جاهزة وبدون ارقام تراكمية بالنسبة لدمج الجدولين ، فرجاء إخباري (في صورة او اكسل) عن الحقول المتشابهة في الجدولين جعفر 11.3.FrmDiscountReport.mdb.zip تم تعديل مايو 3, 2015 بواسطه jjafferr
كريمو2 قام بنشر مايو 3, 2015 الكاتب قام بنشر مايو 3, 2015 شكرا لك اخي جعفر هذه الطريقة عجبتني جربتها ولكن ينقص بالإستعلام الباقي واما قضية الترتيب فإنها لا يتم فيها التنفيذ مانعرف المشكلة اين تكمن كما اشرت لك بالصورة في المشاركة 54 انت تريد ان تعطي الاختيار للمموظف في عملية سداد المبلغ ، وهو يختار الاشهر؟ نعم اذا كان الموضوع كذلك ، فيجب ان تقوم بالعملية يدويا ، فالبرنامج لا يستطيع معرفة الاشهر بهذه الطريقة!! اين المشكلة في يدويا المهم حل يريحني 2. بالنسبة لتوزيع المبلغ ، فاعتقد بأن يوزع على الاشهر ، بقيمة قسط الشهر ، وليس أكثر (هذا سيسهل عملية التقرير ، وكل رقم سيكون بشهره) ، مش مشكلة اما اذا لم نلتزم بتوزيع الاشهر حسب القسط ، فمعناه مثلا: قسط 8-2015 هو 2000 ، ولكنه دفع 4000 ، فمعناه يجب علينا ان نجمع الارقام تراكميا للحصول على الرقم النهائي ، بينما الطريقة الاولى جاهزة وبدون ارقام تراكمية ولكن هذه الطريقة ملزم بها كما اشرت لك سابقا والشرط انها تنقص من الباقي او تعدمه بالنسبة لدمج الجدولين ، فرجاء إخباري (في صورة او اكسل) عن الحقول المتشابهة في الجدولين هذه غدا بحول الله سيتم ابلاغك بذالك عن طريق الإكسل ولو ماعندك مشكلة في ذالك اتركها مقسمة كل على حدى وإذا إقتضى الأمر ووجدت صعوبة في كيفية التعامل فأجرنا على الله ندمجهما معا
jjafferr قام بنشر مايو 6, 2015 قام بنشر مايو 6, 2015 (معدل) السلام عليكم أخي كريمو الرجاء تجربة المرفق للنموذج Cridi ، وتأخير الاستقطاع ، والتأكد ان كل التغييرات تمام في الجدول tbl_Loans. لن ننتقل الى ElectroM ، لأنه ببساطة نسخ ولصق (مع تعديل بسيط) من كود Cridi. اذا تلاحظ ، عملت Cidi_sub2 ، والفكرة هي دمج Cridi و Elec في هذا النموذج (وعليه لن نحتاج الى كود آخر لنموذج آخر) ، كان ودي ان اضع frm_Loans كنموذج فرعي في النموذج Cridi ، حيث ستكون عندك المعلومة كاملة عن جميع القروض للموظف. جعفر 11.4.FrmDiscountReport.mdb.zip تم تعديل مايو 6, 2015 بواسطه jjafferr
كريمو2 قام بنشر مايو 6, 2015 الكاتب قام بنشر مايو 6, 2015 (معدل) السلام عليكم أخي جعفر وشكرا على مد يد العون لقد جربت الفكرة واعجبتني اولا : يبدو ان الطريقة صحيحة واصل لغاية النهاية ولكن فيها بعض الأسئلة وهي : 01- فكرة الترتيب تتم لجميع القروض ويكتب 0.00 في الجدول tbl_Loans للأشهر المعفاة بعدما وجدت صعوبة في قرض2 الى قرض 4 02- مالغاية من أنشاء نموذج فرعي FrmCridi_sub_OLD 03 - الإستعلام qry_Loans ينقصة الباقي الشهري وهذا هو " لب المطلب " الذي تطرقنا له منذ البداية 04- النموذج الفرعي FrmCridi_sub2 الدي هو دمج بين Cridi و Elec عند فتحة لا نلاحظ شيئا به بالرغم أني سجلت معلومات ب Elec 05- زر سداد المبلغ بنموذج Cridi لا يعمل 06- عند تجربة قرض ومن بعد يتم حذفه نلاحظ انه يحدف من الجدول Cridi ولا يحذف من الجدول tbl_Loans آمل ان توفق في إنشاء كود للباقي "Remaining" في الإستعلام qry_Loans تم تعديل مايو 6, 2015 بواسطه كريمو2
jjafferr قام بنشر مايو 6, 2015 قام بنشر مايو 6, 2015 (معدل) وعليكم السلام ورحمة الله وبركاته السلام عليكم أخي جعفر وشكرا على مد يد العون لقد جربت الفكرة واعجبتني اولا : يبدو ان الطريقة صحيحة واصل لغاية النهاية ولكن فيها بعض الأسئلة وهي : 01- فكرة الترتيب تتم لجميع القروض ويكتب 0.00 في الجدول tbl_Loans للأشهر المعفاة بعدما وجدت صعوبة في قرض2 الى قرض 4 02- مالغاية من أنشاء نموذج فرعي FrmCridi_sub_OLD 03 - الإستعلام qry_Loans ينقصة الباقي الشهري وهذا هو " لب المطلب " الذي تطرقنا له منذ البداية 04- النموذج الفرعي FrmCridi_sub2 الدي هو دمج بين Cridi و Elec عند فتحة لا نلاحظ شيئا به بالرغم أني سجلت معلومات ب Elec 05- زر سداد المبلغ بنموذج Cridi لا يعمل 06- عند تجربة قرض ومن بعد يتم حذفه نلاحظ انه يحدف من الجدول Cridi ولا يحذف من الجدول tbl_Loans آمل ان توفق في إنشاء كود للباقي "Remaining" في الإستعلام qry_Loans 01- فكرة الترتيب تتم لجميع القروض ويكتب 0.00 في الجدول tbl_Loans للأشهر المعفاة لا ليس لجميع القروض ، وإنما للقرض الذي الذي تم اختياره (السجل الذي تكون عليه في Cridi وتضغط على زر اعادة تقسيم الاقتطاع). بعدما وجدت صعوبة في قرض2 الى قرض 4 ما هي هذه الصعوبة ، رجاء اعطني تفاصيل دقيقة بأمثلة لوسمحت ، لأني اخبرتك: لأنه ببساطة نسخ ولصق (مع تعديل بسيط) من كود Cridi فكل شئ يعتمد على هذا النموذج. 02- مالغاية من أنشاء نموذج فرعي FrmCridi_sub_OLD انا عندما اغير شئ في برنامج ، دائما احتفظ بالاصل ، واطلق عليها OLD ، حتى اعرفه ، ويمكن في النهاية حذفه. 03 - الإستعلام qry_Loans ينقصة الباقي الشهري وهذا هو " لب المطلب " الذي تطرقنا له منذ البداية المسألة سهلة ولكننا لم نصل اليها: 1. عند دفع كل شهر ، فسنكتب في خانة Payment_Made في النموذجfrm_Loans ، القيمة المدفوعة لذلك الشهر (وهذا ينطبق على الموظف الذي يريد ان يدفع اي مبلغ يحب في ذلك الشهر) ، 2. عندها ، كل الذي يجب عمله هو جمع حقل Cridi وحقل Payment_Made في الاستعلام qry_Loans ، ونطرحهم من بعض لنحصل على الباقي الشهري Remaining . 04- النموذج الفرعي FrmCridi_sub2 الدي هو دمج بين Cridi و Elec عند فتحة لا نلاحظ شيئا به بالرغم أني سجلت معلومات ب Elec انا صغرت الحقول لكي يتسع المكان لبقية حقول ElectroM الاضافية ، ولكني لم اصل اليها. (ولكني ضبطته بحيث تستطيع استبداله مكان FrmCridi_Sub ، وسيعمل بالطريقة الصحيحة) ، ولكن ، قد نلغي فكرة دمج النموذجين ، فعندها تستطيع ان تنسخ الكود من النموذج Cridi الى النموذج ElectroM لعمل الازم. 05- زر سداد المبلغ بنموذج Cridi لا يعمل هذا الزر يجب ان يفتح النموذج frm_Loans للقرض/السجل الذي تكون عليه في Cridi ، وانت بعد ذلك تدخل مبلغ السداد للشهر المطلوب (لاحظ 03.1 و 03.2 اعلاه لمعرفة طريقة الحساب). 06- عند تجربة قرض ومن بعد يتم حذفه نلاحظ انه يحدف من الجدول Cridi ولا يحذف من الجدول tbl_Loans اعمل علاقة بين الجدول Cridi والجدول tbl_Loans كما في الصورة المرفقة: آمل ان توفق في إنشاء كود للباقي "Remaining" في الإستعلام qry_Loans رجاء مراجعة 03.1 اعلاه أخي كريمو انت الآن تستطيع ان تملئ الفاراغات التي انا لم اكملها ، فالموضوع الآن اصبح واضحا لطريقة عمل الجدول tbl_Loans ، نعم قد نحتاج حقل خاص لـ Payment_Made_Cridi و Payment_Made_Elec ، ولكن سنعرف هذا الشئ لما نوصل الى Elec ، والذي انت تستطيع ان تعمله ، بواسطة نفس الكود الموجود في Cridi. رجاء ملاحظت اني في اي للتاريخ ، فاني أغير اليوم واجعله" اول الشهر" (لهذا السبب كنت تحصل على خطأ في الكود في النموذج frm_Avoid سابقا). جعفر تم تعديل مايو 6, 2015 بواسطه jjafferr 1
كريمو2 قام بنشر مايو 10, 2015 الكاتب قام بنشر مايو 10, 2015 (معدل) وعليكم السلام ورحمة الله وبركاته 01- فكرة الترتيب تتم لجميع القروض ويكتب 0.00 في الجدول tbl_Loans للأشهر المعفاة لا ليس لجميع القروض ، وإنما للقرض الذي الذي تم اختياره (السجل الذي تكون عليه في Cridi وتضغط على زر اعادة تقسيم الاقتطاع). بعدما وجدت صعوبة في قرض2 الى قرض 4 ما هي هذه الصعوبة ، رجاء اعطني تفاصيل دقيقة بأمثلة لوسمحت ، لأني اخبرتك: لأنه ببساطة نسخ ولصق (مع تعديل بسيط) من كود Cridi فكل شئ يعتمد على هذا النموذج. 02- مالغاية من أنشاء نموذج فرعي FrmCridi_sub_OLD انا عندما اغير شئ في برنامج ، دائما احتفظ بالاصل ، واطلق عليها OLD ، حتى اعرفه ، ويمكن في النهاية حذفه. 03 - الإستعلام qry_Loans ينقصة الباقي الشهري وهذا هو " لب المطلب " الذي تطرقنا له منذ البداية المسألة سهلة ولكننا لم نصل اليها: 1. عند دفع كل شهر ، فسنكتب في خانة Payment_Made في النموذجfrm_Loans ، القيمة المدفوعة لذلك الشهر (وهذا ينطبق على الموظف الذي يريد ان يدفع اي مبلغ يحب في ذلك الشهر) ، 2. عندها ، كل الذي يجب عمله هو جمع حقل Cridi وحقل Payment_Made في الاستعلام qry_Loans ، ونطرحهم من بعض لنحصل على الباقي الشهري Remaining . 04- النموذج الفرعي FrmCridi_sub2 الدي هو دمج بين Cridi و Elec عند فتحة لا نلاحظ شيئا به بالرغم أني سجلت معلومات ب Elec انا صغرت الحقول لكي يتسع المكان لبقية حقول ElectroM الاضافية ، ولكني لم اصل اليها. (ولكني ضبطته بحيث تستطيع استبداله مكان FrmCridi_Sub ، وسيعمل بالطريقة الصحيحة) ، ولكن ، قد نلغي فكرة دمج النموذجين ، فعندها تستطيع ان تنسخ الكود من النموذج Cridi الى النموذج ElectroM لعمل الازم. 05- زر سداد المبلغ بنموذج Cridi لا يعمل هذا الزر يجب ان يفتح النموذج frm_Loans للقرض/السجل الذي تكون عليه في Cridi ، وانت بعد ذلك تدخل مبلغ السداد للشهر المطلوب (لاحظ 03.1 و 03.2 اعلاه لمعرفة طريقة الحساب). 06- عند تجربة قرض ومن بعد يتم حذفه نلاحظ انه يحدف من الجدول Cridi ولا يحذف من الجدول tbl_Loans اعمل علاقة بين الجدول Cridi والجدول tbl_Loans كما في الصورة المرفقة: 11.4.Clipboard01.jpg آمل ان توفق في إنشاء كود للباقي "Remaining" في الإستعلام qry_Loans رجاء مراجعة 03.1 اعلاه أخي كريمو انت الآن تستطيع ان تملئ الفاراغات التي انا لم اكملها ، فالموضوع الآن اصبح واضحا لطريقة عمل الجدول tbl_Loans ، نعم قد نحتاج حقل خاص لـ Payment_Made_Cridi و Payment_Made_Elec ، ولكن سنعرف هذا الشئ لما نوصل الى Elec ، والذي انت تستطيع ان تعمله ، بواسطة نفس الكود الموجود في Cridi. رجاء ملاحظت اني في اي للتاريخ ، فاني أغير اليوم واجعله" اول الشهر" (لهذا السبب كنت تحصل على خطأ في الكود في النموذج frm_Avoid سابقا). جعفر السلام عليكم أخي جعفر رأيتك غايب عن المنتدى منذ 07 ماي أتمنى ان تكون في صحة جيدة يارب ونرى بصماتك والله لا يعدمها ابدا من هذا المنبر النير 01- الصعوبة التي لقيتها مرة واحدة ومن بعد اني لم الاحظها " ربما كما اشرت 'فإني أغير اليوم واجعله 'اول الشهر' (لهذا السبب كنت تحصل على خطأ في الكود في النموذج frm_Avoid سابقا)' " 06- أما بخصوص الربط بين جدول cridi و الجدول tbl_Loans فقد تم وفقا للصورة ولكن اثناء تحرير قرض في النموذج cridi وخاصة عند كتابة تاريخ بداية الخصم يظهر هذا الميساج خاصة عند قرض 1 و قرض 4 و قرض مالي إستعجالي (سبحانة الله مرة يظهر هذا الميساج ومرة لا) *- اما الباقي فكله تمام *- اما بخصوص ملء الفراغات التي انت لم تكملها مافهمت اين هي في الجدول tbl_Loans *- واخير ارجو ان ارى الباقي الشهري Remaining في الإستعلام qry_Loans كما تفضلت بطرحه في 3-2 الذي قلت عندها ، كل الذي يجب عمله هو جمع حقل Cridi وحقل Payment_Made في الاستعلام qry_Loans ، ونطرحهم من بعض لنحصل على الباقي الشهري Remaining . *- وفي الأخير لقد حاولت زرع كود القرض في elec مع تغيير الأسماء ولكني لم أوفق تم تعديل مايو 10, 2015 بواسطه كريمو2
كريمو2 قام بنشر مايو 15, 2015 الكاتب قام بنشر مايو 15, 2015 نتمنى رجوع الاستاذ جعفر في اقرب وقت للمنتدى ربي يحفظه ان شاء الله
jjafferr قام بنشر مايو 18, 2015 قام بنشر مايو 18, 2015 وعليكم السلام أخي كريمو نعم عدت اليوم عصرا من سفري وان شاء الله غدا اواصل من حيث انتهينا ، إلا اذا عندك ملاحظات جديدة جعفر
jjafferr قام بنشر مايو 19, 2015 قام بنشر مايو 19, 2015 (معدل) 06- أما بخصوص الربط بين جدول cridi و الجدول tbl_Loans فقد تم وفقا للصورة ولكن اثناء تحرير قرض في النموذج cridi وخاصة عند كتابة تاريخ بداية الخصم يظهر هذا الميساج خاصة عند قرض 1 و قرض 4 و قرض مالي إستعجالي (سبحانة الله مرة يظهر هذا الميساج ومرة لا) السلام عليكم أخي كريمو انا عدلت هذه المادة فقط ، فرجاء تجربتها مع باقي الخطوات التي كتبتها لك سابقا ، وموافاتي بالنتيجة جعفر 11.4.FrmDiscountReport.mdb.zip تم تعديل مايو 19, 2015 بواسطه jjafferr
كريمو2 قام بنشر مايو 20, 2015 الكاتب قام بنشر مايو 20, 2015 وعليكم السلام أخي جعفر بارك الله فيك هذه المادة تمام وهو المطلوب والأن ننتقل الى ماهو بالأسفل *- اما بخصوص ملء الفراغات التي انت لم تكملها مافهمت اين هي في الجدول tbl_Loans *- واخير ارجو ان ارى الباقي الشهري Remaining في الإستعلام qry_Loans كما تفضلت بطرحه في 3-2 الذي قلت عندها ، كل الذي يجب عمله هو جمع حقل Cridi وحقل Payment_Made في الاستعلام qry_Loans ، ونطرحهم من بعض لنحصل على الباقي الشهري Remaining . *- وفي الأخير لقد حاولت زرع كود القرض في elec مع تغيير الأسماء ولكني لم أوفق
jjafferr قام بنشر مايو 20, 2015 قام بنشر مايو 20, 2015 السلام عليكم أخي كريمو المرفق الان يعمل على: 1. بعد إضافة القرض في Cridi ، فان القرض يسجل في tbl_Loans ، 2. يمكنك تعديل هذا القرض وتأجيله ، ونتائجه تسجل في tbl_Loans ، 3. بعد إضافة القرض في Elec ، فان القرض يسجل في tbl_Loans ، 4. يمكنك تعديل هذا القرض وتأجيله ، ونتائجه تسجل في tbl_Loans ، 5. يمكن فتح نموذج سداد المبلغ ، والذي سيفتح سجلات القرض المختار. رجاء التجربة ، ثم التجربة ، وتجربة حذف القرض كذلك. الخطوة الاخيرة (هذا الذي اعتقده ) : حساب Remaining على اساس المبالغ المدفوعة. جعفر 11.5.FrmDiscountReport.mdb.zip 1
كريمو2 قام بنشر مايو 20, 2015 الكاتب قام بنشر مايو 20, 2015 المرفق الان يعمل على: 1. بعد إضافة القرض في Cridi ، فان القرض يسجل في tbl_Loans ، 2. يمكنك تعديل هذا القرض وتأجيله ، ونتائجه تسجل في tbl_Loans ، 3. بعد إضافة القرض في Elec ، فان القرض يسجل في tbl_Loans ، 4. يمكنك تعديل هذا القرض وتأجيله ، ونتائجه تسجل في tbl_Loans ، 5. يمكن فتح نموذج سداد المبلغ ، والذي سيفتح سجلات القرض المختار. رجاء التجربة ، ثم التجربة ، وتجربة حذف القرض كذلك. نعم وهو كذالك هو المطلوب الخطوة الاخيرة (هذا الذي اعتقده ) : حساب Remaining على اساس المبالغ المدفوعة. Remaining نعم على اساس المبالغ المدفوعة. أي يساوي المبالغ المتبقية بعد نقص مبلغ كل شهر في الإستعلام qry_Loans ملاحظة : Other لا يحسب مع الباقي للمبالغ المدفوعة ابدا واخيرا اشكرك جزيل الشكر على تعبك معايا واتاحة وقتك الثمن لمساعدتي
jjafferr قام بنشر مايو 23, 2015 قام بنشر مايو 23, 2015 السلام عليكم أخي كريمو الثاني بحمد الله ومنته ، توصلت الى عمل الاستعلام والذي يعطي بقية مبلغ القرض Remaining طبعا اضطررت لعمل بعض التغييرات البسيطة على الجدول tbl_Loans ، واهمها هو عمل حقل Loan_Type لسهولة عمل استعلام لاحقا ، سواء لـ Cridi او Elec ، بالاضافة الى عمل حقل خاص لدفعات Cridi ودفعات Elec. هذه الحقول قد تبدو زيادة عن الازم في الوهلة الاولى ، وان بامكاننا ان نستعيض عن هذه الحقول ببعض الاوامر في الاستعلام (وهذه المشكلة التي كنا نعاني منها في البرنامج السابق) ، ولكنها تسهل الامور إن شاء الله. لا يوجد تغيير في طريقة العمل ، ولكن لدفع القرض الشهري ، فيجب عليك ان تفتح نموذج frm_Loans عن طريق الضغط على الزر سداد مبلغ ، وتضيف قيمة الدفعة يدويا (هذا ما اردته انت سابقا ، وخصوصا بأن الموظف الان يستطيع ان يدفع اي مبلغ يريده شهريا ) ، ولقد سهلت عليك ايضا ، بان تنقر الفأرة مرتين في حقل الدفع لذلك الشهر ، ليكتب المبلغ تلقائيا ). هنا وحدة نمطية جديدة Count_Remaining ، وهي التي تعطي Remaining ، بأخذ القيم من الجداول ، والكود سهل جدا: Function Count_Remaining(ID_Emp As Integer, ID_Loan As Integer, T As String) As Currency 'ID_Loan = Loan ID 'S = Sum of payments 'Type = Cridi or Elec 'we need to know how much is the Loan, from tables Cridi and ElectroMeng 'ans SUM the paid, from tbl_Loans If T = "Cridi" Then a = DLookup("[Cridi_Value]", "Cridi", "[ID]=" & ID_Loan) S = DSum("[Payment_Made_Cridi]", "tbl_Loans", "[EmployeeID]=" & ID_Emp) ElseIf T = "Elec" Then a = DLookup("[Elec_Value]", "ElectroMeng", "[ID]=" & ID_Loan) S = DSum("[Payment_Made_Elec]", "tbl_Loans", "[EmployeeID]=" & ID_Emp) End If Count_Remaining = a - Nz(S, 0) End Function هذا شكل الاستعلام: حاليا الاستعلام يجمع جميع مبالغ الموظف التي تم سدادها ، ولم اجربه لعدة قروض او قروض منتهية ، او .... ، فرجاء التجربة وإخباري بالنتيجة. جعفر 11.5.FrmDiscountReport.mdb.zip 1
كريمو2 قام بنشر مايو 23, 2015 الكاتب قام بنشر مايو 23, 2015 (معدل) شكرا لك استاذ جعفر على التعب معايا Remaining -01 في الإستعلام qry_Loans لايؤدي وظيفته كما هو مطلوب وحسب قولك ((لا يوجد تغيير في طريقة العمل ، ولكن لدفع القرض الشهري ، فيجب عليك ان تفتح نموذج frm_Loans عن طريق الضغط على الزر سداد مبلغ ، وتضيف قيمة الدفعة يدويا (هذا ما اردته انت سابقا ، وخصوصا بأن الموظف الان يستطيع ان يدفع اي مبلغ يريده شهريا ) ، ولقد سهلت عليك ايضا ، بان تنقر الفأرة مرتين في حقل الدفع لذلك الشهر ، ليكتب المبلغ تلقائيا )) فهذه الطريقة يدوية ليش مانخليها أوتوماتيكية احسن الا للضرورة القصوى نعمل بها يدويا تصور إذا كان لديك اكثر من 100 عامل فكيف تتم العملية يدويا إني ألاحظ انها صعبة جدا بالنسبة لهم والعملية تتم كما في المثال التالي : اي Remaining = المبلغ الإجمالي (القرض او الكهرومنزلية)- الأشهر المنقطعة مثلا : القرض 10.000.00 بداية الإقتطاع جوان 2015 الى غاية مارس 2016 خلال شهر جوان 2015 Remaining يساوي 10.000.00 ناقص 1.000.00(إقتطاع جوان 2015) يساوي 9.000.00 خلال شهر جويلية 2015 Remaining يساوي 9.000.00 ناقص 1.000.00 (إقتطاع جويلية2015) يساوي 8.000.00 خلال شهر أوت 2015 Remaining يساوي 8.000.00 ناقص 1.000.00 (إقتطاع أوت 2015) يساوي 7.000.00 . . . . . . خلال شهر مارس 2016 Remaining يساوي 1.000.00 ناقص 1.000.00 (إقتطاع مارس 2016) يساوي 0.00 02- جعل Remaining_cridi و Remaining_elec كل واحدة منفصلة على ألأخرى ماالسبب ؟ يكفي Remaining واحدة تبين الباقي لهما فقط ارجو انك فهمت ما هو مطلوب ؟ وشكرا تم تعديل مايو 23, 2015 بواسطه كريمو2
jjafferr قام بنشر مايو 24, 2015 قام بنشر مايو 24, 2015 (معدل) 1. Remaining في الإستعلام qry_Loans لايؤدي وظيفته كما هو مطلوب أخي كريمو ، وكيف استطيع ان اصلح ما قلت ، وانت لم تخبرني ما المشكلة!! وللعلم ، يجب التفريق بين شيئين مختلفين ، الجدول tbl_Loans و الاستعلام qry_Loans ،والاستعلام مجرد أداه للجدول. 2. ليش مانخليها أوتوماتيكية احسن الا للضرورة القصوى نعمل بها يدويا نعم نستطيع ان نعمل زر لدفع قروض الشهر ، في النموذج FrmDiscountReport للشهر الذي تم اختياره لإستقطاعات الشهر. الزر هو "سدد مبالغ شهر الاقتطاعات" ، وهذا هو الكود الذي يملئ حقول الدفع للشهر المختار: Private Sub cmd_Pay_installments_Click() Dim rst As DAO.Recordset Set rst = CurrentDb.OpenRecordset("Select * From tbl_Loans Where [Payment_Month]=#" & Me.txtMonth & "#") rst.MoveLast: rst.MoveFirst RC = rst.RecordCount For I = 1 To RC rst.Edit 'check, maybe a manual payment is done, so don't over write it If Len(rst!Payment_Made_Cridi & "") = 0 And Not IsNull(rst!Loan_Cridi) Then rst!Payment_Made_Cridi = rst!Loan_Cridi End If If Len(rst!Payment_Made_Elec & "") = 0 And Not IsNull(rst!Loan_Elec) Then rst!Payment_Made_Elec = rst!Loan_Elec End If rst.Update rst.MoveNext Next I MsgBox "Payments made" End Sub يجب ان تعرف ان برنامج القروض الان يعتمد على الجدول tbl_Loans ، لذا ، فجميع خطوات الدفع لابد ان ندخلها في الجدول اولا (طبعا عن طريق النموذج frm_Loans) ، ثم يقوم الاستعلام بأخذ البيانات من هذا الجدول وعمل الحساب مثل ما تريد. 3. جعل Remaining_cridi و Remaining_elec كل واحدة منفصلة على ألأخرى ماالسبب ؟ انا قلت: "هذه الحقول قد تبدو زيادة عن الازم في الوهلة الاولى ، وان بامكاننا ان نستعيض عن هذه الحقول ببعض الاوامر في الاستعلام (وهذه المشكلة التي كنا نعاني منها في البرنامج السابق) ، ولكنها تسهل الامور إن شاء الله." فجمع الحقلين في استعلام او حتى في تقرير سهل ، ولكن اذا اردت ان تفصلهم اذا كانوا مجتمعين ، فالمسألة ستكون صعبة وللعلم ، هذين الحقلين يتم احتساب نتائجهم عن طريق الوحدة النمطية ، وسترى هناك اننا نقوم بعمل معادلات مختلفة ، واذا اردت انت لاحقا ان تقوم بتغيير شئ ، فكما اخبرتك سابقا ، المعادلات سهلة التغيير الآن ، رجاء ، الغي جميع البيانات من جداول القروض ، وادخل مجموعة بيانات صحيحة ، ثم جرب البرنامج ، واذا اردت اي تعديل ، فرجاء ارسال البرنامج ذو البيانات الصحيحة ، والرجاء ان تكون دقيق في شرح المطلوب ، كالعادة جعفر 11.5.FrmDiscountReport.mdb.zip تم تعديل مايو 24, 2015 بواسطه jjafferr 1
الردود الموصى بها
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.