diff --git a/Ventas/Ventas.aspx.vb b/Ventas/Ventas.aspx.vb
index 9e23c5112..9508b8103 100644
--- a/Ventas/Ventas.aspx.vb
+++ b/Ventas/Ventas.aspx.vb
@@ -26934,7 +26934,10 @@ Partial Class Ventas
                     If ObjVentas.GetAutorizacionLimite(UsuarioActual.CveEmpresa, CveCliente, -1, "Egs", CveEstatus:=1) Then
                         Dim RowAutorizacion As DataRow = ObjVentas.DtResultados.FiltroPrimero($"CveVenta IS NULL ", Orderby:="TipoAutorizacion")
                         If RowAutorizacion IsNot Nothing Then
-                            Verificacion = True
+                            Dim ImporteAutorizacion As Decimal = RowAutorizacion("Importe").ToString().ToDecimal()
+                            If ImporteAutorizacion > TxtTotalGv.Text.ToDecimal Then
+                                Verificacion = True
+                            End If
                         End If
                     End If
                     ObjVentas.Dispose()