MS Diverse Verbesserungen beim laden , NOLOCK etc

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

View File

@@ -141,7 +141,7 @@ Public Class ClassDocGrid
For Each oRowHandle In oSelectedRows For Each oRowHandle In oSelectedRows
Dim oDocId = pGridView.GetRowCellValue(oRowHandle, "DocID") Dim oDocId = pGridView.GetRowCellValue(oRowHandle, "DocID")
Dim oSQL = $"Select * FROM TBPMO_DOCRESULT_LIST where DocID = {oDocId}" Dim oSQL = $"Select * FROM TBPMO_DOCRESULT_LIST WITH (NOLOCK) where DocID = {oDocId}"
Dim oDTRow As DataTable = MYDB_ECM.GetDatatable(oSQL) Dim oDTRow As DataTable = MYDB_ECM.GetDatatable(oSQL)
Dim odwParentID = oDTRow.Rows(0).Item("dwParentID") Dim odwParentID = oDTRow.Rows(0).Item("dwParentID")

View File

@@ -42,7 +42,7 @@ Public Class ClassFileResult
End Function End Function
Public Shared Function GET_DATATABLE_INDICES_PMO() Public Shared Function GET_DATATABLE_INDICES_PMO()
Try Try
Dim sql = String.Format("SELECT * FROM TBPMO_INDEX_MAN WHERE ACTIVE = 1 AND ENTITY_ID = (SELECT CASE REDUNDANT_ENTITY WHEN 0 THEN GUID ELSE REDUNDANT_ENTITY END AS ENTITY_ID FROM TBPMO_FORM WHERE GUID = {0}) AND DOCTYPE_ID = {1}", CURRENT_ENTITY_ID, CURRENT_DOKARTID) Dim sql = String.Format("SELECT * FROM TBPMO_INDEX_MAN WITH (NOLOCK) WHERE ACTIVE = 1 AND ENTITY_ID = (SELECT CASE REDUNDANT_ENTITY WHEN 0 THEN GUID ELSE REDUNDANT_ENTITY END AS ENTITY_ID FROM TBPMO_FORM WHERE GUID = {0}) AND DOCTYPE_ID = {1}", CURRENT_ENTITY_ID, CURRENT_DOKARTID)
Dim DT As DataTable = MYDB_ECM.GetDatatable(sql) Dim DT As DataTable = MYDB_ECM.GetDatatable(sql)
LOGGER.Debug("GET_DATATABLE_INDICES_PMO: " & sql) LOGGER.Debug("GET_DATATABLE_INDICES_PMO: " & sql)
CURRENT_TBPMO_INDEX_MAN = DT CURRENT_TBPMO_INDEX_MAN = DT

View File

@@ -501,7 +501,7 @@ Public Class ClassHelper
End Function End Function
Public Shared Function GetDocrecordLinks(pRECORDID As Integer) Public Shared Function GetDocrecordLinks(pRECORDID As Integer)
Try Try
Dim oSQL = $"SELECT * FROM TBPMO_DOC_RECORD_LINK WHERE RECORD_ID = {pRECORDID}" Dim oSQL = $"SELECT * FROM TBPMO_DOC_RECORD_LINK WITH (NOLOCK) WHERE RECORD_ID = {pRECORDID}"
CURRENT_DT_TBPMO_DOC_RECORD_LINK = MYDB_ECM.GetDatatable(oSQL) CURRENT_DT_TBPMO_DOC_RECORD_LINK = MYDB_ECM.GetDatatable(oSQL)
Catch ex As Exception Catch ex As Exception
LOGGER.Warn("Unexpected Error in GetDocrecordLinks: " & ex.Message) LOGGER.Warn("Unexpected Error in GetDocrecordLinks: " & ex.Message)

View File

@@ -7,7 +7,7 @@ Public Class ClassImport_Windream
Try Try
Dim err As Boolean = False Dim err As Boolean = False
CURRENT_FILENAME = QuellDatei_Path CURRENT_FILENAME = QuellDatei_Path
Dim DT_DOCTYPE As DataTable = MYDB_ECM.GetDatatable("SELECT * FROM TBDD_DOKUMENTART WHERE GUID = " & DOCTYPE_ID) Dim DT_DOCTYPE As DataTable = MYDB_ECM.GetDatatable("SELECT * FROM TBDD_DOKUMENTART WITH (NOLOCK) WHERE GUID = " & DOCTYPE_ID)
If Not IsNothing(DT_DOCTYPE) Then If Not IsNothing(DT_DOCTYPE) Then
Dim Targetpath As String = DT_DOCTYPE.Rows(0).Item("ZIEL_PFAD") Dim Targetpath As String = DT_DOCTYPE.Rows(0).Item("ZIEL_PFAD")
Dim Dokart As String = DT_DOCTYPE.Rows(0).Item("BEZEICHNUNG") Dim Dokart As String = DT_DOCTYPE.Rows(0).Item("BEZEICHNUNG")
@@ -24,7 +24,7 @@ Public Class ClassImport_Windream
If streamresult = True Then If streamresult = True Then
Dim sql As String = String.Format("SELECT DocID FROM VWPMO_DOC_SYNC WHERE CONVERT(DATE,Change_DateTime) = CONVERT(DATE,GETDATE()) AND FULL_FILENAME = '{0}'", CURRENT_FILEIN_WD) Dim sql As String = String.Format("SELECT DocID FROM VWPMO_DOC_SYNC WHERE CONVERT(DATE,Change_DateTime) = CONVERT(DATE,GETDATE()) AND FULL_FILENAME = '{0}'", CURRENT_FILEIN_WD)
CURRENT_DOC_ID = MYDB_ECM.GetScalarValue(sql) CURRENT_DOC_ID = MYDB_ECM.GetScalarValue(sql)
sql = $"SELECT * FROM TBDD_INDEX_AUTOM WHERE DOCTYPE_ID = {DOCTYPE_ID} AND ENTITY_ID = {CURRENT_ENTITY_ID}" sql = $"SELECT * FROM TBDD_INDEX_AUTOM WITH (NOLOCK) WHERE DOCTYPE_ID = {DOCTYPE_ID} AND ENTITY_ID = {CURRENT_ENTITY_ID}"
Dim dt As DataTable = MYDB_ECM.GetDatatable(sql) Dim dt As DataTable = MYDB_ECM.GetDatatable(sql)
Dim indexierung_erfolgreich As Boolean = False Dim indexierung_erfolgreich As Boolean = False
If dt Is Nothing = False Then If dt Is Nothing = False Then
@@ -108,7 +108,7 @@ Public Class ClassImport_Windream
myLogger = LOGCONFIG.GetLogger() myLogger = LOGCONFIG.GetLogger()
Dim FILE_DELIMITER, VERSION_DELIMITER, _WDOBJECTTYPE, _NewFileString As String Dim FILE_DELIMITER, VERSION_DELIMITER, _WDOBJECTTYPE, _NewFileString As String
Dim sql As String = "select TOP 1 VERSION_DELIMITER, FILE_DELIMITER FROM TBDD_MODULES where NAME In ('fileFLOW', 'Global-Indexer')" Dim sql As String = "select TOP 1 VERSION_DELIMITER, FILE_DELIMITER FROM TBDD_MODULES WITH (NOLOCK) where NAME In ('fileFLOW', 'Global-Indexer')"
Dim DT1 As DataTable = MYDB_ECM.GetDatatable(sql) Dim DT1 As DataTable = MYDB_ECM.GetDatatable(sql)
FILE_DELIMITER = DT1.Rows(0).Item("FILE_DELIMITER") FILE_DELIMITER = DT1.Rows(0).Item("FILE_DELIMITER")
VERSION_DELIMITER = DT1.Rows(0).Item("VERSION_DELIMITER") VERSION_DELIMITER = DT1.Rows(0).Item("VERSION_DELIMITER")
@@ -116,7 +116,7 @@ Public Class ClassImport_Windream
Dim err As Boolean = False Dim err As Boolean = False
Dim oWMTARGET_FOLDER As String Dim oWMTARGET_FOLDER As String
Dim oExtension As String = Path.GetExtension(CURRENT_FILENAME) Dim oExtension As String = Path.GetExtension(CURRENT_FILENAME)
Dim oDT As DataTable = MYDB_ECM.GetDatatable("SELECT * FROM TBDD_DOKUMENTART WHERE GUID = " & DocTypeID) Dim oDT As DataTable = MYDB_ECM.GetDatatable("SELECT * FROM TBDD_DOKUMENTART WITH (NOLOCK) WHERE GUID = " & DocTypeID)
'sql_history_INSERT_INTO = "INSERT INTO TBGI_HISTORY (FILENAME_ORIGINAL,FILENAME_NEW" 'sql_history_INSERT_INTO = "INSERT INTO TBGI_HISTORY (FILENAME_ORIGINAL,FILENAME_NEW"
'sql_history_Index_Values = "" 'sql_history_Index_Values = ""
Dim AnzahlIndexe As Integer = 1 Dim AnzahlIndexe As Integer = 1
@@ -459,7 +459,7 @@ Public Class ClassImport_Windream
LOGGER.Warn("SQL-Command: " & CURRENT_LAST_SQL) LOGGER.Warn("SQL-Command: " & CURRENT_LAST_SQL)
oReturnValue = "" oReturnValue = ""
Else Else
Dim sql1 = "SELECT * FROM TBPMO_WD_NAMECONVENTION_FORMAT WHERE ID = (SELECT TOP 1 GUID FROM TBPMO_WD_FORMVIEW_DOKTYPES WHERE DOCTYPE_ID = " & pDoctypeID & " AND FORMVIEW_ID = " & CURRENT_FORMVIEW_ID & ")" Dim sql1 = "SELECT * FROM TBPMO_WD_NAMECONVENTION_FORMAT WITH (NOLOCK) WHERE ID = (SELECT TOP 1 GUID FROM TBPMO_WD_FORMVIEW_DOKTYPES WHERE DOCTYPE_ID = " & pDoctypeID & " AND FORMVIEW_ID = " & CURRENT_FORMVIEW_ID & ")"
Dim DT_FORMAT As DataTable = MYDB_ECM.GetDatatable(sql1) Dim DT_FORMAT As DataTable = MYDB_ECM.GetDatatable(sql1)
If Not IsNothing(DT_FORMAT) Then If Not IsNothing(DT_FORMAT) Then
If DT_FORMAT.Rows.Count > 0 Then If DT_FORMAT.Rows.Count > 0 Then
@@ -680,7 +680,7 @@ Public Class ClassImport_Windream
LOGGER.Warn("Variable folder should be filled with value of Control-ID '" & CONTROL_ID & "', but result was DBNULL.") LOGGER.Warn("Variable folder should be filled with value of Control-ID '" & CONTROL_ID & "', but result was DBNULL.")
LOGGER.Warn("SQL-Command: " & CURRENT_LAST_SQL) LOGGER.Warn("SQL-Command: " & CURRENT_LAST_SQL)
Else Else
Dim sql1 = "SELECT * FROM TBPMO_WD_NAMECONVENTION_FORMAT WHERE ID = (SELECT TOP 1 GUID FROM TBPMO_WD_FORMVIEW_DOKTYPES WHERE DOCTYPE_ID = " & DocTypeID & " AND FORMVIEW_ID = " & CURRENT_FORMVIEW_ID & ")" Dim sql1 = "SELECT * FROM TBPMO_WD_NAMECONVENTION_FORMAT WITH (NOLOCK) WHERE ID = (SELECT TOP 1 GUID FROM TBPMO_WD_FORMVIEW_DOKTYPES WHERE DOCTYPE_ID = " & DocTypeID & " AND FORMVIEW_ID = " & CURRENT_FORMVIEW_ID & ")"
Dim DT_FORMAT As DataTable = MYDB_ECM.GetDatatable(sql1) Dim DT_FORMAT As DataTable = MYDB_ECM.GetDatatable(sql1)
If Not IsNothing(DT_FORMAT) Then If Not IsNothing(DT_FORMAT) Then
If DT_FORMAT.Rows.Count > 0 Then If DT_FORMAT.Rows.Count > 0 Then

View File

