MS 2.0.0.6
This commit is contained in:
parent
cd08b9c7d3
commit
39921824b8
@ -1,16 +1,49 @@
|
||||
<?xml version="1.0"?>
|
||||
<?xml version="1.0" encoding="utf-8"?>
|
||||
<configuration>
|
||||
<configSections>
|
||||
<sectionGroup name="userSettings" type="System.Configuration.UserSettingsGroup, System, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<section name="DD_PM_WINDREAM.My.MySettings" type="System.Configuration.ClientSettingsSection, System, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" allowExeDefinition="MachineToLocalUser" requirePermission="false"/>
|
||||
<section name="DD_PM_WINDREAM.My.MySettings" type="System.Configuration.ClientSettingsSection, System, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" allowExeDefinition="MachineToLocalUser" requirePermission="false" />
|
||||
</sectionGroup>
|
||||
<sectionGroup name="applicationSettings" type="System.Configuration.ApplicationSettingsGroup, System">
|
||||
<section name="DevExpress.LookAndFeel.Design.AppSettings" type="System.Configuration.ClientSettingsSection" requirePermission="false" />
|
||||
</sectionGroup>
|
||||
</configSections>
|
||||
<applicationSettings>
|
||||
<DevExpress.LookAndFeel.Design.AppSettings>
|
||||
<setting name="DefaultAppSkin" serializeAs="String">
|
||||
<value>Skin/Office 2016 Colorful</value>
|
||||
</setting>
|
||||
<setting name="DefaultPalette" serializeAs="String">
|
||||
<value></value>
|
||||
</setting>
|
||||
<setting name="TouchUI" serializeAs="String">
|
||||
<value></value>
|
||||
</setting>
|
||||
<setting name="TouchScaleFactor" serializeAs="String">
|
||||
<value></value>
|
||||
</setting>
|
||||
<setting name="DirectX" serializeAs="String">
|
||||
<value></value>
|
||||
</setting>
|
||||
<setting name="RegisterUserSkins" serializeAs="String">
|
||||
<value>True</value>
|
||||
</setting>
|
||||
<setting name="FontBehavior" serializeAs="String">
|
||||
<value></value>
|
||||
</setting>
|
||||
<setting name="DefaultAppFont" serializeAs="String">
|
||||
<value></value>
|
||||
</setting>
|
||||
<setting name="DPIAwarenessMode" serializeAs="String">
|
||||
<value></value>
|
||||
</setting>
|
||||
</DevExpress.LookAndFeel.Design.AppSettings>
|
||||
</applicationSettings>
|
||||
<connectionStrings>
|
||||
<add name="DD_PM_WINDREAM.My.MySettings.ConnectionString" connectionString="Data Source=SDD-VMP04-SQL17\DD_DEVELOP01;Initial Catalog=DD_ECM_TEST;Persist Security Info=True;User ID=sa;Password=dd"
|
||||
providerName="System.Data.SqlClient" />
|
||||
<add name="DD_PM_WINDREAM.My.MySettings.ConnectionString" connectionString="Data Source=SDD-VMP04-SQL17\DD_DEVELOP01;Initial Catalog=DD_ECM_TEST;Persist Security Info=True;User ID=sa;Password=dd" providerName="System.Data.SqlClient" />
|
||||
</connectionStrings>
|
||||
<startup>
|
||||
<supportedRuntime version="v4.0" sku=".NETFramework,Version=v4.6.1"/>
|
||||
<supportedRuntime version="v4.0" sku=".NETFramework,Version=v4.6.1" />
|
||||
</startup>
|
||||
<userSettings>
|
||||
<DD_PM_WINDREAM.My.MySettings>
|
||||
|
||||
@ -3,6 +3,7 @@ Imports System.Globalization
|
||||
Imports DLLLicenseManager
|
||||
Imports DigitalData.Modules.Logging
|
||||
Imports DigitalData.Modules.Config
|
||||
Imports System.Threading
|
||||
|
||||
Public Class ClassInit
|
||||
|
||||
@ -188,19 +189,12 @@ Public Class ClassInit
|
||||
FINALINDICES.init()
|
||||
If IDB_ACTIVE = True Then
|
||||
IDBData = New ClassIDBData()
|
||||
|
||||
|
||||
End If
|
||||
|
||||
Try
|
||||
USER_RIGHT1 = DT_CHECKUSER_MODULE.Rows(0).Item("USER_RIGHT1")
|
||||
USER_RIGHT_VIEW_ONLY = DT_CHECKUSER_MODULE.Rows(0).Item("USER_RIGHT2")
|
||||
Catch ex As Exception
|
||||
USER_RIGHT1 = False
|
||||
End Try
|
||||
Try
|
||||
USER_RIGHT2 = DT_CHECKUSER_MODULE.Rows(0).Item("USER_RIGHT2")
|
||||
Catch ex As Exception
|
||||
USER_RIGHT2 = False
|
||||
USER_RIGHT_VIEW_ONLY = False
|
||||
End Try
|
||||
Try
|
||||
USER_RIGHT3 = DT_CHECKUSER_MODULE.Rows(0).Item("USER_RIGHT3")
|
||||
@ -216,6 +210,16 @@ Public Class ClassInit
|
||||
'Am System anmelden
|
||||
Refresh_Licence()
|
||||
'Check_User_Exists_in_PMGroups()
|
||||
'Dim Culture = CultureInfo.CreateSpecificCulture("en-US")
|
||||
'' The following line provides localization for the application's user interface.
|
||||
'Thread.CurrentThread.CurrentUICulture = Culture
|
||||
'' The following line provides localization for data formats.
|
||||
'Thread.CurrentThread.CurrentCulture = Culture
|
||||
'' Set this culture as the default culture for all threads in this application.
|
||||
'' Note: The following properties are supported in the .NET Framework 4.5+
|
||||
'CultureInfo.DefaultThreadCurrentCulture = Culture
|
||||
'CultureInfo.DefaultThreadCurrentUICulture = Culture
|
||||
|
||||
|
||||
If ClassAllgemeineFunktionen.LoginOut("LOGIN") = True Then
|
||||
USERCOUNT_LOGGED_IN += 1
|
||||
|
||||
@ -14,8 +14,11 @@
|
||||
End Try
|
||||
Try
|
||||
ADDITIONAL_TITLE = DT_CHECKUSER.Rows(0).Item("ADDITIONAL_TITLE")
|
||||
If ADDITIONAL_TITLE = String.Empty Then
|
||||
ADDITIONAL_TITLE = My.Application.Info.ProductName
|
||||
End If
|
||||
Catch ex As Exception
|
||||
ADDITIONAL_TITLE = ""
|
||||
ADDITIONAL_TITLE = My.Application.Info.ProductName
|
||||
End Try
|
||||
|
||||
Dim oSplitWorkMode As String() = WORKING_MODE.Split("#")
|
||||
@ -55,6 +58,7 @@
|
||||
ElseIf oMode.StartsWith("PM.COLORSCHEME") Then
|
||||
Dim oColorScheme = oMode.Replace("PM.COLORSCHEME=", "")
|
||||
RIBBON_COLOR_SCHEME = oColorScheme.ToUpper
|
||||
|
||||
Else
|
||||
LOGGER.Info($"Wrong oMode: {oMode}")
|
||||
End If
|
||||
|
||||
@ -35,7 +35,7 @@ Module ModuleRuntimeVariables
|
||||
Public USER_EXISTS = False
|
||||
Public USER_IN_MODULE = False
|
||||
Public USER_RIGHT_FILE_DELETE As Boolean = False
|
||||
Public USER_RIGHT1 As Boolean = False
|
||||
Public USER_RIGHT_VIEW_ONLY As Boolean = False
|
||||
Public USER_RIGHT2 As Boolean = False
|
||||
Public USER_RIGHT3 As Boolean = False
|
||||
Public USER_RIGHT4 As Boolean = False
|
||||
|
||||
34
app/DD_PM_WINDREAM/frmAdministration.Designer.vb
generated
34
app/DD_PM_WINDREAM/frmAdministration.Designer.vb
generated
@ -162,10 +162,6 @@ Partial Class frmAdministration
|
||||
Me.colSQL_COMMAND = New DevExpress.XtraGrid.Columns.GridColumn()
|
||||
Me.colPREVENT_DUPLICATES = New DevExpress.XtraGrid.Columns.GridColumn()
|
||||
Me.colALLOW_NEW_VALUES = New DevExpress.XtraGrid.Columns.GridColumn()
|
||||
Me.colADDED_WHO = New DevExpress.XtraGrid.Columns.GridColumn()
|
||||
Me.colADDED_WHEN = New DevExpress.XtraGrid.Columns.GridColumn()
|
||||
Me.colCHANGED_WHO = New DevExpress.XtraGrid.Columns.GridColumn()
|
||||
Me.colCHANGED_WHEN = New DevExpress.XtraGrid.Columns.GridColumn()
|
||||
Me.colDESCRIPTION1 = New DevExpress.XtraGrid.Columns.GridColumn()
|
||||
Me.colACTIVE = New DevExpress.XtraGrid.Columns.GridColumn()
|
||||
Me.PropertyGrid1 = New System.Windows.Forms.PropertyGrid()
|
||||
@ -1233,7 +1229,7 @@ Partial Class frmAdministration
|
||||
'
|
||||
'viewFinalIndex
|
||||
'
|
||||
Me.viewFinalIndex.Columns.AddRange(New DevExpress.XtraGrid.Columns.GridColumn() {Me.colGUID, Me.colPROFIL_ID, Me.colCONNECTION_ID, Me.colINDEXNAME, Me.colVALUE, Me.colSQL_COMMAND, Me.colPREVENT_DUPLICATES, Me.colALLOW_NEW_VALUES, Me.colADDED_WHO, Me.colADDED_WHEN, Me.colCHANGED_WHO, Me.colCHANGED_WHEN, Me.colDESCRIPTION1, Me.colACTIVE})
|
||||
Me.viewFinalIndex.Columns.AddRange(New DevExpress.XtraGrid.Columns.GridColumn() {Me.colGUID, Me.colPROFIL_ID, Me.colCONNECTION_ID, Me.colINDEXNAME, Me.colVALUE, Me.colSQL_COMMAND, Me.colPREVENT_DUPLICATES, Me.colALLOW_NEW_VALUES, Me.colDESCRIPTION1, Me.colACTIVE})
|
||||
Me.viewFinalIndex.DetailHeight = 295
|
||||
Me.viewFinalIndex.GridControl = Me.gridFinalIndex
|
||||
Me.viewFinalIndex.Name = "viewFinalIndex"
|
||||
@ -1286,30 +1282,6 @@ Partial Class frmAdministration
|
||||
Me.colALLOW_NEW_VALUES.FieldName = "ALLOW_NEW_VALUES"
|
||||
Me.colALLOW_NEW_VALUES.Name = "colALLOW_NEW_VALUES"
|
||||
'
|
||||
'colADDED_WHO
|
||||
'
|
||||
resources.ApplyResources(Me.colADDED_WHO, "colADDED_WHO")
|
||||
Me.colADDED_WHO.FieldName = "ADDED_WHO"
|
||||
Me.colADDED_WHO.Name = "colADDED_WHO"
|
||||
'
|
||||
'colADDED_WHEN
|
||||
'
|
||||
resources.ApplyResources(Me.colADDED_WHEN, "colADDED_WHEN")
|
||||
Me.colADDED_WHEN.FieldName = "ADDED_WHEN"
|
||||
Me.colADDED_WHEN.Name = "colADDED_WHEN"
|
||||
'
|
||||
'colCHANGED_WHO
|
||||
'
|
||||
resources.ApplyResources(Me.colCHANGED_WHO, "colCHANGED_WHO")
|
||||
Me.colCHANGED_WHO.FieldName = "CHANGED_WHO"
|
||||
Me.colCHANGED_WHO.Name = "colCHANGED_WHO"
|
||||
'
|
||||
'colCHANGED_WHEN
|
||||
'
|
||||
resources.ApplyResources(Me.colCHANGED_WHEN, "colCHANGED_WHEN")
|
||||
Me.colCHANGED_WHEN.FieldName = "CHANGED_WHEN"
|
||||
Me.colCHANGED_WHEN.Name = "colCHANGED_WHEN"
|
||||
'
|
||||
'colDESCRIPTION1
|
||||
'
|
||||
Me.colDESCRIPTION1.FieldName = "DESCRIPTION"
|
||||
@ -2159,10 +2131,6 @@ Partial Class frmAdministration
|
||||
Friend WithEvents colSQL_COMMAND As DevExpress.XtraGrid.Columns.GridColumn
|
||||
Friend WithEvents colINDEXNAME As DevExpress.XtraGrid.Columns.GridColumn
|
||||
Friend WithEvents colVALUE As DevExpress.XtraGrid.Columns.GridColumn
|
||||
Friend WithEvents colADDED_WHO As DevExpress.XtraGrid.Columns.GridColumn
|
||||
Friend WithEvents colADDED_WHEN As DevExpress.XtraGrid.Columns.GridColumn
|
||||
Friend WithEvents colCHANGED_WHO As DevExpress.XtraGrid.Columns.GridColumn
|
||||
Friend WithEvents colCHANGED_WHEN As DevExpress.XtraGrid.Columns.GridColumn
|
||||
Friend WithEvents colDESCRIPTION1 As DevExpress.XtraGrid.Columns.GridColumn
|
||||
Friend WithEvents colACTIVE As DevExpress.XtraGrid.Columns.GridColumn
|
||||
Friend WithEvents colPREVENT_DUPLICATES As DevExpress.XtraGrid.Columns.GridColumn
|
||||
|
||||
@ -2504,7 +2504,7 @@
|
||||
<value>0, 0</value>
|
||||
</data>
|
||||
<data name="colINDEXNAME.Caption" xml:space="preserve">
|
||||
<value>Windream Index</value>
|
||||
<value>Index</value>
|
||||
</data>
|
||||
<data name="colINDEXNAME.Visible" type="System.Boolean, mscorlib">
|
||||
<value>True</value>
|
||||
@ -2512,6 +2512,9 @@
|
||||
<data name="colINDEXNAME.VisibleIndex" type="System.Int32, mscorlib">
|
||||
<value>0</value>
|
||||
</data>
|
||||
<data name="colINDEXNAME.Width" type="System.Int32, mscorlib">
|
||||
<value>86</value>
|
||||
</data>
|
||||
<data name="colVALUE.Caption" xml:space="preserve">
|
||||
<value>Fester Wert</value>
|
||||
</data>
|
||||
@ -2521,6 +2524,9 @@
|
||||
<data name="colVALUE.VisibleIndex" type="System.Int32, mscorlib">
|
||||
<value>2</value>
|
||||
</data>
|
||||
<data name="colVALUE.Width" type="System.Int32, mscorlib">
|
||||
<value>73</value>
|
||||
</data>
|
||||
<data name="colSQL_COMMAND.Caption" xml:space="preserve">
|
||||
<value>SQL Befehl</value>
|
||||
</data>
|
||||
@ -2530,50 +2536,17 @@
|
||||
<data name="colSQL_COMMAND.VisibleIndex" type="System.Int32, mscorlib">
|
||||
<value>1</value>
|
||||
</data>
|
||||
<data name="colSQL_COMMAND.Width" type="System.Int32, mscorlib">
|
||||
<value>150</value>
|
||||
</data>
|
||||
<data name="colPREVENT_DUPLICATES.Caption" xml:space="preserve">
|
||||
<value>Doppelte Werte vermeiden</value>
|
||||
</data>
|
||||
<data name="colALLOW_NEW_VALUES.Caption" xml:space="preserve">
|
||||
<value>Neue Werte erlauben</value>
|
||||
</data>
|
||||
<data name="colADDED_WHO.Caption" xml:space="preserve">
|
||||
<value>Hinzugefügt Wer</value>
|
||||
</data>
|
||||
<data name="colADDED_WHO.Visible" type="System.Boolean, mscorlib">
|
||||
<value>True</value>
|
||||
</data>
|
||||
<data name="colADDED_WHO.VisibleIndex" type="System.Int32, mscorlib">
|
||||
<value>3</value>
|
||||
</data>
|
||||
<data name="colADDED_WHEN.Caption" xml:space="preserve">
|
||||
<value>Hinzugefügt Wann</value>
|
||||
</data>
|
||||
<data name="colADDED_WHEN.Visible" type="System.Boolean, mscorlib">
|
||||
<value>True</value>
|
||||
</data>
|
||||
<data name="colADDED_WHEN.VisibleIndex" type="System.Int32, mscorlib">
|
||||
<value>4</value>
|
||||
</data>
|
||||
<data name="colCHANGED_WHO.Caption" xml:space="preserve">
|
||||
<value>Geändert Wer</value>
|
||||
</data>
|
||||
<data name="colCHANGED_WHO.Visible" type="System.Boolean, mscorlib">
|
||||
<value>True</value>
|
||||
</data>
|
||||
<data name="colCHANGED_WHO.VisibleIndex" type="System.Int32, mscorlib">
|
||||
<value>5</value>
|
||||
</data>
|
||||
<data name="colCHANGED_WHEN.Caption" xml:space="preserve">
|
||||
<value>Geändert Wann</value>
|
||||
</data>
|
||||
<data name="colCHANGED_WHEN.Visible" type="System.Boolean, mscorlib">
|
||||
<value>True</value>
|
||||
</data>
|
||||
<data name="colCHANGED_WHEN.VisibleIndex" type="System.Int32, mscorlib">
|
||||
<value>6</value>
|
||||
</data>
|
||||
<data name="gridFinalIndex.Size" type="System.Drawing.Size, System.Drawing">
|
||||
<value>627, 305</value>
|
||||
<value>627, 308</value>
|
||||
</data>
|
||||
<data name="gridFinalIndex.TabIndex" type="System.Int32, mscorlib">
|
||||
<value>93</value>
|
||||
@ -2600,7 +2573,7 @@
|
||||
<value>627, 0</value>
|
||||
</data>
|
||||
<data name="PropertyGrid1.Size" type="System.Drawing.Size, System.Drawing">
|
||||
<value>323, 305</value>
|
||||
<value>323, 308</value>
|
||||
</data>
|
||||
<data name="PropertyGrid1.TabIndex" type="System.Int32, mscorlib">
|
||||
<value>91</value>
|
||||
@ -2621,7 +2594,7 @@
|
||||
<value>3, 166</value>
|
||||
</data>
|
||||
<data name="Panel5.Size" type="System.Drawing.Size, System.Drawing">
|
||||
<value>950, 305</value>
|
||||
<value>950, 308</value>
|
||||
</data>
|
||||
<data name="Panel5.TabIndex" type="System.Int32, mscorlib">
|
||||
<value>94</value>
|
||||
@ -4738,30 +4711,6 @@
|
||||
<data name=">>colALLOW_NEW_VALUES.Type" xml:space="preserve">
|
||||
<value>DevExpress.XtraGrid.Columns.GridColumn, DevExpress.XtraGrid.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
|
||||
</data>
|
||||
<data name=">>colADDED_WHO.Name" xml:space="preserve">
|
||||
<value>colADDED_WHO</value>
|
||||
</data>
|
||||
<data name=">>colADDED_WHO.Type" xml:space="preserve">
|
||||
<value>DevExpress.XtraGrid.Columns.GridColumn, DevExpress.XtraGrid.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
|
||||
</data>
|
||||
<data name=">>colADDED_WHEN.Name" xml:space="preserve">
|
||||
<value>colADDED_WHEN</value>
|
||||
</data>
|
||||
<data name=">>colADDED_WHEN.Type" xml:space="preserve">
|
||||
<value>DevExpress.XtraGrid.Columns.GridColumn, DevExpress.XtraGrid.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
|
||||
</data>
|
||||
<data name=">>colCHANGED_WHO.Name" xml:space="preserve">
|
||||
<value>colCHANGED_WHO</value>
|
||||
</data>
|
||||
<data name=">>colCHANGED_WHO.Type" xml:space="preserve">
|
||||
<value>DevExpress.XtraGrid.Columns.GridColumn, DevExpress.XtraGrid.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
|
||||
</data>
|
||||
<data name=">>colCHANGED_WHEN.Name" xml:space="preserve">
|
||||
<value>colCHANGED_WHEN</value>
|
||||
</data>
|
||||
<data name=">>colCHANGED_WHEN.Type" xml:space="preserve">
|
||||
<value>DevExpress.XtraGrid.Columns.GridColumn, DevExpress.XtraGrid.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
|
||||
</data>
|
||||
<data name=">>colDESCRIPTION1.Name" xml:space="preserve">
|
||||
<value>colDESCRIPTION1</value>
|
||||
</data>
|
||||
|
||||
@ -488,7 +488,7 @@
|
||||
AAEAAAD/////AQAAAAAAAAAMAgAAAFdTeXN0ZW0uV2luZG93cy5Gb3JtcywgVmVyc2lvbj00LjAuMC4w
|
||||
LCBDdWx0dXJlPW5ldXRyYWwsIFB1YmxpY0tleVRva2VuPWI3N2E1YzU2MTkzNGUwODkFAQAAACZTeXN0
|
||||
ZW0uV2luZG93cy5Gb3Jtcy5JbWFnZUxpc3RTdHJlYW1lcgEAAAAERGF0YQcCAgAAAAkDAAAADwMAAADw
|
||||
CAAAAk1TRnQBSQFMAgEBAgEAAWwBBQFsAQUBEAEAARABAAT/AQkBAAj/AUIBTQE2AQQGAAE2AQQCAAEo
|
||||
CAAAAk1TRnQBSQFMAgEBAgEAAXQBBQF0AQUBEAEAARABAAT/AQkBAAj/AUIBTQE2AQQGAAE2AQQCAAEo
|
||||
AwABQAMAARADAAEBAQABCAYAAQQYAAGAAgABgAMAAoABAAGAAwABgAEAAYABAAKAAgADwAEAAcAB3AHA
|
||||
AQAB8AHKAaYBAAEzBQABMwEAATMBAAEzAQACMwIAAxYBAAMcAQADIgEAAykBAANVAQADTQEAA0IBAAM5
|
||||
AQABgAF8Af8BAAJQAf8BAAGTAQAB1gEAAf8B7AHMAQABxgHWAe8BAAHWAucBAAGQAakBrQIAAf8BMwMA
|
||||
@ -541,105 +541,9 @@
|
||||
<metadata name="TableAdapterManager.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
|
||||
<value>597, 17</value>
|
||||
</metadata>
|
||||
<metadata name="BindingNavigator1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
|
||||
<value>500, 134</value>
|
||||
</metadata>
|
||||
<data name=">>GridControl_Docs.Name" xml:space="preserve">
|
||||
<value>GridControl_Docs</value>
|
||||
</data>
|
||||
<data name=">>GridControl_Docs.Type" xml:space="preserve">
|
||||
<value>DevExpress.XtraGrid.GridControl, DevExpress.XtraGrid.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
|
||||
</data>
|
||||
<data name=">>GridControl_Docs.Parent" xml:space="preserve">
|
||||
<value>Panel1</value>
|
||||
</data>
|
||||
<data name=">>GridControl_Docs.ZOrder" xml:space="preserve">
|
||||
<value>0</value>
|
||||
</data>
|
||||
<data name=">>BindingNavigator1.Name" xml:space="preserve">
|
||||
<value>BindingNavigator1</value>
|
||||
</data>
|
||||
<data name=">>BindingNavigator1.Type" xml:space="preserve">
|
||||
<value>System.Windows.Forms.BindingNavigator, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</data>
|
||||
<data name=">>BindingNavigator1.Parent" xml:space="preserve">
|
||||
<value>Panel1</value>
|
||||
</data>
|
||||
<data name=">>BindingNavigator1.ZOrder" xml:space="preserve">
|
||||
<value>1</value>
|
||||
</data>
|
||||
<data name=">>NavBarControl1.Name" xml:space="preserve">
|
||||
<value>NavBarControl1</value>
|
||||
</data>
|
||||
<data name=">>NavBarControl1.Type" xml:space="preserve">
|
||||
<value>DevExpress.XtraNavBar.NavBarControl, DevExpress.XtraNavBar.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
|
||||
</data>
|
||||
<data name=">>NavBarControl1.Parent" xml:space="preserve">
|
||||
<value>Panel1</value>
|
||||
</data>
|
||||
<data name=">>NavBarControl1.ZOrder" xml:space="preserve">
|
||||
<value>2</value>
|
||||
</data>
|
||||
<data name="Panel1.Dock" type="System.Windows.Forms.DockStyle, System.Windows.Forms">
|
||||
<value>Fill</value>
|
||||
</data>
|
||||
<data name="Panel1.Font" type="System.Drawing.Font, System.Drawing">
|
||||
<value>Tahoma, 9pt</value>
|
||||
</data>
|
||||
<data name="Panel1.Location" type="System.Drawing.Point, System.Drawing">
|
||||
<value>0, 158</value>
|
||||
</data>
|
||||
<data name="Panel1.Size" type="System.Drawing.Size, System.Drawing">
|
||||
<value>1023, 345</value>
|
||||
</data>
|
||||
<data name="Panel1.TabIndex" type="System.Int32, mscorlib">
|
||||
<value>4</value>
|
||||
</data>
|
||||
<data name=">>Panel1.Name" xml:space="preserve">
|
||||
<value>Panel1</value>
|
||||
</data>
|
||||
<data name=">>Panel1.Type" xml:space="preserve">
|
||||
<value>System.Windows.Forms.Panel, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</data>
|
||||
<data name=">>Panel1.Parent" xml:space="preserve">
|
||||
<value>$this</value>
|
||||
</data>
|
||||
<data name=">>Panel1.ZOrder" xml:space="preserve">
|
||||
<value>3</value>
|
||||
</data>
|
||||
<metadata name="ContextMenuGrid.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
|
||||
<value>637, 95</value>
|
||||
</metadata>
|
||||
<data name="ContextMenuGrid.Size" type="System.Drawing.Size, System.Drawing">
|
||||
<value>270, 198</value>
|
||||
</data>
|
||||
<data name=">>ContextMenuGrid.Name" xml:space="preserve">
|
||||
<value>ContextMenuGrid</value>
|
||||
</data>
|
||||
<data name=">>ContextMenuGrid.Type" xml:space="preserve">
|
||||
<value>System.Windows.Forms.ContextMenuStrip, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</data>
|
||||
<data name="GridControl_Docs.Location" type="System.Drawing.Point, System.Drawing">
|
||||
<value>256, 30</value>
|
||||
</data>
|
||||
<data name="GridControl_Docs.Size" type="System.Drawing.Size, System.Drawing">
|
||||
<value>631, 241</value>
|
||||
</data>
|
||||
<data name="GridControl_Docs.TabIndex" type="System.Int32, mscorlib">
|
||||
<value>8</value>
|
||||
</data>
|
||||
<data name=">>GridControl_Docs.Name" xml:space="preserve">
|
||||
<value>GridControl_Docs</value>
|
||||
</data>
|
||||
<data name=">>GridControl_Docs.Type" xml:space="preserve">
|
||||
<value>DevExpress.XtraGrid.GridControl, DevExpress.XtraGrid.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
|
||||
</data>
|
||||
<data name=">>GridControl_Docs.Parent" xml:space="preserve">
|
||||
<value>Panel1</value>
|
||||
</data>
|
||||
<data name=">>GridControl_Docs.ZOrder" xml:space="preserve">
|
||||
<value>0</value>
|
||||
</data>
|
||||
<data name="CMGroupStart.Size" type="System.Drawing.Size, System.Drawing">
|
||||
<value>269, 26</value>
|
||||
</data>
|
||||
@ -720,6 +624,36 @@
|
||||
<data name="LayoutSpeichernToolStripMenuItem.Text" xml:space="preserve">
|
||||
<value>Layout speichern</value>
|
||||
</data>
|
||||
<data name="ContextMenuGrid.Size" type="System.Drawing.Size, System.Drawing">
|
||||
<value>270, 198</value>
|
||||
</data>
|
||||
<data name=">>ContextMenuGrid.Name" xml:space="preserve">
|
||||
<value>ContextMenuGrid</value>
|
||||
</data>
|
||||
<data name=">>ContextMenuGrid.Type" xml:space="preserve">
|
||||
<value>System.Windows.Forms.ContextMenuStrip, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</data>
|
||||
<data name="GridControl_Docs.Location" type="System.Drawing.Point, System.Drawing">
|
||||
<value>256, 30</value>
|
||||
</data>
|
||||
<data name="GridControl_Docs.Size" type="System.Drawing.Size, System.Drawing">
|
||||
<value>631, 241</value>
|
||||
</data>
|
||||
<data name="GridControl_Docs.TabIndex" type="System.Int32, mscorlib">
|
||||
<value>8</value>
|
||||
</data>
|
||||
<data name=">>GridControl_Docs.Name" xml:space="preserve">
|
||||
<value>GridControl_Docs</value>
|
||||
</data>
|
||||
<data name=">>GridControl_Docs.Type" xml:space="preserve">
|
||||
<value>DevExpress.XtraGrid.GridControl, DevExpress.XtraGrid.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
|
||||
</data>
|
||||
<data name=">>GridControl_Docs.Parent" xml:space="preserve">
|
||||
<value>Panel1</value>
|
||||
</data>
|
||||
<data name=">>GridControl_Docs.ZOrder" xml:space="preserve">
|
||||
<value>0</value>
|
||||
</data>
|
||||
<metadata name="BindingNavigator1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
|
||||
<value>500, 134</value>
|
||||
</metadata>
|
||||
@ -923,6 +857,12 @@
|
||||
<metadata name="cmsNavPane.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
|
||||
<value>786, 95</value>
|
||||
</metadata>
|
||||
<data name="tsmiValidationProfil.Size" type="System.Drawing.Size, System.Drawing">
|
||||
<value>219, 26</value>
|
||||
</data>
|
||||
<data name="tsmiValidationProfil.Text" xml:space="preserve">
|
||||
<value>Starte Validierung für Profil</value>
|
||||
</data>
|
||||
<data name="cmsNavPane.Size" type="System.Drawing.Size, System.Drawing">
|
||||
<value>220, 30</value>
|
||||
</data>
|
||||
@ -1120,11 +1060,32 @@
|
||||
<data name=">>NavBarControl1.ZOrder" xml:space="preserve">
|
||||
<value>2</value>
|
||||
</data>
|
||||
<data name="tsmiValidationProfil.Size" type="System.Drawing.Size, System.Drawing">
|
||||
<value>219, 26</value>
|
||||
<data name="Panel1.Dock" type="System.Windows.Forms.DockStyle, System.Windows.Forms">
|
||||
<value>Fill</value>
|
||||
</data>
|
||||
<data name="tsmiValidationProfil.Text" xml:space="preserve">
|
||||
<value>Starte Validierung für Profil</value>
|
||||
<data name="Panel1.Font" type="System.Drawing.Font, System.Drawing">
|
||||
<value>Tahoma, 9pt</value>
|
||||
</data>
|
||||
<data name="Panel1.Location" type="System.Drawing.Point, System.Drawing">
|
||||
<value>0, 158</value>
|
||||
</data>
|
||||
<data name="Panel1.Size" type="System.Drawing.Size, System.Drawing">
|
||||
<value>1023, 345</value>
|
||||
</data>
|
||||
<data name="Panel1.TabIndex" type="System.Int32, mscorlib">
|
||||
<value>4</value>
|
||||
</data>
|
||||
<data name=">>Panel1.Name" xml:space="preserve">
|
||||
<value>Panel1</value>
|
||||
</data>
|
||||
<data name=">>Panel1.Type" xml:space="preserve">
|
||||
<value>System.Windows.Forms.Panel, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</data>
|
||||
<data name=">>Panel1.Parent" xml:space="preserve">
|
||||
<value>$this</value>
|
||||
</data>
|
||||
<data name=">>Panel1.ZOrder" xml:space="preserve">
|
||||
<value>3</value>
|
||||
</data>
|
||||
<metadata name="NotifyIcon1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
|
||||
<value>908, 17</value>
|
||||
@ -1132,6 +1093,18 @@
|
||||
<metadata name="ContextMenuNotifyIcon.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
|
||||
<value>17, 173</value>
|
||||
</metadata>
|
||||
<data name="PopupErinnerungInaktivierenToolStripMenuItem.Size" type="System.Drawing.Size, System.Drawing">
|
||||
<value>234, 22</value>
|
||||
</data>
|
||||
<data name="PopupErinnerungInaktivierenToolStripMenuItem.Text" xml:space="preserve">
|
||||
<value>Popup Erinnerung inaktivieren</value>
|
||||
</data>
|
||||
<data name="AnzeigenToolStripMenuItem.Size" type="System.Drawing.Size, System.Drawing">
|
||||
<value>234, 22</value>
|
||||
</data>
|
||||
<data name="AnzeigenToolStripMenuItem.Text" xml:space="preserve">
|
||||
<value>Monitor anzeigen</value>
|
||||
</data>
|
||||
<data name="ContextMenuNotifyIcon.Size" type="System.Drawing.Size, System.Drawing">
|
||||
<value>235, 48</value>
|
||||
</data>
|
||||
@ -1313,18 +1286,6 @@
|
||||
<data name="NotifyIcon1.Visible" type="System.Boolean, mscorlib">
|
||||
<value>True</value>
|
||||
</data>
|
||||
<data name="PopupErinnerungInaktivierenToolStripMenuItem.Size" type="System.Drawing.Size, System.Drawing">
|
||||
<value>234, 22</value>
|
||||
</data>
|
||||
<data name="PopupErinnerungInaktivierenToolStripMenuItem.Text" xml:space="preserve">
|
||||
<value>Popup Erinnerung inaktivieren</value>
|
||||
</data>
|
||||
<data name="AnzeigenToolStripMenuItem.Size" type="System.Drawing.Size, System.Drawing">
|
||||
<value>234, 22</value>
|
||||
</data>
|
||||
<data name="AnzeigenToolStripMenuItem.Text" xml:space="preserve">
|
||||
<value>Monitor anzeigen</value>
|
||||
</data>
|
||||
<metadata name="TimerRefresh.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
|
||||
<value>17, 56</value>
|
||||
</metadata>
|
||||
@ -1645,6 +1606,18 @@
|
||||
<data name="RibbonControl1.Location" type="System.Drawing.Point, System.Drawing">
|
||||
<value>0, 0</value>
|
||||
</data>
|
||||
<data name="RibbonPageGroup1.Text" xml:space="preserve">
|
||||
<value>Allgemein</value>
|
||||
</data>
|
||||
<data name="RibbonPageGroup2.Text" xml:space="preserve">
|
||||
<value>Funktionen</value>
|
||||
</data>
|
||||
<data name="RibbonPageGroup3.Text" xml:space="preserve">
|
||||
<value>Verwaltung</value>
|
||||
</data>
|
||||
<data name="RibbonPageGroup4.Text" xml:space="preserve">
|
||||
<value>Grundeinstellungen</value>
|
||||
</data>
|
||||
<data name="RibbonPage1.Text" xml:space="preserve">
|
||||
<value>Funktionen</value>
|
||||
</data>
|
||||
@ -1681,18 +1654,6 @@
|
||||
<data name=">>RibbonControl1.ZOrder" xml:space="preserve">
|
||||
<value>5</value>
|
||||
</data>
|
||||
<data name="RibbonPageGroup1.Text" xml:space="preserve">
|
||||
<value>Allgemein</value>
|
||||
</data>
|
||||
<data name="RibbonPageGroup2.Text" xml:space="preserve">
|
||||
<value>Funktionen</value>
|
||||
</data>
|
||||
<data name="RibbonPageGroup3.Text" xml:space="preserve">
|
||||
<value>Verwaltung</value>
|
||||
</data>
|
||||
<data name="RibbonPageGroup4.Text" xml:space="preserve">
|
||||
<value>Grundeinstellungen</value>
|
||||
</data>
|
||||
<data name="RibbonPage2.Text" xml:space="preserve">
|
||||
<value>RibbonPage2</value>
|
||||
</data>
|
||||
@ -1887,7 +1848,7 @@
|
||||
<value>Manual</value>
|
||||
</data>
|
||||
<data name="$this.Text" xml:space="preserve">
|
||||
<value>Process Manager - Profil-Monitor</value>
|
||||
<value>4565465</value>
|
||||
</data>
|
||||
<data name=">>ImageListProfile.Name" xml:space="preserve">
|
||||
<value>ImageListProfile</value>
|
||||
|
||||
@ -582,7 +582,7 @@ Public Class frmMain
|
||||
Catch ex As Exception
|
||||
LOGGER.Error(ex)
|
||||
LOGGER.Info("Layout Dashboard - Error: " & ex.Message)
|
||||
MsgBox("Unexpected Error in Layout Dashboard - Error: " & vbNewLine & ex.Message, MsgBoxStyle.Critical)
|
||||
MsgBox("Unexpected Error in Layout Dashboard - Error: " & vbNewLine & ex.Message, MsgBoxStyle.Critical, ADDITIONAL_TITLE)
|
||||
End Try
|
||||
End Sub
|
||||
Private Function Create_Series(title As String, type As String) As Series
|
||||
@ -1148,13 +1148,13 @@ Public Class frmMain
|
||||
|
||||
End If
|
||||
Else
|
||||
MsgBox("Could not get the ProfileID of file! - Check Your configuration of MainView!", MsgBoxStyle.Critical)
|
||||
MsgBox("Could not get the ProfileID of file! - Check Your configuration of MainView!", MsgBoxStyle.Critical, ADDITIONAL_TITLE)
|
||||
|
||||
End If
|
||||
Catch ex As Exception
|
||||
LOGGER.Error(ex)
|
||||
allgFunk.Insert_LogEntry($"{ex.Message} - Stack: [{ex.StackTrace}]")
|
||||
MsgBox("Unexpected error in Item_Scope: " & ex.Message & vbNewLine & "Choose file again!", MsgBoxStyle.Information)
|
||||
MsgBox("Unexpected error in Item_Scope: " & ex.Message & vbNewLine & "Choose file again!", MsgBoxStyle.Information, ADDITIONAL_TITLE)
|
||||
End Try
|
||||
End Sub
|
||||
Private Function Init_IDB()
|
||||
@ -1283,11 +1283,6 @@ Public Class frmMain
|
||||
Load_Grid_Overview()
|
||||
RefreshHelper.LoadViewInfo()
|
||||
End Sub
|
||||
Private Sub GridView1_PopupMenuShowing(ByVal sender As Object, ByVal e As DevExpress.XtraGrid.Views.Grid.PopupMenuShowingEventArgs)
|
||||
Dim view As GridView = TryCast(sender, GridView)
|
||||
MsgBox(e.MenuType.ToString)
|
||||
|
||||
End Sub
|
||||
Sub Load_Grid_Overview()
|
||||
SplitContainerDashboard.Visible = False
|
||||
Layout_Single_Profile()
|
||||
@ -1498,7 +1493,7 @@ Public Class frmMain
|
||||
If CURRENT_CLICKED_PROFILE_ID <> 0 Then
|
||||
Load_Profil_from_Grid(CURRENT_CLICKED_PROFILE_ID)
|
||||
Else
|
||||
MsgBox("Bitte wählen Sie zuerst ein Profil aus!", MsgBoxResult.Ok)
|
||||
MsgBox("Please choose a profile!", MsgBoxResult.Ok, ADDITIONAL_TITLE)
|
||||
End If
|
||||
End Sub
|
||||
|
||||
@ -1663,11 +1658,8 @@ Public Class frmMain
|
||||
Else
|
||||
RibbonControl1.ColorScheme = DevExpress.XtraBars.Ribbon.RibbonControlColorScheme.Default
|
||||
End If
|
||||
If ADDITIONAL_TITLE <> String.Empty Then
|
||||
LOGGER.Debug($" RibbonControl1.ColorScheme [{RIBBON_COLOR_SCHEME}]")
|
||||
Me.Text = ADDITIONAL_TITLE
|
||||
Else
|
||||
Me.Text = "Process Manager"
|
||||
End If
|
||||
|
||||
End Sub
|
||||
Sub Handling_DEBUG_USER()
|
||||
@ -1724,7 +1716,7 @@ Public Class frmMain
|
||||
omsg = omsg.Replace(Chr(10), "")
|
||||
omsg = omsg.Replace(Chr(13), "")
|
||||
Dim odatetime As Date = CDate(oLogSplit(0))
|
||||
oSQL = $"INSERT INTO [dbo].[TBPM_LOG_DEBUG] ([USERID] , [LOGMSG], [ADDED_WHEN]) VALUES({USER_ID},'{omsg}','{odatetime}')"
|
||||
oSQL = $"INSERT INTO [dbo].[TBPM_LOG_DEBUG] ([USERID] , [LOGMSG], [ADDED_WHEN],DATE_STR) VALUES({USER_ID},'{omsg}',GetDate(),'{odatetime}')"
|
||||
ClassDatabase.Execute_non_Query(oSQL)
|
||||
Next
|
||||
LOGCONFIG.ClearLogs()
|
||||
@ -1735,7 +1727,7 @@ Public Class frmMain
|
||||
|
||||
End Sub
|
||||
Private Sub tsslblDEBUG_LOG_MouseHover(sender As Object, e As EventArgs)
|
||||
MsgBox("UserDebugMode is activated remotely. Debugdata will be transferred to database and will be deleted after 10 days!!", MsgBoxStyle.Information)
|
||||
MsgBox("UserDebugMode is activated remotely. Debugdata will be transferred to database and will be deleted after 10 days!!", MsgBoxStyle.Information, ADDITIONAL_TITLE)
|
||||
|
||||
End Sub
|
||||
|
||||
|
||||
@ -107,6 +107,8 @@ Public Class frmMonitor
|
||||
DocumentViewerMonitor.LoadFile(oDocPath)
|
||||
BarStaticItemInfo.Visibility = DevExpress.XtraBars.BarItemVisibility.Never
|
||||
DocumentViewerMonitor.Visible = True
|
||||
DocumentViewerMonitor.RightOnlyView(USER_RIGHT_VIEW_ONLY)
|
||||
|
||||
Else
|
||||
BarStaticItemInfo.Visibility = DevExpress.XtraBars.BarItemVisibility.Always
|
||||
BarStaticItemInfo.Caption = $"File is not existing or accessible!"
|
||||
|
||||
50
app/DD_PM_WINDREAM/frmValidator.Designer.vb
generated
50
app/DD_PM_WINDREAM/frmValidator.Designer.vb
generated
@ -30,6 +30,7 @@ Partial Class frmValidator
|
||||
Me.btnSave = New System.Windows.Forms.Button()
|
||||
Me.DESCRIPTIONLabel = New System.Windows.Forms.Label()
|
||||
Me.pnldesigner = New System.Windows.Forms.Panel()
|
||||
Me.DocumentViewerValidator = New DigitalData.Controls.DocumentViewer.DocumentViewer()
|
||||
Me.BarAndDockingController3 = New DevExpress.XtraBars.BarAndDockingController(Me.components)
|
||||
Me.BarAndDockingController2 = New DevExpress.XtraBars.BarAndDockingController(Me.components)
|
||||
Me.BarAndDockingController1 = New DevExpress.XtraBars.BarAndDockingController(Me.components)
|
||||
@ -84,7 +85,7 @@ Partial Class frmValidator
|
||||
Me.bsiError = New DevExpress.XtraBars.BarStaticItem()
|
||||
Me.bsiInformation = New DevExpress.XtraBars.BarStaticItem()
|
||||
Me.bsiDocID = New DevExpress.XtraBars.BarStaticItem()
|
||||
Me.BarButtonItem2 = New DevExpress.XtraBars.BarButtonItem()
|
||||
Me.BarButtonItemFileView = New DevExpress.XtraBars.BarButtonItem()
|
||||
Me.BarButtonItem3 = New DevExpress.XtraBars.BarButtonItem()
|
||||
Me.BarButtonItem4 = New DevExpress.XtraBars.BarButtonItem()
|
||||
Me.bbtniRefresh = New DevExpress.XtraBars.BarButtonItem()
|
||||
@ -95,12 +96,11 @@ Partial Class frmValidator
|
||||
Me.bsiInfo1 = New DevExpress.XtraBars.BarStaticItem()
|
||||
Me.bsiInfo2 = New DevExpress.XtraBars.BarStaticItem()
|
||||
Me.RibbonPage1 = New DevExpress.XtraBars.Ribbon.RibbonPage()
|
||||
Me.RibbonPageGroup1 = New DevExpress.XtraBars.Ribbon.RibbonPageGroup()
|
||||
Me.RibbonPageFile = New DevExpress.XtraBars.Ribbon.RibbonPageGroup()
|
||||
Me.RibbonPageGroup3 = New DevExpress.XtraBars.Ribbon.RibbonPageGroup()
|
||||
Me.RibbonPageGroup2 = New DevExpress.XtraBars.Ribbon.RibbonPageGroup()
|
||||
Me.RibbonStatusBar1 = New DevExpress.XtraBars.Ribbon.RibbonStatusBar()
|
||||
Me.RibbonPage2 = New DevExpress.XtraBars.Ribbon.RibbonPage()
|
||||
Me.DocumentViewerValidator = New DigitalData.Controls.DocumentViewer.DocumentViewer()
|
||||
CType(Me.SplitContainer1, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
Me.SplitContainer1.Panel1.SuspendLayout()
|
||||
Me.SplitContainer1.Panel2.SuspendLayout()
|
||||
@ -171,6 +171,11 @@ Partial Class frmValidator
|
||||
Me.pnldesigner.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.pnldesigner.Name = "pnldesigner"
|
||||
'
|
||||
'DocumentViewerValidator
|
||||
'
|
||||
resources.ApplyResources(Me.DocumentViewerValidator, "DocumentViewerValidator")
|
||||
Me.DocumentViewerValidator.Name = "DocumentViewerValidator"
|
||||
'
|
||||
'BarAndDockingController3
|
||||
'
|
||||
Me.BarAndDockingController3.PropertiesBar.AllowLinkLighting = False
|
||||
@ -504,7 +509,7 @@ Partial Class frmValidator
|
||||
'RibbonControl1
|
||||
'
|
||||
Me.RibbonControl1.ExpandCollapseItem.Id = 0
|
||||
Me.RibbonControl1.Items.AddRange(New DevExpress.XtraBars.BarItem() {Me.RibbonControl1.ExpandCollapseItem, Me.RibbonControl1.SearchEditItem, Me.bsiError, Me.bsiInformation, Me.bsiDocID, Me.BarButtonItem2, Me.BarButtonItem3, Me.BarButtonItem4, Me.bbtniRefresh, Me.bbtniRefreshSearches, Me.bbtniNext, Me.bbtniDelete, Me.bbtniAnnotation, Me.bsiInfo1, Me.bsiInfo2})
|
||||
Me.RibbonControl1.Items.AddRange(New DevExpress.XtraBars.BarItem() {Me.RibbonControl1.ExpandCollapseItem, Me.RibbonControl1.SearchEditItem, Me.bsiError, Me.bsiInformation, Me.bsiDocID, Me.BarButtonItemFileView, Me.BarButtonItem3, Me.BarButtonItem4, Me.bbtniRefresh, Me.bbtniRefreshSearches, Me.bbtniNext, Me.bbtniDelete, Me.bbtniAnnotation, Me.bsiInfo1, Me.bsiInfo2})
|
||||
resources.ApplyResources(Me.RibbonControl1, "RibbonControl1")
|
||||
Me.RibbonControl1.MaxItemId = 16
|
||||
Me.RibbonControl1.Name = "RibbonControl1"
|
||||
@ -533,13 +538,13 @@ Partial Class frmValidator
|
||||
Me.bsiDocID.Id = 3
|
||||
Me.bsiDocID.Name = "bsiDocID"
|
||||
'
|
||||
'BarButtonItem2
|
||||
'BarButtonItemFileView
|
||||
'
|
||||
resources.ApplyResources(Me.BarButtonItem2, "BarButtonItem2")
|
||||
Me.BarButtonItem2.Id = 4
|
||||
Me.BarButtonItem2.ImageOptions.Image = CType(resources.GetObject("BarButtonItem2.ImageOptions.Image"), System.Drawing.Image)
|
||||
Me.BarButtonItem2.ImageOptions.LargeImage = CType(resources.GetObject("BarButtonItem2.ImageOptions.LargeImage"), System.Drawing.Image)
|
||||
Me.BarButtonItem2.Name = "BarButtonItem2"
|
||||
resources.ApplyResources(Me.BarButtonItemFileView, "BarButtonItemFileView")
|
||||
Me.BarButtonItemFileView.Id = 4
|
||||
Me.BarButtonItemFileView.ImageOptions.Image = CType(resources.GetObject("BarButtonItem2.ImageOptions.Image"), System.Drawing.Image)
|
||||
Me.BarButtonItemFileView.ImageOptions.LargeImage = CType(resources.GetObject("BarButtonItem2.ImageOptions.LargeImage"), System.Drawing.Image)
|
||||
Me.BarButtonItemFileView.Name = "BarButtonItemFileView"
|
||||
'
|
||||
'BarButtonItem3
|
||||
'
|
||||
@ -627,18 +632,18 @@ Partial Class frmValidator
|
||||
'
|
||||
'RibbonPage1
|
||||
'
|
||||
Me.RibbonPage1.Groups.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPageGroup() {Me.RibbonPageGroup1, Me.RibbonPageGroup3, Me.RibbonPageGroup2})
|
||||
Me.RibbonPage1.Groups.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPageGroup() {Me.RibbonPageFile, Me.RibbonPageGroup3, Me.RibbonPageGroup2})
|
||||
Me.RibbonPage1.Name = "RibbonPage1"
|
||||
resources.ApplyResources(Me.RibbonPage1, "RibbonPage1")
|
||||
'
|
||||
'RibbonPageGroup1
|
||||
'RibbonPageFile
|
||||
'
|
||||
Me.RibbonPageGroup1.Alignment = DevExpress.XtraBars.Ribbon.RibbonPageGroupAlignment.Far
|
||||
Me.RibbonPageGroup1.ItemLinks.Add(Me.BarButtonItem2)
|
||||
Me.RibbonPageGroup1.ItemLinks.Add(Me.BarButtonItem3)
|
||||
Me.RibbonPageGroup1.ItemLinks.Add(Me.BarButtonItem4)
|
||||
Me.RibbonPageGroup1.Name = "RibbonPageGroup1"
|
||||
resources.ApplyResources(Me.RibbonPageGroup1, "RibbonPageGroup1")
|
||||
Me.RibbonPageFile.Alignment = DevExpress.XtraBars.Ribbon.RibbonPageGroupAlignment.Far
|
||||
Me.RibbonPageFile.ItemLinks.Add(Me.BarButtonItemFileView)
|
||||
Me.RibbonPageFile.ItemLinks.Add(Me.BarButtonItem3)
|
||||
Me.RibbonPageFile.ItemLinks.Add(Me.BarButtonItem4)
|
||||
Me.RibbonPageFile.Name = "RibbonPageFile"
|
||||
resources.ApplyResources(Me.RibbonPageFile, "RibbonPageFile")
|
||||
'
|
||||
'RibbonPageGroup3
|
||||
'
|
||||
@ -674,11 +679,6 @@ Partial Class frmValidator
|
||||
Me.RibbonPage2.Name = "RibbonPage2"
|
||||
resources.ApplyResources(Me.RibbonPage2, "RibbonPage2")
|
||||
'
|
||||
'DocumentViewerValidator
|
||||
'
|
||||
resources.ApplyResources(Me.DocumentViewerValidator, "DocumentViewerValidator")
|
||||
Me.DocumentViewerValidator.Name = "DocumentViewerValidator"
|
||||
'
|
||||
'frmValidator
|
||||
'
|
||||
Me.Appearance.Options.UseFont = True
|
||||
@ -779,13 +779,13 @@ Partial Class frmValidator
|
||||
Friend WithEvents ToolTip1 As ToolTip
|
||||
Friend WithEvents RibbonControl1 As DevExpress.XtraBars.Ribbon.RibbonControl
|
||||
Friend WithEvents RibbonPage1 As DevExpress.XtraBars.Ribbon.RibbonPage
|
||||
Friend WithEvents RibbonPageGroup1 As DevExpress.XtraBars.Ribbon.RibbonPageGroup
|
||||
Friend WithEvents RibbonPageFile As DevExpress.XtraBars.Ribbon.RibbonPageGroup
|
||||
Friend WithEvents RibbonStatusBar1 As DevExpress.XtraBars.Ribbon.RibbonStatusBar
|
||||
Friend WithEvents RibbonPage2 As DevExpress.XtraBars.Ribbon.RibbonPage
|
||||
Friend WithEvents bsiError As DevExpress.XtraBars.BarStaticItem
|
||||
Friend WithEvents bsiInformation As DevExpress.XtraBars.BarStaticItem
|
||||
Friend WithEvents bsiDocID As DevExpress.XtraBars.BarStaticItem
|
||||
Friend WithEvents BarButtonItem2 As DevExpress.XtraBars.BarButtonItem
|
||||
Friend WithEvents BarButtonItemFileView As DevExpress.XtraBars.BarButtonItem
|
||||
Friend WithEvents BarButtonItem3 As DevExpress.XtraBars.BarButtonItem
|
||||
Friend WithEvents BarButtonItem4 As DevExpress.XtraBars.BarButtonItem
|
||||
Friend WithEvents RibbonPageGroup3 As DevExpress.XtraBars.Ribbon.RibbonPageGroup
|
||||
|
||||
@ -123,7 +123,7 @@
|
||||
</data>
|
||||
<assembly alias="System.Drawing" name="System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" />
|
||||
<data name="SplitContainer1.Location" type="System.Drawing.Point, System.Drawing">
|
||||
<value>0, 158</value>
|
||||
<value>0, 146</value>
|
||||
</data>
|
||||
<data name="TITLELabel1.Anchor" type="System.Windows.Forms.AnchorStyles, System.Windows.Forms">
|
||||
<value>Top, Left, Right</value>
|
||||
@ -172,7 +172,7 @@
|
||||
<value>MiddleLeft</value>
|
||||
</data>
|
||||
<data name="btnSave.Location" type="System.Drawing.Point, System.Drawing">
|
||||
<value>7, 404</value>
|
||||
<value>7, 419</value>
|
||||
</data>
|
||||
<data name="btnSave.Margin" type="System.Windows.Forms.Padding, System.Windows.Forms">
|
||||
<value>3, 4, 3, 4</value>
|
||||
@ -238,7 +238,7 @@
|
||||
<value>3, 4, 3, 4</value>
|
||||
</data>
|
||||
<data name="pnldesigner.Size" type="System.Drawing.Size, System.Drawing">
|
||||
<value>466, 311</value>
|
||||
<value>466, 326</value>
|
||||
</data>
|
||||
<data name="pnldesigner.TabIndex" type="System.Int32, mscorlib">
|
||||
<value>18</value>
|
||||
@ -265,7 +265,7 @@
|
||||
<value>3, 4, 3, 4</value>
|
||||
</data>
|
||||
<data name="Panel1.Size" type="System.Drawing.Size, System.Drawing">
|
||||
<value>477, 461</value>
|
||||
<value>477, 476</value>
|
||||
</data>
|
||||
<data name="Panel1.TabIndex" type="System.Int32, mscorlib">
|
||||
<value>24</value>
|
||||
@ -304,7 +304,7 @@
|
||||
<value>3, 4, 3, 4</value>
|
||||
</data>
|
||||
<data name="DocumentViewerValidator.Size" type="System.Drawing.Size, System.Drawing">
|
||||
<value>481, 461</value>
|
||||
<value>481, 476</value>
|
||||
</data>
|
||||
<data name="DocumentViewerValidator.TabIndex" type="System.Int32, mscorlib">
|
||||
<value>0</value>
|
||||
@ -334,7 +334,7 @@
|
||||
<value>1</value>
|
||||
</data>
|
||||
<data name="SplitContainer1.Size" type="System.Drawing.Size, System.Drawing">
|
||||
<value>962, 461</value>
|
||||
<value>962, 476</value>
|
||||
</data>
|
||||
<data name="SplitContainer1.SplitterDistance" type="System.Int32, mscorlib">
|
||||
<value>477</value>
|
||||
@ -507,7 +507,7 @@
|
||||
<data name="bsiDocID.Caption" xml:space="preserve">
|
||||
<value>BarStaticItem1</value>
|
||||
</data>
|
||||
<data name="BarButtonItem2.Caption" xml:space="preserve">
|
||||
<data name="BarButtonItemFileView.Caption" xml:space="preserve">
|
||||
<value>Datei öffnen</value>
|
||||
</data>
|
||||
<data name="BarButtonItem2.ImageOptions.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
@ -846,7 +846,7 @@
|
||||
<data name="RibbonControl1.Location" type="System.Drawing.Point, System.Drawing">
|
||||
<value>0, 0</value>
|
||||
</data>
|
||||
<data name="RibbonPageGroup1.Text" xml:space="preserve">
|
||||
<data name="RibbonPageFile.Text" xml:space="preserve">
|
||||
<value>Datei</value>
|
||||
</data>
|
||||
<data name="RibbonPageGroup3.Text" xml:space="preserve">
|
||||
@ -872,13 +872,13 @@
|
||||
<value>Menü</value>
|
||||
</data>
|
||||
<data name="RibbonControl1.Size" type="System.Drawing.Size, System.Drawing">
|
||||
<value>962, 158</value>
|
||||
<value>962, 146</value>
|
||||
</data>
|
||||
<data name="RibbonStatusBar1.Location" type="System.Drawing.Point, System.Drawing">
|
||||
<value>0, 619</value>
|
||||
<value>0, 622</value>
|
||||
</data>
|
||||
<data name="RibbonStatusBar1.Size" type="System.Drawing.Size, System.Drawing">
|
||||
<value>962, 24</value>
|
||||
<value>962, 21</value>
|
||||
</data>
|
||||
<data name=">>RibbonStatusBar1.Name" xml:space="preserve">
|
||||
<value>RibbonStatusBar1</value>
|
||||
@ -1420,10 +1420,10 @@
|
||||
<data name=">>bsiDocID.Type" xml:space="preserve">
|
||||
<value>DevExpress.XtraBars.BarStaticItem, DevExpress.XtraBars.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
|
||||
</data>
|
||||
<data name=">>BarButtonItem2.Name" xml:space="preserve">
|
||||
<value>BarButtonItem2</value>
|
||||
<data name=">>BarButtonItemFileView.Name" xml:space="preserve">
|
||||
<value>BarButtonItemFileView</value>
|
||||
</data>
|
||||
<data name=">>BarButtonItem2.Type" xml:space="preserve">
|
||||
<data name=">>BarButtonItemFileView.Type" xml:space="preserve">
|
||||
<value>DevExpress.XtraBars.BarButtonItem, DevExpress.XtraBars.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
|
||||
</data>
|
||||
<data name=">>BarButtonItem3.Name" xml:space="preserve">
|
||||
@ -1486,10 +1486,10 @@
|
||||
<data name=">>RibbonPage1.Type" xml:space="preserve">
|
||||
<value>DevExpress.XtraBars.Ribbon.RibbonPage, DevExpress.XtraBars.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
|
||||
</data>
|
||||
<data name=">>RibbonPageGroup1.Name" xml:space="preserve">
|
||||
<value>RibbonPageGroup1</value>
|
||||
<data name=">>RibbonPageFile.Name" xml:space="preserve">
|
||||
<value>RibbonPageFile</value>
|
||||
</data>
|
||||
<data name=">>RibbonPageGroup1.Type" xml:space="preserve">
|
||||
<data name=">>RibbonPageFile.Type" xml:space="preserve">
|
||||
<value>DevExpress.XtraBars.Ribbon.RibbonPageGroup, DevExpress.XtraBars.v19.2, Version=19.2.3.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
|
||||
</data>
|
||||
<data name=">>RibbonPageGroup3.Name" xml:space="preserve">
|
||||
|
||||
@ -523,7 +523,7 @@ Public Class frmValidator
|
||||
Next
|
||||
Catch ex As Exception
|
||||
LOGGER.Error(ex)
|
||||
MsgBox("Error in LoadSQLData: " & ex.Message, MsgBoxStyle.Critical)
|
||||
MsgBox("Error in LoadSQLData: " & ex.Message, MsgBoxStyle.Critical, ADDITIONAL_TITLE)
|
||||
clsLogger.Add("Error in LoadSQLData: " & ex.Message)
|
||||
End Try
|
||||
End Sub
|
||||
@ -560,7 +560,7 @@ Public Class frmValidator
|
||||
oDTforControl = ClassDatabase.Return_Datatable_ConId(oSql, oConnectionId)
|
||||
|
||||
If IsNothing(oDTforControl) Then
|
||||
MsgBox($"SQL-Query for control {control.Name} is invalid.")
|
||||
MsgBox($"SQL-Query for control {control.Name} is invalid.", MsgBoxStyle.OkOnly, ADDITIONAL_TITLE)
|
||||
Exit Sub
|
||||
End If
|
||||
Dim oValue
|
||||
@ -635,7 +635,7 @@ Public Class frmValidator
|
||||
Next
|
||||
Catch ex As Exception
|
||||
LOGGER.Error(ex)
|
||||
MsgBox("Error in LoadSQLData2: " & ex.Message, MsgBoxStyle.Critical)
|
||||
MsgBox("Error in LoadSQLData2: " & ex.Message, MsgBoxStyle.Critical, ADDITIONAL_TITLE)
|
||||
clsLogger.Add("Error in LoadSQLData2: " & ex.Message)
|
||||
End Try
|
||||
End Sub
|
||||
@ -1126,10 +1126,10 @@ Public Class frmValidator
|
||||
Override_SQLCommand = clsPatterns.ReplaceAllValues(Override_SQLCommand, pnldesigner, CURRENT_WMFILE, USER_PRENAME, USER_SURNAME, USER_SHORTNAME, USER_LANGUAGE, USER_EMAIL, USER_ID, CURRENT_CLICKED_PROFILE_ID)
|
||||
Dim oDT_ACTIONS As DataTable = ClassDatabase.Return_Datatable(oSQL)
|
||||
If IsNothing(oDT_ACTIONS) Then
|
||||
MsgBox("Something went wrong in custom action - Please check Your log!", MsgBoxStyle.Exclamation)
|
||||
MsgBox("Something went wrong in custom action - Please check Your log!", MsgBoxStyle.Exclamation, ADDITIONAL_TITLE)
|
||||
Exit Sub
|
||||
ElseIf oDT_ACTIONS.Rows.Count = 0 Then
|
||||
MsgBox("Something went wrong in custom action (No row) - Please check Your log!", MsgBoxStyle.Exclamation)
|
||||
MsgBox("Something went wrong in custom action (No row) - Please check Your log!", MsgBoxStyle.Exclamation, ADDITIONAL_TITLE)
|
||||
Exit Sub
|
||||
End If
|
||||
'Select Case'Override' as Action_Type, 'Sind Sie sicher dass Sie nicht zuständig sind?' as Question,'Nicht Zuständig' as Caption,'Red' as Color
|
||||
@ -1211,7 +1211,7 @@ Public Class frmValidator
|
||||
If oREsult = True Then
|
||||
Reload_Controls(oControlName)
|
||||
Else
|
||||
MsgBox("Unexpected error in Button Refresh_Controls - Check Your log!", MsgBoxStyle.Exclamation)
|
||||
MsgBox("Unexpected error in Button Refresh_Controls - Check Your log!", MsgBoxStyle.Exclamation, ADDITIONAL_TITLE)
|
||||
End If
|
||||
End If
|
||||
Case "Update_Controls".ToUpper
|
||||
@ -1227,7 +1227,7 @@ Public Class frmValidator
|
||||
StatusLabel("Refreshed single control")
|
||||
FillIndexValues(False)
|
||||
Else
|
||||
MsgBox("Unexpected error in Button Refresh_Controls - Check Your log!", MsgBoxStyle.Exclamation)
|
||||
MsgBox("Unexpected error in Button Refresh_Controls - Check Your log!", MsgBoxStyle.Exclamation, ADDITIONAL_TITLE)
|
||||
End If
|
||||
|
||||
End If
|
||||
@ -1236,7 +1236,7 @@ Public Class frmValidator
|
||||
Override = True
|
||||
Finish_WFStep()
|
||||
Case Else
|
||||
MsgBox($"No configured action provided for onCustomButtonClick [{oAction}]", MsgBoxStyle.Exclamation, "")
|
||||
MsgBox($"No configured action provided for onCustomButtonClick [{oAction}]", MsgBoxStyle.Exclamation, ADDITIONAL_TITLE)
|
||||
LOGGER.Warn($"No configured action provided for onCustomButtonClick [{oAction}]")
|
||||
End Select
|
||||
|
||||
@ -1714,7 +1714,7 @@ Public Class frmValidator
|
||||
Catch ex As Exception
|
||||
LOGGER.Error(ex)
|
||||
LOGGER.Info("Unexpected Error in Depending_Control_Set_Result - ERROR: " & ex.Message)
|
||||
MsgBox("Unexpected error: " & ex.Message, MsgBoxStyle.Critical)
|
||||
MsgBox("Unexpected error: " & ex.Message, MsgBoxStyle.Critical, ADDITIONAL_TITLE)
|
||||
End Try
|
||||
End Sub
|
||||
Public Sub OnDTPValueChanged(sender As System.Object, e As System.EventArgs)
|
||||
@ -1940,7 +1940,7 @@ Public Class frmValidator
|
||||
LOGGER.Debug("Dokument-GUID: '" & CURRENT_DOC_GUID.ToString & "'")
|
||||
If CURRENT_DOC_GUID > 0 Then
|
||||
If GetWMDocPathWindows(0) = False Then
|
||||
MsgBox("Could not access the file! Check the log!", MsgBoxStyle.Critical, "")
|
||||
MsgBox("Could not access the file! Check the log!", MsgBoxStyle.Critical, ADDITIONAL_TITLE)
|
||||
Exit Sub
|
||||
End If
|
||||
If IDB_ACTIVE = False Then
|
||||
@ -2045,7 +2045,7 @@ Public Class frmValidator
|
||||
Try
|
||||
MsgBox(oROW.Item("STRING1"), MsgBoxStyle.Information, oROW.Item("STRING2"))
|
||||
Catch ex As Exception
|
||||
MsgBox("No more documents!" & vbNewLine & "Form will be closed now!", MsgBoxStyle.Information, "")
|
||||
MsgBox("No more documents!" & vbNewLine & "Form will be closed now!", MsgBoxStyle.Information, ADDITIONAL_TITLE)
|
||||
End Try
|
||||
activate_controls(True)
|
||||
Me.Close()
|
||||
@ -2063,6 +2063,12 @@ Public Class frmValidator
|
||||
End Sub
|
||||
Sub load_viewer()
|
||||
DocumentViewerValidator.LoadFile(WMDocPathWindows)
|
||||
DocumentViewerValidator.RightOnlyView(USER_RIGHT_VIEW_ONLY)
|
||||
If USER_RIGHT_VIEW_ONLY = True Then
|
||||
RibbonPageFile.Visible = False
|
||||
Else
|
||||
RibbonPageFile.Visible = True
|
||||
End If
|
||||
SplitContainer1.Panel2Collapsed = False
|
||||
|
||||
End Sub
|
||||
@ -2344,7 +2350,7 @@ Public Class frmValidator
|
||||
Return value
|
||||
Catch ex As Exception
|
||||
LOGGER.Error(ex)
|
||||
MsgBox("error in ReturnVektor_IndexValue: " & vbNewLine & ex.Message, MsgBoxStyle.Critical)
|
||||
MsgBox("error in ReturnVektor_IndexValue: " & vbNewLine & ex.Message, MsgBoxStyle.Critical, ADDITIONAL_TITLE)
|
||||
LOGGER.Info("error in ReturnVektor_IndexValue: " & ex.Message)
|
||||
Return ""
|
||||
End Try
|
||||
@ -2561,7 +2567,7 @@ Public Class frmValidator
|
||||
oControlType = "DataGridView"
|
||||
Dim dgv As DataGridView = oControl
|
||||
If oSourceIndexName = "" Then
|
||||
MsgBox("Attention wrong configuration:" & vbNewLine & "for control " & oControl.Name & " no INDEX configured!" & vbNewLine & "Bitte prüfen Sie den Formulardesigner!", MsgBoxStyle.Critical)
|
||||
MsgBox("Attention wrong configuration:" & vbNewLine & "for control " & oControl.Name & " no INDEX configured!" & vbNewLine & "Bitte prüfen Sie den Formulardesigner!", MsgBoxStyle.Critical, ADDITIONAL_TITLE)
|
||||
Exit For
|
||||
End If
|
||||
If oSourceIndexName Is Nothing = False Then
|
||||
@ -2579,7 +2585,7 @@ Public Class frmValidator
|
||||
'Tabellendarstellung
|
||||
Case "TABLE"
|
||||
|
||||
Dim dt As DataTable = ClassDatabase.Return_Datatable("SELECT * FROM TBPM_CONTROL_TABLE WHERE CONTROL_ID = " & oControlId)
|
||||
Dim dt As DataTable = ClassDatabase.Return_Datatable($"SELECT * FROM TBPM_CONTROL_TABLE WHERE CONTROL_ID = {oControlId} ORDER BY [SEQUENCE]")
|
||||
Dim SpaltenWerte As String()
|
||||
LOGGER.Debug($"{dt.Rows.Count} Columns configured for control {oControlId}.")
|
||||
If dt.Rows.Count > 1 Then
|
||||
@ -2638,7 +2644,7 @@ Public Class frmValidator
|
||||
oControlType = "DevExpress.XtraGrid.GridControl"
|
||||
Dim oMyGridControl As GridControl = oControl
|
||||
If oSourceIndexName = "" Then
|
||||
MsgBox("Attention wrong configuration:" & vbNewLine & "for control " & oControl.Name & " no INDEX configured!" & vbNewLine & "Bitte prüfen Sie den Formulardesigner!", MsgBoxStyle.Critical)
|
||||
MsgBox("Attention wrong configuration:" & vbNewLine & "for control " & oControl.Name & " no INDEX configured!" & vbNewLine & "Bitte prüfen Sie den Formulardesigner!", MsgBoxStyle.Critical, ADDITIONAL_TITLE)
|
||||
Exit For
|
||||
End If
|
||||
If oSourceIndexName Is Nothing = False Then
|
||||
@ -2658,7 +2664,7 @@ Public Class frmValidator
|
||||
Select Case oTyp
|
||||
'Tabellendarstellung
|
||||
Case "TABLE"
|
||||
Dim dt As DataTable = ClassDatabase.Return_Datatable("SELECT * FROM TBPM_CONTROL_TABLE WHERE CONTROL_ID = " & oControlId)
|
||||
Dim dt As DataTable = ClassDatabase.Return_Datatable($"SELECT * FROM TBPM_CONTROL_TABLE WHERE CONTROL_ID = {oControlId} ORDER BY [SEQUENCE]")
|
||||
Dim oColCount = dt.Rows.Count
|
||||
Dim oColValuesfromSource As String()
|
||||
LOGGER.Debug($"DevExpressGrid: {oColCount} Columns configured for control {oControlId}.")
|
||||
@ -2816,7 +2822,7 @@ Public Class frmValidator
|
||||
LOGGER.Debug("Loading checkbox.")
|
||||
oControlType = "CheckBox"
|
||||
If oSourceIndexName = "" Then
|
||||
MsgBox("Attention wrong configuration:" & vbNewLine & "for control " & oControl.Name & " no INDEX configured!" & vbNewLine & "Bitte prüfen Sie den Formulardesigner!", MsgBoxStyle.Critical)
|
||||
MsgBox("Attention wrong configuration:" & vbNewLine & "for control " & oControl.Name & " no INDEX configured!" & vbNewLine & "Bitte prüfen Sie den Formulardesigner!", MsgBoxStyle.Critical, ADDITIONAL_TITLE)
|
||||
Exit For
|
||||
End If
|
||||
If oSourceIndexName Is Nothing = False Then
|
||||
@ -2962,7 +2968,7 @@ Public Class frmValidator
|
||||
oControlType = "DateTimePicker"
|
||||
Dim DTP As DateTimePicker = oControl
|
||||
If oSourceIndexName = "" Then
|
||||
MsgBox("Attention wrong configuration:" & vbNewLine & "for control " & oControl.Name & " no INDEX configured!" & vbNewLine & "Bitte prüfen Sie den Formulardesigner!", MsgBoxStyle.Critical)
|
||||
MsgBox("Attention wrong configuration:" & vbNewLine & "for control " & oControl.Name & " no INDEX configured!" & vbNewLine & "Bitte prüfen Sie den Formulardesigner!", MsgBoxStyle.Critical, ADDITIONAL_TITLE)
|
||||
Exit For
|
||||
End If
|
||||
If oSourceIndexName Is Nothing = False Then
|
||||
@ -3158,10 +3164,10 @@ Public Class frmValidator
|
||||
|
||||
Dim oDT_ACTIONS As DataTable = ClassDatabase.Return_Datatable(oSQL)
|
||||
If IsNothing(oDT_ACTIONS) Then
|
||||
MsgBox("Something went wrong in btnFinish_continue - Please check Your log and inform the workflow-team!", MsgBoxStyle.Exclamation)
|
||||
MsgBox("Something went wrong in btnFinish_continue - Please check Your log and inform the workflow-team!", MsgBoxStyle.Exclamation, ADDITIONAL_TITLE)
|
||||
Return False
|
||||
ElseIf oDT_ACTIONS.Rows.Count = 0 Then
|
||||
MsgBox("Something went wrong in btnFinish_continue (No row) - Please check Your log and inform the workflow-team!", MsgBoxStyle.Exclamation)
|
||||
MsgBox("Something went wrong in btnFinish_continue (No row) - Please check Your log and inform the workflow-team!", MsgBoxStyle.Exclamation, ADDITIONAL_TITLE)
|
||||
Return False
|
||||
End If
|
||||
'Select Case'Override' as Action_Type, 'Sind Sie sicher dass Sie nicht zuständig sind?' as Question,'Nicht Zuständig' as Caption,'Red' as Color
|
||||
@ -3520,7 +3526,7 @@ Public Class frmValidator
|
||||
End If
|
||||
End If
|
||||
If oErrorOcurred = True Then
|
||||
MsgBox("Unhandled error occured ... please check your log!", MsgBoxStyle.Exclamation)
|
||||
MsgBox("Unhandled error occured ... please check your log!", MsgBoxStyle.Exclamation, ADDITIONAL_TITLE)
|
||||
ItemWorked = False
|
||||
Else
|
||||
'Das Dokument freigeben und as editiert markieren
|
||||
@ -3661,6 +3667,8 @@ Public Class frmValidator
|
||||
Dim oRegexMessage As String = NotNull(dr.Item("REGEX_MESSAGE_DE"), String.Empty)
|
||||
oControlName = dr.Item("CTRL_NAME")
|
||||
Dim oOVERWRITE_DATA = dr.Item("OVERWRITE_DATA")
|
||||
Dim oPreventMultipleValues = dr.Item("VKT_PREVENT_MULTIPLE_VALUES")
|
||||
|
||||
'Nur wenn der Name der Zeile entspricht und der Index READ_ONLY FALSE ist
|
||||
If dr.Item("CTRL_NAME") = oControl.Name And (oIsReadOnly = False Or oSQLCheckCommand <> "") And oIndexName <> "DD PM-ONLY FOR DISPLAY" Then
|
||||
LOGGER.Debug("Indexierung für Control (" & oControlId & ") '" & oControlName & "' gestartet. Indexname '" & oIndexName & "'")
|
||||
@ -3708,14 +3716,12 @@ Public Class frmValidator
|
||||
Else
|
||||
Dim oMyDT = DT_FOR_ARRAY(myVektorArr)
|
||||
|
||||
If IDBData.SetVariableValue(oIndexName, oMyDT, oOVERWRITE_DATA) = False Then
|
||||
If IDBData.SetVariableValue(oIndexName, oMyDT, oOVERWRITE_DATA, oIDBTyp) = False Then
|
||||
oMissing = True
|
||||
oErrorMessage = "Error while indexing IDB-Object LookupGrid"
|
||||
Exit For
|
||||
End If
|
||||
End If
|
||||
'Jetzt die Datei indexieren
|
||||
|
||||
Else
|
||||
Dim oValues As New List(Of Object) From {String.Empty}
|
||||
If IDB_ACTIVE = False Then
|
||||
@ -4686,7 +4692,7 @@ Public Class frmValidator
|
||||
bsiInformation.Caption = infotext & " " & Now.ToString
|
||||
End Sub
|
||||
|
||||
Private Sub BarButtonItem2_ItemClick(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles BarButtonItem2.ItemClick
|
||||
Private Sub BarButtonItem2_ItemClick(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles BarButtonItemFileView.ItemClick
|
||||
Try
|
||||
Dim Proc As New System.Diagnostics.Process
|
||||
Dim psi As New ProcessStartInfo(WMDocPathWindows)
|
||||
|
||||
@ -469,6 +469,12 @@ Public Class frmValidatorSearch
|
||||
If Not IsNothing(clsWMDocGrid.SELECTED_DOC_PATH) And Not IsNothing(DocumentViewer1) Then
|
||||
If clsWMDocGrid.SELECTED_DOC_PATH <> "" Then
|
||||
DocumentViewer1.LoadFile(clsWMDocGrid.SELECTED_DOC_PATH)
|
||||
DocumentViewer1.RightOnlyView(USER_RIGHT_VIEW_ONLY)
|
||||
If USER_RIGHT_VIEW_ONLY = True Then
|
||||
ToolStripDropDownButtonFile.Visible = False
|
||||
Else
|
||||
ToolStripDropDownButtonFile.Visible = True
|
||||
End If
|
||||
End If
|
||||
End If
|
||||
|
||||
|
||||
Loading…
x
Reference in New Issue
Block a user