Tecistel/Tecsitel_FactuGES2
0
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

uUsuariosController: abrir la tabla de UsuarioActivo antes de devolverla.

Browse Source 
git-svn-id: https://192.168.0.254/svn/Proyectos.Tecsitel_FactuGES2/trunk@236 0c75b7a4-871f-7646-8a2f-f78d34cc349f
This commit is contained in:
David Arranz 2008-01-15 19:12:44 +00:00
parent bea34d6306
commit 1881460cc0
1 changed files with 4 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
Source/ApplicationBase/Usuarios/Controller/uUsuariosController.pas
View File

@ -488,6 +488,10 @@ function TUsuariosController.GetCurrentUser: IBizUsuario;
begin begin
if not Assigned(FCurrentUser) or (FCurrentUser.ID <> FUserControl.CurrentUser.UserID) then if not Assigned(FCurrentUser) or (FCurrentUser.ID <> FUserControl.CurrentUser.UserID) then
FCurrentUser := BuscarUsuario(FUserControl.CurrentUser.UserID); FCurrentUser := BuscarUsuario(FUserControl.CurrentUser.UserID);
if not FCurrentUser.Active then
FCurrentUser.Active := True;
Result := FCurrentUser; Result := FCurrentUser;
end; end;