تحويل الايام الى شهر عندما تكون اكبر من 30 والاشهر الى سنين؟

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

ما من مجيب

انا بحاجة الى الاجابة ؟؟

اتمنى ان اجد العون هذه المرة ايضا

ولكم جزيل الشكر

اختكم

تفصلي عزيزتي رولا او روان او رنا او رندا او روند او اوا اووااواواواوااو

المهم

Roro2005

فمت بازالة مشكلة Err# بحركة ذكية اكتشفيها

ايضا جمع سنوات الخدمة والانقطاع والتعليم العالي كله تمام

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

الملف مضغوط ببرنامج KGB رهيب

Test_WorkingYear.zip

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

شكرا لك اخي همام على ردك على سؤالي

وارجو ان يكون صدرك واسع لتحملي ... وتكون صبورا معي

الحقيقة اني احتاج الى التقرير abcent3

لانه يحوي على التفاصيل لكل شخص

حاولت تطبيق ما قمت به في التقرير abcent على التقرير abcent3

ولكن لم تنجح

اود ان اعرف السبب وما هو الخطا ومعالجة التقرير abcent3

لانه فعلا هو الذي انا بحاجه اليه..

الحقيقة ان تسليم العمل متوقف على هذا التقرير

ولك جزيل الشكر

اختك roro2005

Test_WorkingYear2.rar

تفضلي عزيزتي Roro2005

هذا ملفك بعد التعديل!

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

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

او قد اكون لم افهم النظام كاملا في ملفك وقد لا يكون به اخطاء

همام

Test_WorkingYear2.zip

تفضلي اختي الكريمه

الملف بعد التعديل

Test_WorkingYear_UP.rar

السلام عليكم

اشكركم على الرد وتجاوبكم معي

وارجو ان تكونون صبورين معي حتى اصل الى ما اريد

فانا تلميذة عندكم

بالنسبة لرد المشرفة الغالية الست زهرة

التقرير يقوم بعرض الانقطاعات فقط حالة واحدة مثل كان تكون اجازة بدون راتب او مرضية بدون راتب

وانا احتاج الى عرض جميع حالات الانقطاع

وهي المرضية بدون راتب والاجازة بدون راتب والاستقالة

ولي طلب اخر

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

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

ارجو ان لا اكون قد اثقلت عليكم بطلباتي

ولكم مني جزيل الشكر

اختكم

roro2005

تفضلي اختي الكريمه

الملف بعد التعديل فيما يخص التقرير فقد تم تعديله

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

Test_WorkingYear_UP2.rar

السلام عليكم

شكرا لك مشرفتنا الغالية على ردك

قصدي

انه تحديث سنوات الخدمة لايتم تلقائيا

وانما فقط عندما اقوم بقتح النموذج " سنوات الخدمة في التعليم العالي "

يقوم بحساب سنوات الخدمة الى التاريخ الحالي

ما اريده

هو عمل استعلام عند تنفيذه يقوم بجساب سنوات الخدمه

ويعطيني صافي الخدمة الى التاريخ الحالي او تاريخ اقوم بتحديده

وشكرا

اختك

اختي الفاضله

انظري للنموذج الذي تتحدثين عنه بعد فتحه من خلال النموذج الرئيسي ماذا تلاحظين وكيف تتم عملية فتح النموذج الثاني ؟

1. النموذج الرئيسي يوجد به رقم واسم الموظف

2. تم اختيار رقم الموظف على اساس انه فلتر في حالة اغلاق النموذج او فتح اي نموذج اخر لكي تتم عملية التصفيه لهذا الموظف بالذات دون بقية الموظفين من خلال الكود

Private Sub EmpID_GotFocus()
	Me.EmpID = Forms![main]![EmpID]
End Sub

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

4. لكي نقوم بإزالة عامل التصفية على اي نموذج نقوم بعمل زر امر ثم نضع به هذا الكود

Private Sub GO_Click()
Me.FilterOn = False
End Sub

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

5. بعد ادخال بيانات جديده للموظف فإننا نحتاج الى مشاهدة بياناته لهذا نقوم بعمل تمكين لعامل التصفيه من خلال زر امر

