Discussion :

[kroma23]

salut tout le monde
j'utulise delphi 7 avec interbase 6.5
jai 3 table personne,emprunt,rendre
personne(num-per,nom,prenom)
emprunt(num_per,date_emprt,mont_emprt)
rendre(num_per,date_rendu,mont_rendu)
je veux calculé le reste des montants pour chaque personne
est pour cela ji utulisé cette requette

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
 
ibquery1.close;
ibquery1.sql.clear;
ibquery1.sql.add('select emprunt.num_per as Numero,sum(emprunt.mont_emprt) as emprunter,sum(rendre.mont_rendu) as rendu from emprunt,rendre where emprunt.num_per=rendre.num_per group by emprunt.num_per');
ibquery1.open;

l'affichage sera dans une dbgrid
le probleme la requtte me donne des fausse resultas
vraiment je me suis bloqué
aider moi svp

[Cl@udius]

Salut

Je vois en premier lieu un problème de modélisation.
La table RENDRE (que j'aurais appelée REMBOURSEMENT) n'est pas liée à un emprunt.
Ton modèle de données ne permet pas de savoir à quel emprunt est affecté le remboursement. Pire si une même personne contracte plusieurs emprunts.

Je verrais plutôt ceci:
PERSONNE(NUM_PERS, NOM, PRENOM)
EMPRUNT(NUM_EMPRT, NUM_PERS, DATE_EMPRT, MONT_EMPRT)
REBOURSEMENT(NUM_EMPRT, DATE_REMBT, MONT_REMBT)

La requête devient en gros:

Code sql :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
SELECT
  P.NUM_PERS,
  E.NUM_EMPRT,
  E.MONT_EMPRT AS EMPRT,
  SUM(COALESCE(R.MONT_RENDU, 0)) AS RMBT
FROM
  PERSONNE P
  INNER JOIN EMPRUNT E
    ON E.NUM_PERS = P.NUM_PERS
  LEFT JOIN REBOURSEMENT R
    ON R.NUM_EMPRT = E.NUM_EMPRT
GROUP BY
  P.NUM_PER,
  E.NUM_EMPRT,
  E.MONT_EMPRT
HAVING
  SUM(COALESCE(R.MONT_RENDU, 0)) < E.MONT_EMPRT;

@+