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

اجراء العمليات الحسابية داخل الوحدة النمطية


Ahmed_J

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

السلام عليكم اساتذتي الاعزاء

لدي  ملف اكسس  لحساب الراتب وفية وحدة نمطية فيها  ثلاث دوال Function  (salary1,salary12,salary3) استخدمت فيها  Select Case

ولدي استعلام فيه  قائمة منسدلة  للدرجة بالراتب من (1-5)   وقائمة اخرى للمرحلة بالراتب ايضا من (1-5)   

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

يتم استدعائه من خلال الدالة  salary3 

مثلا : عند اختيار الرقم 1  من  الدرجة بالراتب واختيار الرقم 1 من المرحلة بالراتب يقوم (910000+20000) في الوحدة النمطية

واظهار النتيجة بالاستعلام (930000)

وشكرا لكم

salary.accdb

تم تعديل بواسطه Ahmed_J
رابط هذا التعليق
شارك

هل هذا ماتريده؟

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

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

salary.accdb

  • Like 2
رابط هذا التعليق
شارك

السلام عليكم استاذ @Eng.Qassim

كلامك صحيح جدا

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

انا اريد  اجراءه  في داخل الوحدة النمطية من خلال Function salary3 حصرا 

يعني ان يتم جمع  (salary1 = 910000) Case 1   من Function salary1 مع  (salary2 = 20000) Case 1  من Function salary2

واظهار النتيجة في (salary3) Case 1  من Function salary1

 

رابط هذا التعليق
شارك

ملاحظة 

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

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

  • Like 1
رابط هذا التعليق
شارك

السلام عليكم @د.كاف يار

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

منذ ساعه, د.كاف يار said:

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

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

الله يبارك فيك

مرفق سلم للرواتب (اتمنىى ان ترشدني للطريقة المثالية والافضل لعمل برنامج للرواتب ) 

 اتمنى يكون الحساب عن طريق الوحدات النمطية

لابد اولا ان نختار الدرجة الوظيفية وهي من (1-5)  ثم نختار المرحلة الوظيفية وهي (1-4)

مثلا موظف  في الدرحة 2 والمرحلة 3 يكون راتبه (757000)

 

Untitled.jpg

تم تعديل بواسطه Ahmed_J
رابط هذا التعليق
شارك

تفضل هذا التعديل

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

image.png.12ae4b8dd77698e7e502ab2add4e2325.png

 Public Function Subsalary(TotalSalary As Double, Levelsalary As Double) As Double
 Dim SRank As Double, SGrade As Double
    SRank = DLookup("RankSalary", "Rank", "RankNO=" & TotalSalary)
    SGrade = DLookup("GradeSalary", "Degree", "GradeNO=" & Levelsalary)
 Subsalary = SRank + SGrade
 End Function

 

salary.accdb

  • Like 2
رابط هذا التعليق
شارك

اخي العزيز @Ahmed_J نصف الحل هو فهم السؤال

وحضرتك لم تطرح السؤال بشكل مفصل .. وطرح الاستاذ @د.كاف يار في محله ..

سأساعدك في الطرح حتى يتمكن الاخوة فهم السؤال ..

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

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

والدرجة الرابعة تتزايد سنويا بمقدار 8000 دينار لغاية المرتبة الخامسة ليصبح 541

وهكذا لبقية الدرجات

مع وافر احترامي

  • Like 3
رابط هذا التعليق
شارك

1 دقيقه مضت, Eng.Qassim said:

اخي العزيز @Ahmed_J نصف الحل هو فهم السؤال

وحضرتك لم تطرح السؤال بشكل مفصل .. وطرح الاستاذ @د.كاف يار في محله ..

سأساعدك في الطرح حتى يتمكن الاخوة فهم السؤال ..

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

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

والدرجة الرابعة تتزايد سنويا بمقدار 8000 دينار لغاية المرتبة الخامسة ليصبح 541

وهكذا لبقية الدرجات

مع وافر احترامي

فعلا هذا ما ذكره لاحقا لابد من وجود جدول للمراتب و آخر للدرجات و بناء عليه يكون الراتب

لكن عجبتني نظريتك يا بش مهندس جبتها بمنظور هندسي بحت و هذا هو الصحيح و لا صحيح غيره

رابط هذا التعليق
شارك

4 دقائق مضت, Eng.Qassim said:

اخي العزيز @Ahmed_J نصف الحل هو فهم السؤال

وحضرتك لم تطرح السؤال بشكل مفصل .. وطرح الاستاذ @د.كاف يار في محله ..

