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

الصفحات : 1 2

(15-02-2017, 05:57 PM)Unprogramme كتب : [ -> ]السلام عليكم ،
أخي نبيل بما أنك تستعمل Firebird على ما أظن ؟
لماذا لا تستخدم الحلقات في الإجراءات المخزنة Procedure stockée

مثال

كود :
For select Code_Client FROM Client Into LeCodeCli DO Begin Select Sum(MonTant_Credit) FROM Credit Into TotCredit Where (Credit.Code_Client = :LeCodeCli) Select Sum(MonTant_Versement) FROM Versement Into TotVers Where (Credit.Code_Client = :LeCodeCli) LeSolde = TotCredit - TotVers end

إذا تريد توضيح أكثر ، على العين و الراس.

شكرا على الاهتمام. يبدو أنك فهمت تماما المقصود. لكنه تعديل طفيف لزميل على تطبيق قديم paradox . لادارة محل أدوات كهرومنزلية. المقصود dbgrid يعرض مجموع الديون. المدفوعات. الفارق(solde) . رغم أن التطيق يمكنك من معرفة البيانات المذكورة من خلال تحديد زبون معين. لكن الآن النقود جدول لكل الزبائن (DbGrid) كما تقدم. هل من حل؟

السلام عليكم
جرب هذا المفروض سيفي بالغرض :

PHP كود :
select A.table_Credit,B.table_Credit,B.table_montant from  
(select Client.Code_Client A , SUM(Credit.MonTant_Credit)    B From Client INNER JOIN   Credit  on Client.Code_Client=Credit.Code_Client Group By A) table_Credit
Join  
(select Client.Code_Client A , SUM(Versement.MonTant_Credit) B From Client INNER JOIN   Versement  on Client.Code_Client= Versement.Code_Client  Group By A) table_montant
 on
table_Credit.A= table_montant.A 

الصفحات : 1 2

nabilkeb

لؤي