طاهر اوفيسنا

شكرا لك اخي الكريم مارد وهو المطلوب بقي 7- الحـــــــــــــج هنا مرة واحدة في خلال مدة العمل ظهور الميساج يذكرني بان العامل استفاد من عطلة الحج في سنة تاريخ الإجازة مثلا : إجازة حج لمدة 30 يوم ابتداء من تاريخ : 11/07/2012 هنا التذكير يكون كالتالي : "هذا الموظف إستفاد من عطلة الحج سنة 2012 " وشكرا

اخواني المطلب غير مفهوم ام مطلبي مستحيل !!!!!!!!

المساعدة إخواني

المساعدة اخواني

للرفع

السلام عليكم إخواني طلب مساعدة بخصوص إستثناء حالات في نوعية الإجازة لا تقتطع من قيمة الإجازات مع " ظهور ميساج في حالة رقم 7 يمكنني من معرفة العامل انه استفاد بها خلال سنة ........" 4- زواج الموظف (ة) 5- إزدياد مولود جديـد عند الموظف (ة) 6- وفاة الزوج (ة) أو أحد الأصول أو الفـروع أو الحواشي 7- الحـــــــــــــج هنا مرة واحدة في خلال مدة العمل 8- إختتان إبن الموظف (ة) 9- زواج البنت أو الإبن 10- إجتياز امتحان حساب اجازاة ثانية1.rar

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

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

وعليكم السلام اخي جعفر نعم تفكيرك صحيح نعم ادخال المبالغ لا تتغير التقرير rptDiscount يكون به الشهر السابق الذي يظهر بالفورم FrmDiscountReport الأزرار المعنية بنقص في الشهر رجاءا إدخال هذا المعيار SELECT Format([Payment_Month],"mmmm yyyy") AS Month_Year FROM tbl_Loans GROUP BY Format([Payment_Month],"mmmm yyyy") HAVING (((Format([Payment_Month],"mmmm yyyy"))=Format(DateAdd("m",-1,[Forms]![FrmDiscountReport]![txtMonth]),"mmmm yyyy"))); على هذا الإستعلام SELECT qry_Loans_Step1.EmployeeID, Employee.[Nom et Prénom], Employee.detach, qry_Loans_Step1.Month_Year, Sum(Nz([Cridi],0)) AS Cridi1, Sum(Nz([Elec],0)) AS Elec1, Sum(Nz([Cridi_Payments],0)) AS Cridi_Payments1, Sum(Nz([Elec_Payments],0)) AS Elec_Payments1, Sum(Nz([Remaining_Cridi],0)) AS Remaining_Cridi1, Sum(Nz([Remaining_Elec],0)) AS Remaining_Elec1, Sum(Nz([Loan_Other],0)) AS Loan_Other1, Sum([Remaining_Elec]+[Remaining_Cridi]) AS Remaining, Nz([Cridi_Payments1],0)+Nz([Elec_Payments1],0)+Nz([Loan_Other1],0) AS TheSum FROM qry_Loans_Step1 INNER JOIN Employee ON qry_Loans_Step1.EmployeeID = Employee.EmployeeID GROUP BY qry_Loans_Step1.EmployeeID, Employee.[Nom et Prénom], Employee.detach, qry_Loans_Step1.Month_Year; لأنه صراحة معرفة نتيجة التعديل برؤية الباقي لكل عامل خلال كل شهر

للرفع

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

وعليكم السلام أخي جعفر التوضيح اكثر 01- أدخل على المرفق بالمشاركة رقم 01 وادخل على الفورم FrmCridi ثم على العامل كريمو 3 الذي يحمل صفة (متعاقد جزئي)انظر جدول Employee للتذكير فقط . ثم أنظر تاريخ بداية الإقتطاع في FrmCridi ستجده 2015/05/01 لمدة 10 اشهر الى غاية 2016/02/01 وعند دخولنا على فورم الإستقطاعات FrmDiscountReport نجد ان شهر الإقتطاع هو ماي 2015 ثم ندخل على "متعاقد جزئي" في إقتطاع لجنة التسيير نجد ان الشهر في التقرير تغير من ماي الى أفريل ..... هذا كلة عادي وصحيح ولكن ظهور هذا العامل خلال شهر افريل هو الخطأ كما أشرت سابقا و الأصح انه لا يظهر إقتطاع لهذا العامل خلال هذا الشهر لأن هذا الشهر يقتطع الا للعمال الذين يحملون صفة' موظف 'أو 'منتدب' .........الحالة 1 اما الأخرين يحملون صفة 'متعاقد كامل' او 'متعاقد جزئي 'او 'عون نظافة' فهم ناقص شهر عن الحالة 1 مثال : جعفر يحمل صفة موظف او منتدب ولديه قرض واول اقتطاع له شهر ماي 2015 هنا الأمر عادي أما الطاهر يحمل صفة متعاقد كامل او متعاقد جزئي او عون نظافة لديه نفس القرض واول إقتطاع له شهر ماي 2015 هنا عند الدخول على FrmDiscountReport وعلى شهر ماي يجب ان لا يظهر الطاهر في التقرير ذو شهر افريل لأن اول اقتطاع له شهر ماي يظهر خلال شهر جوان 2015 أتمنى اني اوصلت الفكرة اليك

