[alfaiz678]

(20-08-18, 09:07 PM)elgokr كتب :

لا عليك اخى alfaiz678

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

وعلى الاسرة وللجميع باذن الله

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

بما انك وضحت العمود الاخير فاليك كود الاستعلام كاملاً

كود :

SELECT Min(jsnf.jsnfcod) AS Code, jsnf.JSnfName AS Name, Sum(jshra2.JshraAdd) AS Shra, Sum(JBea2.JBeaAdd) AS Bea, SUM(jshra2.JshraAdd - JBea2.JBeaAdd) AS Total, (SUM(jshra2.JshraAdd - JBea2.JBeaAdd) * MAX( jsnf.JSnfSar)) AS xMoney
FROM (jsnf INNER JOIN jshra2 ON jsnf.JSnfName = jshra2.JshraNameS) INNER JOIN JBea2 ON jsnf.JSnfName = JBea2.JBeaNameS
GROUP BY jsnf.JSnfName;

بكده لديك جميع الاصناف التى دخل لها مشتريات وطبعاً عند اضافة مشتريات لها

يجب ان تقوم بالتحقق بان لها فى المبيعات اى قيمة أو بحيث اذا كان لا تقوم باضافة قيمة واحدة للمبيعات بعدد 0 مباع

أو تلقائي قم باذافة عدد 0 مباع فكلاهما سيعمل عادى

والقى نظرة على الاستعلام وستجد كما تريد تماماً

تحياتى لك

وتمنياتى لك التوفيق

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

كود :

 Dim adtt As New OleDbDataAdapter("SELECT Min(jsnf.jsnfcod) AS Code, jsnf.JSnfName AS Name, Sum(jshra2.JshraAdd) AS Shra, Sum(JBea2.JBeaAdd) AS Bea, SUM(jshra2.JshraAdd - JBea2.JBeaAdd) AS Total, (SUM(jshra2.JshraAdd - JBea2.JBeaAdd) * MAX( jsnf.JSnfSar)) AS xMoney FROM (jsnf INNER JOIN jshra2 ON jsnf.JSnfName = jshra2.JshraNameS) INNER JOIN JBea2 ON jsnf.JSnfName = JBea2.JBeaNameS GROUP BY jsnf.JSnfName;", conne)
       Dim dtt As New DataTable
       adtt.Fill(dtt)
       DataGridView1.DataSource = dtt

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