SetCompany() results in multiple logged in users
Aldevinas Katkus
12-13-22
Operating system: Windows
Is it a feature or a bug?

I used to invoke an import procedure from Technics>>Settings>>Timed operations, HAL routine and, suddenly, after changing non-related hal files the SetCompany(compnr,false) started to result in multiple logged in users (of the same user, who logged in first from a client) prohibiting other users to log in into single user companies.
I solved it with
if (ServerMode) then begin
SomeImportIn;
end;

and checking if DirExists() in the SomeImportIn(), because on the client PC import directory does not exist.
I suspect if FileNameFromFolder(nonexistingpath,"") below fails, then ResetCompany() is not executed and we have a user logged in into the company, even though SetCompany(tocompany,false) shouldn't affect logged in users count.
The most interesting part is that it worked for years and I haven't touched that SomeImportIn().

curcomp = CurrentCompany;
if (SetCompany(tocompany,false)) then begin
filename = FileNameFromFolder(nonexistingpath,"");

ResetCompany(curcomp);
end else begin

ResetCompany(curcomp);
end;
Leave Comment
You can subscribe to notifications for this post by selecting the 'star' icon on the top right corner of the post.
Latest Posts
Carolina Valentino
are the activity set as Hansamanuals said? https://www.hansamanuals.com/main/mailnumber___62526/theconf___231/manuals/version___20250224/langcode___es/hwconvindex.htm?shortcode=HW0301SETTINGS_Order...
17:20 4 Apr 2025
Paul Timms
SendWebRequest3 is a boolean function, so if this returns true and the reply header has an accepted status, you can assume that the data was sent successfully and perform some actions on the record th...
11:12 4 Apr 2025