المساعدة فى مشكلة عند الخروج من الفاتورة يتم اضافة فاتورة جديدة تلقائي

[أكسس وبس]

اخوانى

فى المرفق نموذجين Trans_in فاتورة مشتريات ونموذج Trans_out فاتورة مبيعات يوجد مفتاح خروج للنموذجين

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

12.accdb

[أكسس وبس]

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

[Eng.Qassim]

لا تعمل Issue_doc رقم تلقائي وانما حوله الى رقم

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

=Nz(DMax("Issue_doc";"Issue_doc");0)+1

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

[أكسس وبس]

اشكرك اخى الكريم مروركم الكريم جربت الفكرة ولكن لم تفلح

وسبب المشكلة

اننى ضفت فى كود مفتاح خروج فى النموذجين المبيعات Trans_out والمشتريات Trans_in عند النقر بحيث dd = TotalAmount

On Error Resume Next
Me.TotalAmount = Me.dd

DoCmd.close
 

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

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

ارجو ان يكون الامر خفيف وواضح 

فهل من طريقة لنقل القيمة من مربع نص dd الى مربع النص TotalAmount بدون حدث هذه المشكلة

 

[Eng.Qassim]

جرب الان ..سوف لن يتغير رقم الفاتورة عند الغلق

 

12.rar

[أكسس وبس]

اخى الكريم جزاك الله خيرا

ولكن فى مشكلة فى الملف تظهر هذه الرسالة

[أكسس وبس]

منتظر حضرتك ترفع الملف تاني

[Eng.Qassim]

ربما لديك مشكلة في ملف الضغط

جرب الان

12.accdb