Private Sub GO2_Click()
Me.EmpID = Forms![main]![EmpID]
Me.FilterOn = True
End Sub

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

وهذا هو الملف الاخير بعد التعديل

Test_WorkingYear_UP3.rar

مشرفتنا الغالية الست زهرة

لااعرف كيف اشكرك

شكرا لك على سعة صدرك لي .. ارجوا ان تكوني صبورة معي الى النهاية حتى اصل الى ما اريد.. ولك الف شكر

قد اكون غير واصحة او دقيقة في طرح المشاركة

ما اقوم بعمله هو برنامج لحساب الخدمة الجامعية للموظفين ( سنوات الخدمة او الخدمة الفعلية)

على اساس ان الموظف قد تكون له خدمة سابقة في دوائر الدولة و انقطاعات

تكون الخدمة الفعلية من : الخدمة في دوائر الدولة +الخدمة في التعليم العالي - الانقطاعات

والانقطاعات هي فترة الاستقالة والاجازه بدون راتب والمرضية بدون راتب ... لكل موظف

قمت بعمل ذلك من خلال التقرير Absent4 الذي يعطي الخدمة بشكل تفصيلي لكل موظف

ما حدث انه لو كان الموظف ليس لديه انقطاع او خدمه في دوائر الدولة يظهر في التقرير Error#

وليس صفر او خدمته في التعليم العالي وهو ما اريده

اضافة الى ذلك لو كان الموظف لديه فترة انقطاع اكثر من فترة الخدمة تظهر النتيجه سالبه

ولي طلب اخير ... وارجو ان لا اكون قد اثقلت عليك

احتاج الى تقرير سنوات الخدمة لجميع الموظفين الى التاريخ الحالي

اي تحديث تلقائي قد يصل عدد الموظفين الى 1000 موظف

ليس من المعقول ان اقوم بفتح نموذج نموذج لكي اقوم بعملية تحديث لسنوات الخدمة

وخصوصا في التعليم العالي على اساس ان الموظف قد استقر في وظيفته في هذه الوزارة

ارجو ان اكون واضحه في طلبي

صدقيني تسليم العمل متوقف على هذا التقرير

واكون شاكرة لك كثيرا لمساعدتك لي للتوصل الى ما اريد

اختك

Roro

Test_WorkingYear_UP3.rar

السلام عليكم جميعا

رجاء اني بحاجة الى اي مساعة

او اي شئ يوصلني الى بداية الحل

فانا نقطه امام علمكم ومعرفتكم

الحقيقة اني تعلمت من خلالكم

فارجو ان لاتتركوني

انا تلميذتكم

اختكم

انا اعمل على ذلك الأو وقد توصلت الى جزء كبير من الحل

ارجو الانتظار انا في طريقي لاكماله

تفضلي عزيزتي Roro2005

هذا هو الحل الذي توصلت اليه

افحصي الأرقام جيدا حتى تتأكدي

اخبريني بأي خلل وانا جاهز للتعديل

اي استفسار عن المعادلات وطريقة العمل ارجو الرد بسرعة

همام ابوعرقوب

Test_WorkingYear_UP3.rar

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

الف شكر لك اخي همام على تجاوبك معي

جميع الارقام صحيحه وبالفعل هذا ما اردته

بقي شئ واحد

وارجو ان لا اكون قد اثقلت عليك

هو تحديث سنوات الخدمه الى التاريخ الحالي

اي انه

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

والف شكر

اختكم

رورو

السلام عليكم جميعا

لقد حللن المشكلة

ولكم مني الف شكر

ال زهرة المنتدى الغالية الست زهرة

والاخ العزيز همام

بارك الله فيكم جميعا

والف الف شكر

اختكم

رورو

هذا جميل جدا

الحمد لله

الخبرات التي اكتسبتها في حل هذا السؤال كانت بمثابة تحد كبير وتمكنت منه

اسئلة كهذه وتفاعل كبير كهذا هو الذي يعطي المبرمج الثقة بالاستمرار

اختي شكرا لك وان شاء الله تجدي كل خير دائما