/*
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");
include ("convertirfechas2.php");
if ($ini5=="0") {
$consulta3 = "Select max(codalbaran) as maximo from albaranesptmp";
$resultado3 = mysql_query($consulta3, $conexion);
$lafila3=mysql_fetch_array($resultado3);
if (empty($lafila3["maximo"])) { $codigoalb=0; }
else { $codigoalb=$lafila3["maximo"]; }
$codigoalb++;
$fe="0000-00-00";
$ob="nada";
$consulta3="INSERT INTO `albaranesptmp` (`codalbaran` , `codfactura` , `fecha` , `iva` , `codproveedor` , `anyo` , `observaciones` )
VALUES ('$codigoalb', '0' , '$fe' , '0' , '0' , '0' , '$ob' )";
$consulta3=mysql_query($consulta3, $conexion);
$consulta= "delete from albalineaptmp where codalbaran='$codigoalb'";
$consulta=mysql_query($consulta, $conexion);
$consulta= "delete from artprotmp where idproveedor='$codcli' and codalb='$codigoalb'";
$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 albalineaptmp where codalbaran='$codigoalb' and numlinea='$numlinea'";
$resultado8 = mysql_query($consulta8, $conexion);
} ?>
Cod. albarán
echo $codigoalbaran; ?>
Fecha albarán
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) { ?>
print "Error, código de artículo incorrecto"; ?>
}
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 `albalineaptmp` ( `codalbaran` , `codfamilia` , `codsubfamilia` , `codigo` , `cantidad` , `precio` , `importe` , `dcto` )
VALUES ('$codigoalb', '$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 codalb='$codigoalb'";
$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 codalb='$codigoalb'" ;
$resultado11 = mysql_query($consulta11, $conexion);
} else {
$consulta11 = "INSERT INTO `artprotmp` ( `idarticulo` , `idproveedor` , `codalb` , `precio` )
VALUES ('$codid', '$codcli', '$codigoalb' , '$costo2')";
$resultado11 = mysql_query($consulta11, $conexion);
}
} } }
$consulta5 = "select * from albalineaptmp where codalbaran='$codigoalb'";
$resultado5 = mysql_query($consulta5, $conexion);
?>
Código
Descripción
Cantidad
Precio
Dcto
Importe
Eliminar
while ($lafila5=mysql_fetch_array($resultado5)) { ?>
$consulta6 = "select * from articulos where codfamilia='$familia' and codsubfamilia='$subfamilia' and codigo='$codigoarticulo'";
$resultado6 = mysql_query($consulta6, $conexion);
$lafila6=mysql_fetch_array($resultado6); ?>
$consulta7 = "select codalbaran, sum(importe) as total from albalineaptmp where codalbaran='$codigoalb' group by codalbaran";
$resultado7 = mysql_query($consulta7, $conexion);
$lafila7=mysql_fetch_array($resultado7);
$bi=sprintf("%01.2f",$lafila7["total"]);
$ac=$iva0/100;
$iva=$bi*$ac;
$iva=sprintf("%01.2f",$iva);
$tot=$lafila7["total"]+$iva;
$tot=sprintf("%01.2f",$tot); ?>