From 3cf78ec01bd252faef470f0a9b297b5f140807b1 Mon Sep 17 00:00:00 2001 From: rrene Date: Fri, 12 Apr 2024 20:36:10 -0700 Subject: [PATCH] - --- Ashx/SIGPolizaVirtual.ashx | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/Ashx/SIGPolizaVirtual.ashx b/Ashx/SIGPolizaVirtual.ashx index f0d8daa67..73c700dde 100644 --- a/Ashx/SIGPolizaVirtual.ashx +++ b/Ashx/SIGPolizaVirtual.ashx @@ -31,7 +31,7 @@ Public Class SIGPolizaVirtual : Implements IHttpHandler, IRequiresSessionState If ObjUsuarios.DtResultados.Rows.Count > 0 Then Dim Usuario = ObjUsuarios.DtResultados.Rows(0)("Usuario").ToString() Dim Contrasenia = 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