[Dolibarr-user] petit patch

[paul POULAIN]

Décidemment, me voilà fort bavard sur cette liste aujourd'hui...

Sur la page htdocs/compta/index.php?mainmenu=accountancy (la page 
d'accueil quand on clique sur "Compta/tréso", on a une liste des 
factures impayées. Cette liste ne présente que le montant TTC à encaisser.
Je trouve important d'avoir le montant HT, puisque c'est le seul montant 
intéressant pour le controle de gestion, la TVA elle ne fait que 
"passer" dans mes mains. Donc je les ai rajoutés, et j'ai rajouté aussi 
une ligne de cumul à la fin (en plus de la ligne reste à encaisser)

Voilà le patch pour ce faire, j'espère que vous lui ferez bon accueil.

Bonne journée.
--
Paul POULAIN
Consultant indépendant en logiciels libres
responsable francophone de koha (SIGB libre http://www.koha-fr.org)

269c269
<   $sql = "SELECT f.facnumber, f.rowid, s.nom, s.idp, f.total_ttc, 
sum(pf.amount) as am";
---
>   $sql = "SELECT f.facnumber, f.rowid, s.nom, s.idp, f.total, f.total_ttc, 
> sum(pf.amount) as am";
286c286
<         print '<tr class="liste_titre"><td colspan="2">Factures clients 
impayées ('.$num.')</td><td align="right">Montant TTC</td><td 
align="right">Reçu</td></tr>';
---
>         print '<tr class="liste_titre"><td colspan="2">Factures clients 
> impayées ('.$num.')</td><td align="right">Montant HT</td><td 
> align="right">Montant TTC</td><td align="right">Reçu</td></tr>';
288c288
<         $total = $totalam = 0;
---
>         $total_ttc = $totalam = $total = 0;
298a299
>                 print '<td align="right">'.price($obj->total).'</td>';
302c303,304
<             $total +=  $obj->total_ttc;
---
>             $total_ttc +=  $obj->total_ttc;
>                 $total += $obj->total;
307c309,310
<         print '<tr '.$bc[$var].'><td colspan="4" align="left">Reste à 
encaisser : '.price($total-$totalam).'</td></tr>';
---
>         print "<tr $bc[$var]><td colspan=\"2\" align=\"right\"><i>Total : 
> </i></td><td align=\"right\"><i>".price($total)."</i></td><td 
> align=\"right\"><i>".price($total_ttc)."</i></td><td 
> align=\"right\"><i>".price($totalam)."</i></td></tr>";
>         print '<tr '.$bc[$var].'><td colspan="4" align="right"><i>Reste à 
> encaisser : '.price($total_ttc-$totalam).'</i></td><td>&nbsp;</td></tr>';