تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
كيفية الزيادة التلقائية لرصيد الإجازات في قاعدة البيانات
#1
السلام عليكم ورحمه الله وبركاته 
في سؤال حاولت البحث فيه ولم اجد حل له 
كيفية زيادة مثلا رصيد الإجازة لموظف معين كيف اقوم بجعله تلقائي يزيد في مدة محددة بمقدار محدد مثلا لو أردته يزيد في كل شهر 3 ايام بشكل تلقائي في قاعدة البيانات 
بدون تدخل من المستخدم 
يعني لو فرضنا ان موظف جديد باشر في يوم 1/1/2018 ورصيده الابتدائي طبعا 0 ولما يجي 1/2/2018 المفترض يصير رصيده 3 طبعا رصيد الاجازات وهكذا في كل شهر 
وكذلك موظف منقول للقسم وهو موظف قديم لديه رصيد اجازات سابق ولكنه جديد في قسم معين واضفت إجازات مثلا 30 يوم ونفس الطريقة اريد رصيد يزيد بشكل تلقائي في كل شهر 3 ايام  
وشاكر لكم مسبقاً تعاونكم ومثل ماعودتونا بحل مشاكل المبتدأين دائماً وأبداً تحياتي لكم 
الرد
تم الشكر بواسطة:
#2
Date1 حقل مباشرة العمل = 2017/1/1
InitiatoryBalance حقل الرصيد إبتدائي = 0

لمعرفة رصيدة الآن , نحن بتاريخ 2018/01/20

الرصيد الإبتدائي :
        Dim InitiatoryBalance As Integer = 30
تاريخ مباشرة العمل :
        Dim Date1 As New DateTime(2017, 1, 1)
تاريخ اليوم :
        Dim Date2 As New DateTime(2018, 1, 20)
حساب عدد الأشهر من تاريخ مباشرة العمل حتى تاريخ اليوم
        Dim TotalMonth As Integer = DateDiff(DateInterval.Month, Date1, Date2)
حساب الرصيد :
        Dim TotalBalance As Integer = TotalMonth * 3
إضافة الرصيد الإبتدائي , تحسباً لو كان يمتلك رصيد سابق
        Dim EmployeeBalance As Integer = TotalBalance + InitiatoryBalance

لن يتم حساب هذا الشهر لأنه لم يكتمل 

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



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

لا تحتاج إلى حقل في قاعدة البيانات لحفظ رصيد الموظف, إذا كان نظام الإجازة ثابت بالزيادة


إذا عندك نوع إجازة مختلف لا يزداد بشكل ثابت أو تتم الإضافات علية بطريقة متقطعة إذن تحتاج إلى جدول خاص بهذة الإضافات
الرد
#3
الله يجزاك خير اخوي عبد الله ماقصرت فعلا حليت مشكلة طولت مالقيت لها حل
ان شاء الله يتم التطبيق باقرب وقت
الرد
تم الشكر بواسطة:
#4
nice but i need it on access could be?
الرد
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  [VB.NET] كيفية اضافة drm لمتصفح geckofx لسبسيب 0 18 منذ 10 ساعة مضت
آخر رد: لسبسيب
  [VB.NET] هل من الضروري اغلاق الاتصال بعد جلب البيانات من sql في جملة الاستعلام alipro 3 81 , 03:50 AM
آخر رد: Jounior_P
  [ تمّ الحل ] : عدم القدرة على عمل أتاش لقاعدة البيانات عبد العزيز البسكري 23 830 24-10-20, 12:48 AM
آخر رد: عبد العزيز البسكري
  [VB.NET] ربط التقارير بقاعده البيانات احمد سليمان 0 67 14-10-20, 02:43 PM
آخر رد: احمد سليمان
Thumbs Up [SQL] تطبيق عملى لمشروع قاعدة بيانات بSQL محمود بكير 1 110 13-10-20, 03:39 PM
آخر رد: محمد كريّم
  حفظ list box في قاعدة البيانات اعينوني,,,,,,, KIKO1992 0 74 13-10-20, 11:08 AM
آخر رد: KIKO1992
  [VB.NET] اضافة ازرار حسب عدد متغير في قاعدة البيانات Ad Heart 2 438 08-10-20, 05:07 AM
آخر رد: Ad Heart
  [VB.NET] عمل اتاش و تحديث قاعدة البيانات بعد التعديل على الحقول دون ضياع السجلات برمجيا larbihamri 4 218 06-10-20, 03:33 PM
آخر رد: larbihamri
  كيفية معرفة رقم الهارديسك المتألق9 6 727 25-09-20, 11:42 PM
آخر رد: عبد العزيز البسكري
  اضافة ملف pdf الى قاعدة بيانات sql server 2012 moh developer 5 210 25-09-20, 03:01 PM
آخر رد: moh developer

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم