diff --git a/App_Code/Modelos.vb b/App_Code/Modelos.vb
index be8c5a86e..e4f5db821 100644
--- a/App_Code/Modelos.vb
+++ b/App_Code/Modelos.vb
@@ -4615,7 +4615,7 @@ Namespace Modelos
             '1 NORMAL, 2 CON PAGOS
             Dim ModalidadRefacturacion As Integer = UsuarioActual.Empresa.Funcionalidad(586).ToEntero()
 
-            If CveUsuario = 1719 Then
+            If UsuarioActual.CveUsuario = 1719 Then
                 ModalidadRefacturacion = 2
             End If