سأساعدك في الطرح حتى يتمكن الاخوة فهم السؤال ..

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

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

والدرجة الرابعة تتزايد سنويا بمقدار 8000 دينار لغاية المرتبة الخامسة ليصبح 541

وهكذا لبقية الدرجات

مع وافر احترامي

كنت ناطر ردك يا سعادة المهندس

نظرة المهندس لا تخيب ابدا مثل ما قال دكتورنا كاف

 

اتمنى توضح اافكرة شنهي الجداول الي نحتاجها لأني كنت محتاج هذي الفكره و بحثت كثير ما وجدتها

8 دقائق مضت, د.كاف يار said:

تفضل هذا التعديل

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

image.png.12ae4b8dd77698e7e502ab2add4e2325.png

 Public Function Subsalary(TotalSalary As Double, Levelsalary As Double) As Double
 Dim SRank As Double, SGrade As Double
    SRank = DLookup("RankSalary", "Rank", "RankNO=" & TotalSalary)
    SGrade = DLookup("GradeSalary", "Degree", "GradeNO=" & Levelsalary)
 Subsalary = SRank + SGrade
 End Function

 

salary.accdb 1008 kB · 1 download

هذي الفكرة جميلة لكن فيها صعوبة عيني

رابط هذا التعليق
شارك

شكرا  لك استاذ  قاسم

شكرا لك  استاذ  كاف يار 

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

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

تحياتي لكم

Untitled.jpg

رابط هذا التعليق
شارك

استاذي الفاضل @د.كاف يار

ايضا حساب الراتب فيه حطا

انظر  للجدول في الصورة (يتم الاحتساب فيه كما في جدول الصرب)

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

Untitled.jpg

تم تعديل بواسطه Ahmed_J
رابط هذا التعليق
شارك

استاذ @Ahmed_J الجدول لديك صحيح .. لكن اين المرتبة الخامسة

21 دقائق مضت, د.كاف يار said:

عجبتني نظريتك يا بش مهندس جبتها بمنظور هندسي بحت و هذا هو الصحيح و لا صحيح غيره

بصراحة د.حسين الغالي .. انا احاول شحن الموضوع حتى نرى ابداعاتك 😍

تحياتي لك يا مبدع

  • Like 1
رابط هذا التعليق
شارك

استاذ @Eng.Qassim

هذا نموذج فقط

الدرجات في سلم الرواتب هي 10

المراحل في سلم الرواتب هي 11

هل من الممكن تنزيل هذ الجدول في وحدة نمطية

تم تعديل بواسطه Ahmed_J
رابط هذا التعليق
شارك

تفضل هذا التعديل

image.png.218c8f74c3c8cf46a48c52c7eabc45cc.png

 

salary.accdb

15 دقائق مضت, Eng.Qassim said:

بصراحة د.حسين الغالي .. انا احاول شحن الموضوع حتى نرى ابداعاتك 😍

 

و الله يا بش مهندس اني متابعك عن قرب 

الكون هذا الي عايشين فيه و سهل على البشر المعيشة في كوكب الأرض  بناه مهندسين امثالك فكيف لا اعجب بتفكيرك و رؤيتك

  • Like 1
  • Thanks 1
رابط هذا التعليق
شارك

5 دقائق مضت, Ahmed_J said:

الدرجات في سلم الرواتب هي 10

كلامك صحيح استاذ احمد .. لكن ليست كل الدوائر تعمل بهذا النظام .. بعضها يعتمد على المراحل الخمس لكل درجة وبعضها يستمر للمرحلة 11

ما احاول ايصاله لاستاذنا المبدع @د.كاف يار ان الموظف في الدرجة الاولى والمرتبة الاولى يكون راتبه 910000 وليس 930000 الا بعد مرور سنة وهكذا دواليك

  • Like 1
رابط هذا التعليق
شارك

اساتذتي الاعزاء

انا يمكن مش عارف اوصل فكرتي جيدا

فكرتي هي الجدول في التالي 

كيف اخلي الاكسس عن طريق الكود  يعمل لي هيك جدول بالضبط

Untitled-1 copy.jpg

تم تعديل بواسطه Ahmed_J
رابط هذا التعليق
شارك

2 دقائق مضت, Ahmed_J said:

اساتذتي الاعزاء

انا يمكن مش عارف اوصل فكرتي جيدا

فكرتي هي الجدول في التالي

 

Untitled.jpg

اذا لا داعي لوجود راتب للدرجة و الاكتفاء براتب المرحلة 

هل هذا صحيح ؟

رابط هذا التعليق
شارك

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