اذهب الي المحتوي
أوفيسنا
بحث مخصص من جوجل فى أوفيسنا
Custom Search

الترقيم التلقائي معتمدا على التاريخ اليومي والشهري والسنوي


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

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

اخواني الافاضل 

في المرفق عند ادخال التاريخ يدويا لا يقوم بالترقيم للمستند

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

هل من الممكن 

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

بدون وضع في حقل التاريخ قيمة افتراضية للتاريخ. 

()Date=

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

ولكم مني الدعاء

 

ترقيم باليوم والشهر والسنة ممتاز.rar

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

السلام عليكم اخى الفاضل @طاهر الوليدي

اتفضل تم التعديل

كل ما قمت به تعديل حقل رقم المستند بالداله dmax واسم الجدول

اسم الحقل كنت قد كتبت اسم الحق بالنموذج بدل الجدول

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

يفضل الابتعاد عن كتابه اسماء الحقول والجداول باللغه العربيه ووضعها بالتسميه فالخصائص

يفضل وضع العلامه _ الشرطه السفليه وليس مسافه فى حالة فاصل بين الاسماء او الفصل باول حرف كابتل

    dl = Nz(DMax("[رقم المستند]", "[بيانات المصروفات]", "(year([التاريخ]) & month([التاريخ])& day([التاريخ]))='" & Format(Me.التاريخ, "yyyymd") & "'"), 0)
    rd = Int(Right([dl], 4)) + 1
    Me.رقم_المستند = Format(Me.التاريخ, "yymd") & Format(rd, "0000")

بالتوفيق

ترقيم باليوم والشهر والسنة ممتاز.accdb

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

  • 3 months later...

اخي واستاذي الفلاحي 

واجهت مشكله في الترقيم بواسطة زر 

معتمدا على التاريخ مدخل يدويا للمستند

عندي مستندات تحتاج الى اومر صرف نقدي يعتمدعلى تاريخ المستند الذي سيتم ادخال تاريخه في اي يوم كان 

بعض المسندات مرقمه وبعضها تحتاج الى ترقيم 

بواسطة زر الترقيم 

طبقت المرفق اعلاه فحدث انه يرقم في نفس التاريخ برقم واحد فقط يكرره 

انا عندي عدد كبير من

المختصبن للصرف في مواقع ومحافظات مختلفه

مختص يسلم مسندات اليوم ومختص يسلمه بعد ايام .

ويمنع خلط المستندات لك شخص ملف 

لكن احتاج ان يتم ترقيم مصروفات اليوم بشكل تسلسي للجميع الاشخاص معتمدا على تاريخ الصرف 

مثال 

عندي مختصين اسمائهم

محمد . صالح . عبد الرب 

جميعهم صرفوا في تاريخ ويوم واحد بعض المستندات فواتير مرقمه وبعضها استلامات يدويه يتطلب لها ترقيم لليوم الواحد متسلسله لجميع الاشخاص وغير مرتبه 

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

مثال محمد معاه مستندات

تاريخ بعض مستنداته يوم 1/12/2020

عند ادخالها في النظام ندخل تاريخ الصرف يو م 1/12/2020

فيتم نقر زر الترقيم فينتج رقم 

,20121001

المشكله ان الترفيم الذي معي يكرر نفس الرقم اذا ادخلت تاريخ مستند ثاني في نفس اليوم والسبب ان التاريخ المدخل ليس تاريخ اليوم للحاسوب انما تاريخ المستندات للايام السابقه .

فعنمدما ادخل مستندات شخص ثاني صالح لنفس اليوم 

الزر يقوم بكتابةنفس الرقم

20121001

بينما المطلوب 

20121002

لانه يتعرف على نفس اليوم فقط بسبب ان التاريخ المدخل يكون للمستند وليس للنظام

 

 

 

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

3 دقائق مضت, طاهر الوليدي said:

اخي واستاذي الفلاحي 

واجهت مشكله في الترقيم بواسطة زر 

معتمدا على التاريخ مدخل يدويا للمستند

عندي مستندات تحتاج الى اومر صرف نقدي يعتمدعلى تاريخ المستند الذي سيتم ادخال تاريخه في اي يوم كان 

بعض المسندات مرقمه وبعضها تحتاج الى ترقيم 

بواسطة زر الترقيم 

طبقت المرفق اعلاه فحدث انه يرقم في نفس التاريخ برقم واحد فقط يكرره 

انا عندي عدد كبير من

المختصبن للصرف في مواقع ومحافظات مختلفه

مختص يسلم مسندات اليوم ومختص يسلمه بعد ايام .

ويمنع خلط المستندات لك شخص ملف 

لكن احتاج ان يتم ترقيم مصروفات اليوم بشكل تسلسي للجميع الاشخاص معتمدا على تاريخ الصرف 

مثال 

عندي مختصين اسمائهم

محمد . صالح . عبد الرب 

جميعهم صرفوا في تاريخ ويوم واحد بعض المستندات فواتير مرقمه وبعضها استلامات يدويه يتطلب لها ترقيم لليوم الواحد متسلسله لجميع الاشخاص وغير مرتبه 

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

مثال محمد معاه مستندات

تاريخ بعض مستنداته يوم 1/12/2020

عند ادخالها في النظام ندخل تاريخ الصرف يو م 1/12/2020

فيتم نقر زر الترقيم فينتج رقم 

,20121001

المشكله ان الترفيم الذي معي يكرر نفس الرقم اذا ادخلت تاريخ مستند ثاني في نفس اليوم والسبب ان التاريخ المدخل ليس تاريخ اليوم للحاسوب انما تاريخ المستندات للايام السابقه .

فعنمدما ادخل مستندات شخص ثاني صالح لنفس اليوم 

