1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
|
<?
/*
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
*/
?>
<html>
<head>
<title>Galopin v1.0</title>
<link href="estilo.css" rel="stylesheet" type="text/css">
</head>
<body>
<?
$fecha=conversion($fecha);
$fechacobro=conversion($fechacobro);
$consulta = "INSERT INTO `albaranes` ( `codfactura` , `fecha` , `iva` , `codcliente` , `anyo` , `observaciones` )
VALUES ( '0' , '$fecha', '$iva0' , '$codcli' , '$a' , '$observaciones' )";
$resultado = mysql_query($consulta, $conexion);
$consulta="select max(codalbaran) as codalb from albaranes";
$resultado = mysql_query($consulta, $conexion);
$lafila=mysql_fetch_array($resultado);
$codalb=$lafila["codalb"];
$consulta1 = "UPDATE `partes` SET codalbaran='$codalb' where codparte='$codparte'";
$resultado1 = mysql_query($consulta1, $conexion);
$consulta2="select * from partelinea where codparte='$codparte'";
$resultado2 = mysql_query($consulta2, $conexion);
$importe=0;
while ($lafila2=mysql_fetch_array($resultado2)) {
$importe=$lafila2["importe"]+$importe;
$familia=$lafila2["codfamilia"];
$subfamilia=$lafila2["codsubfamilia"];
$codigoarticulo=$lafila2["codigo"];
$consulta4 = "select * from articulos where codfamilia='$familia' and codsubfamilia='$subfamilia' and codigo='$codigoarticulo'";
$resultado4= mysql_query($consulta4, $conexion);
$lafila4=mysql_fetch_array($resultado4);
}
$consulta3="insert into `albalinea` ( `codalbaran` , `codfamilia` , `codsubfamilia` , `codigo` , `cantidad` , `precio` , `importe` , `dcto` )
values ('$codalb', 'p' , 'p' , '$codparte' , '1' , '$importe' , '$importe' , 0 )";
$resultado3 = mysql_query($consulta3, $conexion);
//
//mostramos el mensaje de errores
//
$loguito="logomensaje.jpg";
$cabecera="partes.jpg";
$texto="Albarán guardado con éxito.";
$actionimp="imprimir_albaran.php";
$namevar="codalbaran";
$valuevar=$codalb;
$valueimp="Imprimir Albarán";
$actionv="partes.php";
$valuev="Gestión de partes";
include ("mensaje.php");
@mysql_free_result($resultado);
@mysql_free_result($resultado1);
@mysql_free_result($resultado2);
@mysql_free_result($resultado3);
@mysql_free_result($resultado4); ?>
</body>
</html>
|
