أريد استعلام لاستحقاق الرتب العسكرية

تفضل أخي الكريم المثال بعد التعديل آمل أن يكون ماتبحث عنه ...

__________.zip

أخي السائل

اذا كنت تريد استعلاما فهذا استعلام

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

__________.rar

أشكركم على ما قدمتموه من مساعدة وجزاكم الله ألف خير

ولكن ما أريد هو استعلام يوضح الأسماء التي تستحق الترقية في 1/1/2007 ، ويعرض هذا الاستعلام كتقرير ، وحسب شروط الترقية التالية :

جندي إلى عريف(5 سنوات) ، عريف إلى رقيب(5سنوات)، رقيب إلى رقيب أول(4 سنوات) ، رقيب أول إلى مساعد(4سنوات)، مساعد إلى ملازم(4سنوات)

ملازم إلى ملازم أول(3 سنوات لغير الجامعي وسنتين للجامعي) ، ملازم أول إلى نقيب(4سنوات)، نقيب إلى رائد(4 سنوات) ، وهكذا ...

ويوضح في الاستعلام :(عرض الأسماء ، والرتبة القديمة ، والرتبة الجديدة )

أرجو أن تكون الفكرة قد وصلت

وتحياتي

بسم الله الرحمن الرحيم

يا إحوان طلب بسيط كهذا أريد حله

الرجاء المساعدة

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

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

عريف 5 سنوات

رقيب 3 سنوات

وهكذا

والله الموفق

والسلام عليكم

أخي الكري

بعد إذن الأخوة المشاركين في الردود.

أتبع التالي سأطيل عليك ولكن الله يعينك الطريقة سهله ولكنها طويله كنت أرفقت لك مثال لكن الموقع لا يدعم التحميل حالياً يمكن بسبب نقله إلى سيرفر أخر.

الطريقة هي كالأتي:

الجدول :

1. يجب أن يحتوي جدول الإدخال على حقول إضافيين هي
   
2. حقل خاص بالرتبة.
   
3. حقل مدة البقاء في الرتبة 3 ، 4 ، 5 سنوات حسب الرتبة. ويجب أن يكون نوع بياناته رقمية لأننا سنجري عليه عمليات حسابية.
   
4. حقل خاص بتاريخ الترقية.
   
5. حقل تاريخ استحقاق الترقيه ــ ( مدخل البيانات ليس له دخل في تعبئة هذا الحقل سوف يعيء آلياً )
   

--------------------------------------------------------------------------------------------------------------------------

النماذج :

1. على نموذج الإدخال والتعديل تضع قائمتين منسدلتين الأولى تحتوي على الرتب والثانية على المستويات.
   
2. عند إدخال بيانات مترقي يقوم المستخدم بإختيار الرتبة المرقى عليها والمستوى العلمي للمترقي .
   
3. في حدث عند التغيير للقائمة المنسدلة الثانية تضع كود يقوم بإختبار القيمتين في القائمتين المنسدلتين وعلى ضوء تلك القيم تضاف مدة البقاء في تلك الرتبة في مربع نص على النموذج بعنوان ( مدة الخدمة في الرتبة ).
   
4. تضيف إلى ذلك الكود أوامر لحساب تاريخ استحقاق الرتبة التالية وتكون على الشكل التالي ( تاريخ الترقية زائد (مدة الخدمة في الرتبة الحالية ضرب 365) وسوف يظهر في حقل استحقاق المترقي للرتبة التالية لرتبته آلياً ــ ومدة البقاء في الرتبة وتاريخ الاستحقاق ستكون آلية التنفيذ دون أي تدخل من مدخل أو معدل البيانات.
   

سنفترض اسماء القوائم المنسدلة ومربعات النصوص التي سنتعامل معها بالكود لكي استطيع أن أتخيل لك الكود الذي سيقوم بتلك المهم.

1. القائمة الأولى الخاصة بالرتبة نفترض اسمها ( Cborank )
   
2. القائمة الثانية الخاصة بالمستوى العلمي نفترض اسمها ( CboScientificlevel )
   
3. مربع النص الخاص بتاريخ الترقية نفترض اسمه ( PromotionDate )
   
4. مربع النص الخاص بتاريخ الاستحقاق نفترض اسمه ( duedate ).
   
5. مربع النص الخاص بالفترة التي سيقضيها المترقي في تلك الرتبة نفترض اسمها ( TxtperiodLong )
   

الآن سيكون الكود على الشكل التالي :

 
   Select Case Cborank.Column(0)
	Case 1

		Select Case CboScientificlevel.Column(0)
		Case 1
			Me.TxtperiodLong = 5
		Case 2
			Me.TxtperiodLong = 2

		End Select

	Case 2
		Select Case CboScientificlevel.Column(0)
		Case 1
			Me.TxtperiodLong = 5
		Case 2
			Me.TxtperiodLong = 2

		End Select
	End Select
			Me.Txtduedate = TxtPromotionDate + (TxtperiodLong * 365)

ضع الكود السابق في حدث بعد التحديث لمربع النص TxtPromotionDate والكود بداية أكمل عليه بقية الشروط.

بعد ذلك يمكنك إنشاء استعلام والاستعلام عن البيانات كيف ما تشاء ووضع الشروط التي تريد

جرب وأخبرني بالنتيجة

أخي مصلح أشكرك الشكر الجزيل تقريباً وصلتني إلى الحل ولكن إذا طمعت في كرمك أن تأتني الحل بمثال مرفق فسأكون شاكراً لك ...

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