السلام عليكم لديا طلب مساعدة وهو بخصوص إنقاص شهر للأعوان المتعاقدين في ظهور المبالغ المالية بالتقريرين rptDiscount و rptDiscountDetail وهم "عون نظافة - متعاقد كامل - متعاقد جزئي" لاحظو التاريخ في التقريرين انه دائما ينقص شهر مثلا الأن نحن خلال شهر ماي 2015 هذا عند detach يساوي موظف و منتدب اما الفئات الثلاثة السابقة فيكون لديهم أفريل 2015 ليس المشكلة في إنقاص الشهر في التقريرين ولكن المشكلة في الباقي دائما يحسب على شهر الموظفين والمنتدبين الصورة توضح رأي ان يكون استعلام خاص بهم ينقص دائما شهر فقط 11.8.FrmDiscountReport.mdb.zip

وعليكم السلام اخي جعفر شكرا على طيبة قلبك وسعة صدرك شكرا لأنك ساعدتني كثير شكرا على الإهتمام بموضوعي نعم نزعت المعايير وعملت التصفية TheSum >0 في التقرير والحمد لله لم يظهر الباقي 0.00 والآن مازال لديا طلب وهو بخصوص الأعوان المتعاقدين وهم "عون نظافة - متعاقد كامل - متعاقد جزئي" أظن انك لاحظت التاريخ في التقريرين rptDiscount و rptDiscountDetail انه دائما ينقص شهر مثلا الأن نحن خلال شهر ماي 2015 هذا عند detach يساوي موظف و منتدب اما الفئات الثلاثة السابقة فيكون لديهم أفريل 2015 ليس المشكلة في إنقاص الشهر في التقريرين ولكن المشكلة في الباقي دائما يحسب على شهر الموظفين والمنتدبين الصورة توضح رأي ان نعمل استعلام خاص بهم ينقص دائما شهر فقط

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

السلام عليكم فهمت فكرتك استاذ ولكن في رائك اذا كان لديك اكثر من 100 عامل ولديهم قروض فكيف ندخل على كل منهم وتدخل الإقتطاع كل شهر اليس عمل متعب وافقتك الرأي في الضغط مرتين لأظهار المبلغ المستقطع في الفورم frm_Loans لأني فهمت انك لم وصلت الى مرحلة صعبة على جعله يظهر تلقائيا وتبقى الحالات الشاذه تعدل يدويا لاعلينا استاذ المهم انا البرنامج يعمل عندي حاليا زي الفل وبإستقطعات مستفبلية وهذا هو المطلوب أبارك تعديلك على الوحدة النمطية التي من خلالها تمت المشكلة والآن لديا هذا الإستعلام جربت كل الطرق بأن لا يظهر TheSum = 0 في الإستعلام وفي التقرير الذي مصدره الإستعلام qry_Loans_Step1 ولكن لم أفلح ثم عملت تصفية في التقرير كذالك لم اوفق SELECT qry_Loans_Step1.EmployeeID, Employee.[Nom et Prénom], Employee.detach, qry_Loans_Step1.Month_Year, Sum(Nz([Cridi],0)) AS Cridi1, Sum(Nz([Elec],0)) AS Elec1, Sum(Nz([Cridi_Payments],0)) AS Cridi_Payments1, Sum(Nz([Elec_Payments],0)) AS Elec_Payments1, Sum(Nz([Remaining_Cridi],0)) AS Remaining_Cridi1, Sum(Nz([Remaining_Elec],0)) AS Remaining_Elec1, Sum(Nz([Loan_Other],0)) AS Loan_Other1, Sum([Remaining_Elec]+[Remaining_Cridi]) AS Remaining, Nz([Cridi_Payments1],0)+Nz([Elec_Payments1],0)+Nz([Loan_Other1],0) AS TheSum FROM qry_Loans_Step1 INNER JOIN Employee ON qry_Loans_Step1.EmployeeID = Employee.EmployeeID GROUP BY qry_Loans_Step1.EmployeeID, Employee.[Nom et Prénom], Employee.detach, qry_Loans_Step1.Month_Year; وشكرا لك استاذ ادامك الله مساعدا لأخوانك

