Table of Content
HAL Forum
procedure LogOutUser (
integer WinNr,boolean OpenLogin)
Description:
Logs out current user. Used with touch-screen interface.
Parameters:
WinNr The window from where the user was logging off.
OpenLogin Determines if new log-in window should be opened or not.
global
updating procedure IVCashDClassTouchScreenButtonLogin()
begin  
  Integer wn;

  if (UserCanAction("AllowNPTSIVLogout",true)) then begin
    wn = CurWindow;
    DeselectWIndow(wn,true);
    switch (WindowState(wn)) begin
      case Rs_normal:
        SaveOpenedWindows;
        LogoutUser(wn,true);
      otherwise
        SaveOpenedWindows;
        LogoutUser(wn,true);
    end;
  end;
  return;
end;
Related topics:
««