طاهر اوفيسنا

اهلا بك استاذ ابو ادم بلد المليون ونصف شهيد الجزائر

هذا الكود اعطى للتقريب للأعلى فكيف يكون للتقريب للأسفل اي اعطى 1364 وليس 1363

اجل استاذي الكريم يعني بمعدل 4.16 يوم اجازة عن كل شهر عمل مؤدى واذا رجعنا للمرسوم المنظم لذالك فنلاحظ كما في الصورة الارجح ان يكون التقريب الى الاسفل 1363

اهلا استاذ شيفان لاحظت انك زدت مايلي : اي 2 شهر و 14 يوم = 10.40 من اين اقتبست بهذا ؟ تاريخ التنصيب عند العامل كريمو 5 بداية توظيفه 1989/12/09 اي لديه في شهر ديسمبر 1989 21 يوم عمل بمثابة 3 ايام اجازة عنها

شهر له 4.16 شهرين له 4.16 × 2 = 8.32 بتقريب 9 14 يوم له 2.08 لاحظ المرفق من تصميم استاذ رمهان في هذا المنتدى حساب اجازاة ثانية1.rar

له 27 سنة من عام (1990 الى 2017) × 50 = 1350 وله 03 ايام في ديسمبر عام 1989 المجموع 1353

شكرا اخي شيفان لاحظ المرفق وخاصة عند العامل كريمو 5 بداية توظيفه 1989/12/09 ejmaleEjazat: Int(((Date()-[hiredate])/7.3)) ejmaleEjazat1: Int(((Date()-[hiredate])/30)*4.16) ejmaleEjazat2: Round(((Date()-[hiredate])/30)*4.16;0) ejmaleEjazat3: Round(((Date()-[hiredate]))*0.1389;0) ejmaleEjazat = 1363 ejmaleEjazat1 = 1380 ejmaleEjazat2 = 1381 ejmaleEjazat3 = 1383 الأصح = 1353 حساب اجازة.rar

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

ارجو المساعدة ...

اين انت ياأستاذ جعفر...

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

اعجز الأساتذة عن معالجة طلبي ؟

وينك استاذ جعفر ...

لا اخي الكريم كيف تقول هذا ! انت كنت اخا رائعا في مساعدتك لي طوال سنوات واتمنى مانتحرم منك فبارك الله لك فيما مددت فيه يد المساعدة لإخوانك الحقول المعنية وهي : hiredate تاريخ التوظيف ejmaleEjazat الإستحقاق الإجمالي وهي التي بها المشكلة زيادة يوم او اكثر ودالتها على هذا المنوال : ejmaleEjazat: Int(((Date()-[hiredate])/7.3)) مدة الإستحقاق : aja_B " تنقص من قيمة الإستحقاق الإجمالي " نوعية الإجازة : ejazaID (بها عدة خيارات وشروط ) تجدها في جدول tblEjaza mhsop = "تنقص من قيمة الإستحاق" mhsop: DSum("aja_B";"TB_Ath6rary";"IDmozf=" & [IDmozf] & "And ejazaID<200") Unmhsop = " لا تنقص من قيمة الإستحاق" Unmhsop: DSum("aja_B";"TB_Ath6rary";"IDmozf=" & [IDmozf] & "And ejazaID>200") تاريخ نهاية العمل : هذا التاريخ يشترط ان توقف فيه زيادة مدة الإستحقاقات " لان العامل قد تم توقيف عمله "

مافيش مشكلة اخي الحبيب حقل الاستحقاق

الدليل واضج كل موظف يحتاج الى اجازة سنوية كل سنة 50 يوم هذه الإجازة تعطى له كاملة بعد قضاء سنة من تاريخ تنصيبه والصورة توضح اما بخصوص On Timer فلك صلاحية ان توقف مهامها المهم ايجاد حل استاذي العزيز جعفر وفقك الله لما يحبه ويرضاه

شكرا لك استاذي العزيز جعفر ... ممكن نجرب الفكرة على المرفق التالي حساب اجازة.rar

فيه معادلة اخرة يمكن استعمالها استاذي العزيز المفهوم المطلوب الإجازة السنوية تقدر ب 50 يوم كل سنة من تاريخ التوظيف يعني بمقدار كل شهر 4.16 يوم 4.16 يوم × 12 شهر = 49.92 يوم وليست 50 يوم وهنا المشكلة

وهو كذالك اخي شيفان بارك الله فيك هل تم التعديل في مربع التحرير PTetatCivil لم يترك غير منظم

السلام عليكم تحية طيبة بناء على المواضيع التي تحدثت عن الاجازات وخاصة هذا الموضوع لم اتمكن من ضبط الاستحقاق بالصورة الصحيحة آمل مساعدتي جزاكم الله خيرا ejmaleEjazat: Int(((Date()-[hiredate])/30)*4.16) كلما دخلت سنة جديدة تزيد مدة الإجازة يوم نعرف ان قسمة 50/12 تساوي 4.16667 هل من كود اخر يعطي 50 يوم كل سنة

نعم تم التصحيح ولكن يوجد لخبطة في الفورم انظر الصورة هل اترك مربع النص " PTetatCivil " غير منظم يبدو ان المشكلة فيه

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

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

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

أريد حذف علامة صح من المربعات وكذالك من التسجيل في الجدول