@@ -167,7 +167,7 @@ Public Class ClassInit
Throw New Exception("Find more information in the logfile.") Throw New Exception("Find more information in the logfile.")
End If End If
Dim oSql = String.Format("SELECT * FROM TBPMO_KONFIGURATION WHERE GUID = 1") Dim oSql = String.Format("SELECT * FROM TBPMO_KONFIGURATION WITH (NOLOCK) WHERE GUID = 1")
Dim KONFIG_DT As DataTable = MYDB_ECM.GetDatatable(oSql) Dim KONFIG_DT As DataTable = MYDB_ECM.GetDatatable(oSql)
If KONFIG_DT.Rows.Count = 1 Then If KONFIG_DT.Rows.Count = 1 Then
Try Try
@@ -188,7 +188,7 @@ Public Class ClassInit
End If End If
End If End If
oSql = "SELECT * FROM TBDD_SQL_COMMANDS" oSql = "SELECT * FROM TBDD_SQL_COMMANDS WITH (NOLOCK) "
Dim oDTSQL_COMMANDS As DataTable = MYDB_ECM.GetDatatable(oSql) Dim oDTSQL_COMMANDS As DataTable = MYDB_ECM.GetDatatable(oSql)
For Each oRow As DataRow In oDTSQL_COMMANDS.Rows For Each oRow As DataRow In oDTSQL_COMMANDS.Rows
If oRow.Item("TITLE") = "ADDI_DOC_SEARCH_RECORD" Then If oRow.Item("TITLE") = "ADDI_DOC_SEARCH_RECORD" Then
@@ -206,7 +206,7 @@ Public Class ClassInit
Next Next
Try Try
oSql = "SELECT * FROM TBDD_CATALOG" oSql = "SELECT * FROM TBDD_CATALOG WITH (NOLOCK)"
Dim oDTTBDD_CATALOG As DataTable = MYDB_ECM.GetDatatable(oSql) Dim oDTTBDD_CATALOG As DataTable = MYDB_ECM.GetDatatable(oSql)
For Each oRow As DataRow In oDTTBDD_CATALOG.Rows For Each oRow As DataRow In oDTTBDD_CATALOG.Rows
If oRow.Item("CAT_TITLE") = "DDSUPPORT_PORTAL" Then If oRow.Item("CAT_TITLE") = "DDSUPPORT_PORTAL" Then
@@ -223,7 +223,7 @@ Public Class ClassInit
LOGGER.Debug("WM_RWA2 = " + WM_RWA1) LOGGER.Debug("WM_RWA2 = " + WM_RWA1)
ElseIf oRow.Item("CAT_TITLE") = "OF_FILESTORE_ENTITY" Then ElseIf oRow.Item("CAT_TITLE") = "OF_FILESTORE_ENTITY" Then
OF_FILESTORE_ENTITY = oRow.Item("CAT_STRING") OF_FILESTORE_ENTITY = oRow.Item("CAT_STRING")
Dim oSQL1 = String.Format("select A.GUID from TBPMO_FORM_CONSTRUCTOR A INNER JOIN TBPMO_FORM_CONSTRUCTOR_DETAIL B ON A.GUID = B.CONSTRUCT_ID WHERE B.FORM_ID = {0}", OF_FILESTORE_ENTITY) Dim oSQL1 = String.Format("select A.GUID from TBPMO_FORM_CONSTRUCTOR A WITH (NOLOCK) INNER JOIN TBPMO_FORM_CONSTRUCTOR_DETAIL B WITH (NOLOCK) ON A.GUID = B.CONSTRUCT_ID WHERE B.FORM_ID = {0}", OF_FILESTORE_ENTITY)
OF_FILESTORE_CONSTRUCTOR = MYDB_ECM.GetScalarValue(oSQL1) OF_FILESTORE_CONSTRUCTOR = MYDB_ECM.GetScalarValue(oSQL1)
LOGGER.Debug(String.Format("OF_FILESTORE_ENTITY = {0}", OF_FILESTORE_ENTITY.ToString)) LOGGER.Debug(String.Format("OF_FILESTORE_ENTITY = {0}", OF_FILESTORE_ENTITY.ToString))
End If End If
@@ -232,24 +232,24 @@ Public Class ClassInit
LOGGER.Error(ex) LOGGER.Error(ex)
End Try End Try
oSql = "SELECT * FROM TBPMO_CONTROL" oSql = "SELECT * FROM TBPMO_CONTROL WITH (NOLOCK)"
CURRENT_TBPMO_CONTROL = MYDB_ECM.GetDatatable(oSql) CURRENT_TBPMO_CONTROL = MYDB_ECM.GetDatatable(oSql)
oSql = "SELECT * FROM TBPMO_DOCSEARCH_RESULTLIST_CONFIG WHERE VISIBLE = 1" oSql = "SELECT * FROM TBPMO_DOCSEARCH_RESULTLIST_CONFIG WITH (NOLOCK) WHERE VISIBLE = 1"
DT_DOCSEARCH_RESULTLIST_CONFIG = MYDB_ECM.GetDatatable(oSql) DT_DOCSEARCH_RESULTLIST_CONFIG = MYDB_ECM.GetDatatable(oSql)
oSql = "SELECT * FROM TBPMO_DOCSEARCH_VARIABLE_CONTROLS" oSql = "SELECT * FROM TBPMO_DOCSEARCH_VARIABLE_CONTROLS WITH (NOLOCK)"
CURRENT_VARIABLE_CONTROLS = MYDB_ECM.GetDatatable(oSql) CURRENT_VARIABLE_CONTROLS = MYDB_ECM.GetDatatable(oSql)
oSql = "SELECT * FROM TBPMO_FORM_VIEW" oSql = "SELECT * FROM TBPMO_FORM_VIEW WITH (NOLOCK)"
CURRENT_TBPMO_FORM_VIEW = MYDB_ECM.GetDatatable(oSql) CURRENT_TBPMO_FORM_VIEW = MYDB_ECM.GetDatatable(oSql)
oSql = "select T.*, T1.HEADER_CAPTION,T1.TYPE_ID ,T1.ENTITY_ID,T1.LANGUAGE from TBPMO_DOCRESULT_DROPDOWN_ITEMS T, TBPMO_DOCSEARCH_RESULTLIST_CONFIG T1 WHERE T.CONFIG_ID = T1.GUID" oSql = "select T.*, T1.HEADER_CAPTION,T1.TYPE_ID ,T1.ENTITY_ID,T1.LANGUAGE from TBPMO_DOCRESULT_DROPDOWN_ITEMS T WITH (NOLOCK), TBPMO_DOCSEARCH_RESULTLIST_CONFIG T1 WITH (NOLOCK) WHERE T.CONFIG_ID = T1.GUID"
CURRENT_TBPMO_DOCRESULT_DROPDOWN_ITEMS = MYDB_ECM.GetDatatable(oSql) CURRENT_TBPMO_DOCRESULT_DROPDOWN_ITEMS = MYDB_ECM.GetDatatable(oSql)
oSql = "SELECT * FROM TBFILE_EXTENSION_OVERRIDE" oSql = "SELECT * FROM TBFILE_EXTENSION_OVERRIDE WITH (NOLOCK)"
CURRENT_TBFILE_EXTENSION_OVERRIDE = MYDB_ECM.GetDatatable(oSql) CURRENT_TBFILE_EXTENSION_OVERRIDE = MYDB_ECM.GetDatatable(oSql)
oSql = String.Format("select* from TBPMO_FILE_FORMATS_CHANGE") oSql = String.Format("select* from TBPMO_FILE_FORMATS_CHANGE WITH (NOLOCK)")
Dim oDTFF_CHANGE As DataTable = MYDB_ECM.GetDatatable(oSql) Dim oDTFF_CHANGE As DataTable = MYDB_ECM.GetDatatable(oSql)
For Each oRow As DataRow In oDTFF_CHANGE.Rows For Each oRow As DataRow In oDTFF_CHANGE.Rows
FILE_FORMATS_CHANGE_DURING_EDIT.Add(oRow.Item("FILE_EXT")) FILE_FORMATS_CHANGE_DURING_EDIT.Add(oRow.Item("FILE_EXT"))
Next Next
oSql = "Select Top 1 * from TBPMO_WD_OBJECTTYPE" oSql = "Select Top 1 * from TBPMO_WD_OBJECTTYPE WITH (NOLOCK)"
Dim oDTTBPMO_WD_OBJECTTYPE = MYDB_ECM.GetDatatable(oSql) Dim oDTTBPMO_WD_OBJECTTYPE = MYDB_ECM.GetDatatable(oSql)
If oDTTBPMO_WD_OBJECTTYPE.Rows.Count = 1 Then If oDTTBPMO_WD_OBJECTTYPE.Rows.Count = 1 Then
WMOBJECTTYPE = oDTTBPMO_WD_OBJECTTYPE.Rows(0).Item("OBJECT_TYPE").ToString WMOBJECTTYPE = oDTTBPMO_WD_OBJECTTYPE.Rows(0).Item("OBJECT_TYPE").ToString
@@ -302,7 +302,7 @@ Public Class ClassInit
ClassHelper.InsertEssential_Log(0, "USER-ID", String.Format("User '{0}' not listed in Userconfiguration", USER_USERNAME)) ClassHelper.InsertEssential_Log(0, "USER-ID", String.Format("User '{0}' not listed in Userconfiguration", USER_USERNAME))
Return False Return False
Else Else
DTTBPMO_SERVICE_RIGHT_CONFIG = MYDB_ECM.GetDatatable("SELECT * FROM TBPMO_SERVICE_RIGHT_CONFIG WHERE GUID = 1") DTTBPMO_SERVICE_RIGHT_CONFIG = MYDB_ECM.GetDatatable("SELECT * FROM TBPMO_SERVICE_RIGHT_CONFIG WITH (NOLOCK) WHERE GUID = 1")
WM_DOMAIN = DTTBPMO_SERVICE_RIGHT_CONFIG.Rows(0).Item("AD_DOMAIN") WM_DOMAIN = DTTBPMO_SERVICE_RIGHT_CONFIG.Rows(0).Item("AD_DOMAIN")
WM_USER = DTTBPMO_SERVICE_RIGHT_CONFIG.Rows(0).Item("AD_USER") WM_USER = DTTBPMO_SERVICE_RIGHT_CONFIG.Rows(0).Item("AD_USER")
WM_SERVER = DTTBPMO_SERVICE_RIGHT_CONFIG.Rows(0).Item("AD_SERVER") WM_SERVER = DTTBPMO_SERVICE_RIGHT_CONFIG.Rows(0).Item("AD_SERVER")
@@ -392,12 +392,12 @@ Public Class ClassInit
End If End If
'Me.Close() 'Me.Close()
oFNSQL = String.Format("select * from TBPMO_RIGHT_USER WHERE USER_ID = " & USER_GUID) oFNSQL = String.Format("select * from TBPMO_RIGHT_USER WITH (NOLOCK) WHERE USER_ID = " & USER_GUID)
CURRENT_TBPMO_RIGHT_USER = MYDB_ECM.GetDatatable(oFNSQL) CURRENT_TBPMO_RIGHT_USER = MYDB_ECM.GetDatatable(oFNSQL)
Init_CONN_SWITCH() Init_CONN_SWITCH()
DT_CLIENT_USER = MYDB_ECM.GetDatatable("SELECT T.*, T1.LICENSE_PMO, T1.CLIENT_NAME FROM TBDD_CLIENT_USER T,TBDD_CLIENT T1 WHERE T.CLIENT_ID = T1.GUID AND T.USER_ID = " & USER_GUID) DT_CLIENT_USER = MYDB_ECM.GetDatatable("SELECT T.*, T1.LICENSE_PMO, T1.CLIENT_NAME FROM TBDD_CLIENT_USER T WITH (NOLOCK), TBDD_CLIENT T1 WITH (NOLOCK) WHERE T.CLIENT_ID = T1.GUID AND T.USER_ID = " & USER_GUID)
If DT_CLIENT_USER.Rows.Count > 1 Then If DT_CLIENT_USER.Rows.Count > 1 Then
frmClientLogin.ShowDialog() frmClientLogin.ShowDialog()
ElseIf DT_CLIENT_USER.Rows.Count = 1 Then ElseIf DT_CLIENT_USER.Rows.Count = 1 Then
@@ -482,8 +482,10 @@ Public Class ClassInit
SQL_LIC_NAMED_USER = SQL_LIC_NAMED_USER.Replace("@MODULE", "Record-Organizer") SQL_LIC_NAMED_USER = SQL_LIC_NAMED_USER.Replace("@MODULE", "Record-Organizer")
SQL_LIC_NAMED_USER = SQL_LIC_NAMED_USER.Replace("@CLIENT", CLIENT_SELECTED.ToString) SQL_LIC_NAMED_USER = SQL_LIC_NAMED_USER.Replace("@CLIENT", CLIENT_SELECTED.ToString)
oFNSQL = SQL_LIC_NAMED_USER oFNSQL = SQL_LIC_NAMED_USER
LOGGER.Debug("SQL_LIC_NAMED_USER: " & SQL_LIC_NAMED_USER)
Else Else
oFNSQL = String.Format("SELECT COUNT(*) AS Expr1 FROM TBDD_USER_MODULE_LOG_IN WHERE MODULE = 'Record-Organizer' AND CLIENT_ID = {0}", CLIENT_SELECTED) oFNSQL = String.Format("SELECT COUNT(*) AS Expr1 FROM TBDD_USER_MODULE_LOG_IN WHERE MODULE = 'Record-Organizer' AND CLIENT_ID = {0}", CLIENT_SELECTED)
LOGGER.Debug("Using default SQL for License-Check: " & oFNSQL)
End If End If
Dim anzahl = MYDB_ECM.GetScalarValue(oFNSQL) Dim anzahl = MYDB_ECM.GetScalarValue(oFNSQL)

View File

@@ -4,7 +4,7 @@ Public Class ClassOfficeTemplate
Try Try
Dim sql_Template As String = "SELECT * FROM VWPMO_TEMPLATE_ENTITY WHERE TEMPLATE_ID = " & Template_ID Dim sql_Template As String = "SELECT * FROM VWPMO_TEMPLATE_ENTITY WHERE TEMPLATE_ID = " & Template_ID
Dim DT_TEMPLATE As System.Data.DataTable = MYDB_ECM.GetDatatable(sql_Template) Dim DT_TEMPLATE As System.Data.DataTable = MYDB_ECM.GetDatatable(sql_Template)
Dim sql_patterns As String = String.Format("select * from TBPMO_TEMPLATE_PATTERN where TEMPLATE_ENT_ID = (SELECT GUID FROM TBPMO_TEMPLATE_ENTITY WHERE ENTITY_ID = {0} AND TEMPLATE_ID = {1})", CURRENT_ENTITY_ID, Template_ID) Dim sql_patterns As String = String.Format("select * from TBPMO_TEMPLATE_PATTERN WITH (NOLOCK) where TEMPLATE_ENT_ID = (SELECT GUID FROM TBPMO_TEMPLATE_ENTITY WHERE ENTITY_ID = {0} AND TEMPLATE_ID = {1})", CURRENT_ENTITY_ID, Template_ID)
Dim DT_PATTERNS As System.Data.DataTable = MYDB_ECM.GetDatatable(sql_patterns) Dim DT_PATTERNS As System.Data.DataTable = MYDB_ECM.GetDatatable(sql_patterns)
If IsNothing(DT_PATTERNS) Then If IsNothing(DT_PATTERNS) Then

View File

