Requête: Liste des Factures impayées [Résolu]

[mameziane]

Bonjour,
Je me bas depuis des heures sur une requête qui me permet d'avoir une liste des factures non réglées (Totalement et/ou partiellement)
Je possèdes deux tables:
Facture: nfacture,dfacture,montant
reglement : nreg,nfacture,montreg,rettva,retsource

à savoir une facture doit être réglée selon cette formule:
montant +retenue à la source + retenue sur tva

la retenue à la source et retenue de tva accompagnent toujours le 1er réglement

J'utilise cette requête qui me permet d'avoir seulement les factures partiellement réglées (celles totalement non réglée manquent)

Code :

1
2
3
4
5
6
7
8
9
10
11
12
SELECT FA.nfacture,
          FA.dfacture,
             FA.netapayer,
                sum(RE.remisfact+RE.retsource+RE.rettva+RE.montant) AS payer,
                (FA.netapayer-sum(RE.remisfact+RE.retsource+RE.rettva+RE.montant)) AS restapayer
FROM (":baseannee:facture" FA
      LEFT JOIN ":basestk:reglemen" RE ON FA.nfacture=RE.nfacture)
GROUP BY FA.nfacture,
         FA.dfacture,
         FA.netapayer HAVING ( (FA.netapayer > sum(RE.remisfact+RE.retsource+RE.rettva+RE.montant))
                              OR (sum(RE.remisfact+RE.retsource+RE.rettva+RE.montant) IS NULL) )
ORDER BY FA.nfacture

PS:
- Les deux tables appartiennent à deux bases (DBASE III Plus) différentes.
- C'est une requête avec Delphi 7 pour un état Qreport

Merci de votre aide

[f-leb]

bonsoir,

Envoyé par mameziane

- Les deux tables appartiennent à deux bases (DBASE III Plus) différentes.
- C'est une requête avec Delphi 7 pour un état Qreport

tu as bien fait de poster dans le forum Access

Envoyé par mameziane

(celles totalement non réglée manquent)

il faut rechercher les numéros de factures qui n'ont pas de correspondance dans la table des règlements RE.nfacture IS NULL.

Dans un HAVING, on doit s'en sortir avec Max:

Code sql :

...OR Max(RE.nfacture) IS NULL

[mameziane]

Bonsoir F-Leb,
Au début je vous remercie pour l'intérêt que vous portez à ma question.
J'ai posté ma question ici par ignorance

En fait

OR (sum(RE.remisfact+RE.retsource+RE.rettva+RE.montant) IS NULL)

et

OR Max(RE.nfacture) IS NULL

donnent le même résultat qui comprend les factures même réglées.

Je constate que c'est la seule lacune actuellement: La requête affiche parmi les factures partiellement réglées et non réglées et aussi celles réglées
Que faire en plus de

