اذهب الي المحتوي
أوفيسنا

الردود الموصى بها

قام بنشر

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

 

مبدئيا جزاكم الله خير على كل ماتقدمون ,,

 

لدي جدول يحتوي على : رقم الموظف , اسم الموظف , مجموع الراتب , مجموع الإجازات .

 

المطلوب هو كالتالي:  

 

مثلا / اريد اضافة 5 خمسة ايام عند بداية  كل شهر الى حقل ( مجموع الإجازات ) لجميع الموظفين .

..... كما اريد اضافة 500 لحقل (مجموع الراتب) عند بداية السنة ,, كذلك لجميع الموظفين .

 

اريد هذا الطلب اعتمادا على تاريخ الجهاز او وحدة نمطية ,,,, مع العلم اني استخدم تاريخ ام القرى للجهاز.

 

اذا كان طلبي غير ممكن فأرجوا توجيهي .

 

شاكر ومقدر لكم .

 

 

 

 

 

 

 

 

اضافة بتاريخ معين.rar

قام بنشر

السلام عليكم

لا يمكنني الاطلاع على المرفق بسب الاصدار

بالنسبة للراتب :

هل يتم الاحتفاظ بقيم الرواتب القديمة ؟

اذا نعم : نستخدم استعلام الحاق ( الراتب القديم +500)

اذا لا :  يمكنك عمل ذلك باستخدام استعلام التحديث لحقل الراتب

 

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

حيث يتم احتسابها بناء عللى تاريخ المباشرة وحتى اليوم الحالي ويطرح منها ما تم التمتع به

فمثلا اذا كانت مباشرة الموظف قبل سنة  فاستحقاقه من الاجازة  12*5= 60 يوما يطرح منها ما تم صرفه ليتبقى له رصيده من الاجازة

قام بنشر

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

 

اشكر مرورك وتجاوبك اخي ابو خليل ,,

 

كلامك صحيح اخي ولكن مشكلتي ليست مع الاستعلام او نوعه   سواء باستعلام الحاق او تحديث او جملة sql    ,, مشكلتي هي مع  اهم نقطة وهو التاريخ مع بداية الشهر أو بداية السنة ,,

 

والجدول هو بالشكل التالي :

 

رقم الموظف

الاسم

مجموع الإجازات

مجموع الراتب

1

محمد

70

7500

 

 

 

 

 
مثال / اود ان اعطي امر ان يتم تحديث او الحاق او اضافة 500 إلى الراتب بداية السنة القادمة مثلا.
ا
لامر يكون  كتابة بالشكل التالي : اضف 500 ريال إلى راتب محمد عند تاريخ 1/1/1437 هــ . وبشكل تلقائي (اوتوماتيك)  .
 
 
DoCmd.RunSQL "UPDATE table1 SET salary = salary+500 "
مشكلتي هنا كيف اكمل الجمله بالتاريخ الذي اريد .
 
وكذلك للإجازات.
 
معتمدا في ذلك على تاريخ الجهاز ,,,,, او اذا كان هناك وحدة نمطية ..
 
اتمنى اني اوضحت ذلك ..
قام بنشر

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

 

Public Function YearStart(i As Date) As Date
YearStart = DateSerial(Year(i), 1, 1) - 1
End Function
Public Function MonthStart(i As Date) As Date
MonthStart = DateSerial(Year(i), Month(i) + 1, 1) - 1
End Function
قام بنشر

جزاك الله خير اخي ابو خليل ,,,,

 

سأقوم بتجربتها واذا احتجتت إلى مساعدة فأنا متأكد بأنك لن تبخل بنصحك ومساعدتك ..

 

وفقك الله وزادك من علمه ,,

قام بنشر

اخي ابو خليل قمت بإضافة القاعدة بتنسيق 2003 ,,

 

ليس لي خبرة بالوحدات النمطية ومن اين ابدأ وانتهي معها ,,,, حاولت وحاولت    ولكن    ..

 

انتظر مساعدتك ومساعدة الأعضاء الكرارم ,,

add 2003.rar

قام بنشر

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

وذلك باستخدام متغير او باستخدام حقل داخل النموذج

 

في المثال المرفق اظهرنا ذلك داخل حقلين في النموذج

يمكنك اخفاؤهما و بناء الشرط عليهما في حدث فتح او تحميل النموذج

 

آمل ان تكون المسألة اتضحت لك

y_m_start.rar

قام بنشر (معدل)

جزاك الله خير اخي ابو خليل ,,,

 

اتمنى ان تلقي نظرة على المرفق .... هل الفكرة مناسبة ؟؟

 

استخدمت if day now اكثر من مرة مع شرط ...

 

بإمكانكم تغيير تاريخ الجهاز إلى بداية ونهاية الشهر ثم تشغيل النموذج لتظهر النتيجة

 

انتظر رأيك ورأي الأعضاء الكرام,,,

 

ان كان فيه توجيه اتمنى سماعة

وان كان مفيد اتمنى التأكيد عليه لتعم الفائدة ,,,

 

دمتم بخير ,,

whats up.rar

تم تعديل بواسطه آخر الأرض
قام بنشر

اخي ابو خليل انا بإنتظار ردك على الموضوع انت واعضاء المنتدى الكرام

 

ارجوا كذلك افادتي عن كيفية بناء حدث على الوحدة النمطية التي تكرمت بتزويدي بها ...

 

وفقنا الله واياكم جميعا ..

قام بنشر

شكرا لك اخي ابو خليل ,,,

 

لي طلب وان شاء الله يكون اخير في هذا الموضوع

 

اتمنى القاء نظرة  على المرفق في المشاركة السابقة

 

وهو استخدام if day now 

 

هل تفي بالغرض ؟؟

 

واذا كان هناك توجيه فلا نستغني عنه ..

 

شاكر ومقدر 

قام بنشر

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

وملاحظتي تدور حول خانة الاختيار(كضابط وشرط لتنفيذ الأمر )

ضع في اعتبارك لو حدث خلل ما لخانة الاختيار

وارى ان الامور المالية لا بد من توثيقها

ما المانع ان يوجد جدول يتم فيه رصد العلاوة وتاريخ منحها

وبناء على هذا التاريخ يتم منح العلاوة القادمة

 

اما الاجازات فقد بينت وجهة نظري في المشاركة رقم 2

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

زائر
اضف رد علي هذا الموضوع....

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

  • تصفح هذا الموضوع مؤخراً   0 اعضاء متواجدين الان

    • لايوجد اعضاء مسجلون يتصفحون هذه الصفحه
×
×
  • اضف...

Important Information