lainwir3d/dolibarr
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

*** empty log message ***

Browse Source
This commit is contained in:
Rodolphe Quiedeville 2002-05-03 12:16:51 +00:00
parent 6912af9d8d
commit b419d18ff7
1 changed files with 38 additions and 33 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

37
htdocs/compta/index.php3
View File

@ -68,7 +68,7 @@ $sql .= " ORDER BY f.fk_statut, f.paye, f.datef DESC ";
$result = $db->query($sql); $result = $db->query($sql);
if ($result) { if ($result) {
$num = $db->num_rows(); $num = $db->num_rows();
if ($num > 0) {
$i = 0; $i = 0;
print "<TABLE border=\"0\" width=\"100%\" cellspacing=\"0\" cellpadding=\"4\">"; print "<TABLE border=\"0\" width=\"100%\" cellspacing=\"0\" cellpadding=\"4\">";
print "<TR bgcolor=\"orange\">"; print "<TR bgcolor=\"orange\">";
@ -78,6 +78,8 @@ if ($result) {
print "<TD align=\"right\">Date</TD><TD align=\"right\">Montant</TD>"; print "<TD align=\"right\">Date</TD><TD align=\"right\">Montant</TD>";
print "<TD align=\"right\">Payé</TD><TD align=\"right\">Moyenne</TD>"; print "<TD align=\"right\">Payé</TD><TD align=\"right\">Moyenne</TD>";
print "</TR>\n"; print "</TR>\n";
if ($num > 0) {
$var=True; $var=True;
while ($i < $num) { while ($i < $num) {
$objp = $db->fetch_object( $i); $objp = $db->fetch_object( $i);
@ -160,6 +162,7 @@ print "<P>Valid
$sep = 0; $sep = 0;
$sept = 0; $sept = 0;
$subtotal=0;
$sql = "SELECT s.nom, s.idp, f.facnumber, f.amount,".$db->pdate("f.datef")." as df, f.paye, f.rowid as facid "; $sql = "SELECT s.nom, s.idp, f.facnumber, f.amount,".$db->pdate("f.datef")." as df, f.paye, f.rowid as facid ";
$sql .= " FROM societe as s,llx_facture as f WHERE f.fk_soc = s.idp AND f.fk_statut > 0"; $sql .= " FROM societe as s,llx_facture as f WHERE f.fk_soc = s.idp AND f.fk_statut > 0";
@ -180,8 +183,9 @@ $sql .= " ORDER BY f.paye, f.datef DESC ";
$result = $db->query($sql); $result = $db->query($sql);
if ($result) { if ($result) {
$num = $db->num_rows(); $num = $db->num_rows();
if ($num > 0) {
$i = 0; $l=0;
$k=0;
print "<TABLE border=\"0\" width=\"100%\" cellspacing=\"0\" cellpadding=\"4\">"; print "<TABLE border=\"0\" width=\"100%\" cellspacing=\"0\" cellpadding=\"4\">";
print "<TR bgcolor=\"orange\">"; print "<TR bgcolor=\"orange\">";
print "<TD>[<a href=\"$PHP_SELF\">Tous</a>]</td>"; print "<TD>[<a href=\"$PHP_SELF\">Tous</a>]</td>";
@ -191,15 +195,16 @@ if ($result) {
print "<TD align=\"right\">Payé</TD><TD align=\"right\">Moyenne</TD>"; print "<TD align=\"right\">Payé</TD><TD align=\"right\">Moyenne</TD>";
print "</TR>\n"; print "</TR>\n";
$var=True; $var=True;
while ($i < $num) { if ($num > 0) {
$objp = $db->fetch_object( $i); while ($l < $num) {
$objp = $db->fetch_object( $l);
$var=!$var; $var=!$var;
if ($objp->paye && !$sep) { if ($objp->paye && !$sep) {
print "<tr><td></td><td>$i factures</td><td colspan=\"2\" align=\"right\">"; print "<tr><td></td><td>$l factures</td><td colspan=\"2\" align=\"right\">";
print "<small>Total : ".francs($total)." FF</small></td>"; print "<small>Total : ".francs($total)." FF</small></td>";
print "<td align=\"right\">Sous Total :<b> ".price($total)."</b></td><td>euros HT</td>"; print "<td align=\"right\">Sous Total :<b> ".price($total)."</b></td><td>euros HT</td>";
print "<td align=\"right\">Moyenne :<b> ".price($total / ($i+1))."</b></td></tr>"; print "<td align=\"right\">Moyenne :<b> ".price($total / ($l+1))."</b></td></tr>";
print "<TR bgcolor=\"orange\">"; print "<TR bgcolor=\"orange\">";
print "<TD>[<a href=\"$PHP_SELF\">Tous</a>]</td>"; print "<TD>[<a href=\"$PHP_SELF\">Tous</a>]</td>";
@ -208,7 +213,7 @@ if ($result) {
print "<TD align=\"right\">Date</TD><TD align=\"right\">Montant</TD>"; print "<TD align=\"right\">Date</TD><TD align=\"right\">Montant</TD>";
print "<TD align=\"right\">Payé</TD><TD align=\"right\">Moyenne</TD>"; print "<TD align=\"right\">Payé</TD><TD align=\"right\">Moyenne</TD>";
print "</TR>\n"; print "</TR>\n";
$sep = 1 ; $j = 0; $sep = 1 ; $k = 0;
$subtotal = 0; $subtotal = 0;
} }
@ -239,23 +244,23 @@ if ($result) {
$total = $total + $objp->amount; $total = $total + $objp->amount;
$subtotal = $subtotal + $objp->amount; $subtotal = $subtotal + $objp->amount;
print "<TD align=\"right\">".$yn[$objp->paye]."</TD>\n"; print "<TD align=\"right\">".$yn[$objp->paye]."</TD>\n";
print "<TD align=\"right\">".price($subtotal / ($j + 1))."</TD>\n"; print "<TD align=\"right\">".price($subtotal / ($k + 1))."</TD>\n";
print "</TR>\n"; print "</TR>\n";
$i++; $l++;
$j++; $k++;
} }
} }
if ($i == 0) { $i=1; } if ($j == 0) { $j=1; } if ($l == 0) { $l=1; } if ($k == 0) { $k=1; }
print "<tr><td></td><td>$j factures</td><td colspan=\"2\" align=\"right\">"; print "<tr><td></td><td>$k factures</td><td colspan=\"2\" align=\"right\">";
print "<small>Total : ".francs($subtotal)." FF</small></td>"; print "<small>Total : ".francs($subtotal)." FF</small></td>";
print "<td align=\"right\">Sous Total :<b> ".price($subtotal)."</b></td><td>euros HT</td>"; print "<td align=\"right\">Sous Total :<b> ".price($subtotal)."</b></td><td>euros HT</td>";
print "<td align=\"right\">Moyenne :<b> ".price($subtotal/ $j)."</b></td></tr>"; print "<td align=\"right\">Moyenne :<b> ".price($subtotal/ $k)."</b></td></tr>";
print "<tr bgcolor=\"#d0d0d0\"><td></td><td>$i factures</td><td colspan=\"2\" align=\"right\">"; print "<tr bgcolor=\"#d0d0d0\"><td></td><td>".($l+$i)." factures</td><td colspan=\"2\" align=\"right\">";
print "<small>Total : ".francs($total)." FF</small></td>"; print "<small>Total : ".francs($total)." FF</small></td>";
print "<td align=\"right\"><b>Total : ".price($total)."</b></td><td>euros HT</td>"; print "<td align=\"right\"><b>Total : ".price($total)."</b></td><td>euros HT</td>";
print "<td align=\"right\"><b>Moyenne : ".price($total/ $i)."</b></td></tr>"; print "<td align=\"right\"><b>Moyenne : ".price($total/ ($l+$i))."</b></td></tr>";
print "</TABLE>"; print "</TABLE>";
$db->free(); $db->free();