@@ -36,9 +36,10 @@
Else Else
If DT_RIGHTS_USER Is Nothing Or DT_RIGHTS_GROUP Is Nothing Then If DT_RIGHTS_USER Is Nothing Or DT_RIGHTS_GROUP Is Nothing Then
Dim Sql As String Dim Sql As String
Sql = String.Format("select * from TBPMO_RIGHT_USER WHERE USER_ID = {0} AND ENTITY_ID = {1}", USER_GUID, ENTITY_ID) Sql = String.Format("select * from TBPMO_RIGHT_USER WITH (NOLOCK) WHERE USER_ID = {0} AND ENTITY_ID = {1}", USER_GUID, ENTITY_ID)
DT_RIGHTS_USER = MYDB_ECM.GetDatatable(sql) DT_RIGHTS_USER = MYDB_ECM.GetDatatable(sql)
Sql = String.Format("SELECT DISTINCT EDIT_REC,ADD_REC,DELETE_REC,ADD_DOC,VIEW_DOC,DELETE_DOC FROM TBPMO_RIGHT_GROUP WHERE ENTITY_ID = {0} AND GROUP_ID IN (SELECT GROUP_ID FROM TBDD_GROUPS_USER WHERE USER_ID = {1})", ENTITY_ID, USER_GUID) Sql = String.Format("SELECT DISTINCT EDIT_REC,ADD_REC,DELETE_REC,ADD_DOC,VIEW_DOC,DELETE_DOC FROM TBPMO_RIGHT_GROUP WITH (NOLOCK) WHERE ENTITY_ID = {0}
AND GROUP_ID IN (SELECT GROUP_ID FROM TBDD_GROUPS_USER WITH (NOLOCK) WHERE USER_ID = {1})", ENTITY_ID, USER_GUID)
DT_RIGHTS_GROUP = MYDB_ECM.GetDatatable(sql) DT_RIGHTS_GROUP = MYDB_ECM.GetDatatable(sql)
End If End If

View File

@@ -38,7 +38,7 @@ Public Class ClassWDRights
Try Try
MSG_RESULT = "" MSG_RESULT = ""
LOGGER.Debug(String.Format("Init ClassWDRights started - " & Now & " ...")) LOGGER.Debug(String.Format("Init ClassWDRights started - " & Now & " ..."))
Dim DT_KONFIG As DataTable = MYDB_ECM.GetDatatable("SELECT * FROM TBPMO_SERVICE_RIGHT_CONFIG WHERE GUID = 1") Dim DT_KONFIG As DataTable = MYDB_ECM.GetDatatable("SELECT * FROM TBPMO_SERVICE_RIGHT_CONFIG WITH (NOLOCK) WHERE GUID = 1")
AD_DOMAIN = DT_KONFIG.Rows(0).Item("AD_DOMAIN") AD_DOMAIN = DT_KONFIG.Rows(0).Item("AD_DOMAIN")
AD_USER = DT_KONFIG.Rows(0).Item("AD_USER") AD_USER = DT_KONFIG.Rows(0).Item("AD_USER")
WD_RIGHT_ADMIN = DT_KONFIG.Rows(0).Item("WD_RIGHT") WD_RIGHT_ADMIN = DT_KONFIG.Rows(0).Item("WD_RIGHT")

View File

@@ -48,7 +48,7 @@
Public Shared Function LoadFunction(ControlId As Integer) As DataRow Public Shared Function LoadFunction(ControlId As Integer) As DataRow
Try Try
Dim SQL As String = "SELECT * FROM TBPMO_FUNCTION_GENERAL WHERE CONTROL_ID = " & ControlId Dim SQL As String = "SELECT * FROM TBPMO_FUNCTION_GENERAL WITH (NOLOCK) WHERE CONTROL_ID = " & ControlId
Dim dt As DataTable = MYDB_ECM.GetDatatable(SQL) Dim dt As DataTable = MYDB_ECM.GetDatatable(SQL)
If dt.Rows.Count = 1 Then If dt.Rows.Count = 1 Then
@@ -64,7 +64,7 @@
Public Shared Function GETCONTROL_ID_FOR_COL_NAME(FORM_ID As Integer, Column_Name As String) Public Shared Function GETCONTROL_ID_FOR_COL_NAME(FORM_ID As Integer, Column_Name As String)
Try Try
Dim SQL As String = "SELECT GUID FROM TBPMO_CONTROL WHERE FORM_ID = " & FORM_ID & " AND COL_NAME = '" & Column_Name & "'" Dim SQL As String = "SELECT GUID FROM TBPMO_CONTROL WITH (NOLOCK) WHERE FORM_ID = " & FORM_ID & " AND COL_NAME = '" & Column_Name & "'"
Dim result = MYDB_ECM.GetScalarValue(SQL) Dim result = MYDB_ECM.GetScalarValue(SQL)
Return result Return result
Catch ex As Exception Catch ex As Exception

View File

@@ -264,64 +264,110 @@ Module ModuleHelperMethods
Public Sub OpenFormConstructor(id As Integer, NodeNav As Boolean, EntityID As Int16, Optional pJumpID As Integer = -1) Public Sub OpenFormConstructor(id As Integer, NodeNav As Boolean, EntityID As Int16, Optional pJumpID As Integer = -1)
Try Try
LOGGER.Debug($"OpenFormConstructor called: ID={id}, NodeNav={NodeNav}, EntityID={EntityID}, pJumpID={pJumpID}", False)
If pJumpID <> -1 Then If pJumpID <> -1 Then
' Wenn JUMP_RECORD_ID gesetzt wurde, wird zu diesem Record gesprungen ' Wenn JUMP_RECORD_ID gesetzt wurde, wird zu diesem Record gesprungen
JUMP_ID = pJumpID JUMP_ID = pJumpID
LOGGER.Debug($"JUMP_ID set to {pJumpID}", False)
End If End If
' Prüfen ob Form bereits in Liste der geöffneten Forms
If CURRENT_OPEN_CONSTRUCTOR_FORMS.Contains(id) Then If CURRENT_OPEN_CONSTRUCTOR_FORMS.Contains(id) Then
LOGGER.Debug($"Form ID {id} is already in CURRENT_OPEN_CONSTRUCTOR_FORMS list", False)
Dim frm1 As New frmConstructor_Main Dim frm1 As New frmConstructor_Main
frm1.Tag = id frm1.Tag = id
Dim frmCollection = System.Windows.Forms.Application.OpenForms Dim frmCollection = System.Windows.Forms.Application.OpenForms
Dim formFound As Boolean = False
LOGGER.Debug($"Searching through {frmCollection.Count} open forms", False)
For i As Int16 = 0I To frmCollection.Count - 1I For i As Int16 = 0I To frmCollection.Count - 1I
If frmCollection.Item(i).Tag = id Then If frmCollection.Item(i).Tag = id Then
formFound = True
LOGGER.Debug($"Found existing form with ID {id} at index {i}, Type: {frmCollection.Item(i).GetType().Name}", False)
frmCollection.Item(i).Activate() frmCollection.Item(i).Activate()
frmCollection.Item(i).BringToFront() frmCollection.Item(i).BringToFront()
If frmCollection.Item(i).WindowState = FormWindowState.Minimized Then If frmCollection.Item(i).WindowState = FormWindowState.Minimized Then
frmCollection.Item(i).WindowState = FormWindowState.Normal frmCollection.Item(i).WindowState = FormWindowState.Normal
LOGGER.Debug($"Restored minimized form ID {id}", False)
End If End If
CURRENT_CONSTRUCTOR_ID = id CURRENT_CONSTRUCTOR_ID = id
CURRENT_OPEN_CONSTRUCTOR_FORMS.Add(id) CURRENT_OPEN_CONSTRUCTOR_FORMS.Add(id)
If pJumpID <> -1 Then If pJumpID <> -1 Then
' Nur ausführen, wenn das Form tatsächlich JumptoNode unterstützt ' Nur ausführen, wenn das Form tatsächlich JumptoNode unterstützt
If TypeOf frmCollection.Item(i) Is frmNodeNavigation Then If TypeOf frmCollection.Item(i) Is frmNodeNavigation Then
LOGGER.Debug($"Calling JumptoNode on existing frmNodeNavigation", False)
DirectCast(frmCollection.Item(i), frmNodeNavigation).JumptoNode() DirectCast(frmCollection.Item(i), frmNodeNavigation).JumptoNode()
Else
LOGGER.Warn($"Form ID {id} does not support frmNodeNavigation.JumptoNode - Type is {frmCollection.Item(i).GetType().Name}")
End If End If
End If End If
LOGGER.Debug($"Successfully activated existing form ID {id}, exiting method", False)
Exit Sub Exit Sub
End If End If
Next i Next i
' KRITISCHER PUNKT: Form war in Liste, wurde aber nicht gefunden
If Not formFound Then
LOGGER.Warn($"Form ID {id} was in CURRENT_OPEN_CONSTRUCTOR_FORMS but not found in OpenForms collection - removing from list and continuing to create new form")
' Form aus Liste entfernen, da sie offensichtlich nicht mehr existiert
CURRENT_OPEN_CONSTRUCTOR_FORMS.Remove(id)
Else
' Form wurde gefunden und aktiviert
Exit Sub Exit Sub
End If End If
Else
LOGGER.Debug($"Form ID {id} is NOT in CURRENT_OPEN_CONSTRUCTOR_FORMS list", False)
End If
' Neue Form erstellen
CURRENT_CONSTRUCTOR_ID = id CURRENT_CONSTRUCTOR_ID = id
CURRENT_OPEN_CONSTRUCTOR_FORMS.Add(id) CURRENT_OPEN_CONSTRUCTOR_FORMS.Add(id)
LOGGER.Debug($"Set CURRENT_CONSTRUCTOR_ID={id} and added to CURRENT_OPEN_CONSTRUCTOR_FORMS", False)
If NodeNav Then If NodeNav Then
LOGGER.Debug($"Creating new frmNodeNavigation for EntityID={EntityID}, ConstructorID={CURRENT_CONSTRUCTOR_ID}", False)
Dim frmNodeNav As New frmNodeNavigation(EntityID, CURRENT_CONSTRUCTOR_ID) Dim frmNodeNav As New frmNodeNavigation(EntityID, CURRENT_CONSTRUCTOR_ID)
frmNodeNav.Tag = id frmNodeNav.Tag = id
If My.Settings.EntFormsChild = True Then If My.Settings.EntFormsChild = True Then
Dim activeChild1 As Form = MAIN_FORM.ActiveMdiChild Dim activeChild1 As Form = MAIN_FORM.ActiveMdiChild
If activeChild1 IsNot Nothing Then If activeChild1 IsNot Nothing Then
activeChild1.WindowState = FormWindowState.Normal activeChild1.WindowState = FormWindowState.Normal
LOGGER.Debug($"Normalized active MDI child: {activeChild1.GetType().Name}", False)
End If End If
End If End If
If My.Settings.EntFormsChild = True Then If My.Settings.EntFormsChild = True Then
frmNodeNav.MdiParent = MAIN_FORM frmNodeNav.MdiParent = MAIN_FORM
LOGGER.Debug($"Set frmNodeNav.MdiParent to MAIN_FORM", False)
Else
LOGGER.Debug($"frmNodeNav will open as standalone window (EntFormsChild=False)", False)
End If End If
LOGGER.Debug($"Calling frmNodeNav.Show() for ID {id}", False)
frmNodeNav.Show() frmNodeNav.Show()
LOGGER.Debug($"frmNodeNav.Show() completed successfully for ID {id}", False)
If pJumpID <> -1 Then If pJumpID <> -1 Then
LOGGER.Debug($"Calling JumptoNode on newly created frmNodeNavigation", False)
frmNodeNav.JumptoNode() frmNodeNav.JumptoNode()
End If End If
Else Else
LOGGER.Debug($"NodeNav=False - Creating frmConstructor_Main instead (should not happen based on requirements)", False)
Dim frm As New frmConstructor_Main() Dim frm As New frmConstructor_Main()
frm.Tag = id frm.Tag = id
If My.Settings.EntFormsChild = True Then If My.Settings.EntFormsChild = True Then
Dim activeChild As Form = MAIN_FORM.ActiveMdiChild Dim activeChild As Form = MAIN_FORM.ActiveMdiChild
If activeChild IsNot Nothing Then If activeChild IsNot Nothing Then
@@ -329,23 +375,23 @@ Module ModuleHelperMethods
End If End If
End If End If
If pJumpID <> -1 Then If pJumpID <> -1 Then
' Wenn JUMP_RECORD_ID gesetzt wurde, wird zu diesem Record gesprungen ' Wenn JUMP_RECORD_ID gesetzt wurde, wird zu diesem Record gesprungen
JUMP_ID = pJumpID JUMP_ID = pJumpID
End If End If
If My.Settings.EntFormsChild = True Then If My.Settings.EntFormsChild = True Then
frm.MdiParent = MAIN_FORM frm.MdiParent = MAIN_FORM
End If End If
frm.Show() frm.Show()
LOGGER.Debug($"frmConstructor_Main.Show() completed for ID {id}", False)
End If End If
LOGGER.Debug($"OpenFormConstructor completed successfully for ID {id}", False)
Catch ex As Exception Catch ex As Exception
LOGGER.Warn("Error in OpenFormConstructor: " & ex.Message) LOGGER.Warn($"Error in OpenFormConstructor for ID {id}, NodeNav={NodeNav}: {ex.Message}{vbNewLine}StackTrace: {ex.StackTrace}")
MsgBox("Error in OpenFormConstructor: " & vbNewLine & ex.Message, MsgBoxStyle.Critical) MsgBox("Error in OpenFormConstructor: " & vbNewLine & ex.Message, MsgBoxStyle.Critical)
End Try End Try
End Sub End Sub

View File

@@ -239,18 +239,6 @@
<HintPath>P:\Visual Studio Projekte\Bibliotheken\windream\Interop.WINDREAMLib.dll</HintPath> <HintPath>P:\Visual Studio Projekte\Bibliotheken\windream\Interop.WINDREAMLib.dll</HintPath>
<EmbedInteropTypes>False</EmbedInteropTypes> <EmbedInteropTypes>False</EmbedInteropTypes>
</Reference> </Reference>
<Reference Include="Interop.WMOBRWSLib">
<HintPath>P:\Visual Studio Projekte\Bibliotheken\windream\Interop.WMOBRWSLib.dll</HintPath>
<EmbedInteropTypes>True</EmbedInteropTypes>
</Reference>
<Reference Include="Interop.WMOSRCHLib">
<HintPath>P:\Visual Studio Projekte\Bibliotheken\windream\Interop.WMOSRCHLib.dll</HintPath>
<EmbedInteropTypes>True</EmbedInteropTypes>
</Reference>
<Reference Include="Interop.WMOTOOLLib">
<HintPath>P:\Visual Studio Projekte\Bibliotheken\windream\Interop.WMOTOOLLib.dll</HintPath>
<EmbedInteropTypes>True</EmbedInteropTypes>
</Reference>
<Reference Include="Mail"> <Reference Include="Mail">
<HintPath>P:\Projekte DIGITAL DATA\DIGITAL DATA - Entwicklung\DLL_Bibliotheken\Limilabs\Mail.dll</HintPath> <HintPath>P:\Projekte DIGITAL DATA\DIGITAL DATA - Entwicklung\DLL_Bibliotheken\Limilabs\Mail.dll</HintPath>
</Reference> </Reference>

View File

@@ -124,9 +124,9 @@
<data name="docCM_Showlinks.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64"> <data name="docCM_Showlinks.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value> <value>
iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO
vAAADrwBlbxySQAAAINJREFUOE9jQAbfvn37TwyGKscEIEknJye8mH4GfHj/EQWTbAAuPIRcgAsPRwO+ vAAADrwBlbxySQAAAIBJREFUOE9jYEAC3759+08MRtaDAkCSTk5OeDH9DPjw/iMKJtkAXJhoAwbeBbjw
f/+eABLEhX19ffEbABR4n5KSAlcA0rB582YwDRIHacAbjQ8ePABLgDSdPHny/5w5c8Ds5cuXg8VBYjDN cDTg+/fvCSBBXNjX1xe/Ad++fXufkpICVwDSsHnzZjANEgdpwBuNDx48AEuANJ08efL/nDlzwOzly5eD
WA2AuQDZZphimAvwGkAoDLBhqFYgYGAAAFMd0furxZnJAAAAAElFTkSuQmCC xUFiRLkA2WaYYpgL8BpAKAywYWT9AFMd0fvHl+weAAAAAElFTkSuQmCC
</value> </value>
</data> </data>
<assembly alias="DevExpress.Data.v21.2" name="DevExpress.Data.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a" /> <assembly alias="DevExpress.Data.v21.2" name="DevExpress.Data.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a" />

View File

@@ -50,11 +50,18 @@ Public Class frmDocSearchResult
.ShowFlipButton = True, .ShowFlipButton = True,
.ShowSettingButton = True .ShowSettingButton = True
}) })
' Event-Handler für Layout-Änderungen hinzufügen
AddHandler GridViewDoc_Search.ColumnPositionChanged, AddressOf GridView_LayoutChanged
AddHandler GridViewDoc_Search.ColumnWidthChanged, AddressOf GridView_LayoutChanged
AddHandler GridViewDoc_Search.Layout, AddressOf GridView_LayoutChanged
End Sub End Sub
Private Sub frmDocSearchResult_FormClosing(sender As Object, e As FormClosingEventArgs) Handles Me.FormClosing Private Sub frmDocSearchResult_FormClosing(sender As Object, e As FormClosingEventArgs) Handles Me.FormClosing
Save_DocGrid_Layout() Save_DocGrid_Layout()
End Sub End Sub
Private Sub GridView_LayoutChanged(sender As Object, e As EventArgs)
Save_DocGrid_Layout()
End Sub
Public Sub LoadDocSearch(reload As Boolean) Public Sub LoadDocSearch(reload As Boolean)
Try Try

View File

