diff --git a/Ventas/Ventas.aspx.vb b/Ventas/Ventas.aspx.vb
index 861a5605a..1fd6493b8 100644
--- a/Ventas/Ventas.aspx.vb
+++ b/Ventas/Ventas.aspx.vb
@@ -11175,7 +11175,7 @@ Partial Class Ventas
                         CveConceptoAlmacen = 18
                     End If
 
-                    Dim CveAlmacen = ddlAlmacen.SelectedValue.ToEnteroca
+                    Dim CveAlmacen = ddlAlmacen.SelectedValue.ToEntero()
                     Dim CveMovimientoInventario As Integer = ObjInventario.AddMovimiento(CveAlmacen, CveConceptoAlmacen, factura.CveMoneda, factura.Fecha, -1, factura.CveUsuario, factura.CveEmpresa, -1, factura.CveVenta, -1, -1, Modulo:="Vta/E1")
 
                     If CveMovimientoInventario <= 0 Then
@@ -14499,13 +14499,13 @@ Partial Class Ventas
                 Dim RowPorcentaje = DtPorcentajeMarcas.FiltroPrimero($"CveMarca={DrPS("CveMarca").ToString()}")
                 'REALIZA LOS DESCUENTOS DE ACUERDO AL PORCENTAJE POR MARCA
                 If RowPorcentaje IsNot Nothing Then
-                    'LIMPIAR LOS DESCUENTOS
-                    Descuento = 0
+                    '(AHORA LOS DESCUENTOS SON ACUMULABLES)
+                    'Descuento = 0
                     Dim PorcentajeProducto = RowPorcentaje("PorcentajeProducto").ToString().ToDecimal() / 100D
                     Dim PorcentajeProducto2 = RowPorcentaje("PorcentajeProducto2").ToString().ToDecimal() / 100D
                     Dim PorcentajeProducto3 = RowPorcentaje("PorcentajeProducto3").ToString().ToDecimal() / 100D
 
-                    Dim TotalInicial As Decimal = (Cantidad * (PU)) - Descuento
+                    Dim TotalInicial As Decimal = (Cantidad * (PU)) '- Descuento
                     Dim TotalFinal = TotalInicial
                     'SI APLICA EL PRIMER DESCUENTO
                     If PorcentajeProducto > 0 Then
@@ -14531,7 +14531,9 @@ Partial Class Ventas
                         TotalFinal = TotalInicial
                     End If
 
-                    Descuento += ((Cantidad * PU) - TotalFinal)
+                    If PorcentajeProducto > 0 Then
+                        Descuento += ((Cantidad * PU) - TotalFinal)
+                    End If
 
                 End If
             End If