From 1d3adcec7f96ef605561c89e97e5021e7f9c1f8a Mon Sep 17 00:00:00 2001 From: rrene Date: Sat, 13 Apr 2024 08:56:51 -0700 Subject: [PATCH] -- cambios acceso --- Compras/PopUpVerFactura.aspx.vb | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/Compras/PopUpVerFactura.aspx.vb b/Compras/PopUpVerFactura.aspx.vb index 519938730..8dde8f4c4 100644 --- a/Compras/PopUpVerFactura.aspx.vb +++ b/Compras/PopUpVerFactura.aspx.vb @@ -1173,7 +1173,7 @@ Partial Class PopUpVerFactura If ObjUsuarios.DtResultados.Rows.Count > 0 Then Dim Usuario As String = ObjUsuarios.DtResultados.Rows(0)("Usuario").ToString() Dim Contrasenia As String = ObjUsuarios.DtResultados.Rows(0)("Contraseña").ToString() - UsuarioToken = ObjUsuarios.ValidaUsuario(Usuario, Contrasenia, IMEI, CveEmpresa) + UsuarioToken = ObjUsuarios.ValidaUsuario(Usuario, Contrasenia, CveEmpresa:=CveEmpresa) UsuarioToken.CveEmpresa = CveEmpresa CreaObjetoEmpresa(UsuarioToken) End If