رصيد الصنف لا يظهر في كارت الصنف

[ابو عبد الرحمن اشرف]

اخواني واساتذتي الكرام يارب تكوني جميعا بخير وصحة وعافية

@Moosak

@kkhalifa1960

@Eng.Qassim

@ابو خليل

@محمد ايمن

@د.كاف يار

@دروب مبرمج

معي قاعدة بيانات (برنامج محاسبة ) بيع وشراء ومردودات وسندات قبض وصرف وعملاء وموردين والخزينة والموظفين ورواتبهم تم تصميمها بشكل جيد ولكن هناك الكثير من المشاكل فيها والقاعدة مضغوطة بحجم 4 ميجا فهل هناك مشكلة في ارفاقها ويكون لكم اليد الطولي في حل مشاكلها ومساعدتي في اخراجها للنور علي اكمل وجه   وعند محاولة ارفاقها اعطاني رسالة بان الحجم المسموح به 2.93 فما الحل اساتذتي

[محمد احمد لطفى]

ممكن رفعها على 

موقع مديا فاير

 
و احضار Link هنا 

بالتوفيق 

 

[شايب]

دخلت الموضوع ولدي الرغبة في تقديم يد العون صحيح انا مزارع ولكن لدي بعض المعرفة البسيطة بقواعد البيانات

ولكني وجدت ان الطلب موجه الى مجموعة مختارة من الاعضاء

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

6.    يمنع منعا باتا توجيه السؤال إلى شخص بعينه لان هذا قد يدفع الآخرين إلى عدم الإجابة، والهدف هو التفاعل من الجميع.

على كل حال اتمنى من ادارة الموقع تحديث الشروط وحذف ما تم ايقاف العمل به لنكون على بينه ودمتم .,,,

شايب

[ابو عبد الرحمن اشرف]

  في 5‏/6‏/2023 at 05:50, شايب said:

دخلت الموضوع ولدي الرغبة في تقديم يد العون صحيح انا مزارع ولكن لدي بعض المعرفة البسيطة بقواعد البيانات

ولكني وجدت ان الطلب موجه الى مجموعة مختارة من الاعضاء

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

6.    يمنع منعا باتا توجيه السؤال إلى شخص بعينه لان هذا قد يدفع الآخرين إلى عدم الإجابة، والهدف هو التفاعل من الجميع.

على كل حال اتمنى من ادارة الموقع تحديث الشروط وحذف ما تم ايقاف العمل به لنكون على بينه ودمتم .,,,

شايب

Expand  

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

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

واهلا وسهلا بك مساعدلي في حل مشكلتي فادلو بدلوك اخي 

[ابو عبد الرحمن اشرف]

  في 5‏/6‏/2023 at 05:35, محمد احمد لطفى said:

ممكن رفعها على 

موقع مديا فاير

 
و احضار Link هنا 

بالتوفيق 

 

Expand  

هذا هو الرابط اخي الكريم 

https://www.mediafire.com/file/2l1bbxdjva2eb89/F.accdb/file

 

ومن الملاحظات ايضا 

1 - عند بيع كمية اكبر من الرصيد الحالي يقبل البيع وهذا خطأ طبعا 

2 - رصيد الصنف بعد عملية الشراء لا يسمع في كارت الصنف في حقل الرصيد الحالي

3 - لماذا لا يكون سعر الشراء وسعر البيع في مكان واحد وهو كارت الصنف (item)

4 - اتمني اضافة حقل جديد او زر امر ل ربح الصنف وربح الفاتورة 

[دروب مبرمج]

ارفق نموذج مصغر لكي استطيع مساعدتك

[ابو عبد الرحمن اشرف]

  في 5‏/6‏/2023 at 16:02, دروب مبرمج said:

ارفق نموذج مصغر لكي استطيع مساعدتك

Expand  

تفضل اخي الفاضل الكريم 

 

Database2.rarFetching info...

  في 5‏/6‏/2023 at 21:10, ابو عبد الرحمن اشرف said:

تفضل اخي الفاضل الكريم 

 

Database2.rar 586.03 kB · 0 downloads

Expand  

فاتورة المشتريات PURCHASING_HEADER

مردود المشتريات PURCHASING_HEADER_CREDIT_MEMO

