طاهر اوفيسنا

مثلا: موظف عنده قرض 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 وبعد لا يظهر هذا الموظف في الإقتطاعات لأنه اتم كل الإقتطاعات هذه الإجابة عن الأولى

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

للرفع

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

في الأكسس جرب قناع الإدخال عند مربع نص التاريخ

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

السلام عليكم الى اين وصلت بأفكارك اخي جعفر

نتوكل على الله نتمنى الفكرة تعالج الموضوع

وعليكم السلام نعم يقوم بوظائف اخرى مثلا 1- تسديد المنح (مواليد - وفيات - ختان - حج - نسبة أمراض طبية ..... وغيرها) 2- تسديد الفوترة 3- الأدوات الكهرومنزلية مثلها مثل القروض 4- إقتطاع المشاركات خلال شهري مارس وجويلية من كل سنة ملاحظة : للعلم أن 1 و 2 منفصلا عن العمل المطلوب و 3 و4 من ضمن العمل المطلوب أرجو منك أخي الكريم تخصيص يوم لي من وقتك الثمين لنتناقش في كل شيء

وعليكم السلام الخطوات المتبعة هي : 01- الدخول على فورم FrmCridi ثم نختار اسم الموظف مثلا رقم 4 "جعفر" ثم نختار من نوع القرض كما في الصورة 01 بعد إختيار قيمة القرض مثلا قرض 3 يكتب تلقائيا في قيمة القرض 30.000.00 ثم يظهر Msbox به هل تريد تثبيت تاريخ القرض لم نضغط على نعم يظهر تاريخ اليوم في شهر القرض كما في الصورة 02 ثم بعد ذالك نختار تاريخ بداية الخصم مثلا 2015/04/01 نرى تاريخ نهاية الخصم يكتت تلقائيا بناءا على كود يقسم مبلغ القرض على عدد الأشهر تاريخ النهاية2015/01/31 كما في الصورة 03 هنا الموظف جعفر إستفاد بقرض مالي قيمته 30.000.00 يحول الى حسابه عن طريق الفورم FrmTransfer وهو غير موجود بالمرفقات ..... هذا غير مهم المهم ان تاريخ بداية الإقتطاعات تبدأ من تاريخ افريل 2015 الى غاية جانفي 2016 كما في الصورة 3 (هذه إقتطاعات شهرية ليس بها أي مشكل ) طبعا الدخول على الفورم FrmDiscountReport هذا خاص بالإقتطاعات الشهرية كما في الصورة 4 02- هذا الموظف جعفر طلب توقيف الإقتطاع لمدة شهرين وهما ماي و جوان 2015 ندخل على نفس الفورم FrmCridi ونختار رقم 04 وهو نفس الموظف "جعفر" كما في الصورة 06 نتبع الترقيم من 01 الى 06 نلاحظ ان 05 تغير من 2015/01/31 الى 2015/03/31 اي زيادة شهرين (وهما شهرين التوقيف) ...... الكل تمام 02- وهنا المشكلة ندخل على الفورم FrmDiscountReport من جديد خلال شهر افريل نلاحظ انه أقتطع له مبلغ 3.000.00 وبقي له 33.000.00 كما في الصورة 07 لاحظ في هذه الصورة زيادة مبلغ 6.000.00 للباقي ......... هذه المشكلة 03- فورم FrmElec هو مثل القروض له مبلغ مالي ينقص منه مبلغ المساهمة ثم يضرب في العدد الموجود في النسبة المئوية ويقسم على 100 نجد المجموع الكلي هو Elec_Value يقسم على 10 ليظهر مبلغ الإقتطاع الشهري DiscountPerMonth وله ايضا تاريخ بداية اقتطاع t1 ونهاية اقتطاع n1 وتوقيف إقتطاع 04- اما فورم FrmMocharaka هذا هو مبلغ مشاركة بقيمة 2.000.00 يقتطع لكل عامل تلقائيا خلال شهر مارس بقيمة 1.000.00 وجويلية بقيمة 1.000.00 من كل سنة وهو لا يدخل إطلاقا في مجاميع الباقي من القروض او الأدوات الكهرومنزلية ويظهرا هاذين المبلغين في اقتطاع أخر في التقرير آمل اني قد وفقت في شرح ماهو معمول وماهو مطلوب وشكرا لك أخي جعفر عن سعة الصدر اي استفسار او شيء غير مفهوم إني موجود وفقك الله لما يحبه ويرضاه

للرفع

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

لللرفع

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

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