@@ -123,7 +123,7 @@
</data> </data>
<assembly alias="System.Drawing" name="System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" /> <assembly alias="System.Drawing" name="System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" />
<data name="SplitContainerMain.Location" type="System.Drawing.Point, System.Drawing"> <data name="SplitContainerMain.Location" type="System.Drawing.Point, System.Drawing">
<value>0, 248</value> <value>0, 237</value>
</data> </data>
<data name="GridControlRecords.Dock" type="System.Windows.Forms.DockStyle, System.Windows.Forms"> <data name="GridControlRecords.Dock" type="System.Windows.Forms.DockStyle, System.Windows.Forms">
<value>Fill</value> <value>Fill</value>
@@ -135,7 +135,7 @@
<value>orgFLOW-Datensätze</value> <value>orgFLOW-Datensätze</value>
</data> </data>
<data name="GridControlRecords.Size" type="System.Drawing.Size, System.Drawing"> <data name="GridControlRecords.Size" type="System.Drawing.Size, System.Drawing">
<value>616, 402</value> <value>616, 412</value>
</data> </data>
<assembly alias="mscorlib" name="mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" /> <assembly alias="mscorlib" name="mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" />
<data name="GridControlRecords.TabIndex" type="System.Int32, mscorlib"> <data name="GridControlRecords.TabIndex" type="System.Int32, mscorlib">
@@ -205,7 +205,7 @@
<value>Dateien</value> <value>Dateien</value>
</data> </data>
<data name="GridControlFiles.Size" type="System.Drawing.Size, System.Drawing"> <data name="GridControlFiles.Size" type="System.Drawing.Size, System.Drawing">
<value>841, 402</value> <value>839, 412</value>
</data> </data>
<data name="GridControlFiles.TabIndex" type="System.Int32, mscorlib"> <data name="GridControlFiles.TabIndex" type="System.Int32, mscorlib">
<value>4</value> <value>4</value>
@@ -232,7 +232,7 @@
<value>0, 0</value> <value>0, 0</value>
</data> </data>
<data name="ToolStripDokumente.Size" type="System.Drawing.Size, System.Drawing"> <data name="ToolStripDokumente.Size" type="System.Drawing.Size, System.Drawing">
<value>841, 25</value> <value>839, 25</value>
</data> </data>
<data name="ToolStripDokumente.TabIndex" type="System.Int32, mscorlib"> <data name="ToolStripDokumente.TabIndex" type="System.Int32, mscorlib">
<value>3</value> <value>3</value>
@@ -268,7 +268,7 @@
<value>1</value> <value>1</value>
</data> </data>
<data name="SplitContainerMain.Size" type="System.Drawing.Size, System.Drawing"> <data name="SplitContainerMain.Size" type="System.Drawing.Size, System.Drawing">
<value>1467, 427</value> <value>1467, 437</value>
</data> </data>
<data name="SplitContainerMain.TabIndex" type="System.Int32, mscorlib"> <data name="SplitContainerMain.TabIndex" type="System.Int32, mscorlib">
<value>8</value> <value>8</value>
@@ -442,7 +442,7 @@
<value>Top</value> <value>Top</value>
</data> </data>
<data name="Panel1.Location" type="System.Drawing.Point, System.Drawing"> <data name="Panel1.Location" type="System.Drawing.Point, System.Drawing">
<value>0, 158</value> <value>0, 147</value>
</data> </data>
<data name="Panel1.Size" type="System.Drawing.Size, System.Drawing"> <data name="Panel1.Size" type="System.Drawing.Size, System.Drawing">
<value>1467, 90</value> <value>1467, 90</value>
@@ -690,7 +690,7 @@
<data name="bbtnitmJump2Filestore.Caption" xml:space="preserve"> <data name="bbtnitmJump2Filestore.Caption" xml:space="preserve">
<value>Springe zu Filestore</value> <value>Springe zu Filestore</value>
</data> </data>
<data name="BarButtonItem1.ImageOptions.SvgImage" type="DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v21.2" mimetype="application/x-microsoft.net.object.bytearray.base64"> <data name="bbtnitmJump2Filestore.ImageOptions.SvgImage" type="DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v21.2" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value> <value>
AAEAAAD/////AQAAAAAAAAAMAgAAAFlEZXZFeHByZXNzLkRhdGEudjIxLjIsIFZlcnNpb249MjEuMi40 AAEAAAD/////AQAAAAAAAAAMAgAAAFlEZXZFeHByZXNzLkRhdGEudjIxLjIsIFZlcnNpb249MjEuMi40
LjAsIEN1bHR1cmU9bmV1dHJhbCwgUHVibGljS2V5VG9rZW49Yjg4ZDE3NTRkNzAwZTQ5YQUBAAAAHURl LjAsIEN1bHR1cmU9bmV1dHJhbCwgUHVibGljS2V5VG9rZW49Yjg4ZDE3NTRkNzAwZTQ5YQUBAAAAHURl
@@ -742,13 +742,13 @@
<value>Globale Suche</value> <value>Globale Suche</value>
</data> </data>
<data name="RibbonControl1.Size" type="System.Drawing.Size, System.Drawing"> <data name="RibbonControl1.Size" type="System.Drawing.Size, System.Drawing">
<value>1467, 158</value> <value>1467, 147</value>
</data> </data>
<data name="RibbonStatusBar1.Location" type="System.Drawing.Point, System.Drawing"> <data name="RibbonStatusBar1.Location" type="System.Drawing.Point, System.Drawing">
<value>0, 675</value> <value>0, 674</value>
</data> </data>
<data name="RibbonStatusBar1.Size" type="System.Drawing.Size, System.Drawing"> <data name="RibbonStatusBar1.Size" type="System.Drawing.Size, System.Drawing">
<value>1467, 22</value> <value>1467, 23</value>
</data> </data>
<data name="&gt;&gt;RibbonStatusBar1.Name" xml:space="preserve"> <data name="&gt;&gt;RibbonStatusBar1.Name" xml:space="preserve">
<value>RibbonStatusBar1</value> <value>RibbonStatusBar1</value>

View File

@@ -169,7 +169,6 @@ Public Class frmGlobalSearch
GridControlFiles.DataSource = DT_Files GridControlFiles.DataSource = DT_Files
tslblDocView.Text = String.Format("{0} files found", DT_Files.Rows.Count) tslblDocView.Text = String.Format("{0} files found", DT_Files.Rows.Count)
Try Try
GridViewFiles.Columns.Item("FULL_FILENAME").Visible = False
GridViewFiles.OptionsView.ColumnAutoWidth = False GridViewFiles.OptionsView.ColumnAutoWidth = False
GridViewFiles.BestFitColumns() GridViewFiles.BestFitColumns()
Catch ex As Exception Catch ex As Exception

View File

@@ -147,9 +147,11 @@ Public Class frmMain
Try Try
Dim oSQL As String = "" Dim oSQL As String = ""
If SQL_LIC_NAMED_USER <> "" Then If SQL_LIC_NAMED_USER <> "" Then
LOGGER.Debug("Using SQL for Named User License: " & SQL_LIC_NAMED_USER)
oSQL = SQL_LIC_NAMED_USER oSQL = SQL_LIC_NAMED_USER
Else 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 End If
Dim anzahl = MYDB_ECM.GetScalarValue(oSQL) Dim anzahl = MYDB_ECM.GetScalarValue(oSQL)
LICENSES_USED = CInt(anzahl) LICENSES_USED = CInt(anzahl)
@@ -1036,7 +1038,7 @@ Public Class frmMain
LOGGER.Debug("Closing frmMain - Now logging out...") LOGGER.Debug("Closing frmMain - Now logging out...")
Try Try
WMMOD.Session.Logout() WMMOD.Session.Logout()
LOGGER.Debug("WINDREAM_MOD Session logg ed out successfully.") LOGGER.Debug("WINDREAM_MOD Session logged out successfully.")
Catch ex As Exception Catch ex As Exception
LOGGER.Warn("Error while logging out WINDREAM_MOD Session: {0}", ex.Message) LOGGER.Warn("Error while logging out WINDREAM_MOD Session: {0}", ex.Message)

View File

