السلام عليكم
وضعت الكود الموجود في الاسفل عند القيمة الافتراضية لرقم سند القبض Default Value
=nz(DMax("[TRANS_NO]";"[TRANSACTIONS]"))+1
بحيث يبدا من رقم 1 وتصاعديا
الان اريده ان يبدا رقم 1 للسنة الجديدة وكل سنة جديدة يبدا من رقم 1
فماذا اضع؟
وهل يمكن وضع الكود في القيمة الافتراضية ام في الحدث؟
ارجو ان يكون السؤ ال واضح.
والسلام ختام
إليك مثالا لما تريد ، حيث أن رقم الصادر يبدأ من رقم 1 عند بداية كل سنة ميلادية جديدة.
أتمنى أن يكون ذلك ما تريد
تحياتي
الوارث
هذا مثال آخر يفيد بالغرض و أظن أنه للأستاذ الحربي
السلام عليكم
شكرا لكم جزيلا على هذه الامثلة الرائعة
ولكن وجد الاكواد في داخل هذه الامثلة نوعا ما طويلة للغرض المراد منها
لا اريد الاطالة عليكم، فاضع هنا الكود البسيط والذي فعلا الى الان يعمل بشكل جيد وهو
Me![TRANS_NO] = Nz(DLast("[TRANS_NO] ", "TRANSACTIONS", "[TRANSACTIONS]![TRANS_YEAR]=Forms![TRANS-ENTRY]![TRANS_YEAR]")) + 1
وضعته عند حدث Before Updat
وهذا افادة للجميع ان شاء الله
والسلام ختام
الاخ Yes No
ولا عليك أمر ممكن تشرح الكود .........اكون لك شاكر
ولك تحياتي
اللهم اجعلنا نخشاك كأنا نراك
السلام عليكم
نعم يا اخي تفضل
* امر Nz تاثيره اذا جاءت السنة جديدة وليس هناك اي سجلات فيعني ذلك null وهذا الامر يجعل عدد السجل رقم صفر ومن ثم يعمكن اجراء العمليات الحسابية على الرقم صفر وهنا مثلا يزيد 1 فاذا كان لايوجد هناك سجل تصبح المعادلة = صفر + 1 = 1
Me![TRANS_NO] مصدر او اسم الحقل في النموذج
Dlast يبحث في اخر سجل في الجدول
الكود عبارة عن انه يبحث عن اخر رقم (TRANS_NO) في الجدول (TRANSACTIONS) بحيث تكون السنة (TRANS_YEAR) في الجدول تساوي السنة في النموذج Forms![TRANS-ENTRY]![TRANS_YEAR]")) + 1 واضافة رقم واحد على الرقم
اتمنى ان يكون الشرح وافي وانا حاضر لاي شيء
والسلام ختام
الاخ Yes No
شرحك وافي بارك الله فيك
شاكر للك هذا التجاوب
مشــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــــكور للمرة الثانية
اللهم اجعلنا نخشاك كأنا نراك
السلام عليكم
شكرا لكم جزيلا على هذه الامثلة الرائعة ولكن تصحيح معلومه لا أكثر
المثال الذي وضعه الأخ / biskra يعود إلى للأستاذ الخبير أبو هادي وتعود هذه المعلومات البرمجيه له لاحط هذا المثال في منتدى أوفسنا ولو كان هذا المثال لا يعود له لكان احد الأخوه الكرام في منتدى أفسنا بتصحيح هذا ويمكن زيارة منتدى أوفسنا وبعملية بحث بسيطه سوف تجدون هذا المثال YearDmax_2000.zip يحمل توقيع أبو هادي.
تحياتي للجميع
هذا الموضوع مغلق.