/*
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
*/
?>
| FACTURAS |
| Articulo |
Descripción |
Concepto |
Unidades |
Precio/unidad |
if (empty($codigo)) { $codigo=0; };
if (empty($fecha1)) { $fecha1="01/01/1970"; }
if (empty($fecha2)) { $fecha2=date("d/m/Y"); }
$fecha1=conversion($fecha1);
$fecha2=conversion($fecha2);
$consulta="Select * from clientes,facturas,factulinea where clientes.codcliente='$codigoc' and clientes.codcliente=facturas.codcliente and
facturas.codfactura=factulinea.codfactura and fecha >= '$fecha1' and fecha <= '$fecha2' order by facturas.codfactura";
$resultado=mysql_query($consulta,$conexion);
while ($lafila=mysql_fetch_array($resultado)) {
$codfamilia=$lafila["codfamilia"];
$codsubfamilia=$lafila["codsubfamilia"];
$codigo=$lafila["codigo"];
$iva0=$lafila["iva"];
$iva0=$iva0/100;
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); ?>
| echo $lafila3["codfamilia"]; ?> echo $lafila3["codsubfamilia"]; ?> echo $lafila3["codigo"]; ?> |
echo $lafila3["descripcion"]; ?> |
Factura
nº echo $lafila["codfactura"]; ?> |
$cant= number_format($lafila3["cantidad"],2,",","."); ?>
print $cant; ?> |
$imp=$lafila3["precio"]; $imp= $imp + ($imp * $iva0); ?> $imp= number_format($imp,2,",","."); ?>
print $imp; ?> |
} else {
$consulta21="select * from articulos where articulos.codfamilia='$codfamilia2' and
articulos.codsubfamilia='$codsubfamilia2' and articulos.codigo='$codigo2'";
$resultado21=mysql_query($consulta21,$conexion);
$lafila21=mysql_fetch_array($resultado21); ?>
| echo $lafila21["codfamilia"]; ?> echo $lafila21["codsubfamilia"]; ?> echo $lafila21["codigo"]; ?> |
echo $lafila21["descripcion"]; ?> |
Factura
nº echo $lafila["codfactura"]; ?> |
$cant= number_format($lafila2["cantidad"],2,",","."); ?>
print $cant; ?> |
$imp=$lafila2["precio"]; $imp= $imp + ($imp * $iva0); ?> $imp= number_format($imp,2,",","."); ?>
print $imp; ?> |
}
}
} else {
$consulta1="select * from articulos where articulos.codfamilia='$codfamilia' and
articulos.codsubfamilia='$codsubfamilia' and articulos.codigo='$codigo'";
$resultado1=mysql_query($consulta1,$conexion);
$lafila1=mysql_fetch_array($resultado1); ?>
| echo $lafila1["codfamilia"]; ?> echo $lafila1["codsubfamilia"]; ?> echo $lafila1["codigo"]; ?> |
echo $lafila1["descripcion"]; ?> |
Factura
nº echo $lafila["codfactura"]; ?> |
$cant= number_format($lafila["cantidad"],2,",","."); ?>
print $cant; ?> |
$imp=$lafila["precio"]; $imp= $imp + ($imp * $iva0); ?> $imp= number_format($imp,2,",","."); ?>
print $imp; ?> |
}
}
?>
| ALBARANES |
| Articulo |
Descripción |
Concepto |
Unidades |
Precio/unidad |
$consultab="Select * from clientes,albaranes,albalinea where albaranes.codfactura=0 and clientes.codcliente='$codigoc' and clientes.codcliente=albaranes.codcliente and
albaranes.codalbaran=albalinea.codalbaran and fecha >= '$fecha1' and fecha <= '$fecha2' order by albaranes.codalbaran";
$resultadob=mysql_query($consultab,$conexion);
while ($lafilab=mysql_fetch_array($resultadob)) {
$codfamilia=$lafilab["codfamilia"];
$codsubfamilia=$lafilab["codsubfamilia"];
$codigo=$lafilab["codigo"];
$iva0=$lafilab["iva"];
$iva0=$iva0/100;
if (($codfamilia=="p") and ($codsubfamilia=="p")) {
$consulta3b="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";
$resultado3b=mysql_query($consulta3b,$conexion);
$lafila3b=mysql_fetch_array($resultado3b); ?>
| echo $lafila3b["codfamilia"]; ?> echo $lafila3b["codsubfamilia"]; ?> echo $lafila3b["codigo"]; ?> |
echo $lafila3b["descripcion"]; ?> |
Albarán nº echo $lafilab["codalbaran"]; ?> |
$cant= number_format($lafila3b["cantidad"],2,",","."); ?> print $cant; ?> |
$imp=$lafila3b["precio"]; $imp= $imp + ($imp * $iva0); ?> $imp= number_format($imp,2,",","."); ?> print $imp; ?> |
} else {
$consulta21b="select * from articulos where articulos.codfamilia='$codfamilia' and
articulos.codsubfamilia='$codsubfamilia' and articulos.codigo='$codigo'";
$resultado21b=mysql_query($consulta21b,$conexion);
$lafila21b=mysql_fetch_array($resultado21b); ?>
| echo $lafila21b["codfamilia"]; ?> echo $lafila21b["codsubfamilia"]; ?> echo $lafila21b["codigo"]; ?> |
echo $lafila21b["descripcion"]; ?> |
Albarán nº echo $lafilab["codalbaran"]; ?> |
$cant= number_format($lafilab["cantidad"],2,",","."); ?> print $cant; ?> |
$imp=$lafilab["precio"]; $imp= $imp + ($imp * $iva0); ?> $imp= number_format($imp,2,",","."); ?> print $imp; ?> |
}
}
?>
| PARTES |
| Articulo |
Descripción |
Concepto |
Unidades |
Precio/unidad |
$consultab="Select * from clientes,partes,partelinea where partes.codalbaran=0 and clientes.codcliente='$codigoc' and clientes.codcliente=partes.codcliente and
partes.codparte=partelinea.codparte and fecha >= '$fecha1' and fecha <= '$fecha2' order by partes.codparte";
$resultadob=mysql_query($consultab,$conexion);
while ($lafilab=mysql_fetch_array($resultadob)) {
$codfamilia=$lafilab["codfamilia"];
$codsubfamilia=$lafilab["codsubfamilia"];
$codigo=$lafilab["codigo"];
$iva0=$lafilab["iva"];
$iva0=$iva0/100;
$consulta21b="select * from articulos where articulos.codfamilia='$codfamilia' and
articulos.codsubfamilia='$codsubfamilia' and articulos.codigo='$codigo'";
$resultado21b=mysql_query($consulta21b,$conexion);
$lafila21b=mysql_fetch_array($resultado21b); ?>
| echo $lafila21b["codfamilia"]; ?> echo $lafila21b["codsubfamilia"]; ?> echo $lafila21b["codigo"]; ?> |
echo $lafila21b["descripcion"]; ?> |
Parte nº echo $lafilab["codparte"]; ?> |
$cant= number_format($lafilab["cantidad"],2,",","."); ?> print $cant; ?> |
$imp=$lafilab["precio"]; $imp= $imp + ($imp * $iva0); ?> $imp= number_format($imp,2,",","."); ?> print $imp; ?> |
}
?>
@mysql_free_result($resultado);
@mysql_free_result($resultado1);
@mysql_free_result($resultado2);
@mysql_free_result($resultado21);
@mysql_free_result($resultado3); ?>
}
?>