الزر يقوم بكتابةنفس الرقم

20121001

بينما المطلوب 

20121002

لانه يتعرف على نفس اليوم فقط بسبب ان التاريخ المدخل يكون للمستند وليس للنظام

 

 

 

والمطلوب كود او مودل

اذا نقرت على  زر الترقيم يقوم  بالبحث عن الرقم السابق لنفس التاريخ ثم ياتي برقم التالي حتى وان وضعت رقم قبله عشوائي

اذخل مستندتاريخه 1/12/202

فيرقمه 20121001

ثم ادخل مستند له رقم 5512 يدويا 

ثم ادخل مستند بعد يومين تاريخه 1/12/2020

يترقم بزر

20121002

ثم مستند تاريخه 5/12/2020

20125001

ثم ادخل مستند تاريخه 1/12/2020

20121003

وهكذا 

لكن مايحصل هو اني ادخل تاريخ المستند يكرر نفس الرقم20121001 لجميع المستندات

اتمنى ان فكرتي وصلت 

والله يبارك فيك ويحسن اليك

 

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

السلام عليكم

20 ساعات مضت, طاهر الوليدي said:

لانه يتعرف على نفس اليوم فقط بسبب ان التاريخ المدخل يكون للمستند وليس للنظام

جربت ادخال يدوى مرارا وتكرارا لم ارى هذه المشكله

يجب عليك ارفاق مثال مشابه لما لديك وبه كود الترقيم  والشرح الوافى للخطوات التى تعمل بها للوقف على المشكله وحلها باذن الله من قبلى او من قبل اخواننا واساتذتنا جزاهم الله خيرا

بالتوفيق

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

في ٢٨‏/١٢‏/٢٠٢٠ at 00:18, احمد الفلاحجي said:

السلام عليكم

جربت ادخال يدوى مرارا وتكرارا لم ارى هذه المشكله

يجب عليك ارفاق مثال مشابه لما لديك وبه كود الترقيم  والشرح الوافى للخطوات التى تعمل بها للوقف على المشكله وحلها باذن الله من قبلى او من قبل اخواننا واساتذتنا جزاهم الله خيرا

بالتوفيق

جزاك الله خير استاذي الفاضل 

نعم تم تطبيقها على نموذج بسيط وعندما تم تطبيقها على نموذج في حقول نموذج فرعي وغيره لم يطبق عليه ولكن بحاول قدر الامكان ارسل النموذج حقي ولو انه كبير جدا

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

هذا النموذج اسمه بيانات المصروفات

ادخل في حقل التاريخ تاريخ عشوائي مثلا 15/12/2020

ثم انقر على زر الترقيم الذي امام حقل رقم المستند بيظهر الرقم 20121501

ثم انقرزر الاضافة ثم

كرر التاريخ نفسه ونقر زر الترقيم يظهر نفس الرقم السابق20121501

المطلوب يعطيني الرقم التالي حتى ولو قمت بادخال رقم المستند يدوي مثلا 525

ثم ادخلت بعده التاريخ نفسه ونقرت على زر الترقيم 

يظهر الرقم التالي

20121503

ترقيم تلقائي.rar

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

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

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

ولكن هذه المره اخطات مرتان الاول كما تم تعديله لك فى ثانى مشاركه

في ٢٣‏/٩‏/٢٠٢٠ at 20:33, الفلاحجى said:

السلام عليكم اخى الفاضل @طاهر الوليدي

اتفضل تم التعديل

كل ما قمت به تعديل حقل رقم المستند بالداله dmax واسم الجدول

اسم الحقل كنت قد كتبت اسم الحق بالنموذج بدل الجدول

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

يفضل الابتعاد عن كتابه اسماء الحقول والجداول باللغه العربيه ووضعها بالتسميه فالخصائص

يفضل وضع العلامه _ الشرطه السفليه وليس مسافه فى حالة فاصل بين الاسماء او الفصل باول حرف كابتل


    dl = Nz(DMax("[رقم المستند]", "[بيانات المصروفات]", "(year([التاريخ]) & month([التاريخ])& day([التاريخ]))='" & Format(Me.التاريخ, "yyyymd") & "'"), 0)
    rd = Int(Right([dl], 4)) + 1
    Me.رقم_المستند = Format(Me.التاريخ, "yymd") & Format(rd, "0000")

بالتوفيق

ترقيم باليوم والشهر والسنة ممتاز.accdb 460 kB · 42 downloads

والخطاء الثانى انه السطر الثانى فى الكود فى المثال الاخير  rd = Int(Right([dl], 4)) + 1

لاجظ الرقم 4 وفى السطر التالى جعلت عدد الاصفار 00

الكود بعد التعديل ومرفق المرفق

ويفضل 4 فى السطر الثانى مع زياده عدد الاصفار 0000 نفس العدد لان 00 سيقف عند عدد 100 فشوف عدد السجلات ممكن يوصل معاك لكام وقم بضبط هذان السطران فقط

4 بــ 0000 ، 5 بــ 00000

dl = Nz(DMax("[رقم المستند]", "[بيانات المصروفات]", "(year([التاريخ]) & month([التاريخ])& day([التاريخ]))='" & Format(Me.التاريخ, "yyyymd") & "'"), 0)
rd = Int(Right([dl], 2)) + 1
 Me.رقم_المستند = Format(Me.التاريخ, "yymmdd") & Format(rd, "00")

 

بالتوفيق

 

 

الترقيم111.mdb

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

منذ ساعه, طاهر الوليدي said:

الله يبارك في عمرك ويسهل امورك 

وشكر ا جزيلا استاذي الفاضل 

 

وفيك بارك الله واياكم اخى

الشكر لله ثم لاخواننا واساتذتنا جزاهم الله خيرا

بالتوفيق

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

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