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

[حربي العنزي]

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

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

كمثال : رقم مستند 4 يحق له ان يأخذ دليل محاسبي رقم 311 في حالة الدائن ونفس الدليل  المحاسبي 311 ايضا في حالة المدين اي يكرر رقم المستند والدليل المحاسبي لهذه الحالتين فقط

وفي حالة ادخال الدليل المحاسبي 311 في سجل جديد تظهر رسالة تقول هذا الدليل المحاسبي مدخل مسبقا للحالتين دائن ومدين ولايمكن تكراره

Prog24.24.rar

[حربي العنزي]

up

[ابوخليل]

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

جرب

اجعل الدليل المحاسبي والنوع والمستند  مفاتيح  في الجدول

بحيث لا يمكن لا يمكن اجتماع الثلاث مرة ثانية

[حربي العنزي]

استاذي الفاضل ابو خليل ربي يحفظك يارب

شكرا لردك السريع - فعل ماتفضلت به فتخرج هذه الرسالة ( Index or primary key cannot contain a null value )

طلبي هو يمكن لرقم المستند ان يأخذ رقم دليل محاسبي واحد في حالة المدين ونفسه في حالة الدائن فقط 

اي اذا كان رقم المستند مثلا 4 يمكنه ان ياخذ دليل محاسبي رقم 311 في حالة الدائن ورقم دليل محاسبي 311 في حالة المدين 

واذا جاء سجل جديد مثلا رقم المستند 4 يجب ان ياخذ دليل محاسبي اخر كمثال 300 في حالة الدائن وايضا 300 في حالة المدين وهكذا 

[ابوخليل]

الحل كما ذكرت لك

جرب جعل الثلاث حقول مفاتيح

ولكن قبل ذلك  احذف جميع البيانات في الجدول

لان البيانات الموجودة غير مطابقة للضابط الجديد

[حربي العنزي]

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

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

اسف استاذي الفاضل ابو خليل هذا البرنامج بعد ان عملت ماتفضلت به

Prog24.25.rar

[ابوخليل]

تفضل

If Not IsNull(DLookup("Daleel_Calc", "TBL2", "Daleel_Calc=form!Daleel_Calc and Type=form!Type And Mostnd_Num=form!Mostnd_Num")) Then
Undo
Beep
MsgBox "لايمكن ادخال هذا الرقم لانه مدخل سابقا"
End If

 

Prog24_25.rar

[حربي العنزي]

استاذي الفاضل ابو خليل نعم هذا هو المطلوب تماما

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