AppStd/RecordOrganizer
8
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

MS Diverse Verbesserungen beim laden , NOLOCK etc

Browse Source
This commit is contained in:
Developer01
2026-04-30 16:15:00 +02:00
parent 08c6a6c125
commit 11147ca0ff
20 changed files with 311 additions and 202 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
app/DD-Record-Organizer/frmMain.vb
View File

@@ -147,9 +147,11 @@ Public Class frmMain
Try
Dim oSQL As String = ""
If SQL_LIC_NAMED_USER <> "" Then
LOGGER.Debug("Using SQL for Named User License: " & SQL_LIC_NAMED_USER)
oSQL = SQL_LIC_NAMED_USER
Else
oSQL = String.Format("SELECT COUNT(*) AS Expr1 FROM TBDD_USER_MODULE_LOG_IN WHERE UPPER(MODULE) = UPPER('Record-Organizer') AND CLIENT_ID = {0}", CLIENT_SELECTED)
LOGGER.Debug("Using default SQL for License-Check")
oSQL = String.Format("SELECT COUNT(*) AS Expr1 FROM TBDD_USER_MODULE_LOG_IN WHERE MODULE = 'Record-Organizer' AND CLIENT_ID = {0}", CLIENT_SELECTED)
End If
Dim anzahl = MYDB_ECM.GetScalarValue(oSQL)
LICENSES_USED = CInt(anzahl)
@@ -1036,7 +1038,7 @@ Public Class frmMain
LOGGER.Debug("Closing frmMain - Now logging out...")
Try
WMMOD.Session.Logout()
LOGGER.Debug("WINDREAM_MOD Session logg ed out successfully.")
LOGGER.Debug("WINDREAM_MOD Session logged out successfully.")
Catch ex As Exception
LOGGER.Warn("Error while logging out WINDREAM_MOD Session: {0}", ex.Message)