فاتورة المبيعات INVOICE_HEADER

مردود المبيعات INVOICE_HEADER_CREDIT_MEMO

كارت الصنف ITEMS

[دروب مبرمج]

هذا ليس نموذج مصغر 

اذا يرجى تحديد اسم جدول الأصناف + جدول حركة الأصناف ( الداخل و الخارج )

لأن المعادلة المستهدفة

اجمالي عدد الأصناف الموردة - اجمالي عدد الأصناف المسحوبة او المباعة = المخزون المتبقي

[ابو عبد الرحمن اشرف]

  في 5‏/6‏/2023 at 21:14, دروب مبرمج said:

هذا ليس نموذج مصغر 

اذا يرجى تحديد اسم جدول الأصناف + جدول حركة الأصناف ( الداخل و الخارج )

لأن المعادلة المستهدفة

اجمالي عدد الأصناف الموردة - اجمالي عدد الأصناف المسحوبة او المباعة = المخزون المتبقي

Expand  

اخي الفاضل الكريم 

اسم جدول الاصناف items

واسم جدول حركة الاصناف MISCELLANOUS_SALES_LINES

اسم الشاشة الرئيسية INTERFACE22

وهذه القاعدة بعد اضافة تلك الاضافات 

 

 

 

Database2.rarFetching info...

[دروب مبرمج]

القاعدة كبيرة و لم استطع ارفاقها 

قمت بحذف الجداول لكي يتضح المثال

الصق الشفرة التالية في موديول جديد و يجب عليك التدقيق في اسماء الأعمدة

التي في الشفرة و التأكد من انها هي المستهدفة في عملية الاحتساب

Public Function GetSubProduct(Product_NO As String) As Integer

Dim SubProduct As Integer, OutProduct As Integer, SubTotal As Integer

    SubProduct = Nz(DSum("[UOM_UNIT_QTY]", "[ITEMS]", "[ITEM_CODE] Like '" & Product_NO & "'"), 0)
    OutProduct = Nz(DSum("[QTY_UNITS]", "[MISCELLANOUS_SALES_LINES]", "[ITEM_CODE] Like '" & Product_NO & "'"), 0)
    SubTotal = SubProduct - OutProduct

    GetSubProduct = SubTotal
End Function

 

و لإستدعاء الوظيفة اعلاه 

GetSubProduct("كود الصنف")

و هنا تم التطبيق على الاستعلام 

 

مرفق مثال مصغر

 

Database1.mdbFetching info...

[ابو عبد الرحمن اشرف]

  في 5‏/6‏/2023 at 06:10, ابو عبد الرحمن اشرف said:

هذا هو الرابط اخي الكريم 

https://www.mediafire.com/file/2l1bbxdjva2eb89/F.accdb/file

 

ومن الملاحظات ايضا 

1 - عند بيع كمية اكبر من الرصيد الحالي يقبل البيع وهذا خطأ طبعا 

2 - رصيد الصنف بعد عملية الشراء لا يسمع في كارت الصنف في حقل الرصيد الحالي

3 - لماذا لا يكون سعر الشراء وسعر البيع في مكان واحد وهو كارت الصنف (item)

4 - اتمني اضافة حقل جديد او زر امر ل ربح الصنف وربح الفاتورة 

Expand  

هل قمت بتحميل قاعدة البيانات اخي الكريم ؟

[Eng.Qassim]

اسف لعدم الرد فقد كنت على سفر 

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

DoCmd.SetWarnings False
DoCmd.RunSQL 
DoCmd.SetWarnings True

 

[ابو عبد الرحمن اشرف]

  في 10‏/6‏/2023 at 16:27, Eng.Qassim said:

اسف لعدم الرد فقد كنت على سفر 

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

DoCmd.SetWarnings False
DoCmd.RunSQL 
DoCmd.SetWarnings True

 

Expand  

عودا حميدا اخي الحبيب 

ارجو من جضرتك يا باشمهندس عصام ان تساعدني في تلك القاعدة لانها فعلا مميزة ومن صممها قام بعمل رائع ولكن بها اشكالات كثيرة ذكرتها آنفا 

ففي وقت فراغ حضرتك عاوزين نمسك مشكلة مشكلة ونحلها تفضلا وتكرما منك اخي