Ejemplo n.º 1
0
 /////////////////////////
 //// Ajustamos inventarios en caso de ser venta de productos
 ///////////////////////////////////////////////////////////
 if ($DatosCotizacion["TipoItem"] == "PR") {
     $InfoProducto = mysql_query("SELECT * FROM `productosventa` WHERE Referencia= '{$DatosCotizacion['Referencia']}' ", $con) or die("Problemas al consultar los datos en clientes");
     $InfoProducto = mysql_fetch_array($InfoProducto);
     $idProducto = $InfoProducto['idProductosVenta'];
     if ($idProducto > 0) {
         ///////////////////////////Registro el movimiento de SALIDA DE LA VENTA de los productos al Kardex
         $Movimiento = "SALIDA";
         $Detalle = "DEVOLUCION";
         $idDocumento = $idFacturas;
         $Cantidad = $DatosCotizacion["Cantidad"] * -1;
         $ValorUnitario = $tabla->CalculeValorUnitario("kardexmercancias", "ProductosVenta_idProductosVenta", $idProducto);
         $ValorTotalSalidas = $Cantidad * $ValorUnitario * -1;
         $tabla->RegistrarKardex("kardexmercancias", "ProductosVenta_idProductosVenta", $fecha, $Movimiento, $Detalle, $idDocumento, $Cantidad, $ValorUnitario, $ValorTotalSalidas, $idProducto);
         ///////////////////////////Registro el movimiento de SALDOS DESPUES DE LA VENTA de los productos al Kardex
         $Movimiento = "SALDOS";
         $CantidadSaldo = $tabla->DevuelveSaldoProducto("kardexmercancias", "idKardexMercancias", "ProductosVenta_idProductosVenta", $idProducto);
         $NuevoSaldo = $CantidadSaldo - $Cantidad * -1;
         $ValorTotal = $NuevoSaldo * $ValorUnitario;
         $tabla->RegistrarKardex("kardexmercancias", "ProductosVenta_idProductosVenta", $fecha, $Movimiento, $Detalle, $idDocumento, $NuevoSaldo, $ValorUnitario, $ValorTotal, $idProducto);
         ///////////////////////Registramos costo de mercancia
         $CuentaPUC = 6135;
         //6135   costo de mercancia vendida
         $tabla->NombresColumnas("cuentas");
         $DatosCuenta = $tabla->DevuelveValores($CuentaPUC);
         $NombreCuenta = $DatosCuenta["Nombre"];
         $Valores[15] = $CuentaPUC;
         $Valores[16] = $NombreCuenta;
         $Valores[18] = 0;