شكرا لك استاذي واخي جعفر بالعكس وجدت التعديل هو المطلوب حقا واتوماتيكيا لم اعرف مالمقصود من كلامك ((هناك شرط لعمل البرنامج بالطريقة الصحيحة ، وهي ان تدفع قيمة قسط كل شهر في شهره ، وهذا ما يعمله لك الكود في النموذج FrmDiscountReport ، وان لا تدفع قيمة الاقساط مقدما لكل الاقساط !! وإلا فما فائدة البرنامج !! ميزة البرنامج انك تستطيع عن طريق FrmDiscountReport ان تختار اي شهر شئت (طبعا من الاشهر السابقة) ، وسيعطيك البرنامج كم كانت السلفة وكم تم الدفع و... ، واخبرتك ، ان الدفع الشهري هو توثيق بان قيمة القسط قد تم سدادها في ذلك الشهر (او قد تم سداد مبلغ اكبر مقدما).)) نسخت الوحدة النمطية fAdd_Observations و FrmDiscountReport و qry_Loans_OLD و qry_Loans_Step1 و qry_Loans_Step2 و qry_Loans_Step21 فكان المطلوب رجاءا اين تم التعديل من طرفك على اخر نسخة حتى اعرف ماتم تعديله

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

شكرا لك اخي جعفر اولا أتمنى انك فهمت المشكلة . المشكلة في الباقي بالسالب هو يلزم فكرة في كود الوحدة النمطية بحيث انه لايظهر مجموع القروض المنتهية ويظهر الا باقي القرض الجديد فقط مثلا : نلاحظ لامشكلة عند اي عامل لديه قرض واحد فقط سوى ساري الإقتطاع او منتهي الإقتطاع الكود يعمل عادي وصحيح 100 بالمئة اما بالنسبة للعامل الذي لديه اكثر من قرض كمثالنا كريمو2 الذي استفاد من : 01- القرض 2 الذي إستفاد منه بمبلغ 20.000.00 وانتهى خلال شهر ديسمبر 2013 02- القرض 3 الذي إستفاد منه بمبلغ 30.000.00 وانتهى خلال شهر نوفمبر 2014 هاذان المبلغان لازم عمل كود يعدمها ويبقى الباقي 0.00 03- القرض 4 الذي إستفاد منه بمبلغ 40.000.00 وينتهي خلال شهر نوفمبر 2015 القادم وهذا الأخير عادي وصحيح في الإقتطاع والباقي ولكن مندمج مع القرضين 01 و 02 وهذه المشكلة وحلها في الوحدة النمطية اتمنى انك فهمت الفكرة

أخي جعفر حياك الله لقت قمت بتجربة البرنامج على البرنامج الذي هو بحوزتي صراحة ماشاء الله ربي يبارك فيك ويحفظك بقيت شوية أخطاء أتمنى ان تدركها وتصححها وهي : 01 - مشكلة السالب في الباقي كما في الصورة وهذه السالب نتج عندما تمت إضافة كل القروض الذي اخذها الموظف من سنوات سابقة ظهر الباقي بالسالب 02 عند الدخول على فورم FrmDiscountReport خلال شهر مارس او جويلية يوزع المبلغ على كل العمال وهذا لا احبذه اريد ان يتم التوزيع حسب التصفية مثلا يتم توزيع المبالغ الا : detach = موظف او منتدب او متعاقد كامل او متعاقد جزئي او عون نظافة فقط اما الباقية فلا وشكرا وأخير إذا قمت بالسفر نسئل الله ان يردك سالما غانما محبته ورضاه 11.7.FrmDiscountReport.rar

