/*
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
*/
setcookie ("codcliente",$codcli,time()+3600); ?>
Galopin v1.0
include ("conectar.php");
if ($ini5=="0") {
$consulta3 = "Select max(codfactura) as maximo from facturasptmp";
$resultado3 = mysql_query($consulta3, $conexion);
$lafila3=mysql_fetch_array($resultado3);
if (empty($lafila3["maximo"])) { $codigofac=0; }
else { $codigofac=$lafila3["maximo"]; }
$codigofac++;
$fe="0000-00-00";
$ob="nada";
$consulta3="INSERT INTO `facturasptmp` ( `codfactura` , `fecha` , `iva` , `codproveedor` , `anyo` , `observaciones` , `codfp` , `estado` , `fechapago` )
VALUES ('$codigofac', '$fe' , '0' , '0' , '0' , '$ob' , '0' , '0' , '$fe' )";
$consulta3=mysql_query($consulta3, $conexion);
$consulta= "delete from factulineaptmp where codfactura='$codigofac'";
$consulta=mysql_query($consulta, $conexion);
}
$consulta = "Select * from proveedores where codproveedor='$codcli'";
$resultado = mysql_query($consulta, $conexion);
$lafila=mysql_fetch_array($resultado);
?>
Código de proveedor:
echo $lafila["codproveedor"]; ?>
Nombre:
echo $lafila["nombre"]; ?>
CIF/NIF:
echo $lafila["nif"]; ?>
Dirección:
echo $lafila["direccion"]; ?>
$prov=$lafila["codprovincia"];
$consulta0 = "Select * from provincias where codprovincia='$prov'";
$resultado0 = mysql_query($consulta0, $conexion);
$lafila0=mysql_fetch_array($resultado0); ?>
if ($borrar==1) {
$consulta8="delete from factulineaptmp where codfactura='$codigofac' and numlinea='$numlinea'";
$resultado8 = mysql_query($consulta8, $conexion);
} ?>
Cod. factura
echo $cfactura; ?>
Fecha factura
echo $fecha; ?>
Tipo de IVA
echo $iva0; ?>%
if ($ini=="1") {
if (!empty($codigo)) {
$familia = substr($codigo,0,2);
$subfamilia = substr($codigo,2,2);
$codigoarticulo = substr($codigo,4,2);
$consulta2 = "select * from articulos where
codfamilia='$familia' and codsubfamilia='$subfamilia' and codigo='$codigoarticulo'";
$resultado2 = mysql_query($consulta2, $conexion);
$filas=mysql_num_rows($resultado2);
$mal=0;
if ($filas>0) {
$lafila2=mysql_fetch_array($resultado2);
if ((!preg_match("/^[0-9]*(.[0-9]{0,4})?$/", $costo)) or ($costo==0)) {
$mensajeerror="Error, precio de costo incorrecto. "; $mal=1;
}
if ((!preg_match("/^[0-9]*(.[0-9]{0,4})?$/", $cantidad)) or ($cantidad==0)) {
$mensajeerror=$mensajeerror. "Error, cantidad incorrecta. "; $mal=1;
}
if ((!preg_match("/^[0-9]*(.[0-9]{0,4})?$/", $dcto))) {
$mensajeerror=$mensajeerror. "Error, descuento incorrecto. "; $mal=1;
} ?>
print $mensajeerror; ?>
if ($mal==0) {
$cantidad = str_replace(",",".",$cantidad);
$costo = str_replace(",",".",$costo);
$costo=sprintf("%01.2f",$costo);
$dcto = str_replace(",",".",$dcto);
$dcto=sprintf("%01.2f",$dcto);
$dcto0=$dcto/100;
$costo2=$costo-($costo*$dcto0);
$importe=$costo*$cantidad;
$dcto0=$importe*$dcto0;
$importe=$importe-$dcto0;
$importe=sprintf("%01.2f",$importe);
$descrip=$lafila2["descripcion"];
$consulta1 = "INSERT INTO `factulineaptmp` ( `codfactura` , `codfamilia` , `codsubfamilia` , `codigo` , `cantidad` , `precio` , `importe` , `dcto`)
VALUES ('$codigofac', '$familia' , '$subfamilia' , '$codigoarticulo' , '$cantidad' , '$costo' , '$importe' , '$dcto' )";
$resultado1 = mysql_query($consulta1, $conexion);
$codid=$lafila2["id"];
$consulta110="select * from artprotmp where idproveedor='$codcli' and idarticulo='$codid' and codfact='$codigofac'";
$resultado110 = mysql_query($consulta110, $conexion);
$filas110=mysql_num_rows($resultado110);
if ($filas110>0) {
$consulta11 = "UPDATE `artprotmp` SET `precio` = '$costo2' WHERE `idproveedor` = '$codcli' and `idarticulo`='$codid' and codfact='$codigofac'" ;
$resultado11 = mysql_query($consulta11, $conexion);
} else {
$consulta11 = "INSERT INTO `artprotmp` ( `idarticulo` , `idproveedor` , `codfact` , `precio` )
VALUES ('$codid', '$codcli', '$codigofac' , '$costo2')";
$resultado11 = mysql_query($consulta11, $conexion);
}
}
}
}
}
if ($ini=="2") {
if (!empty($codigoa)) {
$familia = "a";
$subfamilia = "a";
$codigoarticulo = $codigoa;
$consulta2 = "select * from albalineap where codalbaran='$codigoa' and codproveedor='$codcli'";
$resultado2 = mysql_query($consulta2, $conexion);
$importe=0;
while ($lafila2=mysql_fetch_array($resultado2)) {
$importe=$importe+$lafila2["importe"];
}
$lafila2=mysql_fetch_array($resultado2);
$cantidad=1;
$precio=$importe;
$consulta10="select * from albaranesp where codalbaran='$codigoa' and codproveedor='$codcli'";
$resultado10 = mysql_query($consulta10);
$filas20=mysql_num_rows($resultado10);
if ($filas20<>0) {
$consulta1="select * from factulineaptmp where codfactura='$codigofac' and codfamilia='a' and codsubfamilia='a' and codigo='$codigoarticulo'";
$resultado1 = mysql_query($consulta1);
$filas2=mysql_num_rows($resultado1);
if ($filas2==0) {
$lafila1=mysql_fetch_array($resultado10);
$precio=sprintf("%01.2f",$precio);
$importe=$precio;
$consulta1 = "INSERT INTO `factulineaptmp` ( `codfactura` , `codfamilia` , `codsubfamilia` , `codigo` , `cantidad` , `precio` , `importe` , `dcto` )
VALUES ('$codigofac', '$familia' , '$subfamilia' , '$codigoarticulo' , '$cantidad' , '$precio' , '$importe' , '0' )";
$resultado1 = mysql_query($consulta1, $conexion);
}
else { $errores=$errores."El albarán ya está insertado en la factura."; }
} } }
$consulta5 = "select * from factulineaptmp where codfactura='$codigofac'";
$resultado5 = mysql_query($consulta5, $conexion);
?>
Código
Descripción
Cantidad
Precio
Dcto
Importe
Eliminar
while ($lafila5=mysql_fetch_array($resultado5)) { ?>