(FA.netapayer > sum(RE.remisfact+RE.retsource+RE.rettva+RE.montant)

pour filtrer ce résultat ?

en voici un aperçu: (seulement pour clarifier la Chose aux débutants comme moi )



D'ailleurs une autre question si vous permettez:
comment remplacer par un Zéro les valeur Null (en SQL) ?

[mameziane]

J'ai trouvé la solution

En fait je me suis inspiré de la réponse de Monsieur F-Leb et j'ai modifier la requête en ajoutant la fonction Max devant FA.netapayer qui est le montant de la facture (en rouge)

Code :

1
2
3
4
5
6
7
8
9
10
11
12
13
SELECT fa.nfacture,
          fa.dfacture,
             fa.netapayer,
                sum(re.remisfact+re.retsource+re.rettva+re.montant) AS payer,
                (fa.netapayer-sum(re.remisfact+re.retsource+re.rettva+re.montant)) AS restapayer
FROM (":baseannee:facture" fa
      LEFT JOIN ":basestk:reglemen" re ON fa.nfacture=re.nfacture)
GROUP BY fa.nfacture,
         fa.dfacture,
         fa.netapayer HAVING ((max(fa.netapayer) > sum(re.remisfact+re.retsource+re.rettva+re.montant))
                              OR (sum(re.remisfact+re.retsource+re.rettva+re.montant) IS NULL))
ORDER BY fa.nfacture

ce qui a permis de masquer les factures totalement payées.

Seulement, comment remplacer par un Zéro les valeur Null (en SQL) ? J'ai essayer coalesce qui m'a été refusé !!

[mameziane]

oh non !!!

J'ai trop vite parlé... en fait le résultat comprend encore quelques factures (bizarrement pas toutes) dont le reste à payer = 0 !!!


Encore de l'aide SVP !

Voici la requête rectifiée:

Code :

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
SELECT cl.codcli,
          cl.raiscli,
             fa.nfacture,
                fa.dfacture,
                   fa.netapayer,
                      sum(re.remisfact+re.retsource+re.rettva+re.montant) AS payer,
                      (fa.netapayer-sum(re.remisfact+re.retsource+re.rettva+re.montant)) AS restapayer
FROM (":baseannee:facture" fa
      LEFT JOIN ":basestk:reglemen" re ON fa.nfacture=re.nfacture) LEFT
JOIN ":basestk:client" cl ON fa.codcli=cl.codcli
GROUP BY cl.codcli,
         cl.raiscli,
         fa.nfacture,
         fa.dfacture,
         fa.netapayer HAVING (((max(fa.netapayer) > sum((re.remisfact+re.retsource+re.rettva+re.montant)))
                               AND (max(RE.nfacture) IS NOT NULL))
                              OR (max(RE.nfacture) IS NULL))
ORDER BY fa.nfacture

et encore voici un aperçu du résultat:

[f-leb]

N’aurais-tu pas un problème d’arrondi dans tes sommes ?

Du genre,

Code :

1
2
3
4
 
NetApayer=1000,0000
 
sum(RE.remisfact+RE.retsource+RE.rettva+RE.montant) =999,9999

et du coup (FA.netapayer > sum(RE.remisfact+RE.retsource+RE.rettva+RE.montant) est vraie alors que la facture est réglée à l’arrondi près.

[mameziane]

Salut,

Pour la table en .DBF le champ netapayer est un Numérique avec 3 Dec.

Le décimal configuré dans paramètres régional de windows est le point (.)

En fait le formatage d'affichage n'arrondi pas les valeurs mais formate seulement les valeurs avec des zéro à droite,
genre 14.2 qui s'affichera 14.200 (### ##0.000)

Dans aucun emplacement j'arrondi les valeurs

[f-leb]

Bonjour,

la condition,

Code sql :

1
2
HAVING fa.netapayer > sum(re.remisfact+re.retsource+re.rettva+re.montant)
                              OR max(RE.nfacture) IS NULL

devrait suffire.

Envoyé par mameziane

en fait le résultat comprend encore quelques factures (bizarrement pas toutes) dont le reste à payer = 0 !!!

…et elles ne devraient pas apparaître car si le reste à payer=0, alors :

Code sql :

fa.netapayer = sum(re.remisfact+re.retsource+re.rettva+re.montant)

Je me trompe peut-être avec cette histoire d’arrondi mais je ne vois pas ce que ça pourrait être d’autres, le formatage comme tu dis ne concerne que l’affichage et DBIII fait peut-être des erreurs de calculs à la nième décimale.

Pour lever définitivement le doute, fait un test avec :

Code sql :

1
2
HAVING ABS(fa.netapayer - sum(re.remisfact+re.retsource+re.rettva+re.montant)) > 0.1
                              OR max(RE.nfacture) IS NULL

[mameziane]

Bonjour,

Monsieur Fabien encore merci pour votre aide.

En fait votre analyse m'a aider à confirmer que Dbase III du moins via le moteur ODBC résout mal l'égalité entre deux valeurs décimales et puisque la fonction ABS m'a été refusée dans Having (je ne sais pas d'ailleurs pourquoi) j'ai modifier votre astuce afin d'avoir cette fois une liste vraiment correcte qui ne contient aucune valeur = à zéro.

Puisque les décimaux représentes les millimes (le 1/1000) j'ai ajouter 0.001 au test comme suit:

Code :

1
2
3
HAVING (((sum(re.remisfact+re.retsource+re.rettva+re.montant)+0.001<max(fa.netapayer))
                               AND (max(RE.nfacture) IS NOT NULL))
                              OR (max(RE.nfacture) IS NULL))

ce qui a permis de résoudre définitivement le problème.

Monsieur Fabien encore merci

Je remet ici la requête finale afin de permettre aux lecteurs d'avoir une discussion complète

Code :

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
SELECT cl.codcli,
          cl.raiscli,
             fa.nfacture,
                fa.dfacture,
                   fa.netapayer,
                      sum(re.remisfact+re.retsource+re.rettva+re.montant) AS payer,
                      (fa.netapayer-sum(re.remisfact+re.retsource+re.rettva+re.montant)) AS restapayer
FROM (":baseannee:facture" fa
      LEFT JOIN ":basestk:reglemen" re ON fa.nfacture=re.nfacture) LEFT
JOIN ":basestk:client" cl ON fa.codcli=cl.codcli
GROUP BY cl.codcli,
         cl.raiscli,
         fa.nfacture,
         fa.dfacture,
         fa.netapayer HAVING (((sum(re.remisfact+re.retsource+re.rettva+re.montant)+0.001<max(fa.netapayer))
                               AND (max(RE.nfacture) IS NOT NULL))
                              OR (max(RE.nfacture) IS NULL))
ORDER BY fa.nfacture