Ahmed.IQ قام بنشر أبريل 12, 2017 مشاركة قام بنشر أبريل 12, 2017 السلام عليكم ورحمة الله وبركاتة عندي كود للجمع الكود عبارة لجمع عدد الساعات بشرط ان تتجاوز ال 4 ساعات تمام مثلاً موظف اخذ 8 ساعات اجازة متراكمه خلال هذا الشهر سيتم خصم اربعة من 8 ساعات وسيتم اضافة 4 ساعات لتدويرها لحين وصل الساعات المتجاوزة 8 ساعات سيتم احتساب يوم اجازة. لو فرضنا ان الموظف خلال هذا الشهر حصل على اجازات وقتية 16 ساعة سيتم خصم 4 ساعت لانها من حقل الموظف وسيتم احتساب 12 ساعة بعدها سيتم خصم 8 ساعات من الاجازات الليومية للموظف وسيتبقى 4 ساعات يتم تدويرها للموظف . لو فرضنا ان الموظف اخذ 8 ساعات اخرى خلال هذا الشهر من المفترض ان يكون 12 ساعه في ذمة الموظف بسبب ان الاربع ساعات المستحقة تم الاستفادة منها من قبل الموظف خلال هذا الشهر احتاج الى فكرة كيف اقوم بعمل الحساب 12 ساعة التي يجب ان تضاف الى الموضف لاني لو قمت بجمع من جديد سوف يقوم بخصم 4 ساعات ويصبح المجموع 8 ساعات بسببب الشرط الموضوع. If Nz(DSum("[TO]", "vacation", "ECode= code1 and Yrm= x"), #12:00:00 AM#) + Me.to >= #4:00:00 AM# Then Me.Total = (Nz(DSum("[TO]", "vacation", " ECode= code1 and Yrm= x and Delete= false"), #12:00:00 AM#) + Me.to - #4:00:00 AM#) End if رابط هذا التعليق شارك More sharing options...
الردود الموصى بها
من فضلك سجل دخول لتتمكن من التعليق
ستتمكن من اضافه تعليقات بعد التسجيل
سجل دخولك الان