delphi4arab منتديات دلفي للعرب

نسخة كاملة : كيف اقوم ابستدعاء استعلام يقوم بالستدعاء استعلام اخر Access في الديفي
أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .
عندي استعلام الاول 
كود :
SELECT Familles.NomFam, Bone.dat, stock.produit, stock.unite, stock.somme, Bone.Quantete, stock.tva, (stock.somme*Bone.Quantete)+((stock.somme*Bone.Quantete*tva)/100) AS TOTAL FROM Familles INNER JOIN (stock INNER JOIN Bone ON stock.Numproduit = Bone.NumProduit) ON (Familles.NumFam = stock.NumFam) AND (Bone.NumFam = Familles.NumFam) WHERE Bone.dat>=:DAT1<=:DAT2 ORDER BY Familles.NomFam, stock.produit;
 
الاستعلام الثاني 
كود :
SELECT DetailleMois.NomFam AS Fam, DetailleMois.produit AS NamProdui, DetailleMois.unite AS Unit, DetailleMois.somme, Sum(DetailleMois.Quantete) AS SommeDeQuantete, DetailleMois.tva AS TTVA, Sum(DetailleMois.TOTAL) AS SommeDeTOTAL FROM DetailleMois GROUP BY DetailleMois.NomFam, DetailleMois.produit, DetailleMois.unite, DetailleMois.somme, DetailleMois.tva;

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

كود :
SELECT name FROM (SELECT name FROM agentinformation)

هذا مثال للتوضيح يمكنك في جملة select الاولى ان تقوم باجراء ما تريد على الراجع من ناتج الجملة الثانية
بالنسبة للستعلامات صحيحة . قلت الاستعلام الثاني يستدعي الاستعلام الاول كيف اقوم بهذا في الديلفي اي في كوري او اين اضع الاتسعلامات او بالاحرى كيف ادمج الاستعلامين في استعلام واحد يكون افضل
السلام عليكم سالك غير واضح
شكــرا للجميع وجدت الحل
PHP كود :
SELECT Familles.NomFam, stock.produit, stock.unite, stock.somme, Sum(Bone.Quantete) AS TotalQnt, stock.tva, Sum((stock.somme*Bone.Quantete)+((stock.somme*Bone.Quantete*tva)/100)) AS TOTAL
FROM 
(Familles INNER JOIN Bone ON Familles.NumFam = Bone.NumFam) INNER JOIN stock ON (stock.Numproduit = Bone.NumProduit) AND (Familles.NumFam = stock.NumFam)
where  Bone.dat> =:DAT1 And Bone.dat> =:DAT2
GROUP BY  Familles
.NomFam, stock.produit, stock.unite, stock.somme, stock.tva
ORDER BY Familles
.NomFam, stock.produit;