وعليه ، تم إلغائه من tbl_Loans ، والان تقول: لا تنسى ان الطريقة الجديدة هي توثيق كل اقتطاع/دفع في الجدول tbl_Loans ، والطريقة تعطينا مرونة وتوثيق تام لكل دفعة ولكل شهر ، وكل ما علينا عمله لاحقا ، ان نعمل استعلام للشئ الذي نريده ، وعليه نحصل على النتائج. اذا اردت اخيرا ان تضيف Loan_Other مرة ثانية في الجدول tbl_Loans ، فاقترح ان تجعل الزر "سدد مبالغ الاقتطاعات" يقوم بادخال هذه المبالغ ايضا ، فقط عندما يكون للأشهر التي تريد (مارس و؟ ) ، وإدخال المبلغ. كيف التعامل مع هذه الدفعات؟ لمن؟ كم؟ وتفاصيل اخرى!! جعفر حياك الله أخي جعفر وشكرا لك من كل أعماق قلبي على الإهتمام والمثابرة في المساعدة بخصوص هذا الحقل Loan_Other فهو عبارة عن مبلغ مشاركة يتم خصمه للعامل خلال شهري مارس وجويلية من كل سنة فهو اصلا موجود في الجدول OtherDiscount ولكن بإسم OtheDiscount وله إستعلام QUp مرتبط بجدول tmp والنمادج هي : frmUp و FrmMocharaka طريقة العمل : خلال شهر مارس مثلا أدخل على الفورم frmUp ونكتب مبلغ المشاركة يظهر ميساج ينبئك بتثبيت التاريخ والملاحظة نعمل ok في كلا الميساجين ثم نعمل تعميم من خلال هذا النموذج نفتح نموذج المشاركة ونرى انه تمت تعميم المشاركة لكل العمال وبعدها ندخل على فورم الإقتطاعات FrmDiscountReport وندخل التاريخ الذي تمت به اقتطاع المشاركة وهو إما مارس او جويلية نلاحظ كما بالإستعلام qry_Loans_Step1 صراحة الإستعلام qry_Loans_Step2 الذي هو الأساس في البرنامج لم ينفتح عن طريق الفورم FrmDiscountReport عند دخول مبالغ المشاركة للتذكير : مبلغ المشاركة يدخل في مجموع الإقتطاعات : Other_Payments1 + Elec_Payments1 + Elec_Payments1 ولا يدخل ضمن الباقي Remaining لديك المرفق وجرب وحاول تصحيح الخطأ مع العلم أنه يجب إضافة Loan_Other الى كل المعادلات اما رؤية المبالغ وأشهر الإقتطاع بالجدول tbl_Loans فقد تمت كتابتها يدويا 11.7.FrmDiscountReport.rar وأخيرا تقبل تحياتي القلبية الخالصة

شكرا والف شكرا استاذي وأخي العزيز جعفر فعلا هو المطلوب بقي Loan_Other لم تدخله في الإستعلام وهو نستعمله خلال شهري مارس وجويلية من كل شهر لي طلبين : الطلب الأول : بخصوص الزر "سدد مبالغ شهر الاقتطاعات " رأيته يعمل كل شهر وليس بكبسة واحدة يقوم بالتوزيع , هذا خوفي منه ربما انساه الا يمكن ان نضعه أول مايفتتح به النموذج "FrmDiscountReport" حتى يتم تذكيري به دوما وابدا او ضف لهذه الدالة لكل تقوم بالتوزيع مرة واحدة دون اللجوء الى "سدد مبالغ شهر الاقتطاعات " Private Sub cmd_make_Payment_Click() On Error Resume Next DoCmd.OpenForm "frm_Loans", , , "[Loan_ID] = " & Me.FrmCridi_sub.Form.ID & " And [Loan_Type]='Cridi'" End Sub الطلب الثاني : في الإستعلام "qry_Loans_Step2" كيف لي ان اجعل المربعات الحسابية التي ليست بها مبالغ تساوي 0.00 عندما لاتكون بها مبالغ مالية . ملاحظة : الإقتطاع الشهري في الإستعلام : Cridi1 و Elec1 ام Cridi_Payments1 و Elec_Payments1 لأني صراحة وجدت المبالغ مثماثلة خلال كل شهر واخير تقبل تحياتي القلبية الخالصة

للرفع

نعم لقد جعلتها من مصدرها اخي لقد اجريت تعديلا على مربع تحرير وسرد الخاص بالدرجة لاحظ الصورة 01 الصورة 02 عند استخراج رقم الدرجة تمسح مربع نص الرقم الإستدلالي الأدنى والأصح هو عند استخراج رقم الدرجة تكتب قيمة الرقم الإستدلالي للدرجة فقط وتبقى الصنف والرقم الإستدلالي الأدنى على حاله اتمنى المساعدة استدعاء الصنف السلك الرقم02.rar

وهو كذالك استاذ مارد ربي يحفظك شكر لك