/* This program is free software; you can redistribute it and/or modify it under the terms of the GNU General Public License as published by the Free Software Foundation; either version 2 of the License, or (at your option) any later version. This program is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for more details. You should have received a copy of the GNU General Public License along with this program; if not, write to the Free Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA Autores: Pedro Obregón Mejías Rubén D. Mancera Morán Versión: 1.0 Fecha Liberación del código: 13/07/2004 Galopín para gnuLinEx 2004 -- Extremadura */ ?>

if ($ini==1) { ?>
| Cod. Factura | Fecha de factura | Estado | Importe | ||
| echo $lafila["codfactura"]; ?> | $fech=reconversion($lafila["fecha"]); echo $fech; ?> | if ($lafila["estado"]==1) { ?>No pagada | } else { if ($lafila["estado"]==2) { ?>En proceso | } else { ?>Pagada | } } ?> $consulta0="Select * from factulinea where factulinea.codfactura='$codf'"; $resultado0=mysql_query($consulta0,$conexion); while ($lafila0=mysql_fetch_array($resultado0)) { $codfamilia=$lafila0["codfamilia"]; $codsubfamilia=$lafila0["codsubfamilia"]; $codigo=$lafila0["codigo"]; ?> if (($codfamilia=="a") and ($codsubfamilia=="a")) { $consulta2="select * from albaranes,albalinea where albaranes.codalbaran='$codigo' and albaranes.codalbaran=albalinea.codalbaran"; $resultado2=mysql_query($consulta2,$conexion); while ($lafila2=mysql_fetch_array($resultado2)) { $codfamilia2=$lafila2["codfamilia"]; $codsubfamilia2=$lafila2["codsubfamilia"]; $codigo2=$lafila2["codigo"]; if (($codfamilia=="p") and ($codsubfamilia=="p")) { $consulta3="select * from partes,partelinea,articulos where partes.codparte='$codigo' and partes.codparte=partelinea.codparte and partelinea.codfamilia=articulos.codfamilia and partelinea.codsubfamilia=articulos.codsubfamilia and partelinea.codigo=articulos.codigo"; $resultado3=mysql_query($consulta3,$conexion); $lafila3=mysql_fetch_array($resultado3); $importe=$importe + $lafila3["importe"]; } else { $importe=$importe + $lafila2["importe"]; } } } else { $importe= $importe + $lafila0["importe"]; } } ?>$iva0=$iva0/100; $importe=$importe + ($importe*$iva0); $imp= number_format($importe,2,",","."); echo $imp; ?> Euros | if ($lafila["estado"]==1) { $sinpagar=$sinpagar + $importe; } if ($lafila["estado"]==2) { $enproceso=$enproceso + $importe; } if ($lafila["estado"]==3) { $pagado=$pagado + $importe; } ?>
| Total no pagado | Total en proceso | Total pagado |
| $sinpagar= number_format($sinpagar,2,",","."); echo $sinpagar; ?> Euros | $enproceso= number_format($enproceso,2,",","."); echo $enproceso; ?> Euros | $pagado= number_format($pagado,2,",","."); echo $pagado; ?> Euros |