diff --git a/Ventas/Ventas.aspx.vb b/Ventas/Ventas.aspx.vb
index f1a2176db..71af12c8d 100644
--- a/Ventas/Ventas.aspx.vb
+++ b/Ventas/Ventas.aspx.vb
@@ -13146,6 +13146,9 @@ Partial Class Ventas
             End If
 
             Dim ModalidadRefacturacion As Integer = UsuarioActual.Empresa.Funcionalidad(586).ToEntero()
+            If UsuarioActual.CveUsuario.Contiene(100, 1719) Then
+                ModalidadRefacturacion = 2
+            End If
 
             'REFACTURACION CON PAGOS, DEBE CANCELAR SALDOS DEL DOCUMENTO ANTERIOR Y TRASPASAR PAGOS AL NUEVO
             If ModalidadRefacturacion = 2 AndAlso ObjFactura.TipoDocto.Contiene("Ing", "Ant") AndAlso ObjFactura.NuevaFactura = 1 Then