@@ -97,9 +97,10 @@ Partial Class frmNodeNavigation
Me.DocumentViewer = New DigitalData.Controls.DocumentViewer.DocumentViewer() Me.DocumentViewer = New DigitalData.Controls.DocumentViewer.DocumentViewer()
Me.XtraSaveFileDialog1 = New DevExpress.XtraEditors.XtraSaveFileDialog(Me.components) Me.XtraSaveFileDialog1 = New DevExpress.XtraEditors.XtraSaveFileDialog(Me.components)
Me.OpenFileDialog1 = New System.Windows.Forms.OpenFileDialog() Me.OpenFileDialog1 = New System.Windows.Forms.OpenFileDialog()
Me.CMSAdmin_Treeview = New System.Windows.Forms.ContextMenuStrip(Me.components) Me.CMSTreeview = New System.Windows.Forms.ContextMenuStrip(Me.components)
Me.KnotenLöschenadminToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() Me.KnotenLöschenadminToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
Me.KnotenVerschiebenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() Me.KnotenVerschiebenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
Me.KnotenUmbenennenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
Me.PopupMenu1 = New DevExpress.XtraBars.PopupMenu(Me.components) Me.PopupMenu1 = New DevExpress.XtraBars.PopupMenu(Me.components)
Me.BarManager1 = New DevExpress.XtraBars.BarManager(Me.components) Me.BarManager1 = New DevExpress.XtraBars.BarManager(Me.components)
Me.barDockControlTop = New DevExpress.XtraBars.BarDockControl() Me.barDockControlTop = New DevExpress.XtraBars.BarDockControl()
@@ -129,7 +130,7 @@ Partial Class frmNodeNavigation
Me.PopupMenu4 = New DevExpress.XtraBars.PopupMenu(Me.components) Me.PopupMenu4 = New DevExpress.XtraBars.PopupMenu(Me.components)
Me.PopupMenu5 = New DevExpress.XtraBars.PopupMenu(Me.components) Me.PopupMenu5 = New DevExpress.XtraBars.PopupMenu(Me.components)
Me.DD_DMSDataSet1 = New DD_Record_Organizer.DD_DMSDataSet() Me.DD_DMSDataSet1 = New DD_Record_Organizer.DD_DMSDataSet()
Me.KnotenUmbenennenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() Me.KnotenUndDateienLöschenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
CType(Me.ribbonNodeNavigation, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.ribbonNodeNavigation, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.RepositoryItemTextEdit1, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.RepositoryItemTextEdit1, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.SplitContainerTreeList, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.SplitContainerTreeList, System.ComponentModel.ISupportInitialize).BeginInit()
@@ -156,7 +157,7 @@ Partial Class frmNodeNavigation
CType(Me.SplitContainerDocView.Panel2, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.SplitContainerDocView.Panel2, System.ComponentModel.ISupportInitialize).BeginInit()
Me.SplitContainerDocView.Panel2.SuspendLayout() Me.SplitContainerDocView.Panel2.SuspendLayout()
Me.SplitContainerDocView.SuspendLayout() Me.SplitContainerDocView.SuspendLayout()
Me.CMSAdmin_Treeview.SuspendLayout() Me.CMSTreeview.SuspendLayout()
CType(Me.PopupMenu1, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.PopupMenu1, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.BarManager1, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.BarManager1, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.PopupMenu2, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.PopupMenu2, System.ComponentModel.ISupportInitialize).BeginInit()
@@ -181,7 +182,7 @@ Partial Class frmNodeNavigation
Me.ribbonNodeNavigation.ShowExpandCollapseButton = DevExpress.Utils.DefaultBoolean.[True] Me.ribbonNodeNavigation.ShowExpandCollapseButton = DevExpress.Utils.DefaultBoolean.[True]
Me.ribbonNodeNavigation.ShowMoreCommandsButton = DevExpress.Utils.DefaultBoolean.[False] Me.ribbonNodeNavigation.ShowMoreCommandsButton = DevExpress.Utils.DefaultBoolean.[False]
Me.ribbonNodeNavigation.ShowToolbarCustomizeItem = False Me.ribbonNodeNavigation.ShowToolbarCustomizeItem = False
Me.ribbonNodeNavigation.Size = New System.Drawing.Size(1151, 158) Me.ribbonNodeNavigation.Size = New System.Drawing.Size(1151, 147)
Me.ribbonNodeNavigation.StatusBar = Me.RibbonStatusBar1 Me.ribbonNodeNavigation.StatusBar = Me.RibbonStatusBar1
Me.ribbonNodeNavigation.Toolbar.ShowCustomizeItem = False Me.ribbonNodeNavigation.Toolbar.ShowCustomizeItem = False
' '
@@ -392,10 +393,10 @@ Partial Class frmNodeNavigation
Me.RibbonStatusBar1.ItemLinks.Add(Me.BarStaticItemLocked) Me.RibbonStatusBar1.ItemLinks.Add(Me.BarStaticItemLocked)
Me.RibbonStatusBar1.ItemLinks.Add(Me.bsitmtInfoDoc) Me.RibbonStatusBar1.ItemLinks.Add(Me.bsitmtInfoDoc)
Me.RibbonStatusBar1.ItemLinks.Add(Me.bsiDocIDChanged) Me.RibbonStatusBar1.ItemLinks.Add(Me.bsiDocIDChanged)
Me.RibbonStatusBar1.Location = New System.Drawing.Point(0, 567) Me.RibbonStatusBar1.Location = New System.Drawing.Point(0, 566)
Me.RibbonStatusBar1.Name = "RibbonStatusBar1" Me.RibbonStatusBar1.Name = "RibbonStatusBar1"
Me.RibbonStatusBar1.Ribbon = Me.ribbonNodeNavigation Me.RibbonStatusBar1.Ribbon = Me.ribbonNodeNavigation
Me.RibbonStatusBar1.Size = New System.Drawing.Size(1151, 22) Me.RibbonStatusBar1.Size = New System.Drawing.Size(1151, 23)
' '
'RibbonPage2 'RibbonPage2
' '
@@ -417,7 +418,7 @@ Partial Class frmNodeNavigation
' '
Me.SplitContainerTreeList.Panel2.Controls.Add(Me.SplitContainerDocumentSearch) Me.SplitContainerTreeList.Panel2.Controls.Add(Me.SplitContainerDocumentSearch)
Me.SplitContainerTreeList.Panel2.Text = "Panel2" Me.SplitContainerTreeList.Panel2.Text = "Panel2"
Me.SplitContainerTreeList.Size = New System.Drawing.Size(776, 409) Me.SplitContainerTreeList.Size = New System.Drawing.Size(776, 419)
Me.SplitContainerTreeList.SplitterPosition = 229 Me.SplitContainerTreeList.SplitterPosition = 229
Me.SplitContainerTreeList.TabIndex = 2 Me.SplitContainerTreeList.TabIndex = 2
' '
@@ -459,7 +460,7 @@ Partial Class frmNodeNavigation
Me.TreeListDevexpress.OptionsView.ShowVertLines = False Me.TreeListDevexpress.OptionsView.ShowVertLines = False
Me.TreeListDevexpress.OptionsView.TreeLineStyle = DevExpress.XtraTreeList.LineStyle.Dark Me.TreeListDevexpress.OptionsView.TreeLineStyle = DevExpress.XtraTreeList.LineStyle.Dark
Me.TreeListDevexpress.ParentFieldName = "PARENT_GUID" Me.TreeListDevexpress.ParentFieldName = "PARENT_GUID"
Me.TreeListDevexpress.Size = New System.Drawing.Size(229, 409) Me.TreeListDevexpress.Size = New System.Drawing.Size(229, 419)
Me.TreeListDevexpress.StateImageList = Me.ImageCollection1 Me.TreeListDevexpress.StateImageList = Me.ImageCollection1
Me.TreeListDevexpress.TabIndex = 1 Me.TreeListDevexpress.TabIndex = 1
' '
@@ -483,7 +484,7 @@ Partial Class frmNodeNavigation
' '
Me.SplitContainerDocumentSearch.Panel2.Controls.Add(Me.GridControlDocSearch) Me.SplitContainerDocumentSearch.Panel2.Controls.Add(Me.GridControlDocSearch)
Me.SplitContainerDocumentSearch.Panel2.Text = "Panel2" Me.SplitContainerDocumentSearch.Panel2.Text = "Panel2"
Me.SplitContainerDocumentSearch.Size = New System.Drawing.Size(537, 409) Me.SplitContainerDocumentSearch.Size = New System.Drawing.Size(535, 419)
Me.SplitContainerDocumentSearch.SplitterPosition = 133 Me.SplitContainerDocumentSearch.SplitterPosition = 133
Me.SplitContainerDocumentSearch.TabIndex = 1 Me.SplitContainerDocumentSearch.TabIndex = 1
' '
@@ -494,7 +495,7 @@ Partial Class frmNodeNavigation
Me.pnlControls.Dock = System.Windows.Forms.DockStyle.Fill Me.pnlControls.Dock = System.Windows.Forms.DockStyle.Fill
Me.pnlControls.Location = New System.Drawing.Point(0, 0) Me.pnlControls.Location = New System.Drawing.Point(0, 0)
Me.pnlControls.Name = "pnlControls" Me.pnlControls.Name = "pnlControls"
Me.pnlControls.Size = New System.Drawing.Size(537, 133) Me.pnlControls.Size = New System.Drawing.Size(535, 133)
Me.pnlControls.TabIndex = 0 Me.pnlControls.TabIndex = 0
' '
'GridControlDocSearch 'GridControlDocSearch
@@ -508,7 +509,7 @@ Partial Class frmNodeNavigation
Me.GridControlDocSearch.Location = New System.Drawing.Point(0, 0) Me.GridControlDocSearch.Location = New System.Drawing.Point(0, 0)
Me.GridControlDocSearch.MainView = Me.GridViewDoc_Search Me.GridControlDocSearch.MainView = Me.GridViewDoc_Search
Me.GridControlDocSearch.Name = "GridControlDocSearch" Me.GridControlDocSearch.Name = "GridControlDocSearch"
Me.GridControlDocSearch.Size = New System.Drawing.Size(537, 266) Me.GridControlDocSearch.Size = New System.Drawing.Size(535, 274)
Me.GridControlDocSearch.TabIndex = 8 Me.GridControlDocSearch.TabIndex = 8
Me.GridControlDocSearch.TabStop = False Me.GridControlDocSearch.TabStop = False
Me.GridControlDocSearch.ViewCollection.AddRange(New DevExpress.XtraGrid.Views.Base.BaseView() {Me.GridViewDoc_Search}) Me.GridControlDocSearch.ViewCollection.AddRange(New DevExpress.XtraGrid.Views.Base.BaseView() {Me.GridViewDoc_Search})
@@ -747,7 +748,7 @@ Partial Class frmNodeNavigation
' '
Me.SplitContainerDocView.CollapsePanel = DevExpress.XtraEditors.SplitCollapsePanel.Panel2 Me.SplitContainerDocView.CollapsePanel = DevExpress.XtraEditors.SplitCollapsePanel.Panel2
Me.SplitContainerDocView.Dock = System.Windows.Forms.DockStyle.Fill Me.SplitContainerDocView.Dock = System.Windows.Forms.DockStyle.Fill
Me.SplitContainerDocView.Location = New System.Drawing.Point(0, 158) Me.SplitContainerDocView.Location = New System.Drawing.Point(0, 147)
Me.SplitContainerDocView.Name = "SplitContainerDocView" Me.SplitContainerDocView.Name = "SplitContainerDocView"
' '
'SplitContainerDocView.Panel1 'SplitContainerDocView.Panel1
@@ -759,7 +760,7 @@ Partial Class frmNodeNavigation
' '
Me.SplitContainerDocView.Panel2.Controls.Add(Me.DocumentViewer) Me.SplitContainerDocView.Panel2.Controls.Add(Me.DocumentViewer)
Me.SplitContainerDocView.Panel2.Text = "Panel2" Me.SplitContainerDocView.Panel2.Text = "Panel2"
Me.SplitContainerDocView.Size = New System.Drawing.Size(1151, 409) Me.SplitContainerDocView.Size = New System.Drawing.Size(1151, 419)
Me.SplitContainerDocView.SplitterPosition = 776 Me.SplitContainerDocView.SplitterPosition = 776
Me.SplitContainerDocView.TabIndex = 0 Me.SplitContainerDocView.TabIndex = 0
' '
@@ -770,7 +771,7 @@ Partial Class frmNodeNavigation
Me.DocumentViewer.FileLoaded = False Me.DocumentViewer.FileLoaded = False
Me.DocumentViewer.Location = New System.Drawing.Point(0, 0) Me.DocumentViewer.Location = New System.Drawing.Point(0, 0)
Me.DocumentViewer.Name = "DocumentViewer" Me.DocumentViewer.Name = "DocumentViewer"
Me.DocumentViewer.Size = New System.Drawing.Size(365, 409) Me.DocumentViewer.Size = New System.Drawing.Size(363, 419)
Me.DocumentViewer.TabIndex = 0 Me.DocumentViewer.TabIndex = 0
Me.DocumentViewer.Viewer_ForceTemporaryMode = False Me.DocumentViewer.Viewer_ForceTemporaryMode = False
' '
@@ -784,26 +785,33 @@ Partial Class frmNodeNavigation
' '
Me.OpenFileDialog1.FileName = "OpenFileDialog1" Me.OpenFileDialog1.FileName = "OpenFileDialog1"
' '
'CMSAdmin_Treeview 'CMSTreeview
' '
Me.CMSAdmin_Treeview.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.KnotenLöschenadminToolStripMenuItem, Me.KnotenVerschiebenToolStripMenuItem, Me.KnotenUmbenennenToolStripMenuItem}) Me.CMSTreeview.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.KnotenVerschiebenToolStripMenuItem, Me.KnotenUmbenennenToolStripMenuItem, Me.KnotenLöschenadminToolStripMenuItem, Me.KnotenUndDateienLöschenToolStripMenuItem})
Me.CMSAdmin_Treeview.Name = "CMSAdmin_Treeview" Me.CMSTreeview.Name = "CMSAdmin_Treeview"
Me.CMSAdmin_Treeview.Size = New System.Drawing.Size(202, 92) Me.CMSTreeview.Size = New System.Drawing.Size(228, 114)
' '
'KnotenLöschenadminToolStripMenuItem 'KnotenLöschenadminToolStripMenuItem
' '
Me.KnotenLöschenadminToolStripMenuItem.Image = Global.DD_Record_Organizer.My.Resources.Resources.delete Me.KnotenLöschenadminToolStripMenuItem.Image = Global.DD_Record_Organizer.My.Resources.Resources.delete
Me.KnotenLöschenadminToolStripMenuItem.Name = "KnotenLöschenadminToolStripMenuItem" Me.KnotenLöschenadminToolStripMenuItem.Name = "KnotenLöschenadminToolStripMenuItem"
Me.KnotenLöschenadminToolStripMenuItem.Size = New System.Drawing.Size(201, 22) Me.KnotenLöschenadminToolStripMenuItem.Size = New System.Drawing.Size(186, 22)
Me.KnotenLöschenadminToolStripMenuItem.Text = "Knoten löschen (admin)" Me.KnotenLöschenadminToolStripMenuItem.Text = "Knoten löschen"
' '
'KnotenVerschiebenToolStripMenuItem 'KnotenVerschiebenToolStripMenuItem
' '
Me.KnotenVerschiebenToolStripMenuItem.Image = Global.DD_Record_Organizer.My.Resources.Resources.table_refresh Me.KnotenVerschiebenToolStripMenuItem.Image = Global.DD_Record_Organizer.My.Resources.Resources.table_refresh
Me.KnotenVerschiebenToolStripMenuItem.Name = "KnotenVerschiebenToolStripMenuItem" Me.KnotenVerschiebenToolStripMenuItem.Name = "KnotenVerschiebenToolStripMenuItem"
Me.KnotenVerschiebenToolStripMenuItem.Size = New System.Drawing.Size(201, 22) Me.KnotenVerschiebenToolStripMenuItem.Size = New System.Drawing.Size(186, 22)
Me.KnotenVerschiebenToolStripMenuItem.Text = "Knoten verschieben" Me.KnotenVerschiebenToolStripMenuItem.Text = "Knoten verschieben"
' '
'KnotenUmbenennenToolStripMenuItem
'
Me.KnotenUmbenennenToolStripMenuItem.Image = Global.DD_Record_Organizer.My.Resources.Resources.brick
Me.KnotenUmbenennenToolStripMenuItem.Name = "KnotenUmbenennenToolStripMenuItem"
Me.KnotenUmbenennenToolStripMenuItem.Size = New System.Drawing.Size(186, 22)
Me.KnotenUmbenennenToolStripMenuItem.Text = "Knoten umbenennen"
'
'PopupMenu1 'PopupMenu1
' '
Me.PopupMenu1.Name = "PopupMenu1" Me.PopupMenu1.Name = "PopupMenu1"
@@ -1078,12 +1086,12 @@ Partial Class frmNodeNavigation
Me.DD_DMSDataSet1.DataSetName = "DD_DMSDataSet" Me.DD_DMSDataSet1.DataSetName = "DD_DMSDataSet"
Me.DD_DMSDataSet1.SchemaSerializationMode = System.Data.SchemaSerializationMode.IncludeSchema Me.DD_DMSDataSet1.SchemaSerializationMode = System.Data.SchemaSerializationMode.IncludeSchema
' '
'KnotenUmbenennenToolStripMenuItem 'KnotenUndDateienLöschenToolStripMenuItem
' '
Me.KnotenUmbenennenToolStripMenuItem.Image = Global.DD_Record_Organizer.My.Resources.Resources.brick Me.KnotenUndDateienLöschenToolStripMenuItem.Image = Global.DD_Record_Organizer.My.Resources.Resources.delete
Me.KnotenUmbenennenToolStripMenuItem.Name = "KnotenUmbenennenToolStripMenuItem" Me.KnotenUndDateienLöschenToolStripMenuItem.Name = "KnotenUndDateienLöschenToolStripMenuItem"
Me.KnotenUmbenennenToolStripMenuItem.Size = New System.Drawing.Size(201, 22) Me.KnotenUndDateienLöschenToolStripMenuItem.Size = New System.Drawing.Size(227, 22)
Me.KnotenUmbenennenToolStripMenuItem.Text = "Knoten umbenennen" Me.KnotenUndDateienLöschenToolStripMenuItem.Text = "Knoten UND Dateien löschen"
' '
'frmNodeNavigation 'frmNodeNavigation
' '
@@ -1128,7 +1136,7 @@ Partial Class frmNodeNavigation
Me.SplitContainerDocView.Panel2.ResumeLayout(False) Me.SplitContainerDocView.Panel2.ResumeLayout(False)
CType(Me.SplitContainerDocView, System.ComponentModel.ISupportInitialize).EndInit() CType(Me.SplitContainerDocView, System.ComponentModel.ISupportInitialize).EndInit()
Me.SplitContainerDocView.ResumeLayout(False) Me.SplitContainerDocView.ResumeLayout(False)
Me.CMSAdmin_Treeview.ResumeLayout(False) Me.CMSTreeview.ResumeLayout(False)
CType(Me.PopupMenu1, System.ComponentModel.ISupportInitialize).EndInit() CType(Me.PopupMenu1, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.BarManager1, System.ComponentModel.ISupportInitialize).EndInit() CType(Me.BarManager1, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.PopupMenu2, System.ComponentModel.ISupportInitialize).EndInit() CType(Me.PopupMenu2, System.ComponentModel.ISupportInitialize).EndInit()
@@ -1204,7 +1212,7 @@ Partial Class frmNodeNavigation
Friend WithEvents tsitmDMSReadOnly As DevExpress.XtraBars.BarStaticItem Friend WithEvents tsitmDMSReadOnly As DevExpress.XtraBars.BarStaticItem
Friend WithEvents XtraSaveFileDialog1 As DevExpress.XtraEditors.XtraSaveFileDialog Friend WithEvents XtraSaveFileDialog1 As DevExpress.XtraEditors.XtraSaveFileDialog
Friend WithEvents OpenFileDialog1 As OpenFileDialog Friend WithEvents OpenFileDialog1 As OpenFileDialog
Friend WithEvents CMSAdmin_Treeview As ContextMenuStrip Friend WithEvents CMSTreeview As ContextMenuStrip
Friend WithEvents KnotenLöschenadminToolStripMenuItem As ToolStripMenuItem Friend WithEvents KnotenLöschenadminToolStripMenuItem As ToolStripMenuItem
Friend WithEvents KnotenVerschiebenToolStripMenuItem As ToolStripMenuItem Friend WithEvents KnotenVerschiebenToolStripMenuItem As ToolStripMenuItem
Friend WithEvents PopupMenu1 As DevExpress.XtraBars.PopupMenu Friend WithEvents PopupMenu1 As DevExpress.XtraBars.PopupMenu
@@ -1246,4 +1254,5 @@ Partial Class frmNodeNavigation
Friend WithEvents AlleDateienAuswählenToolStripMenuItem As ToolStripMenuItem Friend WithEvents AlleDateienAuswählenToolStripMenuItem As ToolStripMenuItem
Friend WithEvents AlleDateienEntwaehlenToolStripMenuItem As ToolStripMenuItem Friend WithEvents AlleDateienEntwaehlenToolStripMenuItem As ToolStripMenuItem
Friend WithEvents KnotenUmbenennenToolStripMenuItem As ToolStripMenuItem Friend WithEvents KnotenUmbenennenToolStripMenuItem As ToolStripMenuItem
Friend WithEvents KnotenUndDateienLöschenToolStripMenuItem As ToolStripMenuItem
End Class End Class

View File

@@ -529,6 +529,12 @@
<metadata name="ImageCollection1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"> <metadata name="ImageCollection1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>17, 17</value> <value>17, 17</value>
</metadata> </metadata>
<metadata name="cmsResultFileDetail.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>483, 17</value>
</metadata>
<metadata name="ImageCollection1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>17, 17</value>
</metadata>
<assembly alias="DevExpress.Utils.v21.2" name="DevExpress.Utils.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a" /> <assembly alias="DevExpress.Utils.v21.2" name="DevExpress.Utils.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a" />
<data name="ImageCollection1.ImageStream" type="DevExpress.Utils.ImageCollectionStreamer, DevExpress.Utils.v21.2" mimetype="application/x-microsoft.net.object.bytearray.base64"> <data name="ImageCollection1.ImageStream" type="DevExpress.Utils.ImageCollectionStreamer, DevExpress.Utils.v21.2" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value> <value>
@@ -537,9 +543,6 @@
ZXZFeHByZXNzLlV0aWxzLkltYWdlQ29sbGVjdGlvblN0cmVhbWVyAAAAAAIAAAAL ZXZFeHByZXNzLlV0aWxzLkltYWdlQ29sbGVjdGlvblN0cmVhbWVyAAAAAAIAAAAL
</value> </value>
</data> </data>
<metadata name="cmsResultFileDetail.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>483, 17</value>
</metadata>
<data name="tsmiFileProperties.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64"> <data name="tsmiFileProperties.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value> <value>
iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO
@@ -767,7 +770,7 @@
<metadata name="OpenFileDialog1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"> <metadata name="OpenFileDialog1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>1101, 17</value> <value>1101, 17</value>
</metadata> </metadata>
<metadata name="CMSAdmin_Treeview.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"> <metadata name="CMSTreeview.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>1242, 17</value> <value>1242, 17</value>
</metadata> </metadata>
<metadata name="PopupMenu1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"> <metadata name="PopupMenu1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">

View File

