/* 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 */ ?>

| Codigo | Importe | Importe con IVA | Fecha | Año |
| ')"> echo $lafila0["codalbaran"]; ?> | $importe=0; $codalbaran=$lafila0["codalbaran"]; $iva=$lafila0["iva"]; $consulta01="Select * from albalinea where codalbaran='$codalbaran'"; $resultado01=mysql_query($consulta01,$conexion); while ($lafila01=mysql_fetch_array($resultado01)) { $codfamilia=$lafila01["codfamilia"]; $codsubfamilia=$lafila01["codsubfamilia"]; $codparte=$lafila01["codigo"]; if (($codfamilia=="p") and ($codsubfamilia=="p")) { $consulta02="Select * from partelinea where codparte='$codparte'"; $resultado02=mysql_query($consulta02,$conexion); while ($lafila01=mysql_fetch_array($resultado01)) { $importe=$importe+$lafila02["importe"]; } } else { $importe=$importe+$lafila01["importe"]; } } $siniva=$importe; $iva=$iva/100; $importe=$importe+($importe*$iva); ?>$siniva= number_format($siniva,2,",","."); print $siniva; ?> | $importe= number_format($importe,2,",","."); print $importe; ?> | $fecha=reconversion($lafila0["fecha"]); echo $fecha; ?> | echo $lafila0["anyo"]; ?> |