هل تمت معاينة الفيديو اخي جعفر ام يوجد خلال بالتنزيل

أستاذي العزيز جعفر هاهو فيديو يبين تفكيك الكود Remaining من طرف الأستاذ حسام الشامي أرجو ان يكون واضحا https://dub118.afx.ms/att/GetAttachment.aspx?file=31219695-17ca-4739-8b71-e02d3deddf4a.zip&ct=YXBwbGljYXRpb24vemlw&name=T3V0bG9vay5jb20uemlw&inline=0&rfc=0&empty=False&cid=6311f496cf65fbc2&shared=1&biciPrevious=34c02497-d779-46ee-b000-9c0ffb23e1be_01e57988e53_10420&hm__login=taherlaguili&hm__domain=hotmail.fr&ip=10.111.4.8&d=d3193&mf=0&hm__ts=Wed%2c%2015%20Apr%202015%2014%3a59%3a08%20GMT&st=taherlaguili%25hotmail.fr%407&hm__ha=01_7131bb812877b511f17228d1299d0f95c1f059e0dd0225421e9db50b1741c9bb&oneredir=1

قيمة الحقل Remaining (الباقي المدان) من الجدولين Cridi و ElectroMeng وحقولهما : بالنسبة لـ جدول Cridi حقوله Cridi_Value (مبلغ القرض) و DiscountStartDate (تاريخ اول إقتطاع) و DiscountEndDate (تاريخ نهاية الإقتطاع) و DiscountPerMonth (الإقتطاع الشهري) بالنسبة لـ جدول ElectroMeng حقوله Elec_Value (المبلغ الإجمالي) و t1 (تاريخ اول إقتطاع) و n1 (تاريخ نهاية الإقتطاع) و DiscountPerMonth (الإقتطاع الشهري) وسؤال آخر ، هل هناك جدول تسجل فيه الدفوعات؟ لأن هذا المفروض ان يسهل العملية كلها لايوجد جدول تسجل فيه الدفوعات وان رايت انه ضروري اوك نعمله واي استفسار اخر انا موجود بالتوفيق استاذي

Remaining هي في الإستعلام وليست من جهة أخرى Remaining: (Nz((SELECT SUM(nz((dateDiff( 'm' , IIF (([Forms]![FrmDiscountReport]![txtMonth] ) < DiscountStartDate, DiscountStartDate , ([Forms]![FrmDiscountReport]![txtMonth] )) ,CDATE(format(format(DiscountEndDate , 'yyyyMM') & Day(DateSerial(Year(DiscountEndDate), Month(DiscountEndDate) + 1, 0)) , '####/##/##')))) * DiscountPerMonth , 0)) FROM Cridi WHERE Cridi.EmployeeID = Employee.EmployeeID AND ([Forms]![FrmDiscountReport]![txtMonth] ) < DiscountEndDate AND DiscountStartDate IS NOT NULL AND DiscountEndDate IS NOT NULL);0)+Nz((SELECT SUM(nz((dateDiff( 'm' , IIF (([Forms]![FrmDiscountReport]![txtMonth] ) < t1, t1 , ([Forms]![FrmDiscountReport]![txtMonth] )) , CDATE(format(format(n1 , 'yyyyMM') & Day(DateSerial(Year(n1), Month(n1) + 1, 0)) , '####/##/##'))) ) * DiscountPerMonth , 0) ) FROM ElectroMeng WHERE ElectroMeng.EmployeeID = Employee.EmployeeID AND ([Forms]![FrmDiscountReport]![txtMonth]) < n1 AND t1 IS NOT NULL AND n1 IS NOT NULL);0))

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

السلام عليكم إخواني الأساتذة ركزو معايا المشكلة في التقرير rptDiscountDetail كما في الصورة

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

شكر لك استاذ هاهو المرفق مبسط ومرفق بالصورة مع العلم اني تركت موظف واحد فقط وهو كريمو1 لديه قرض مالي بقيمة 20.000.00 خلال شهر فيفري 2015 - اول خصم 2015/03/01 بمبلغ 2000.00 الباقي 18.000.00 - 2015/04/01 معفى من الخصم الباقي كما هو في شهر مارس - ثاني خصم 2015/05/01 بمبلغ 2000.00 الباقي 16.000.00 - اخر خصم 2016/01/01 بمبلغ 2000.00 الباقي 0.00 آمل ان اجد مساعدة عن قريب FrmDiscountReport.rar

للرفع

جمعة مباركة استاذ جعفر للرفع