@@ -199,11 +199,7 @@ Public Class frmNodeNavigation
' ✅ NEU: GridView Performance-Optimierung HIER initialisieren ' ✅ NEU: GridView Performance-Optimierung HIER initialisieren
ConfigureGridViewForPerformance() ConfigureGridViewForPerformance()
If USER_IS_ADMIN Then UpdateTreeviewContextMenuState()
TreeListDevexpress.ContextMenuStrip = CMSAdmin_Treeview
Else
TreeListDevexpress.ContextMenuStrip = Nothing
End If
' Hintergrund Bild initialisieren ' Hintergrund Bild initialisieren
'If (System.IO.File.Exists(Application.StartupPath + "\Resources\windream-portrait_col_RGB_Wordpress.png")) Then 'If (System.IO.File.Exists(Application.StartupPath + "\Resources\windream-portrait_col_RGB_Wordpress.png")) Then
@@ -431,9 +427,9 @@ Public Class frmNodeNavigation
$"ButtonVisible={btnCreateNewNode.Visibility}, HasAddRightForConfigNode={HasAddRightForConfigNode}, ConfigTableRows={If(IsNothing(DT_CONFIGURABLE_NODES), 0, DT_CONFIGURABLE_NODES.Rows.Count)}") $"ButtonVisible={btnCreateNewNode.Visibility}, HasAddRightForConfigNode={HasAddRightForConfigNode}, ConfigTableRows={If(IsNothing(DT_CONFIGURABLE_NODES), 0, DT_CONFIGURABLE_NODES.Rows.Count)}")
' NEUE zentrale Methode aufrufen statt direkter Manipulation
UpdateCreateNodeButtonState() UpdateCreateNodeButtonState()
UpdateTreeviewContextMenuState()
' END NEW NODE ' END NEW NODE
_NODE_ID = oGuid _NODE_ID = oGuid
@@ -487,8 +483,7 @@ Public Class frmNodeNavigation
CtrlBuilder.ControlsChanged.Clear() CtrlBuilder.ControlsChanged.Clear()
Load_DocGrid_Layout() Load_DocGrid_Layout()
'Load_Grid_Layout()
'Load_Variants_Grid_Layout()
'swAll.Done() 'swAll.Done()
Node_AfterSelect = False Node_AfterSelect = False
@@ -558,6 +553,45 @@ Public Class frmNodeNavigation
btnCreateNewNode.Enabled = False btnCreateNewNode.Enabled = False
End Try End Try
End Sub End Sub
''' <summary>
''' Aktiviert das TreeView-Kontextmenü für Admins ODER wenn konfigurierbare Knoten vorhanden sind.
''' </summary>
Private Sub UpdateTreeviewContextMenuState()
Try
NNLogger.Debug($"UpdateTreeviewContextMenuState called - " &
$"USER_IS_ADMIN={USER_IS_ADMIN}, " &
$"ConfigTableExists={Not IsNothing(DT_CONFIGURABLE_NODES)}, " &
$"ConfigTableRows={If(IsNothing(DT_CONFIGURABLE_NODES), 0, DT_CONFIGURABLE_NODES.Rows.Count)}")
Dim shouldEnableContextMenu As Boolean = False
' ✅ Bedingung 1: Admin
' ✅ Bedingung 2: Konfigurierbare Knoten vorhanden UND Benutzer hat Add-Recht
If USER_IS_ADMIN Then
shouldEnableContextMenu = True
ElseIf Not IsNothing(DT_CONFIGURABLE_NODES) AndAlso
DT_CONFIGURABLE_NODES.Rows.Count > 0 AndAlso
(HasAddRightForConfigNode = True OrElse AvailableConfigNodes.Count > 0) Then
shouldEnableContextMenu = True
End If
' Thread-sicheres Update
If Me.InvokeRequired Then
Me.Invoke(Sub()
TreeListDevexpress.ContextMenuStrip = If(shouldEnableContextMenu, CMSTreeview, Nothing)
End Sub)
Else
TreeListDevexpress.ContextMenuStrip = If(shouldEnableContextMenu, CMSTreeview, Nothing)
End If
NNLogger.Debug($"TreeView ContextMenu = {If(shouldEnableContextMenu, "ENABLED", "DISABLED")}")
Catch ex As Exception
NNLogger.Error(ex)
' Im Fehlerfall: Sicherheitshalber deaktivieren
TreeListDevexpress.ContextMenuStrip = Nothing
End Try
End Sub
Public Async Function ShowDialogAsync() As Task(Of DialogResult) Public Async Function ShowDialogAsync() As Task(Of DialogResult)
Return Await Task.Run(Function() Return Await Task.Run(Function()
Return MessageBox.Show("Der Parent-Node wird nun getauscht? Wollen Sie fortfahren?", Return MessageBox.Show("Der Parent-Node wird nun getauscht? Wollen Sie fortfahren?",
@@ -732,6 +766,8 @@ Public Class frmNodeNavigation
btnCreateNewNode.Visibility = DevExpress.XtraBars.BarItemVisibility.Always btnCreateNewNode.Visibility = DevExpress.XtraBars.BarItemVisibility.Always
' Initial-State setzen ' Initial-State setzen
UpdateCreateNodeButtonState() UpdateCreateNodeButtonState()
' ✅ NEU: Kontextmenü-Status initial setzen
UpdateTreeviewContextMenuState()
End If End If
End If End If
Catch ex As Exception Catch ex As Exception
@@ -3675,6 +3711,13 @@ Public Class frmNodeNavigation
Dim oSuccess = oNodeCreator.AddNode(_ENTITY_ID, oForm.Title, oParentNodeGuid, oForm.Id, oCreateRecord) Dim oSuccess = oNodeCreator.AddNode(_ENTITY_ID, oForm.Title, oParentNodeGuid, oForm.Id, oCreateRecord)
If oSuccess = True Then If oSuccess = True Then
If oParentNodeGuid > 0 Then
Dim oSQL = $"EXEC PRCUST_REORDER_CHILD_NODES "
MyTreeListViewState.SaveState()
oSQL += $" {_NODE_ID},0 "
MYDB_ECM.ExecuteNonQuery(oSQL)
End If
Dim oMessage As String = "Der Knoten wurde erfolgreich angelegt! Wollen Sie die Sicht jetzt neu laden? Abhängig von der Anzahl der Knoten kann dies einige Sekunden dauern." Dim oMessage As String = "Der Knoten wurde erfolgreich angelegt! Wollen Sie die Sicht jetzt neu laden? Abhängig von der Anzahl der Knoten kann dies einige Sekunden dauern."
If MsgBox(oMessage, MsgBoxStyle.Question Or MsgBoxStyle.YesNo, Text) = MsgBoxResult.Yes Then If MsgBox(oMessage, MsgBoxStyle.Question Or MsgBoxStyle.YesNo, Text) = MsgBoxResult.Yes Then
@@ -4068,4 +4111,13 @@ Public Class frmNodeNavigation
ClassHelper.MSGBOX_Handler("ERROR", "Unexpected Error", "Fehler beim Umbenennen des Knotens: ", ex.Message) ClassHelper.MSGBOX_Handler("ERROR", "Unexpected Error", "Fehler beim Umbenennen des Knotens: ", ex.Message)
End Try End Try
End Sub End Sub
Private Sub CMSTreeview_Opening(sender As Object, e As System.ComponentModel.CancelEventArgs) Handles CMSTreeview.Opening
If USER_IS_ADMIN Then
KnotenUndDateienLöschenToolStripMenuItem.Visible = True
Else
KnotenUndDateienLöschenToolStripMenuItem.Visible = False
End If
End Sub
End Class End Class

View File

@@ -159,7 +159,7 @@
<value>9, 72</value> <value>9, 72</value>
</data> </data>
<data name="ENTITY_NAMELabel.Size" type="System.Drawing.Size, System.Drawing"> <data name="ENTITY_NAMELabel.Size" type="System.Drawing.Size, System.Drawing">
<value>33, 13</value> <value>32, 13</value>
</data> </data>
<data name="ENTITY_NAMELabel.TabIndex" type="System.Int32, mscorlib"> <data name="ENTITY_NAMELabel.TabIndex" type="System.Int32, mscorlib">
<value>24</value> <value>24</value>
@@ -216,7 +216,7 @@
<value>True</value> <value>True</value>
</data> </data>
<data name="ADDED_WHOLabel.Location" type="System.Drawing.Point, System.Drawing"> <data name="ADDED_WHOLabel.Location" type="System.Drawing.Point, System.Drawing">
<value>567, 43</value> <value>708, 43</value>
</data> </data>
<data name="ADDED_WHOLabel.Size" type="System.Drawing.Size, System.Drawing"> <data name="ADDED_WHOLabel.Size" type="System.Drawing.Size, System.Drawing">
<value>64, 13</value> <value>64, 13</value>
@@ -246,10 +246,10 @@
<value>True</value> <value>True</value>
</data> </data>
<data name="CHANGED_WHOLabel.Location" type="System.Drawing.Point, System.Drawing"> <data name="CHANGED_WHOLabel.Location" type="System.Drawing.Point, System.Drawing">
<value>827, 43</value> <value>869, 43</value>
</data> </data>
<data name="CHANGED_WHOLabel.Size" type="System.Drawing.Size, System.Drawing"> <data name="CHANGED_WHOLabel.Size" type="System.Drawing.Size, System.Drawing">
<value>78, 13</value> <value>77, 13</value>
</data> </data>
<data name="CHANGED_WHOLabel.TabIndex" type="System.Int32, mscorlib"> <data name="CHANGED_WHOLabel.TabIndex" type="System.Int32, mscorlib">
<value>34</value> <value>34</value>
@@ -276,7 +276,7 @@
<value>True</value> <value>True</value>
</data> </data>
<data name="ADDED_WHENLabel.Location" type="System.Drawing.Point, System.Drawing"> <data name="ADDED_WHENLabel.Location" type="System.Drawing.Point, System.Drawing">
<value>567, 72</value> <value>708, 88</value>
</data> </data>
<data name="ADDED_WHENLabel.Size" type="System.Drawing.Size, System.Drawing"> <data name="ADDED_WHENLabel.Size" type="System.Drawing.Size, System.Drawing">
<value>74, 13</value> <value>74, 13</value>
@@ -306,10 +306,10 @@
<value>True</value> <value>True</value>
</data> </data>
<data name="CHANGED_WHENLabel.Location" type="System.Drawing.Point, System.Drawing"> <data name="CHANGED_WHENLabel.Location" type="System.Drawing.Point, System.Drawing">
<value>827, 72</value> <value>869, 88</value>
</data> </data>
<data name="CHANGED_WHENLabel.Size" type="System.Drawing.Size, System.Drawing"> <data name="CHANGED_WHENLabel.Size" type="System.Drawing.Size, System.Drawing">
<value>88, 13</value> <value>87, 13</value>
</data> </data>
<data name="CHANGED_WHENLabel.TabIndex" type="System.Int32, mscorlib"> <data name="CHANGED_WHENLabel.TabIndex" type="System.Int32, mscorlib">
<value>36</value> <value>36</value>
@@ -350,13 +350,13 @@
<data name="BindingNavigatorDeleteItem.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64"> <data name="BindingNavigatorDeleteItem.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value> <value>
iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO
vAAADrwBlbxySQAAAW9JREFUOE+1kE0ow2Ecx3dV3krt4oJaOSCTvIRkMqSxyITIzCQHDouEdnFwIOVC vAAADrwBlbxySQAAAWtJREFUOE+1kE0ow2Ecx/9X5a2UiwtKOSCTmJBMhuQlMo3IvCUHDouEXHZwIOVC
DrhIDiQl5UTiNG/z2ppafy1S2gX/uDwfY6i1v7Hie3nqeb7fz+/7/FR/Ilwn0G0Exw4fV5GJlXlEZxXC DrhIDiQl5USy07zNa2tKf2laaRf84/J8xBCetab4XL/f76fn+SnKX4DrGLqrwbHDzywkWJlHdJYjLEbY
rIet9bAQvB5Ymgn2sLYAvSZEux7RUQFzE4qQt4bCXAYjPaHvnDoCkLpsRGMB2JqCTGLIijDlwqQ9bEMV Wg8q4eYKlma+d1hbgF4TotWIaC+FuYmAktcXCksx2HrknBOHX1KbiTDngrXhW0kMdSBM2TA5Io+/wuI0
i9OIytR3EMNWcJ/BWH8A6j8/bOGFxwXNxYEvGbMQ9XnQ1/K78KfY3/VXzkMY0qFGG2H4RoLGQshJQNbG oiz5TcRwB7hPYazfLx3rDz7+gCsXNBb4v1SdgajTQ19TaOMP2NtFmPSIilSo0v1y7FHBnAdZMWi6aO51
86CNhdrsX9a/uQZTPhQl4rMY4OLofbl3aX7I8uwPC7y/g1YdjyVJuEvT8e1tfwUYteHUxCCfHChDeHmG kVCTGZoEzzWYciA/Dl9bBZwfvh3XmxIJy7PBJdx5odnAQ2E87qJUfPbtzwGjVpxJEWjH+4ElPD/BYBsY
QQvokjlOU+PbWA0x3pZnILVVI3uvQyHsbiLnqnGmRCF1NYD8pDhpRxOH7HQoAKZGkFKjceszQbpSrumX EjhKicW3sSoVb0vSUFsq0W6upUxhdxMtOxZnYhhqVz1oj3JJUZSdpCg0p0POmLKhJofjNqaDeikX3tFG
bO+G80MFwKUTxgfgcO/b8D9IpXoFiiMDHIQm0skAAAAASUVORK5CYII= uuHsQM65cML4ABzY5fA/eQGKIwMcVjm2bAAAAABJRU5ErkJggg==
</value> </value>
</data> </data>
<data name="BindingNavigatorDeleteItem.RightToLeftAutoMirrorImage" type="System.Boolean, mscorlib"> <data name="BindingNavigatorDeleteItem.RightToLeftAutoMirrorImage" type="System.Boolean, mscorlib">
@@ -371,12 +371,12 @@
<data name="BindingNavigatorMoveFirstItem.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64"> <data name="BindingNavigatorMoveFirstItem.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value> <value>
iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO
vAAADrwBlbxySQAAASpJREFUOE9jGDygcNbz/00Lnv/PnPj4P1QIA4S3P8Apx5A789n/VUfe/8elKL77 vAAADrwBlbxySQAAATFJREFUOE9jYBg0oHDW8/9NC57/z5z4+D+6HAyEtz/AKceQO/PZ/1VH3v/HpSi+
wf/ghmu4DciY8vT/wn0fsCqK73n4f+n+///9qy/gNiCh58n/aVveYyiKaL8P1pw56/9/r9ITuA2I7Hr0 +8H/4IZrWOXAIGPK0/8L933Aqii+5+H/pfv///evvoAhBwcJPU/+T9vyHkNRRPt9sObMWf//e5WewG1A
v3f1BxRFoa33wJpb1wFt7/z73yX/AG4DApsf/q+b/w6uKLjl7v9Fe///7wBqzpjz879d3c//9hnbcRvg ZNej/72rP6AoCm29B9bcuu7/f//Ov/9d8g/gNiCw+eH/uvnv4IqCW+7+X7T3//+Odf//Z8z5+d+u7ud/
UXX/f/60NyiK7Ipv/0+f8/u/f9e3/zqF7/5bJKzHbYB96d3/2ZNfYyjSTzn/36ToxX+VrE//jSOX4TbA +4ztuA3wqLr/P3/aGxRFdsW3/6fP+f3fv+vbf53Cd/8tEtbjNsC+9O7/7MmvMRTpp5z/b1L04r9K1qf/
Iu/O/9T+11gVGSSd+C+b9vW/bvA83AYYZt3+H9byEqci/dTL/zV8p+E2QCftxn+/6od4Fal4TMBtgFPu xpHLcBtgkXfnf2r/a6yKDJJO/JdN+/pfN3gehhwcGGbd/h/W8hKnIv3Uy/81fKdhlQMDnbQb//2qH+JV
lf8gBXgVDULAwAAA8HbAq6XlmnAAAAAASUVORK5CYII= pOIxAaccg1Pulf8gBXgVDUoAAPB2wKtYlLYeAAAAAElFTkSuQmCC
</value> </value>
</data> </data>
<data name="BindingNavigatorMoveFirstItem.RightToLeftAutoMirrorImage" type="System.Boolean, mscorlib"> <data name="BindingNavigatorMoveFirstItem.RightToLeftAutoMirrorImage" type="System.Boolean, mscorlib">
@@ -391,10 +391,10 @@
<data name="BindingNavigatorMovePreviousItem.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64"> <data name="BindingNavigatorMovePreviousItem.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value> <value>
iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO
vAAADrwBlbxySQAAALZJREFUOE9jGDogvP3BfyiTdBDf/eB/cMM18gyI73n4f+n+///9qy+QbkBE+32w vAAADrwBlbxySQAAALtJREFUOE9jYBgyILz9wX90MaJBfPeD/8EN18gzIL7n4f+l+///96++QLoBEe33
5sxZ//97lZ4gzYDQ1ntgza3rgLZ3/v3vkn+AeAOCW+7+X7T3//8OoOaMOT//29X9/G+fsZ00F9gV3/6f wZozZ/3/71V6gjQDQlvvgTW3rvv/37/z73+X/APEGxDccvf/or3//3es+/8/Y87P/3Z1P//bZ2wn3gAQ
Puf3f/+ub/91Ct/9t0hYT3oY6Kec/29S9OK/Stan/8aRy0g3AAQMkk78l037+l83eB55BoCAfurl/xq+ sCu+/T99zu///l3f/usUvvtvkbCeNANAQD/l/H+Tohf/VbI+/TeOXEa6ASBgkHTiv2za1/+6wfPIMwAE
08g3AARUPCZQZsBgBQwMANAUYJgEulBVAAAAAElFTkSuQmCC 9FMv/9fwnUa+ASCg4jGBMgMGLwAA0BRgmCws/7cAAAAASUVORK5CYII=
</value> </value>
</data> </data>
<data name="BindingNavigatorMovePreviousItem.RightToLeftAutoMirrorImage" type="System.Boolean, mscorlib"> <data name="BindingNavigatorMovePreviousItem.RightToLeftAutoMirrorImage" type="System.Boolean, mscorlib">
@@ -433,10 +433,10 @@
<data name="BindingNavigatorMoveNextItem.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64"> <data name="BindingNavigatorMoveNextItem.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value> <value>
iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO
vAAADrwBlbxySQAAAKNJREFUOE9jGHygcNbz/1AmeSB35rP/Cd33yDckY8rT//P2//6f0HWHPEMSep78 vAAADrwBlbxySQAAAKRJREFUOE9jYBh0oHDW8//oYiSB3JnP/id03yPfkIwpT//P2//7f0LXHfIMSeh5
n73v1//OrX//u5VeJt2QyK5H/6ds+/W/ZOnf/wnT//63yT1LmiGBzQ//t659D9ZsXPLlv3T0tf/GkcuI 8n/2vl//O7f+/e9Wepl0QyK7Hv2fsu3X/5Klf/8nTP/73yb3LGmGBDY//N+69j1Ys3HJl//S0df+G0cu
N8Sj6v7/krnv4JoVXXpIc4F96d3/gS3PyNMMAhZ5d/7bFFwhTzMIGGbdJl8zCOik3SBf81AEDAwAoH5f I94Qj6r7/0vmvoNrVnTpIV4zCNiX3v0f2PKMPM0gYJF3579NwRXyNIOAYdZt8jWDgE7aDfI1D00AAKB+
oAc0QjgAAAAASUVORK5CYII= X6Bjq5qXAAAAAElFTkSuQmCC
</value> </value>
</data> </data>
<data name="BindingNavigatorMoveNextItem.RightToLeftAutoMirrorImage" type="System.Boolean, mscorlib"> <data name="BindingNavigatorMoveNextItem.RightToLeftAutoMirrorImage" type="System.Boolean, mscorlib">
@@ -451,12 +451,12 @@
<data name="BindingNavigatorMoveLastItem.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64"> <data name="BindingNavigatorMoveLastItem.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value> <value>
iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO
vAAADrwBlbxySQAAASxJREFUOE9jGFygcNbz/1AmBgDJNS14/j9z4mOcahhyZz77n9B9D6sCkNyqI+// vAAADrwBlbxySQAAAStJREFUOE9jYBhUoHDW8//oYjAAkmta8Px/5sTHONUw5M589j+h+x5WBSC5VUfe
h7c/wG1AxpSn/+ft//0/oesOhiKQ3MJ9H/4HN1zDbUBCz5P/s/f9+t+59e9/t9LLKApBctO2vP/vX30B /w9vf4BVHgwypjz9P2//7/8JXXcwFIHkFu778D+44RqGHBwk9Dz5P3vfr/+dW//+dyu9jKIQJDdty/v/
twGRXY/+T9n263/J0r//E6b//W+TexauGCTXu/rDf6/SE7gNCGx++L917XuwZuOSL/+lo6/9N45cBtYA /tUXcBsQ2fXo/5Rtv/6XLP37P2H63/82uWfhikFyvas//PcqPYHbgMDmh/9b174HazYu+fJfOvraf+PI
kqub/+6/S/4B3AZ4VN3/XzL3HVyzoksPXDFILn/am//2GdtxG2Bfevd/YMszDM0gAJLLnvz6v0XCetwG ZWANILm6+e/+u+QfwG2AR9X9/yVz38E1K7r0wBWD5PKnvflvn7EdtwH2pXf/B7Y8w9AMk8ue/Pq/RcJ6
WOTd+W9TcAVDMwiA5FL7X8O9hBUYZt3GqhkEQHJhLS//6wbPw22ATtoNnJIgOb/qh/81fKfhNgAfcMq9 3AZY5N35b1NwBUMzTC61/zXcS1iBYdZtrJpBACQX1vLyv27wPKzyYKCTdgOnJEjOr/rhfw3faTjV4AVO
8l/FYwIYQ4UGBWBgAAC+0b+zuQxOnAAAAABJRU5ErkJggg== uVf+q3hMAGN0uYEFAL7Rv7NmXVYYAAAAAElFTkSuQmCC
</value> </value>
</data> </data>
<data name="BindingNavigatorMoveLastItem.RightToLeftAutoMirrorImage" type="System.Boolean, mscorlib"> <data name="BindingNavigatorMoveLastItem.RightToLeftAutoMirrorImage" type="System.Boolean, mscorlib">
@@ -490,10 +490,10 @@
<value>ToolStripButton1</value> <value>ToolStripButton1</value>
</data> </data>
<data name="BindingNavigator1.Location" type="System.Drawing.Point, System.Drawing"> <data name="BindingNavigator1.Location" type="System.Drawing.Point, System.Drawing">
<value>2, 2</value> <value>3, 3</value>
</data> </data>
<data name="BindingNavigator1.Size" type="System.Drawing.Size, System.Drawing"> <data name="BindingNavigator1.Size" type="System.Drawing.Size, System.Drawing">
<value>1293, 25</value> <value>1033, 25</value>
</data> </data>
<data name="BindingNavigator1.TabIndex" type="System.Int32, mscorlib"> <data name="BindingNavigator1.TabIndex" type="System.Int32, mscorlib">
<value>4</value> <value>4</value>
@@ -547,10 +547,10 @@
<value>None</value> <value>None</value>
</data> </data>
<data name="StatusStrip1.Location" type="System.Drawing.Point, System.Drawing"> <data name="StatusStrip1.Location" type="System.Drawing.Point, System.Drawing">
<value>0, 424</value> <value>0, 436</value>
</data> </data>
<data name="StatusStrip1.Size" type="System.Drawing.Size, System.Drawing"> <data name="StatusStrip1.Size" type="System.Drawing.Size, System.Drawing">
<value>1169, 22</value> <value>1047, 22</value>
</data> </data>
<data name="StatusStrip1.TabIndex" type="System.Int32, mscorlib"> <data name="StatusStrip1.TabIndex" type="System.Int32, mscorlib">
<value>5</value> <value>5</value>
@@ -574,7 +574,7 @@
<value>True</value> <value>True</value>
</data> </data>
<data name="cmbSicht.Location" type="System.Drawing.Point, System.Drawing"> <data name="cmbSicht.Location" type="System.Drawing.Point, System.Drawing">
<value>74, 27</value> <value>78, 24</value>
</data> </data>
<data name="cmbSicht.Size" type="System.Drawing.Size, System.Drawing"> <data name="cmbSicht.Size" type="System.Drawing.Size, System.Drawing">
<value>231, 21</value> <value>231, 21</value>
@@ -598,7 +598,7 @@
<value>MiddleLeft</value> <value>MiddleLeft</value>
</data> </data>
<data name="Button1.Location" type="System.Drawing.Point, System.Drawing"> <data name="Button1.Location" type="System.Drawing.Point, System.Drawing">
<value>611, 25</value> <value>615, 22</value>
</data> </data>
<data name="Button1.Size" type="System.Drawing.Size, System.Drawing"> <data name="Button1.Size" type="System.Drawing.Size, System.Drawing">
<value>98, 23</value> <value>98, 23</value>
@@ -628,7 +628,7 @@
<value>True</value> <value>True</value>
</data> </data>
<data name="Label3.Location" type="System.Drawing.Point, System.Drawing"> <data name="Label3.Location" type="System.Drawing.Point, System.Drawing">
<value>16, 30</value> <value>20, 27</value>
</data> </data>
<data name="Label3.Size" type="System.Drawing.Size, System.Drawing"> <data name="Label3.Size" type="System.Drawing.Size, System.Drawing">
<value>35, 13</value> <value>35, 13</value>
@@ -652,7 +652,7 @@
<value>2</value> <value>2</value>
</data> </data>
<data name="cmbGroupNew.Location" type="System.Drawing.Point, System.Drawing"> <data name="cmbGroupNew.Location" type="System.Drawing.Point, System.Drawing">
<value>374, 27</value> <value>378, 24</value>
</data> </data>
<data name="cmbGroupNew.Size" type="System.Drawing.Size, System.Drawing"> <data name="cmbGroupNew.Size" type="System.Drawing.Size, System.Drawing">
<value>231, 21</value> <value>231, 21</value>
@@ -680,7 +680,7 @@
<value>NoControl</value> <value>NoControl</value>
</data> </data>
<data name="Label4.Location" type="System.Drawing.Point, System.Drawing"> <data name="Label4.Location" type="System.Drawing.Point, System.Drawing">
<value>319, 30</value> <value>323, 27</value>
</data> </data>
<data name="Label4.Size" type="System.Drawing.Size, System.Drawing"> <data name="Label4.Size" type="System.Drawing.Size, System.Drawing">
<value>49, 13</value> <value>49, 13</value>
@@ -707,10 +707,10 @@
<value>Segoe UI, 8.25pt, style=Bold, Italic</value> <value>Segoe UI, 8.25pt, style=Bold, Italic</value>
</data> </data>
<data name="GroupBox1.Location" type="System.Drawing.Point, System.Drawing"> <data name="GroupBox1.Location" type="System.Drawing.Point, System.Drawing">
<value>15, 166</value> <value>12, 153</value>
</data> </data>
<data name="GroupBox1.Size" type="System.Drawing.Size, System.Drawing"> <data name="GroupBox1.Size" type="System.Drawing.Size, System.Drawing">
<value>914, 71</value> <value>732, 63</value>
</data> </data>
<data name="GroupBox1.TabIndex" type="System.Int32, mscorlib"> <data name="GroupBox1.TabIndex" type="System.Int32, mscorlib">
<value>43</value> <value>43</value>
@@ -731,10 +731,10 @@
<value>0</value> <value>0</value>
</data> </data>
<data name="CHANGED_WHENTextBox.Location" type="System.Drawing.Point, System.Drawing"> <data name="CHANGED_WHENTextBox.Location" type="System.Drawing.Point, System.Drawing">
<value>1151, 85</value> <value>872, 104</value>
</data> </data>
<data name="CHANGED_WHENTextBox.Size" type="System.Drawing.Size, System.Drawing"> <data name="CHANGED_WHENTextBox.Size" type="System.Drawing.Size, System.Drawing">
<value>148, 28</value> <value>148, 22</value>
</data> </data>
<data name="CHANGED_WHENTextBox.TabIndex" type="System.Int32, mscorlib"> <data name="CHANGED_WHENTextBox.TabIndex" type="System.Int32, mscorlib">
<value>37</value> <value>37</value>
@@ -752,10 +752,10 @@
<value>2</value> <value>2</value>
</data> </data>
<data name="ADDED_WHENTextBox.Location" type="System.Drawing.Point, System.Drawing"> <data name="ADDED_WHENTextBox.Location" type="System.Drawing.Point, System.Drawing">
<value>841, 87</value> <value>711, 104</value>
</data> </data>
<data name="ADDED_WHENTextBox.Size" type="System.Drawing.Size, System.Drawing"> <data name="ADDED_WHENTextBox.Size" type="System.Drawing.Size, System.Drawing">
<value>186, 28</value> <value>135, 22</value>
</data> </data>
<data name="ADDED_WHENTextBox.TabIndex" type="System.Int32, mscorlib"> <data name="ADDED_WHENTextBox.TabIndex" type="System.Int32, mscorlib">
<value>36</value> <value>36</value>
@@ -773,10 +773,10 @@
<value>4</value> <value>4</value>
</data> </data>
<data name="CHANGED_WHOTextBox.Location" type="System.Drawing.Point, System.Drawing"> <data name="CHANGED_WHOTextBox.Location" type="System.Drawing.Point, System.Drawing">
<value>1151, 48</value> <value>872, 59</value>
</data> </data>
<data name="CHANGED_WHOTextBox.Size" type="System.Drawing.Size, System.Drawing"> <data name="CHANGED_WHOTextBox.Size" type="System.Drawing.Size, System.Drawing">
<value>148, 28</value> <value>148, 22</value>
</data> </data>
<data name="CHANGED_WHOTextBox.TabIndex" type="System.Int32, mscorlib"> <data name="CHANGED_WHOTextBox.TabIndex" type="System.Int32, mscorlib">
<value>35</value> <value>35</value>
@@ -794,10 +794,10 @@
<value>6</value> <value>6</value>
</data> </data>
<data name="ADDED_WHOTextBox.Location" type="System.Drawing.Point, System.Drawing"> <data name="ADDED_WHOTextBox.Location" type="System.Drawing.Point, System.Drawing">
<value>841, 51</value> <value>711, 59</value>
</data> </data>
<data name="ADDED_WHOTextBox.Size" type="System.Drawing.Size, System.Drawing"> <data name="ADDED_WHOTextBox.Size" type="System.Drawing.Size, System.Drawing">
<value>186, 28</value> <value>135, 22</value>
</data> </data>
<data name="ADDED_WHOTextBox.TabIndex" type="System.Int32, mscorlib"> <data name="ADDED_WHOTextBox.TabIndex" type="System.Int32, mscorlib">
<value>33</value> <value>33</value>
@@ -962,7 +962,7 @@
<value>90, 120</value> <value>90, 120</value>
</data> </data>
<data name="GROUP_NAMETextBox.Size" type="System.Drawing.Size, System.Drawing"> <data name="GROUP_NAMETextBox.Size" type="System.Drawing.Size, System.Drawing">
<value>289, 28</value> <value>289, 22</value>
</data> </data>
<data name="GROUP_NAMETextBox.TabIndex" type="System.Int32, mscorlib"> <data name="GROUP_NAMETextBox.TabIndex" type="System.Int32, mscorlib">
<value>26</value> <value>26</value>
@@ -983,7 +983,7 @@
<value>90, 87</value> <value>90, 87</value>
</data> </data>
<data name="ENTITY_NAMETextBox.Size" type="System.Drawing.Size, System.Drawing"> <data name="ENTITY_NAMETextBox.Size" type="System.Drawing.Size, System.Drawing">
<value>289, 28</value> <value>289, 22</value>
</data> </data>
<data name="ENTITY_NAMETextBox.TabIndex" type="System.Int32, mscorlib"> <data name="ENTITY_NAMETextBox.TabIndex" type="System.Int32, mscorlib">
<value>25</value> <value>25</value>
@@ -1004,7 +1004,7 @@
<value>90, 55</value> <value>90, 55</value>
</data> </data>
<data name="IDTextBox.Size" type="System.Drawing.Size, System.Drawing"> <data name="IDTextBox.Size" type="System.Drawing.Size, System.Drawing">
<value>125, 28</value> <value>125, 22</value>
</data> </data>
<data name="IDTextBox.TabIndex" type="System.Int32, mscorlib"> <data name="IDTextBox.TabIndex" type="System.Int32, mscorlib">
<value>24</value> <value>24</value>
@@ -1079,10 +1079,10 @@
<value>Geändert wann</value> <value>Geändert wann</value>
</data> </data>
<data name="VWPMO_RIGHT_GROUPDataGridView.Location" type="System.Drawing.Point, System.Drawing"> <data name="VWPMO_RIGHT_GROUPDataGridView.Location" type="System.Drawing.Point, System.Drawing">
<value>12, 196</value> <value>12, 222</value>
</data> </data>
<data name="VWPMO_RIGHT_GROUPDataGridView.Size" type="System.Drawing.Size, System.Drawing"> <data name="VWPMO_RIGHT_GROUPDataGridView.Size" type="System.Drawing.Size, System.Drawing">
<value>1259, 179</value> <value>1008, 182</value>
</data> </data>
<data name="VWPMO_RIGHT_GROUPDataGridView.TabIndex" type="System.Int32, mscorlib"> <data name="VWPMO_RIGHT_GROUPDataGridView.TabIndex" type="System.Int32, mscorlib">
<value>23</value> <value>23</value>
@@ -1106,7 +1106,7 @@
<value>3, 3, 3, 3</value> <value>3, 3, 3, 3</value>
</data> </data>
<data name="TabPage1.Size" type="System.Drawing.Size, System.Drawing"> <data name="TabPage1.Size" type="System.Drawing.Size, System.Drawing">
<value>1161, 398</value> <value>1039, 410</value>
</data> </data>
<data name="TabPage1.TabIndex" type="System.Int32, mscorlib"> <data name="TabPage1.TabIndex" type="System.Int32, mscorlib">
<value>0</value> <value>0</value>
@@ -1132,18 +1132,18 @@
<data name="btndeleteUserRight.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64"> <data name="btndeleteUserRight.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value> <value>
iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAAK/INwWK6QAAABl0RVh0U29m iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAAK/INwWK6QAAABl0RVh0U29m
dHdhcmUAQWRvYmUgSW1hZ2VSZWFkeXHJZTwAAAJpSURBVDhPpZP7S1NhGMf9W/SHKEGiGyFhFBTmvMyd dHdhcmUAQWRvYmUgSW1hZ2VSZWFkeXHJZTwAAAJnSURBVDhPpZPtT1JRHMf9W/RFMzfXelpzzVZbzQQU
tTa3eTvL9LjFIpam7AzTDGoYuvCHcJbaVSt/yTSxUV4ycnYdWh4rL+3URq3pObumfNsmbS5HEL3weeE8 uUQg4NMlkys2WjNNx2Wm2VaMhjRfNLGUHrXyTaY5c6WWLbFHpuW1QolbuCL0XhBI923QglTqRZ3tc7Zz
PJ/vy3nOeZMA/BcbCgsaTco8Van/QJUzsyqSm1GVcO9JJTNFyvW2UmnKn/1xD4tqDfGJotjvpib4RywI dr6fs/M756QASPkf1k3MVVWlzVKVhndUBTOjIblpTSn3llQzk6TS4CyTp61dv2rg1lURHyiK/Wo1IzQy
vLUiMDEK/n43FrRleF1IsC+UQmK9EyfPVVD88t1urM6+Q3DwHoJdzQiaL+Dn7TasjA/CUauFVZ7NP5dm hPBrB8Ljo+DvdGFOX46XRQT7TC0mkgqiYZeW4hdvdWFl5g0iA7cRsVsQsZ3F9xttWB4bgLdeD4dSyD+V
RkMi27xanRyS7dzNLqwyNgQvn4O72YClphr4LxkQaKHhN56C/8EtLB4nMX7kgH1Msi85GhCSaWe9Hiu2 58QlsW5Wp0t1aSkPd82OFcaJyIXT8FuMWDDXIXTeiHALjZDpOEJ3r8N9hMTYwb2eR7LdqXGBS0vR840G
yciJPhMN13kdvA3qOLjTJPy91/AqLwPD4gw6GvCROsZ4eq8j2GOG21iFb0XihCxXkeCb6uAwVOMxkc5E LDsnYjsuWWn4zlQj2KRbBXeCRKjnMl7kZ2NYmk3HBe+pw0yg5woi3Tb4TTX4UixNymINCd7cAK+xFg+I
A5gKlTfwsBdBkwHus9pQKfFyyHLgogqxZG6FJW+XN1RaC5ghi7y+ng74G7XwnimPNCda4QBnmQJLba0Y LCYuYLSaYPheDyJWI/yn9PhT8ypE8FFFWLC1Yih/ezAumCaLg0vdHQg16xE8WbE2F29RwXy5CgttrRgU
Em6LBUyXKhiXsQ6+ZhrcSWWkMSHyPLjra7FQq8OgIC32CrZiKc1IBPD2dMKtksBVJtogs9JssAUieLqu b04IpspUjM/UgCULDe6YOrYwKcp8+BvrMVdfjQFBZuIIzhI5zcgECHZ3wq+RwVcuWRdm5UKwhRIE7Bcx
YFS4AwNZW2JDfFMkTn5ZQtgXK0vgudMRGZhTIVwTZblgJSFZIgTf2Y6pYnFYtvcJNsc+Y5jJghxiQnaI Kt6K/tyNiSK+KpamPi8lPO7KUgRudsQKNq8S/wwq8sDKhGBlYvCd7ZgskUbDnl5BeuIao0wUiohxxX7e
nzuqgOdGB3400nCQcnxRyuBq0IO/2o5pZT76s1L5kBz/I/3mmfQg8fTwftYq2oOvNTq4Wi5G+Fx9Ak9y dUiFwNUOfGum4SWV+KRWwNdkAH+pHVPqAvTlZvC9gvTVD+kXT+T7iMcH9rAOyU58rquGr+VcjI+1R/FQ
todldr0cJi4gzIh4b8qwMF1vIXYzj/J3ckOCrdxAbhrTn52q78vc9PfL9O8g6Rcd0s65aUjWSwAAAABJ tCUaZn8PrxNEGZHuShsWZxmGiB3M/YJt3KBgE9efl8n0CTMMvTkb/v6Z/oUfHdLOuUgtmkUAAAAASUVO
RU5ErkJggg== RK5CYII=
</value> </value>
</data> </data>
<data name="btndeleteUserRight.ImageAlign" type="System.Drawing.ContentAlignment, System.Drawing"> <data name="btndeleteUserRight.ImageAlign" type="System.Drawing.ContentAlignment, System.Drawing">
@@ -1262,10 +1262,10 @@ Des Weiteren werden die Rechte für die Zugriffsrechte auf die Dateien angewende
<data name="btnAddUser2ConstructorREL.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64"> <data name="btnAddUser2ConstructorREL.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value> <value>
iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO
vAAADrwBlbxySQAAALhJREFUOE+tk8ENhCAQRSnFWqiEOiiAO42sJXjmRCnsXriy83VIZCQE153kJcKf vAAADrwBlbxySQAAAK9JREFUOE+tk8ENwyAQBF1KaqES6qAA/jQSl+A3L0oh+ewXay2w4EwSHPuklSzu
/yM6KFk5Z0NsRBFgz3DbtUhciBhCKNbaorVuwB409KCXbUexOTnnLkaJ9x4hqQmhRYTQM/TgkFjNBq8m duSzl2kSBUADWAAkIZ5pOb8XgAeA4L1PxpiklGrEM/Y4w9meOVprD0Yp5xwhsYGQyoYc/qQMCcWs+Wpy
m9bXWt7ps4NnqfNxDAK23pnBKAQeeBHQCJJRCLxNQG0ccQ75f0CPmSM8/ojPfiPPQpyZwkozSCha7KM8 aH7O6RXfm/gs+3kdTcDS2/kXhB56CTgYRyH0NoAy+E015H5ATyMrXP6I135jCdJICouaINVRHkljN8oV
M43dUUZxyG+X6Vwk3rjOSn0Bs2pSjcG3D98AAAAASUVORK5CYII= 5L/LVNfZ67wCs2pSjfnFgloAAAAASUVORK5CYII=
</value> </value>
</data> </data>
<data name="btnAddUser2ConstructorREL.ImageAlign" type="System.Drawing.ContentAlignment, System.Drawing"> <data name="btnAddUser2ConstructorREL.ImageAlign" type="System.Drawing.ContentAlignment, System.Drawing">
@@ -1610,12 +1610,12 @@ Des Weiteren werden die Rechte für die Zugriffsrechte auf die Dateien angewende
<data name="BindingNavigatorMoveFirstItem1.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64"> <data name="BindingNavigatorMoveFirstItem1.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value> <value>
iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO
vAAADrwBlbxySQAAASpJREFUOE9jGDygcNbz/00Lnv/PnPj4P1QIA4S3P8Apx5A789n/VUfe/8elKL77 vAAADrwBlbxySQAAATFJREFUOE9jYBg0oHDW8/9NC57/z5z4+D+6HAyEtz/AKceQO/PZ/1VH3v/HpSi+
wf/ghmu4DciY8vT/wn0fsCqK73n4f+n+///9qy/gNiCh58n/aVveYyiKaL8P1pw56/9/r9ITuA2I7Hr0 +8H/4IZrWOXAIGPK0/8L933Aqii+5+H/pfv///evvoAhBwcJPU/+T9vyHkNRRPt9sObMWf//e5WewG1A
v3f1BxRFoa33wJpb1wFt7/z73yX/AG4DApsf/q+b/w6uKLjl7v9Fe///7wBqzpjz879d3c//9hnbcRvg ZNej/72rP6AoCm29B9bcuu7/f//Ov/9d8g/gNiCw+eH/uvnv4IqCW+7+X7T3//+Odf//Z8z5+d+u7ud/
UXX/f/60NyiK7Ipv/0+f8/u/f9e3/zqF7/5bJKzHbYB96d3/2ZNfYyjSTzn/36ToxX+VrE//jSOX4TbA +4ztuA3wqLr/P3/aGxRFdsW3/6fP+f3fv+vbf53Cd/8tEtbjNsC+9O7/7MmvMRTpp5z/b1L04r9K1qf/
Iu/O/9T+11gVGSSd+C+b9vW/bvA83AYYZt3+H9byEqci/dTL/zV8p+E2QCftxn+/6od4Fal4TMBtgFPu xpHLcBtgkXfnf2r/a6yKDJJO/JdN+/pfN3gehhwcGGbd/h/W8hKnIv3Uy/81fKdhlQMDnbQb//2qH+JV
lf8gBXgVDULAwAAA8HbAq6XlmnAAAAAASUVORK5CYII= pOIxAaccg1Pulf8gBXgVDUoAAPB2wKtYlLYeAAAAAElFTkSuQmCC
</value> </value>
</data> </data>
<data name="BindingNavigatorMoveFirstItem1.RightToLeftAutoMirrorImage" type="System.Boolean, mscorlib"> <data name="BindingNavigatorMoveFirstItem1.RightToLeftAutoMirrorImage" type="System.Boolean, mscorlib">
@@ -1630,10 +1630,10 @@ Des Weiteren werden die Rechte für die Zugriffsrechte auf die Dateien angewende
<data name="BindingNavigatorMovePreviousItem1.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64"> <data name="BindingNavigatorMovePreviousItem1.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value> <value>
iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO
vAAADrwBlbxySQAAALZJREFUOE9jGDogvP3BfyiTdBDf/eB/cMM18gyI73n4f+n+///9qy+QbkBE+32w vAAADrwBlbxySQAAALtJREFUOE9jYBgyILz9wX90MaJBfPeD/8EN18gzIL7n4f+l+///96++QLoBEe33
5sxZ//97lZ4gzYDQ1ntgza3rgLZ3/v3vkn+AeAOCW+7+X7T3//8OoOaMOT//29X9/G+fsZ00F9gV3/6f wZozZ/3/71V6gjQDQlvvgTW3rvv/37/z73+X/APEGxDccvf/or3//3es+/8/Y87P/3Z1P//bZ2wn3gAQ
Puf3f/+ub/91Ct/9t0hYT3oY6Kec/29S9OK/Stan/8aRy0g3AAQMkk78l037+l83eB55BoCAfurl/xq+ sCu+/T99zu///l3f/usUvvtvkbCeNANAQD/l/H+Tohf/VbI+/TeOXEa6ASBgkHTiv2za1/+6wfPIMwAE
08g3AARUPCZQZsBgBQwMANAUYJgEulBVAAAAAElFTkSuQmCC 9FMv/9fwnUa+ASCg4jGBMgMGLwAA0BRgmCws/7cAAAAASUVORK5CYII=
</value> </value>
</data> </data>
<data name="BindingNavigatorMovePreviousItem1.RightToLeftAutoMirrorImage" type="System.Boolean, mscorlib"> <data name="BindingNavigatorMovePreviousItem1.RightToLeftAutoMirrorImage" type="System.Boolean, mscorlib">
@@ -1672,10 +1672,10 @@ Des Weiteren werden die Rechte für die Zugriffsrechte auf die Dateien angewende
<data name="BindingNavigatorMoveNextItem1.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64"> <data name="BindingNavigatorMoveNextItem1.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value> <value>
iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO
vAAADrwBlbxySQAAAKNJREFUOE9jGHygcNbz/1AmeSB35rP/Cd33yDckY8rT//P2//6f0HWHPEMSep78 vAAADrwBlbxySQAAAKRJREFUOE9jYBh0oHDW8//oYiSB3JnP/id03yPfkIwpT//P2//7f0LXHfIMSeh5
n73v1//OrX//u5VeJt2QyK5H/6ds+/W/ZOnf/wnT//63yT1LmiGBzQ//t659D9ZsXPLlv3T0tf/GkcuI 8n/2vl//O7f+/e9Wepl0QyK7Hv2fsu3X/5Klf/8nTP/73yb3LGmGBDY//N+69j1Ys3HJl//S0df+G0cu
N8Sj6v7/krnv4JoVXXpIc4F96d3/gS3PyNMMAhZ5d/7bFFwhTzMIGGbdJl8zCOik3SBf81AEDAwAoH5f I94Qj6r7/0vmvoNrVnTpIV4zCNiX3v0f2PKMPM0gYJF3579NwRXyNIOAYdZt8jWDgE7aDfI1D00AAKB+
oAc0QjgAAAAASUVORK5CYII= X6Bjq5qXAAAAAElFTkSuQmCC
</value> </value>
</data> </data>
<data name="BindingNavigatorMoveNextItem1.RightToLeftAutoMirrorImage" type="System.Boolean, mscorlib"> <data name="BindingNavigatorMoveNextItem1.RightToLeftAutoMirrorImage" type="System.Boolean, mscorlib">
@@ -1690,12 +1690,12 @@ Des Weiteren werden die Rechte für die Zugriffsrechte auf die Dateien angewende
<data name="BindingNavigatorMoveLastItem1.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64"> <data name="BindingNavigatorMoveLastItem1.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value> <value>
iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO
vAAADrwBlbxySQAAASxJREFUOE9jGFygcNbz/1AmBgDJNS14/j9z4mOcahhyZz77n9B9D6sCkNyqI+// vAAADrwBlbxySQAAAStJREFUOE9jYBhUoHDW8//oYjAAkmta8Px/5sTHONUw5M589j+h+x5WBSC5VUfe
h7c/wG1AxpSn/+ft//0/oesOhiKQ3MJ9H/4HN1zDbUBCz5P/s/f9+t+59e9/t9LLKApBctO2vP/vX30B /w9vf4BVHgwypjz9P2//7/8JXXcwFIHkFu778D+44RqGHBwk9Dz5P3vfr/+dW//+dyu9jKIQJDdty/v/
twGRXY/+T9n263/J0r//E6b//W+TexauGCTXu/rDf6/SE7gNCGx++L917XuwZuOSL/+lo6/9N45cBtYA /tUXcBsQ2fXo/5Rtv/6XLP37P2H63/82uWfhikFyvas//PcqPYHbgMDmh/9b174HazYu+fJfOvraf+PI
kqub/+6/S/4B3AZ4VN3/XzL3HVyzoksPXDFILn/am//2GdtxG2Bfevd/YMszDM0gAJLLnvz6v0XCetwG ZWANILm6+e/+u+QfwG2AR9X9/yVz38E1K7r0wBWD5PKnvflvn7EdtwH2pXf/B7Y8w9AMk8ue/Pq/RcJ6
WOTd+W9TcAVDMwiA5FL7X8O9hBUYZt3GqhkEQHJhLS//6wbPw22ATtoNnJIgOb/qh/81fKfhNgAfcMq9 3AZY5N35b1NwBUMzTC61/zXcS1iBYdZtrJpBACQX1vLyv27wPKzyYKCTdgOnJEjOr/rhfw3faTjV4AVO
8l/FYwIYQ4UGBWBgAAC+0b+zuQxOnAAAAABJRU5ErkJggg== uVf+q3hMAGN0uYEFAL7Rv7NmXVYYAAAAAElFTkSuQmCC
</value> </value>
</data> </data>
<data name="BindingNavigatorMoveLastItem1.RightToLeftAutoMirrorImage" type="System.Boolean, mscorlib"> <data name="BindingNavigatorMoveLastItem1.RightToLeftAutoMirrorImage" type="System.Boolean, mscorlib">
@@ -1780,7 +1780,7 @@ Des Weiteren werden die Rechte für die Zugriffsrechte auf die Dateien angewende
<value>0, 0</value> <value>0, 0</value>
</data> </data>
<data name="TabControl1.Size" type="System.Drawing.Size, System.Drawing"> <data name="TabControl1.Size" type="System.Drawing.Size, System.Drawing">
<value>1169, 424</value> <value>1047, 436</value>
</data> </data>
<data name="TabControl1.TabIndex" type="System.Int32, mscorlib"> <data name="TabControl1.TabIndex" type="System.Int32, mscorlib">
<value>6</value> <value>6</value>
@@ -1843,7 +1843,7 @@ Des Weiteren werden die Rechte für die Zugriffsrechte auf die Dateien angewende
<value>6, 13</value> <value>6, 13</value>
</data> </data>
<data name="$this.ClientSize" type="System.Drawing.Size, System.Drawing"> <data name="$this.ClientSize" type="System.Drawing.Size, System.Drawing">
<value>1169, 446</value> <value>1047, 458</value>
</data> </data>
<data name="$this.Font" type="System.Drawing.Font, System.Drawing"> <data name="$this.Font" type="System.Drawing.Font, System.Drawing">
<value>Segoe UI, 8.25pt</value> <value>Segoe UI, 8.25pt</value>