-

Ventas/Ventas.aspx.vb

@@ -8260,7 +8260,7 @@ Partial Class Ventas
                                 For Each Row As DataRow In DtMovDetalles.Rows
                                     Dim Cantidad As Decimal = Row("Cantidad").ToString().ToDecimal()
                                     Dim SaldoAlmacen As Decimal = Row("SaldoAlmacen").ToString().ToDecimal()
-                                    Cantidad += Cantidad
+                                    CantidadTotal += Cantidad
 
                                     If SaldoAlmacen < 0 AndAlso Cantidad = Math.Abs(SaldoAlmacen) Then
                                         TotalSalida += Math.Abs(SaldoAlmacen)
@@ -8271,7 +8271,7 @@ Partial Class Ventas
                                 Next
 
                                 'SI SE VERIFICA QUE TODO ESTA SURTIDO, SE MARCA TODA LA FACTURA
-                                If CantidadTotal = Total Then
+                                If CantidadTotal = TotalSalida Then
                                     If Not ObjInventario.ActualizarEsDevolucionVenta(ObjFactura.CveVenta, 2) Then
                                         ErrorList.Add("No se pudo Cancelar el movimiento de almacen de la Factura")
                                     End If
@@ -19968,6 +19968,9 @@ Partial Class Ventas
                         sb.Append("Está seguro de cancelar el documento para realizar la refacturación?.")
                     End If
                 Else
+                    If Not UsuarioActual.Empresa.FacturaProduccion Then
+                        script = "BtnRefacturacionConfirmar();"
+                    End If
                     sb.Append("<b>No encontrado</b> <br/>")
                 End If
             Else