MS V 3.1.3 Beta RightGroups und NodeConfig-Adding

This commit is contained in:
SchreiberM 2024-05-23 17:14:14 +02:00
parent ae4032ea59
commit bd084a0072
22 changed files with 3398 additions and 1522 deletions

View File

@ -11,7 +11,7 @@
</configSections> </configSections>
<connectionStrings> <connectionStrings>
<add name="DD_Record_Organizer.My.MySettings.DD_DMSConnectionString" <add name="DD_Record_Organizer.My.MySettings.DD_DMSConnectionString"
connectionString="Data Source=172.24.12.44\MERCER;Initial Catalog=DD_ECM;Persist Security Info=True;User ID=sa;Password=dd" connectionString="Data Source=172.24.12.44\MERCER;Initial Catalog=DD_ECM;Persist Security Info=True;User ID=sa;Password=dd;Encrypt=True;TrustServerCertificate=True"
providerName="System.Data.SqlClient" /> providerName="System.Data.SqlClient" />
</connectionStrings> </connectionStrings>
<startup> <startup>

File diff suppressed because it is too large Load Diff

View File

@ -9,11 +9,9 @@
<TableUISetting Name="TBPMO_FORM_CONSTRUCTOR"> <TableUISetting Name="TBPMO_FORM_CONSTRUCTOR">
<ColumnUISettings> <ColumnUISettings>
<ColumnUISetting Name="NODE_NAVIGATION"> <ColumnUISetting Name="NODE_NAVIGATION">
<ControlSettings> <ControlSettings><ControlSetting ArtifactName="Microsoft:System.Windows.Forms:Form" xmlns="urn:schemas-microsoft-com:xml-msdatasource">
<ControlSetting ArtifactName="Microsoft:System.Windows.Forms:Form">
<BindableControlInfo Name="CheckBox" Type="System.Windows.Forms.CheckBox" AssemblyName="System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" /> <BindableControlInfo Name="CheckBox" Type="System.Windows.Forms.CheckBox" AssemblyName="System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" />
</ControlSetting> </ControlSetting></ControlSettings>
</ControlSettings>
</ColumnUISetting> </ColumnUISetting>
</ColumnUISettings> </ColumnUISettings>
</TableUISetting> </TableUISetting>
@ -59,5 +57,30 @@
</ColumnUISetting> </ColumnUISetting>
</ColumnUISettings> </ColumnUISettings>
</TableUISetting> </TableUISetting>
<TableUISetting Name="VWPMO_RIGHT_GROUP">
<ColumnUISettings>
<ColumnUISetting Name="ID">
<ControlSettings>
<ControlSetting ArtifactName="Microsoft:System.Windows.Forms:Form">
<BindableControlInfo Name="TextBox" Type="System.Windows.Forms.TextBox" AssemblyName="System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" />
</ControlSetting>
</ControlSettings>
</ColumnUISetting>
<ColumnUISetting Name="ADDED_WHEN">
<ControlSettings>
<ControlSetting ArtifactName="Microsoft:System.Windows.Forms:Form">
<BindableControlInfo Name="TextBox" Type="System.Windows.Forms.TextBox" AssemblyName="System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" />
</ControlSetting>
</ControlSettings>
</ColumnUISetting>
<ColumnUISetting Name="CHANGED_WHEN">
<ControlSettings>
<ControlSetting ArtifactName="Microsoft:System.Windows.Forms:Form">
<BindableControlInfo Name="TextBox" Type="System.Windows.Forms.TextBox" AssemblyName="System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" />
</ControlSetting>
</ControlSettings>
</ColumnUISetting>
</ColumnUISettings>
</TableUISetting>
</TableUISettings> </TableUISettings>
</DataSetUISetting> </DataSetUISetting>

File diff suppressed because it is too large Load Diff

View File

@ -4,29 +4,30 @@
Changes to this file may cause incorrect behavior and will be lost if Changes to this file may cause incorrect behavior and will be lost if
the code is regenerated. the code is regenerated.
</autogenerated>--> </autogenerated>-->
<DiagramLayout xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" ex:showrelationlabel="False" ViewPortX="-19" ViewPortY="-47" xmlns:ex="urn:schemas-microsoft-com:xml-msdatasource-layout-extended" xmlns="urn:schemas-microsoft-com:xml-msdatasource-layout"> <DiagramLayout xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" ex:showrelationlabel="False" ViewPortX="-19" ViewPortY="-26" xmlns:ex="urn:schemas-microsoft-com:xml-msdatasource-layout-extended" xmlns="urn:schemas-microsoft-com:xml-msdatasource-layout">
<Shapes> <Shapes>
<Shape ID="DesignTable:TBPMO_FORM_CONSTRUCTOR" ZOrder="5" X="-8" Y="141" Height="248" Width="300" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="197" /> <Shape ID="DesignTable:TBPMO_FORM_CONSTRUCTOR" ZOrder="6" X="-8" Y="141" Height="248" Width="300" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="197" />
<Shape ID="DesignTable:TBPMO_FORM_CONSTRUCTOR_DETAIL" ZOrder="20" X="386" Y="39" Height="305" Width="300" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="254" /> <Shape ID="DesignTable:TBPMO_FORM_CONSTRUCTOR_DETAIL" ZOrder="21" X="386" Y="39" Height="305" Width="300" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="254" />
<Shape ID="DesignTable:TBDD_CONNECTION" ZOrder="18" X="867" Y="324" Height="305" Width="264" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="254" /> <Shape ID="DesignTable:TBDD_CONNECTION" ZOrder="19" X="867" Y="324" Height="305" Width="264" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="254" />
<Shape ID="DesignTable:VWTEMPQUICKVIEW" ZOrder="16" X="1497" Y="511" Height="172" Width="267" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="121" /> <Shape ID="DesignTable:VWTEMPQUICKVIEW" ZOrder="17" X="1497" Y="511" Height="172" Width="267" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="121" />
<Shape ID="DesignTable:TBWH_ENTITIES" ZOrder="15" X="0" Y="0" Height="90" Width="158" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="0" /> <Shape ID="DesignTable:TBWH_ENTITIES" ZOrder="16" X="0" Y="0" Height="90" Width="158" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="0" />
<Shape ID="DesignTable:TBWH_USER_GROUPS" ZOrder="14" X="0" Y="0" Height="90" Width="158" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="0" /> <Shape ID="DesignTable:TBWH_USER_GROUPS" ZOrder="15" X="0" Y="0" Height="90" Width="158" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="0" />
<Shape ID="DesignTable:TBPMO_SAP_FUBA" ZOrder="12" X="0" Y="0" Height="90" Width="158" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="0" /> <Shape ID="DesignTable:TBPMO_SAP_FUBA" ZOrder="13" X="0" Y="0" Height="90" Width="158" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="0" />
<Shape ID="DesignTable:USER_RIGHTS" ZOrder="2" X="567" Y="383" Height="305" Width="210" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="254" /> <Shape ID="DesignTable:USER_RIGHTS" ZOrder="3" X="567" Y="383" Height="305" Width="210" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="254" />
<Shape ID="DesignTable:TBPMO_DOCSEARCH_RESULTLIST_CONFIG" ZOrder="9" X="1048" Y="-5" Height="305" Width="300" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="254" /> <Shape ID="DesignTable:TBPMO_DOCSEARCH_RESULTLIST_CONFIG" ZOrder="10" X="1048" Y="-5" Height="305" Width="300" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="254" />
<Shape ID="DesignTable:VWDD_LOGIN_USER_HISTORY" ZOrder="8" X="1173" Y="480" Height="286" Width="300" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="235" /> <Shape ID="DesignTable:VWDD_LOGIN_USER_HISTORY" ZOrder="9" X="1173" Y="480" Height="286" Width="300" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="235" />
<Shape ID="DesignTable:TBPMO_DOCSEARCH_RESULTLIST_CONFIG_TYPE_ID" ZOrder="7" X="1424" Y="2" Height="115" Width="418" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="64" /> <Shape ID="DesignTable:TBPMO_DOCSEARCH_RESULTLIST_CONFIG_TYPE_ID" ZOrder="8" X="1424" Y="2" Height="115" Width="418" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="64" />
<Shape ID="DesignTable:TBPMO_LOG_ESSENTIALS" ZOrder="6" X="310" Y="616" Height="210" Width="293" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="159" /> <Shape ID="DesignTable:TBPMO_LOG_ESSENTIALS" ZOrder="7" X="310" Y="616" Height="210" Width="293" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="159" />
<Shape ID="DesignTable:TBPMO_DOCRESULT_DROPDOWN_ITEMS" ZOrder="4" X="722" Y="13" Height="267" Width="300" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="216" /> <Shape ID="DesignTable:TBPMO_DOCRESULT_DROPDOWN_ITEMS" ZOrder="5" X="722" Y="13" Height="267" Width="300" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="216" />
<Shape ID="DesignTable:TBDD_GROUPS" ZOrder="1" X="241" Y="533" Height="286" Width="233" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="235" /> <Shape ID="DesignTable:TBDD_GROUPS" ZOrder="2" X="241" Y="533" Height="286" Width="233" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="235" />
<Shape ID="DesignTable:DT_VORSCHAU" ZOrder="17" X="1342" Y="401" Height="48" Width="154" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="44" /> <Shape ID="DesignTable:DT_VORSCHAU" ZOrder="18" X="1342" Y="401" Height="48" Width="154" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="44" />
<Shape ID="DesignTable:TBAD_Users" ZOrder="13" X="365" Y="384" Height="144" Width="158" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="140" /> <Shape ID="DesignTable:TBAD_Users" ZOrder="14" X="365" Y="384" Height="144" Width="158" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="140" />
<Shape ID="DesignTable:TBWH_Users1" ZOrder="11" X="0" Y="0" Height="90" Width="158" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="0" /> <Shape ID="DesignTable:TBWH_Users1" ZOrder="12" X="0" Y="0" Height="90" Width="158" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="0" />
<Shape ID="DesignTable:TBWH_Users2" ZOrder="10" X="794" Y="145" Height="90" Width="158" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="86" /> <Shape ID="DesignTable:TBWH_Users2" ZOrder="11" X="794" Y="145" Height="90" Width="158" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="86" />
<Shape ID="DesignTable:VWPMO_RIGHT_GROUP" ZOrder="1" X="831" Y="661" Height="305" Width="284" AdapterExpanded="true" DataTableExpanded="true" OldAdapterHeight="0" OldDataTableHeight="0" SplitterPosition="254" />
</Shapes> </Shapes>
<Connectors> <Connectors>
<Connector ID="DesignRelation:FK_TBPMO_FORM_CONSTRUCTOR_DETAIL_CONSTRUCT_ID" ZOrder="19" LineWidth="11"> <Connector ID="DesignRelation:FK_TBPMO_FORM_CONSTRUCTOR_DETAIL_CONSTRUCT_ID" ZOrder="20" LineWidth="11">
<RoutePoints> <RoutePoints>
<Point> <Point>
<X>292</X> <X>292</X>
@ -38,7 +39,7 @@
</Point> </Point>
</RoutePoints> </RoutePoints>
</Connector> </Connector>
<Connector ID="DesignRelation:FK_TBPMO_DOCRESULT_DROPDOWN_ITEMSCONFIG_ID" ZOrder="3" LineWidth="11"> <Connector ID="DesignRelation:FK_TBPMO_DOCRESULT_DROPDOWN_ITEMSCONFIG_ID" ZOrder="4" LineWidth="11">
<RoutePoints> <RoutePoints>
<Point> <Point>
<X>1048</X> <X>1048</X>

View File

@ -33,7 +33,7 @@ Imports System.Runtime.InteropServices
' übernehmen, indem Sie "*" eingeben: ' übernehmen, indem Sie "*" eingeben:
' <Assembly: AssemblyVersion("1.0.*")> ' <Assembly: AssemblyVersion("1.0.*")>
<Assembly: AssemblyVersion("3.1.2.0")> <Assembly: AssemblyVersion("3.1.3.0")>
<Assembly: AssemblyFileVersion("1.0.0.0")> <Assembly: AssemblyFileVersion("1.0.0.0")>
<Assembly: NeutralResourcesLanguageAttribute("")> <Assembly: NeutralResourcesLanguageAttribute("")>

View File

@ -15,7 +15,7 @@ Option Explicit On
Namespace My Namespace My
<Global.System.Runtime.CompilerServices.CompilerGeneratedAttribute(), _ <Global.System.Runtime.CompilerServices.CompilerGeneratedAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.VisualStudio.Editors.SettingsDesigner.SettingsSingleFileGenerator", "17.3.0.0"), _ Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.VisualStudio.Editors.SettingsDesigner.SettingsSingleFileGenerator", "17.9.0.0"), _
Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _ Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Partial Friend NotInheritable Class MySettings Partial Friend NotInheritable Class MySettings
Inherits Global.System.Configuration.ApplicationSettingsBase Inherits Global.System.Configuration.ApplicationSettingsBase
@ -260,7 +260,7 @@ Namespace My
Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _ Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.Configuration.SpecialSettingAttribute(Global.System.Configuration.SpecialSetting.ConnectionString), _ Global.System.Configuration.SpecialSettingAttribute(Global.System.Configuration.SpecialSetting.ConnectionString), _
Global.System.Configuration.DefaultSettingValueAttribute("Data Source=172.24.12.44\MERCER;Initial Catalog=DD_ECM;Persist Security Info=True"& _ Global.System.Configuration.DefaultSettingValueAttribute("Data Source=172.24.12.44\MERCER;Initial Catalog=DD_ECM;Persist Security Info=True"& _
";User ID=sa;Password=dd")> _ ";User ID=sa;Password=dd;Encrypt=True;TrustServerCertificate=True")> _
Public ReadOnly Property DD_DMSConnectionString() As String Public ReadOnly Property DD_DMSConnectionString() As String
Get Get
Return CType(Me("DD_DMSConnectionString"),String) Return CType(Me("DD_DMSConnectionString"),String)

View File

@ -53,10 +53,10 @@
<Setting Name="DD_DMSConnectionString" Type="(Connection string)" Scope="Application"> <Setting Name="DD_DMSConnectionString" Type="(Connection string)" Scope="Application">
<DesignTimeValue Profile="(Default)">&lt;?xml version="1.0" encoding="utf-16"?&gt; <DesignTimeValue Profile="(Default)">&lt;?xml version="1.0" encoding="utf-16"?&gt;
&lt;SerializableConnectionString xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance"&gt; &lt;SerializableConnectionString xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance"&gt;
&lt;ConnectionString&gt;Data Source=172.24.12.44\MERCER;Initial Catalog=DD_ECM;Persist Security Info=True;User ID=sa;Password=dd&lt;/ConnectionString&gt; &lt;ConnectionString&gt;Data Source=172.24.12.44\MERCER;Initial Catalog=DD_ECM;Persist Security Info=True;User ID=sa;Password=dd;Encrypt=True;TrustServerCertificate=True&lt;/ConnectionString&gt;
&lt;ProviderName&gt;System.Data.SqlClient&lt;/ProviderName&gt; &lt;ProviderName&gt;System.Data.SqlClient&lt;/ProviderName&gt;
&lt;/SerializableConnectionString&gt;</DesignTimeValue> &lt;/SerializableConnectionString&gt;</DesignTimeValue>
<Value Profile="(Default)">Data Source=172.24.12.44\MERCER;Initial Catalog=DD_ECM;Persist Security Info=True;User ID=sa;Password=dd</Value> <Value Profile="(Default)">Data Source=172.24.12.44\MERCER;Initial Catalog=DD_ECM;Persist Security Info=True;User ID=sa;Password=dd;Encrypt=True;TrustServerCertificate=True</Value>
</Setting> </Setting>
<Setting Name="UseAppConfigConString" Type="System.Boolean" Scope="User"> <Setting Name="UseAppConfigConString" Type="System.Boolean" Scope="User">
<Value Profile="(Default)">False</Value> <Value Profile="(Default)">False</Value>

View File

@ -424,6 +424,12 @@
<Compile Include="frmNewVariant.vb"> <Compile Include="frmNewVariant.vb">
<SubType>Form</SubType> <SubType>Form</SubType>
</Compile> </Compile>
<Compile Include="frmNodeConfigAdd.Designer.vb">
<DependentUpon>frmNodeConfigAdd.vb</DependentUpon>
</Compile>
<Compile Include="frmNodeConfigAdd.vb">
<SubType>Form</SubType>
</Compile>
<Compile Include="frmNodeNavigation.Designer.vb"> <Compile Include="frmNodeNavigation.Designer.vb">
<DependentUpon>frmNodeNavigation.vb</DependentUpon> <DependentUpon>frmNodeNavigation.vb</DependentUpon>
</Compile> </Compile>
@ -894,6 +900,9 @@
<EmbeddedResource Include="frmNewVariant.resx"> <EmbeddedResource Include="frmNewVariant.resx">
<DependentUpon>frmNewVariant.vb</DependentUpon> <DependentUpon>frmNewVariant.vb</DependentUpon>
</EmbeddedResource> </EmbeddedResource>
<EmbeddedResource Include="frmNodeConfigAdd.resx">
<DependentUpon>frmNodeConfigAdd.vb</DependentUpon>
</EmbeddedResource>
<EmbeddedResource Include="frmNodeNavigation.resx"> <EmbeddedResource Include="frmNodeNavigation.resx">
<DependentUpon>frmNodeNavigation.vb</DependentUpon> <DependentUpon>frmNodeNavigation.vb</DependentUpon>
<SubType>Designer</SubType> <SubType>Designer</SubType>

View File

@ -37,6 +37,9 @@ Partial Class frmDoc_Links
Me.RibbonPageGroup1 = New DevExpress.XtraBars.Ribbon.RibbonPageGroup() Me.RibbonPageGroup1 = New DevExpress.XtraBars.Ribbon.RibbonPageGroup()
Me.RibbonStatusBar1 = New DevExpress.XtraBars.Ribbon.RibbonStatusBar() Me.RibbonStatusBar1 = New DevExpress.XtraBars.Ribbon.RibbonStatusBar()
Me.RibbonPage2 = New DevExpress.XtraBars.Ribbon.RibbonPage() Me.RibbonPage2 = New DevExpress.XtraBars.Ribbon.RibbonPage()
Me.RibbonPageGroup2 = New DevExpress.XtraBars.Ribbon.RibbonPageGroup()
Me.BarButtonItem1 = New DevExpress.XtraBars.BarButtonItem()
Me.BarButtonItem3 = New DevExpress.XtraBars.BarButtonItem()
CType(Me.GridControlRecords, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.GridControlRecords, System.ComponentModel.ISupportInitialize).BeginInit()
Me.ContextMenuStrip1.SuspendLayout() Me.ContextMenuStrip1.SuspendLayout()
CType(Me.grvwGrid, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.grvwGrid, System.ComponentModel.ISupportInitialize).BeginInit()
@ -92,9 +95,9 @@ Partial Class frmDoc_Links
'RibbonControl1 'RibbonControl1
' '
Me.RibbonControl1.ExpandCollapseItem.Id = 0 Me.RibbonControl1.ExpandCollapseItem.Id = 0
Me.RibbonControl1.Items.AddRange(New DevExpress.XtraBars.BarItem() {Me.RibbonControl1.ExpandCollapseItem, Me.RibbonControl1.SearchEditItem, Me.bbtnitmdeletelink, Me.BarStaticItemStatus, Me.BarButtonItem2, Me.bsiSource}) Me.RibbonControl1.Items.AddRange(New DevExpress.XtraBars.BarItem() {Me.RibbonControl1.ExpandCollapseItem, Me.RibbonControl1.SearchEditItem, Me.bbtnitmdeletelink, Me.BarStaticItemStatus, Me.BarButtonItem2, Me.bsiSource, Me.BarButtonItem1, Me.BarButtonItem3})
resources.ApplyResources(Me.RibbonControl1, "RibbonControl1") resources.ApplyResources(Me.RibbonControl1, "RibbonControl1")
Me.RibbonControl1.MaxItemId = 5 Me.RibbonControl1.MaxItemId = 7
Me.RibbonControl1.Name = "RibbonControl1" Me.RibbonControl1.Name = "RibbonControl1"
Me.RibbonControl1.Pages.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPage() {Me.RibbonPage1}) Me.RibbonControl1.Pages.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPage() {Me.RibbonPage1})
Me.RibbonControl1.ShowApplicationButton = DevExpress.Utils.DefaultBoolean.[False] Me.RibbonControl1.ShowApplicationButton = DevExpress.Utils.DefaultBoolean.[False]
@ -130,7 +133,7 @@ Partial Class frmDoc_Links
' '
'RibbonPage1 'RibbonPage1
' '
Me.RibbonPage1.Groups.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPageGroup() {Me.RibbonPageGroup1}) Me.RibbonPage1.Groups.AddRange(New DevExpress.XtraBars.Ribbon.RibbonPageGroup() {Me.RibbonPageGroup1, Me.RibbonPageGroup2})
Me.RibbonPage1.Name = "RibbonPage1" Me.RibbonPage1.Name = "RibbonPage1"
resources.ApplyResources(Me.RibbonPage1, "RibbonPage1") resources.ApplyResources(Me.RibbonPage1, "RibbonPage1")
' '
@ -154,6 +157,28 @@ Partial Class frmDoc_Links
Me.RibbonPage2.Name = "RibbonPage2" Me.RibbonPage2.Name = "RibbonPage2"
resources.ApplyResources(Me.RibbonPage2, "RibbonPage2") resources.ApplyResources(Me.RibbonPage2, "RibbonPage2")
' '
'RibbonPageGroup2
'
Me.RibbonPageGroup2.Alignment = DevExpress.XtraBars.Ribbon.RibbonPageGroupAlignment.Far
Me.RibbonPageGroup2.ItemLinks.Add(Me.BarButtonItem1)
Me.RibbonPageGroup2.ItemLinks.Add(Me.BarButtonItem3)
Me.RibbonPageGroup2.Name = "RibbonPageGroup2"
resources.ApplyResources(Me.RibbonPageGroup2, "RibbonPageGroup2")
'
'BarButtonItem1
'
resources.ApplyResources(Me.BarButtonItem1, "BarButtonItem1")
Me.BarButtonItem1.Id = 5
Me.BarButtonItem1.ImageOptions.SvgImage = CType(resources.GetObject("BarButtonItem1.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
Me.BarButtonItem1.Name = "BarButtonItem1"
'
'BarButtonItem3
'
resources.ApplyResources(Me.BarButtonItem3, "BarButtonItem3")
Me.BarButtonItem3.Id = 6
Me.BarButtonItem3.ImageOptions.SvgImage = CType(resources.GetObject("BarButtonItem3.ImageOptions.SvgImage"), DevExpress.Utils.Svg.SvgImage)
Me.BarButtonItem3.Name = "BarButtonItem3"
'
'frmDoc_Links 'frmDoc_Links
' '
resources.ApplyResources(Me, "$this") resources.ApplyResources(Me, "$this")
@ -186,4 +211,7 @@ Partial Class frmDoc_Links
Friend WithEvents ContextMenuStrip1 As ContextMenuStrip Friend WithEvents ContextMenuStrip1 As ContextMenuStrip
Friend WithEvents OrdnerÖffnenToolStripMenuItem As ToolStripMenuItem Friend WithEvents OrdnerÖffnenToolStripMenuItem As ToolStripMenuItem
Friend WithEvents bsiSource As DevExpress.XtraBars.BarStaticItem Friend WithEvents bsiSource As DevExpress.XtraBars.BarStaticItem
Friend WithEvents BarButtonItem1 As DevExpress.XtraBars.BarButtonItem
Friend WithEvents RibbonPageGroup2 As DevExpress.XtraBars.Ribbon.RibbonPageGroup
Friend WithEvents BarButtonItem3 As DevExpress.XtraBars.BarButtonItem
End Class End Class

View File

@ -121,12 +121,6 @@
<value>241, 17</value> <value>241, 17</value>
</metadata> </metadata>
<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="OrdnerÖffnenToolStripMenuItem.Size" type="System.Drawing.Size, System.Drawing">
<value>149, 22</value>
</data>
<data name="OrdnerÖffnenToolStripMenuItem.Text" xml:space="preserve">
<value>Ordner öffnen</value>
</data>
<data name="ContextMenuStrip1.Size" type="System.Drawing.Size, System.Drawing"> <data name="ContextMenuStrip1.Size" type="System.Drawing.Size, System.Drawing">
<value>150, 26</value> <value>150, 26</value>
</data> </data>
@ -141,10 +135,10 @@
<value>Fill</value> <value>Fill</value>
</data> </data>
<data name="GridControlRecords.Location" type="System.Drawing.Point, System.Drawing"> <data name="GridControlRecords.Location" type="System.Drawing.Point, System.Drawing">
<value>0, 158</value> <value>0, 147</value>
</data> </data>
<data name="GridControlRecords.Size" type="System.Drawing.Size, System.Drawing"> <data name="GridControlRecords.Size" type="System.Drawing.Size, System.Drawing">
<value>1251, 426</value> <value>908, 334</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">
@ -162,6 +156,12 @@
<data name="&gt;&gt;GridControlRecords.ZOrder" xml:space="preserve"> <data name="&gt;&gt;GridControlRecords.ZOrder" xml:space="preserve">
<value>1</value> <value>1</value>
</data> </data>
<data name="OrdnerÖffnenToolStripMenuItem.Size" type="System.Drawing.Size, System.Drawing">
<value>149, 22</value>
</data>
<data name="OrdnerÖffnenToolStripMenuItem.Text" xml:space="preserve">
<value>Ordner öffnen</value>
</data>
<data name="bbtnitmdeletelink.Caption" xml:space="preserve"> <data name="bbtnitmdeletelink.Caption" xml:space="preserve">
<value>Ausgewählte Links löschen</value> <value>Ausgewählte Links löschen</value>
</data> </data>
@ -216,23 +216,69 @@
<data name="bsiSource.Caption" xml:space="preserve"> <data name="bsiSource.Caption" xml:space="preserve">
<value>Source: VWPMO_CUST_DOC_OBJECT_LINKS</value> <value>Source: VWPMO_CUST_DOC_OBJECT_LINKS</value>
</data> </data>
<data name="BarButtonItem1.Caption" xml:space="preserve">
<value>...speichern</value>
</data>
<data name="BarButtonItem1.ImageOptions.SvgImage" type="DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v21.2" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
AAEAAAD/////AQAAAAAAAAAMAgAAAFlEZXZFeHByZXNzLkRhdGEudjIxLjIsIFZlcnNpb249MjEuMi40
LjAsIEN1bHR1cmU9bmV1dHJhbCwgUHVibGljS2V5VG9rZW49Yjg4ZDE3NTRkNzAwZTQ5YQUBAAAAHURl
dkV4cHJlc3MuVXRpbHMuU3ZnLlN2Z0ltYWdlAQAAAAREYXRhBwICAAAACQMAAAAPAwAAAOMCAAAC77u/
PD94bWwgdmVyc2lvbj0nMS4wJyBlbmNvZGluZz0nVVRGLTgnPz4NCjxzdmcgeD0iMHB4IiB5PSIwcHgi
IHZpZXdCb3g9IjAgMCAzMiAzMiIgdmVyc2lvbj0iMS4xIiB4bWxucz0iaHR0cDovL3d3dy53My5vcmcv
MjAwMC9zdmciIHhtbG5zOnhsaW5rPSJodHRwOi8vd3d3LnczLm9yZy8xOTk5L3hsaW5rIiB4bWw6c3Bh
Y2U9InByZXNlcnZlIiBpZD0iTmV3VGFibGVTdHlsZSIgc3R5bGU9ImVuYWJsZS1iYWNrZ3JvdW5kOm5l
dyAwIDAgMzIgMzIiPg0KICA8c3R5bGUgdHlwZT0idGV4dC9jc3MiPgoJLkJsdWV7ZmlsbDojMTE3N0Q3
O30KCS5CbGFja3tmaWxsOiM3MjcyNzI7fQoJLlllbGxvd3tmaWxsOiNGRkIxMTU7fQoJLnN0MHtvcGFj
aXR5OjAuNTt9Cjwvc3R5bGU+DQogIDxnIGNsYXNzPSJzdDAiPg0KICAgIDxwYXRoIGQ9Ik0wLDIwaDh2
NkgwVjIweiBNMTAsMjZoOHYtNmgtOFYyNnogTTIwLDEydjZoOHYtNkgyMHogTTIwLDI2aDh2LTZoLThW
MjZ6IiBjbGFzcz0iQmxhY2siIC8+DQogIDwvZz4NCiAgPHBhdGggZD0iTTAsNGg4djZIMFY0eiBNMCwx
OGg4di02SDBWMTh6IE0xMCwxMGg4VjRoLThWMTB6IE0xMCwxOGg4di02aC04VjE4eiIgY2xhc3M9IkJs
dWUiIC8+DQogIDxwb2x5Z29uIHBvaW50cz0iMjUsMiAyNywwIDI3LDMgMzAsMyAyOCw1IDMwLDcgMjcs
NyAyNywxMCAyNSw4IDIzLDEwIDIzLDcgMjAsNyAyMiw1IDIwLDMgMjMsMyAyMywwICIgY2xhc3M9Illl
bGxvdyIgLz4NCjwvc3ZnPgs=
</value>
</data>
<data name="BarButtonItem3.Caption" xml:space="preserve">
<value>...zurücksetzen</value>
</data>
<data name="BarButtonItem3.ImageOptions.SvgImage" type="DevExpress.Utils.Svg.SvgImage, DevExpress.Data.v21.2" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
AAEAAAD/////AQAAAAAAAAAMAgAAAFlEZXZFeHByZXNzLkRhdGEudjIxLjIsIFZlcnNpb249MjEuMi40
LjAsIEN1bHR1cmU9bmV1dHJhbCwgUHVibGljS2V5VG9rZW49Yjg4ZDE3NTRkNzAwZTQ5YQUBAAAAHURl
dkV4cHJlc3MuVXRpbHMuU3ZnLlN2Z0ltYWdlAQAAAAREYXRhBwICAAAACQMAAAAPAwAAAKIDAAAC77u/
PD94bWwgdmVyc2lvbj0nMS4wJyBlbmNvZGluZz0nVVRGLTgnPz4NCjxzdmcgeD0iMHB4IiB5PSIwcHgi
IHZpZXdCb3g9IjAgMCAzMiAzMiIgdmVyc2lvbj0iMS4xIiB4bWxucz0iaHR0cDovL3d3dy53My5vcmcv
MjAwMC9zdmciIHhtbG5zOnhsaW5rPSJodHRwOi8vd3d3LnczLm9yZy8xOTk5L3hsaW5rIiB4bWw6c3Bh
Y2U9InByZXNlcnZlIiBpZD0iQ2xlYXJUYWJsZVN0eWxlIiBzdHlsZT0iZW5hYmxlLWJhY2tncm91bmQ6
bmV3IDAgMCAzMiAzMiI+DQogIDxzdHlsZSB0eXBlPSJ0ZXh0L2NzcyI+CgkuQmx1ZXtmaWxsOiMxMTc3
RDc7fQoJLkJsYWNre2ZpbGw6IzcyNzI3Mjt9CgkuUmVke2ZpbGw6I0QxMUMxQzt9Cgkuc3Qwe29wYWNp
dHk6MC41O30KPC9zdHlsZT4NCiAgPGcgY2xhc3M9InN0MCI+DQogICAgPHBhdGggZD0iTTI4LDEwaC04
VjRoOFYxMHogTTI0LjYsMTQuOWMwLjYtMC42LDEuNC0wLjksMi4yLTAuOWMwLjQsMCwwLjgsMC4xLDEu
MiwwLjJWMTJoLTh2NmgxLjVMMjQuNiwxNC45eiBNMCwyNiAgIGg4di02SDBWMjZ6IE0xNC45LDI0LjZs
My4xLTMuMVYyMGgtOHY2aDQuMUMxNC4zLDI1LjUsMTQuNSwyNSwxNC45LDI0LjZ6IiBjbGFzcz0iQmxh
Y2siIC8+DQogIDwvZz4NCiAgPHBhdGggZD0iTTAsNGg4djZIMFY0eiBNMCwxOGg4di02SDBWMTh6IE0x
MCwxMGg4VjRoLThWMTB6IE0xMCwxOGg4di02aC04VjE4eiBNMTksMjMuM0wxNi4zLDI2ICBjLTAuNCww
LjQtMC40LDEuMiwwLDEuNmw0LDRjMC40LDAuNCwxLjIsMC40LDEuNiwwbDIuNy0yLjdMMTksMjMuM3oi
IGNsYXNzPSJCbHVlIiAvPg0KICA8cGF0aCBkPSJNMzEuNywyMC40bC00LTRjLTAuNC0wLjQtMS4yLTAu
NC0xLjYsMGwtNi4xLDYuMWw1LjYsNS42bDYuMS02LjFDMzIuMSwyMS41LDMyLjEsMjAuOCwzMS43LDIw
LjR6IiBjbGFzcz0iUmVkIiAvPg0KPC9zdmc+Cw==
</value>
</data>
<data name="RibbonControl1.Location" type="System.Drawing.Point, System.Drawing"> <data name="RibbonControl1.Location" type="System.Drawing.Point, System.Drawing">
<value>0, 0</value> <value>0, 0</value>
</data> </data>
<data name="RibbonPageGroup1.Text" xml:space="preserve">
<value>Aktionen</value>
</data>
<data name="RibbonPage1.Text" xml:space="preserve"> <data name="RibbonPage1.Text" xml:space="preserve">
<value>Doc-Links</value> <value>Doc-Links</value>
</data> </data>
<data name="RibbonControl1.Size" type="System.Drawing.Size, System.Drawing"> <data name="RibbonControl1.Size" type="System.Drawing.Size, System.Drawing">
<value>1251, 158</value> <value>908, 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, 584</value> <value>0, 481</value>
</data> </data>
<data name="RibbonStatusBar1.Size" type="System.Drawing.Size, System.Drawing"> <data name="RibbonStatusBar1.Size" type="System.Drawing.Size, System.Drawing">
<value>1251, 22</value> <value>908, 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>
@ -258,9 +304,15 @@
<data name="&gt;&gt;RibbonControl1.ZOrder" xml:space="preserve"> <data name="&gt;&gt;RibbonControl1.ZOrder" xml:space="preserve">
<value>3</value> <value>3</value>
</data> </data>
<data name="RibbonPageGroup1.Text" xml:space="preserve">
<value>Aktionen</value>
</data>
<data name="RibbonPage2.Text" xml:space="preserve"> <data name="RibbonPage2.Text" xml:space="preserve">
<value>RibbonPage2</value> <value>RibbonPage2</value>
</data> </data>
<data name="RibbonPageGroup2.Text" xml:space="preserve">
<value>Layout</value>
</data>
<metadata name="$this.Localizable" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089"> <metadata name="$this.Localizable" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>True</value> <value>True</value>
</metadata> </metadata>
@ -268,7 +320,7 @@
<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>1251, 606</value> <value>908, 504</value>
</data> </data>
<data name="frmDoc_Links.IconOptions.Icon" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64"> <data name="frmDoc_Links.IconOptions.Icon" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value> <value>
@ -503,6 +555,24 @@
<data name="&gt;&gt;RibbonPage2.Type" xml:space="preserve"> <data name="&gt;&gt;RibbonPage2.Type" xml:space="preserve">
<value>DevExpress.XtraBars.Ribbon.RibbonPage, DevExpress.XtraBars.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value> <value>DevExpress.XtraBars.Ribbon.RibbonPage, DevExpress.XtraBars.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
</data> </data>
<data name="&gt;&gt;RibbonPageGroup2.Name" xml:space="preserve">
<value>RibbonPageGroup2</value>
</data>
<data name="&gt;&gt;RibbonPageGroup2.Type" xml:space="preserve">
<value>DevExpress.XtraBars.Ribbon.RibbonPageGroup, DevExpress.XtraBars.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
</data>
<data name="&gt;&gt;BarButtonItem1.Name" xml:space="preserve">
<value>BarButtonItem1</value>
</data>
<data name="&gt;&gt;BarButtonItem1.Type" xml:space="preserve">
<value>DevExpress.XtraBars.BarButtonItem, DevExpress.XtraBars.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
</data>
<data name="&gt;&gt;BarButtonItem3.Name" xml:space="preserve">
<value>BarButtonItem3</value>
</data>
<data name="&gt;&gt;BarButtonItem3.Type" xml:space="preserve">
<value>DevExpress.XtraBars.BarButtonItem, DevExpress.XtraBars.v21.2, Version=21.2.4.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a</value>
</data>
<data name="&gt;&gt;$this.Name" xml:space="preserve"> <data name="&gt;&gt;$this.Name" xml:space="preserve">
<value>frmDoc_Links</value> <value>frmDoc_Links</value>
</data> </data>

View File

@ -1,15 +1,19 @@
Imports System.IO Imports System.IO
Imports DD_LIB_Standards Imports DD_LIB_Standards
Imports System.Text
Imports DevExpress.XtraGrid.Columns Imports DevExpress.XtraGrid.Columns
Imports DevExpress.XtraPrinting Imports DevExpress.XtraPrinting
Imports Microsoft.Office.Interop.Outlook Imports Microsoft.Office.Interop.Outlook
Public Class frmDoc_Links Public Class frmDoc_Links
Private ENTITY_ID As Integer = 0
Public Property Documents As New List(Of ClassWindreamDocGrid.WindreamDoc) Public Property Documents As New List(Of ClassWindreamDocGrid.WindreamDoc)
Private Sub frmDoc_DocLinks_Load(sender As Object, e As EventArgs) Handles Me.Load Private Sub frmDoc_DocLinks_Load(sender As Object, e As EventArgs) Handles Me.Load
Try Try
Refresh_Grid_Data(Documents) Refresh_Grid_Data(Documents)
Load_DocGrid_Layout()
If USER_IS_ADMIN Then If USER_IS_ADMIN Then
bsiSource.Visibility = DevExpress.XtraBars.BarItemVisibility.Always bsiSource.Visibility = DevExpress.XtraBars.BarItemVisibility.Always
@ -150,7 +154,20 @@ Public Class frmDoc_Links
End If End If
End Sub End Sub
Sub Save_DocGrid_Layout()
Try
Dim XMLPath = Get_DocGrid_Layout_Filename()
grvwGrid.SaveLayoutToXml(XMLPath)
BarStaticItemStatus.Caption = "Grid-Layout saved - " + Now.ToShortTimeString
Catch ex As System.Exception
ClassHelper.MSGBOX_Handler("ERROR", "Unexpected Error in Save_DocGrid_Layout", ex.Message, ex.StackTrace)
End Try
End Sub
Private Function Get_DocGrid_Layout_Filename()
Dim Filename As String = String.Format("GridViewDocLinks-{0}-UserLayout.xml", CURRENT_ENTITY_ID)
Return System.IO.Path.Combine(System.Windows.Forms.Application.UserAppDataPath(), Filename)
End Function
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 BarButtonItem2.ItemClick
Try Try
Dim saveFileDialogDocSearchResult As New SaveFileDialog With { Dim saveFileDialogDocSearchResult As New SaveFileDialog With {
@ -209,4 +226,56 @@ Public Class frmDoc_Links
End If End If
End Sub End Sub
Private Sub BarButtonItem1_ItemClick_1(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles BarButtonItem1.ItemClick
Save_DocGrid_Layout()
End Sub
Private Sub BarButtonItem3_ItemClick(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles BarButtonItem3.ItemClick
Reset_View_layout()
End Sub
Sub Reset_View_layout()
Me.Cursor = Cursors.WaitCursor
Try
Dim XMLPath = Get_DocGrid_Layout_Filename()
If File.Exists(XMLPath) Then
File.Delete(XMLPath)
Refresh_Grid_Data(Documents)
Else
MsgBox("Resetting the layout was not successful - File not existing!", MsgBoxStyle.Information)
End If
Catch ex As System.Exception
ClassHelper.MSGBOX_Handler("ERROR", "Unexpected Error", "Error in Reset_View_layout: ", ex.Message)
End Try
Me.Cursor = Cursors.Default
End Sub
Private Sub grvwGrid_ColumnPositionChanged(sender As Object, e As EventArgs) Handles grvwGrid.ColumnPositionChanged
Save_DocGrid_Layout()
End Sub
Private Sub grvwGrid_ColumnWidthChanged(sender As Object, e As DevExpress.XtraGrid.Views.Base.ColumnEventArgs) Handles grvwGrid.ColumnWidthChanged
Save_DocGrid_Layout()
End Sub
Private Sub grvwGrid_ColumnFilterChanged(sender As Object, e As EventArgs) Handles grvwGrid.ColumnFilterChanged
Save_DocGrid_Layout()
End Sub
Private Sub grvwGrid_EndSorting(sender As Object, e As EventArgs) Handles grvwGrid.EndSorting
Save_DocGrid_Layout()
End Sub
Sub Load_DocGrid_Layout()
Try
Dim XMLPath = Get_DocGrid_Layout_Filename()
If File.Exists(XMLPath) Then
grvwGrid.RestoreLayoutFromXml(XMLPath)
grvwGrid.GuessAutoFilterRowValuesFromFilter()
BarStaticItemStatus.Caption = "Grid-Layout loaded - " + Now.ToShortTimeString
End If
Catch ex As System.Exception
ClassHelper.MSGBOX_Handler("ERROR", "Unexpected Error in Load_DocGrid_Layout", ex.Message, ex.StackTrace)
End Try
End Sub
End Class End Class

View File

@ -0,0 +1,163 @@
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
Partial Class frmNodeConfigAdd
Inherits System.Windows.Forms.Form
'Das Formular überschreibt den Löschvorgang, um die Komponentenliste zu bereinigen.
<System.Diagnostics.DebuggerNonUserCode()> _
Protected Overrides Sub Dispose(ByVal disposing As Boolean)
Try
If disposing AndAlso components IsNot Nothing Then
components.Dispose()
End If
Finally
MyBase.Dispose(disposing)
End Try
End Sub
'Wird vom Windows Form-Designer benötigt.
Private components As System.ComponentModel.IContainer
'Hinweis: Die folgende Prozedur ist für den Windows Form-Designer erforderlich.
'Das Bearbeiten ist mit dem Windows Form-Designer möglich.
'Das Bearbeiten mit dem Code-Editor ist nicht möglich.
<System.Diagnostics.DebuggerStepThrough()> _
Private Sub InitializeComponent()
Me.Label1 = New System.Windows.Forms.Label()
Me.txtNodeParentID = New System.Windows.Forms.TextBox()
Me.txtEntityName = New System.Windows.Forms.TextBox()
Me.Label2 = New System.Windows.Forms.Label()
Me.txtName = New System.Windows.Forms.TextBox()
Me.Label3 = New System.Windows.Forms.Label()
Me.GroupBox1 = New System.Windows.Forms.GroupBox()
Me.Label4 = New System.Windows.Forms.Label()
Me.txtComment = New System.Windows.Forms.TextBox()
Me.Button1 = New System.Windows.Forms.Button()
Me.GroupBox1.SuspendLayout()
Me.SuspendLayout()
'
'Label1
'
Me.Label1.AutoSize = True
Me.Label1.Location = New System.Drawing.Point(12, 18)
Me.Label1.Name = "Label1"
Me.Label1.Size = New System.Drawing.Size(78, 13)
Me.Label1.TabIndex = 0
Me.Label1.Text = "Node ParentID"
'
'txtNodeParentID
'
Me.txtNodeParentID.Location = New System.Drawing.Point(96, 15)
Me.txtNodeParentID.Name = "txtNodeParentID"
Me.txtNodeParentID.ReadOnly = True
Me.txtNodeParentID.Size = New System.Drawing.Size(100, 21)
Me.txtNodeParentID.TabIndex = 1
'
'txtEntityName
'
Me.txtEntityName.Location = New System.Drawing.Point(270, 15)
Me.txtEntityName.Name = "txtEntityName"
Me.txtEntityName.ReadOnly = True
Me.txtEntityName.Size = New System.Drawing.Size(292, 21)
Me.txtEntityName.TabIndex = 3
'
'Label2
'
Me.Label2.AutoSize = True
Me.Label2.Location = New System.Drawing.Point(202, 18)
Me.Label2.Name = "Label2"
Me.Label2.Size = New System.Drawing.Size(62, 13)
Me.Label2.TabIndex = 2
Me.Label2.Text = "EntityName"
'
'txtName
'
Me.txtName.Location = New System.Drawing.Point(190, 25)
Me.txtName.Name = "txtName"
Me.txtName.Size = New System.Drawing.Size(249, 21)
Me.txtName.TabIndex = 5
'
'Label3
'
Me.Label3.AutoSize = True
Me.Label3.Location = New System.Drawing.Point(6, 28)
Me.Label3.Name = "Label3"
Me.Label3.Size = New System.Drawing.Size(172, 13)
Me.Label3.TabIndex = 4
Me.Label3.Text = "Interner Name des neuen Knotens"
'
'GroupBox1
'
Me.GroupBox1.Controls.Add(Me.Label4)
Me.GroupBox1.Controls.Add(Me.txtComment)
Me.GroupBox1.Controls.Add(Me.Label3)
Me.GroupBox1.Controls.Add(Me.txtName)
Me.GroupBox1.Location = New System.Drawing.Point(15, 57)
Me.GroupBox1.Name = "GroupBox1"
Me.GroupBox1.Size = New System.Drawing.Size(547, 92)
Me.GroupBox1.TabIndex = 6
Me.GroupBox1.TabStop = False
Me.GroupBox1.Text = "Notwendige Angaben"
'
'Label4
'
Me.Label4.AutoSize = True
Me.Label4.Location = New System.Drawing.Point(6, 57)
Me.Label4.Name = "Label4"
Me.Label4.Size = New System.Drawing.Size(104, 13)
Me.Label4.TabIndex = 6
Me.Label4.Text = "Interner Kommentar"
'
'txtComment
'
Me.txtComment.Location = New System.Drawing.Point(190, 54)
Me.txtComment.Name = "txtComment"
Me.txtComment.Size = New System.Drawing.Size(249, 21)
Me.txtComment.TabIndex = 7
'
'Button1
'
Me.Button1.Image = Global.DD_Record_Organizer.My.Resources.Resources.action_add_16xLG
Me.Button1.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
Me.Button1.Location = New System.Drawing.Point(15, 155)
Me.Button1.Name = "Button1"
Me.Button1.Size = New System.Drawing.Size(547, 23)
Me.Button1.TabIndex = 7
Me.Button1.Text = "Knoten hinzufügen"
Me.Button1.UseVisualStyleBackColor = True
'
'frmNodeConfigAdd
'
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
Me.ClientSize = New System.Drawing.Size(581, 204)
Me.Controls.Add(Me.Button1)
Me.Controls.Add(Me.GroupBox1)
Me.Controls.Add(Me.txtEntityName)
Me.Controls.Add(Me.Label2)
Me.Controls.Add(Me.txtNodeParentID)
Me.Controls.Add(Me.Label1)
Me.Font = New System.Drawing.Font("Tahoma", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.FixedDialog
Me.MaximizeBox = False
Me.MinimizeBox = False
Me.Name = "frmNodeConfigAdd"
Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterParent
Me.Text = "Neuen Knoten hinzufügen"
Me.GroupBox1.ResumeLayout(False)
Me.GroupBox1.PerformLayout()
Me.ResumeLayout(False)
Me.PerformLayout()
End Sub
Friend WithEvents Label1 As Label
Friend WithEvents txtNodeParentID As TextBox
Friend WithEvents txtEntityName As TextBox
Friend WithEvents Label2 As Label
Friend WithEvents txtName As TextBox
Friend WithEvents Label3 As Label
Friend WithEvents GroupBox1 As GroupBox
Friend WithEvents Label4 As Label
Friend WithEvents txtComment As TextBox
Friend WithEvents Button1 As Button
End Class

View File

@ -0,0 +1,120 @@
<?xml version="1.0" encoding="utf-8"?>
<root>
<!--
Microsoft ResX Schema
Version 2.0
The primary goals of this format is to allow a simple XML format
that is mostly human readable. The generation and parsing of the
various data types are done through the TypeConverter classes
associated with the data types.
Example:
... ado.net/XML headers & schema ...
<resheader name="resmimetype">text/microsoft-resx</resheader>
<resheader name="version">2.0</resheader>
<resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
<resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
<data name="Name1"><value>this is my long string</value><comment>this is a comment</comment></data>
<data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
<data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
<value>[base64 mime encoded serialized .NET Framework object]</value>
</data>
<data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>[base64 mime encoded string representing a byte array form of the .NET Framework object]</value>
<comment>This is a comment</comment>
</data>
There are any number of "resheader" rows that contain simple
name/value pairs.
Each data row contains a name, and value. The row also contains a
type or mimetype. Type corresponds to a .NET class that support
text/value conversion through the TypeConverter architecture.
Classes that don't support this are serialized and stored with the
mimetype set.
The mimetype is used for serialized objects, and tells the
ResXResourceReader how to depersist the object. This is currently not
extensible. For a given mimetype the value must be set accordingly:
Note - application/x-microsoft.net.object.binary.base64 is the format
that the ResXResourceWriter will generate, however the reader can
read any of the formats listed below.
mimetype: application/x-microsoft.net.object.binary.base64
value : The object must be serialized with
: System.Runtime.Serialization.Formatters.Binary.BinaryFormatter
: and then encoded with base64 encoding.
mimetype: application/x-microsoft.net.object.soap.base64
value : The object must be serialized with
: System.Runtime.Serialization.Formatters.Soap.SoapFormatter
: and then encoded with base64 encoding.
mimetype: application/x-microsoft.net.object.bytearray.base64
value : The object must be serialized into a byte array
: using a System.ComponentModel.TypeConverter
: and then encoded with base64 encoding.
-->
<xsd:schema id="root" xmlns="" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:msdata="urn:schemas-microsoft-com:xml-msdata">
<xsd:import namespace="http://www.w3.org/XML/1998/namespace" />
<xsd:element name="root" msdata:IsDataSet="true">
<xsd:complexType>
<xsd:choice maxOccurs="unbounded">
<xsd:element name="metadata">
<xsd:complexType>
<xsd:sequence>
<xsd:element name="value" type="xsd:string" minOccurs="0" />
</xsd:sequence>
<xsd:attribute name="name" use="required" type="xsd:string" />
<xsd:attribute name="type" type="xsd:string" />
<xsd:attribute name="mimetype" type="xsd:string" />
<xsd:attribute ref="xml:space" />
</xsd:complexType>
</xsd:element>
<xsd:element name="assembly">
<xsd:complexType>
<xsd:attribute name="alias" type="xsd:string" />
<xsd:attribute name="name" type="xsd:string" />
</xsd:complexType>
</xsd:element>
<xsd:element name="data">
<xsd:complexType>
<xsd:sequence>
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
<xsd:element name="comment" type="xsd:string" minOccurs="0" msdata:Ordinal="2" />
</xsd:sequence>
<xsd:attribute name="name" type="xsd:string" use="required" msdata:Ordinal="1" />
<xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
<xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
<xsd:attribute ref="xml:space" />
</xsd:complexType>
</xsd:element>
<xsd:element name="resheader">
<xsd:complexType>
<xsd:sequence>
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
</xsd:sequence>
<xsd:attribute name="name" type="xsd:string" use="required" />
</xsd:complexType>
</xsd:element>
</xsd:choice>
</xsd:complexType>
</xsd:element>
</xsd:schema>
<resheader name="resmimetype">
<value>text/microsoft-resx</value>
</resheader>
<resheader name="version">
<value>2.0</value>
</resheader>
<resheader name="reader">
<value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
<resheader name="writer">
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
</root>

View File

@ -0,0 +1,23 @@

Public Class frmNodeConfigAdd
Private pENTITYD As Integer
Public Sub New(pParentID As Integer, pEntID As Integer, pEntity As String)
MyBase.New()
pENTITYD = pEntID
InitializeComponent()
' Add any initialization after the InitializeComponent() call.
Me.txtNodeParentID.Text = pParentID
Me.txtEntityName.Text = pEntity
End Sub
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
Dim oInsert = $"INSERT INTO TBPMO_STRUCTURE_NODES_CONFIGURATION ([PARENT_NODE],[NAME],[ENTITY_ID],[COMMENT],[ADDED_WHO]) VALUES
({txtNodeParentID.Text},'{txtName.Text}',{pENTITYD},'{txtComment.Text}','{Environment.UserName}')"
If MYDB_ECM.ExecuteNonQuery(oInsert) Then
Me.Close()
Else
MsgBox("An error occured on insert! Check Your log!", MsgBoxStyle.Exclamation)
End If
End Sub
End Class

View File

@ -379,7 +379,7 @@ Public Class frmNodeNavigation
ClassControlValues.LoadControlValuesListWithPlaceholders(_EntityId, CURRENT_RECORD_ID, 0, CtrlBuilder.AllControls, _EntityId) ClassControlValues.LoadControlValuesListWithPlaceholders(_EntityId, CURRENT_RECORD_ID, 0, CtrlBuilder.AllControls, _EntityId)
CtrlBuilder.WatchRecordChanges = True CtrlBuilder.WatchRecordChanges = True
Await Show_Selected_Record_Data(CURRENT_RECORD_ID) Await Show_Selected_Record_Data(CURRENT_RECORD_ID)
Show_SelectedDoc()
ClassRightManagement.Check_Set_Rights(CURRENT_RECORD_ID, _EntityId) ClassRightManagement.Check_Set_Rights(CURRENT_RECORD_ID, _EntityId)
CONTROL_HANDLING() CONTROL_HANDLING()
@ -2985,17 +2985,20 @@ Public Class frmNodeNavigation
End Sub End Sub
Private Sub GridViewDoc_Search_SelectionChanged(sender As Object, e As SelectionChangedEventArgs) Handles GridViewDoc_Search.SelectionChanged Private Sub GridViewDoc_Search_SelectionChanged(sender As Object, e As SelectionChangedEventArgs) Handles GridViewDoc_Search.SelectionChanged
Show_SelectedDoc()
End Sub
Private Sub Show_SelectedDoc()
Dim oSelectedDocs = ClassWindreamDocGrid.GetSelectedDocuments(GridViewDoc_Search) Dim oSelectedDocs = ClassWindreamDocGrid.GetSelectedDocuments(GridViewDoc_Search)
If oSelectedDocs.Count = 1 Then If oSelectedDocs.Count = 1 Then
Dim oDocument As ClassWindreamDocGrid.WindreamDoc = oSelectedDocs.First() Dim oDocument As ClassWindreamDocGrid.WindreamDoc = oSelectedDocs.First()
Dim oPath = ClassHelper.FORMAT_WM_PATH(oDocument.DocPath) Dim oPath = ClassHelper.FORMAT_WM_PATH(oDocument.DocPath)
DocumentViewer.LoadFile(oPath) DocumentViewer.LoadFile(oPath)
Refresh_DocID()
Else Else
DocumentViewer.CloseDocument() DocumentViewer.CloseDocument()
End If End If
End Sub End Sub
Private Async Sub btnCreateNewNode_ItemClick(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles btnCreateNewNode.ItemClick Private Async Sub btnCreateNewNode_ItemClick(sender As Object, e As DevExpress.XtraBars.ItemClickEventArgs) Handles btnCreateNewNode.ItemClick
Dim oForm As New frmNewNode() With { Dim oForm As New frmNewNode() With {
.NodeConfigTypes = AvailableConfigNodes .NodeConfigTypes = AvailableConfigNodes

View File

@ -1,9 +1,9 @@
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _ <Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()>
Partial Class frmRight_Management Partial Class frmRight_Management
Inherits System.Windows.Forms.Form Inherits System.Windows.Forms.Form
'Das Formular überschreibt den Löschvorgang, um die Komponentenliste zu bereinigen. 'Das Formular überschreibt den Löschvorgang, um die Komponentenliste zu bereinigen.
<System.Diagnostics.DebuggerNonUserCode()> _ <System.Diagnostics.DebuggerNonUserCode()>
Protected Overrides Sub Dispose(ByVal disposing As Boolean) Protected Overrides Sub Dispose(ByVal disposing As Boolean)
Try Try
If disposing AndAlso components IsNot Nothing Then If disposing AndAlso components IsNot Nothing Then
@ -20,22 +20,20 @@ Partial Class frmRight_Management
'Hinweis: Die folgende Prozedur ist für den Windows Form-Designer erforderlich. 'Hinweis: Die folgende Prozedur ist für den Windows Form-Designer erforderlich.
'Das Bearbeiten ist mit dem Windows Form-Designer möglich. 'Das Bearbeiten ist mit dem Windows Form-Designer möglich.
'Das Bearbeiten mit dem Code-Editor ist nicht möglich. 'Das Bearbeiten mit dem Code-Editor ist nicht möglich.
<System.Diagnostics.DebuggerStepThrough()> _ <System.Diagnostics.DebuggerStepThrough()>
Private Sub InitializeComponent() Private Sub InitializeComponent()
Me.components = New System.ComponentModel.Container() Me.components = New System.ComponentModel.Container()
Dim IDLabel As System.Windows.Forms.Label
Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(frmRight_Management)) Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(frmRight_Management))
Dim DataGridViewCellStyle1 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle() Dim ENTITY_NAMELabel As System.Windows.Forms.Label
Dim GUIDLabel As System.Windows.Forms.Label Dim GROUP_NAMELabel As System.Windows.Forms.Label
Dim ENTITY_IDLabel As System.Windows.Forms.Label
Dim GROUP_IDLabel As System.Windows.Forms.Label
Dim ADDED_WHOLabel As System.Windows.Forms.Label Dim ADDED_WHOLabel As System.Windows.Forms.Label
Dim ADDED_WHENLabel As System.Windows.Forms.Label
Dim CHANGED_WHOLabel As System.Windows.Forms.Label Dim CHANGED_WHOLabel As System.Windows.Forms.Label
Dim ADDED_WHENLabel As System.Windows.Forms.Label
Dim CHANGED_WHENLabel As System.Windows.Forms.Label Dim CHANGED_WHENLabel As System.Windows.Forms.Label
Me.BindingNavigator1 = New System.Windows.Forms.BindingNavigator(Me.components) Me.BindingNavigator1 = New System.Windows.Forms.BindingNavigator(Me.components)
Me.BindingNavigatorAddNewItem = New System.Windows.Forms.ToolStripButton() Me.VWPMO_RIGHT_GROUPBindingSource2 = New System.Windows.Forms.BindingSource(Me.components)
Me.TBPMO_RIGHT_GROUPBindingSource = New System.Windows.Forms.BindingSource(Me.components) Me.DD_ECMAdmin = New DD_Record_Organizer.DD_ECMAdmin()
Me.DD_DMSDataSet = New DD_Record_Organizer.DD_DMSDataSet()
Me.BindingNavigatorCountItem = New System.Windows.Forms.ToolStripLabel() Me.BindingNavigatorCountItem = New System.Windows.Forms.ToolStripLabel()
Me.BindingNavigatorDeleteItem = New System.Windows.Forms.ToolStripButton() Me.BindingNavigatorDeleteItem = New System.Windows.Forms.ToolStripButton()
Me.BindingNavigatorMoveFirstItem = New System.Windows.Forms.ToolStripButton() Me.BindingNavigatorMoveFirstItem = New System.Windows.Forms.ToolStripButton()
@ -46,31 +44,50 @@ Partial Class frmRight_Management
Me.BindingNavigatorMoveNextItem = New System.Windows.Forms.ToolStripButton() Me.BindingNavigatorMoveNextItem = New System.Windows.Forms.ToolStripButton()
Me.BindingNavigatorMoveLastItem = New System.Windows.Forms.ToolStripButton() Me.BindingNavigatorMoveLastItem = New System.Windows.Forms.ToolStripButton()
Me.BindingNavigatorSeparator2 = New System.Windows.Forms.ToolStripSeparator() Me.BindingNavigatorSeparator2 = New System.Windows.Forms.ToolStripSeparator()
Me.ToolStripButton1 = New System.Windows.Forms.ToolStripButton()
Me.ToolStripButton2 = New System.Windows.Forms.ToolStripButton() Me.ToolStripButton2 = New System.Windows.Forms.ToolStripButton()
Me.TBPMO_RIGHT_GROUPDataGridView = New System.Windows.Forms.DataGridView() Me.TBPMO_RIGHT_GROUPBindingSource = New System.Windows.Forms.BindingSource(Me.components)
Me.DataGridViewTextBoxColumn1 = New System.Windows.Forms.DataGridViewTextBoxColumn() Me.DD_DMSDataSet = New DD_Record_Organizer.DD_DMSDataSet()
Me.DataGridViewTextBoxColumn2 = New System.Windows.Forms.DataGridViewComboBoxColumn()
Me.TBWH_ENTITIESBindingSource = New System.Windows.Forms.BindingSource(Me.components) Me.TBWH_ENTITIESBindingSource = New System.Windows.Forms.BindingSource(Me.components)
Me.DD_ECMAdmin = New DD_Record_Organizer.DD_ECMAdmin()
Me.DataGridViewTextBoxColumn3 = New System.Windows.Forms.DataGridViewComboBoxColumn()
Me.TBDD_GROUPSBindingSource = New System.Windows.Forms.BindingSource(Me.components) Me.TBDD_GROUPSBindingSource = New System.Windows.Forms.BindingSource(Me.components)
Me.DataGridViewCheckBoxColumn1 = New System.Windows.Forms.DataGridViewCheckBoxColumn()
Me.DataGridViewCheckBoxColumn2 = New System.Windows.Forms.DataGridViewCheckBoxColumn()
Me.DataGridViewCheckBoxColumn3 = New System.Windows.Forms.DataGridViewCheckBoxColumn()
Me.DataGridViewCheckBoxColumn4 = New System.Windows.Forms.DataGridViewCheckBoxColumn()
Me.DataGridViewCheckBoxColumn5 = New System.Windows.Forms.DataGridViewCheckBoxColumn()
Me.DataGridViewCheckBoxColumn6 = New System.Windows.Forms.DataGridViewCheckBoxColumn()
Me.DataGridViewTextBoxColumn4 = New System.Windows.Forms.DataGridViewTextBoxColumn()
Me.DataGridViewTextBoxColumn5 = New System.Windows.Forms.DataGridViewTextBoxColumn()
Me.DataGridViewTextBoxColumn6 = New System.Windows.Forms.DataGridViewTextBoxColumn()
Me.DataGridViewTextBoxColumn7 = New System.Windows.Forms.DataGridViewTextBoxColumn()
Me.TBDD_USER_GROUPSBindingSource = New System.Windows.Forms.BindingSource(Me.components) Me.TBDD_USER_GROUPSBindingSource = New System.Windows.Forms.BindingSource(Me.components)
Me.StatusStrip1 = New System.Windows.Forms.StatusStrip() Me.StatusStrip1 = New System.Windows.Forms.StatusStrip()
Me.tschangedlabel = New System.Windows.Forms.ToolStripStatusLabel() Me.tschangedlabel = New System.Windows.Forms.ToolStripStatusLabel()
Me.statelbl = New System.Windows.Forms.ToolStripStatusLabel() Me.statelbl = New System.Windows.Forms.ToolStripStatusLabel()
Me.InfoLabel = New System.Windows.Forms.ToolStripStatusLabel()
Me.TabControl1 = New System.Windows.Forms.TabControl() Me.TabControl1 = New System.Windows.Forms.TabControl()
Me.TabPage1 = New System.Windows.Forms.TabPage() Me.TabPage1 = New System.Windows.Forms.TabPage()
Me.Button1 = New System.Windows.Forms.Button()
Me.Label4 = New System.Windows.Forms.Label()
Me.Label3 = New System.Windows.Forms.Label()
Me.cmbGroupNew = New System.Windows.Forms.ComboBox()
Me.cmbSicht = New System.Windows.Forms.ComboBox()
Me.CHANGED_WHENTextBox = New System.Windows.Forms.TextBox()
Me.ADDED_WHENTextBox = New System.Windows.Forms.TextBox()
Me.CHANGED_WHOTextBox = New System.Windows.Forms.TextBox()
Me.ADDED_WHOTextBox = New System.Windows.Forms.TextBox()
Me.DELETE_DOCCheckBox = New System.Windows.Forms.CheckBox()
Me.VIEW_DOCCheckBox = New System.Windows.Forms.CheckBox()
Me.ADD_DOCCheckBox = New System.Windows.Forms.CheckBox()
Me.DELETE_RECCheckBox = New System.Windows.Forms.CheckBox()
Me.ADD_RECCheckBox = New System.Windows.Forms.CheckBox()
Me.EDIT_RECCheckBox = New System.Windows.Forms.CheckBox()
Me.GROUP_NAMETextBox = New System.Windows.Forms.TextBox()
Me.ENTITY_NAMETextBox = New System.Windows.Forms.TextBox()
Me.IDTextBox = New System.Windows.Forms.TextBox()
Me.VWPMO_RIGHT_GROUPDataGridView = New System.Windows.Forms.DataGridView()
Me.IDDataGridViewTextBoxColumn = New System.Windows.Forms.DataGridViewTextBoxColumn()
Me.ENTITYNAMEDataGridViewTextBoxColumn = New System.Windows.Forms.DataGridViewTextBoxColumn()
Me.GROUPNAMEDataGridViewTextBoxColumn = New System.Windows.Forms.DataGridViewTextBoxColumn()
Me.EDITRECDataGridViewCheckBoxColumn = New System.Windows.Forms.DataGridViewCheckBoxColumn()
Me.ADDRECDataGridViewCheckBoxColumn = New System.Windows.Forms.DataGridViewCheckBoxColumn()
Me.DELETERECDataGridViewCheckBoxColumn = New System.Windows.Forms.DataGridViewCheckBoxColumn()
Me.ADDDOCDataGridViewCheckBoxColumn = New System.Windows.Forms.DataGridViewCheckBoxColumn()
Me.VIEWDOCDataGridViewCheckBoxColumn = New System.Windows.Forms.DataGridViewCheckBoxColumn()
Me.DELETEDOCDataGridViewCheckBoxColumn = New System.Windows.Forms.DataGridViewCheckBoxColumn()
Me.ADDEDWHODataGridViewTextBoxColumn = New System.Windows.Forms.DataGridViewTextBoxColumn()
Me.ADDEDWHENDataGridViewTextBoxColumn = New System.Windows.Forms.DataGridViewTextBoxColumn()
Me.CHANGEDWHODataGridViewTextBoxColumn = New System.Windows.Forms.DataGridViewTextBoxColumn()
Me.CHANGEDWHENDataGridViewTextBoxColumn = New System.Windows.Forms.DataGridViewTextBoxColumn()
Me.TabPage2 = New System.Windows.Forms.TabPage() Me.TabPage2 = New System.Windows.Forms.TabPage()
Me.btndeleteUserRight = New System.Windows.Forms.Button() Me.btndeleteUserRight = New System.Windows.Forms.Button()
Me.Label2 = New System.Windows.Forms.Label() Me.Label2 = New System.Windows.Forms.Label()
@ -125,38 +142,28 @@ Partial Class frmRight_Management
Me.TBDD_USERTableAdapter = New DD_Record_Organizer.DD_DMSDataSetTableAdapters.TBDD_USERTableAdapter() Me.TBDD_USERTableAdapter = New DD_Record_Organizer.DD_DMSDataSetTableAdapters.TBDD_USERTableAdapter()
Me.USER_RIGHTSTableAdapter = New DD_Record_Organizer.DD_ECMAdminTableAdapters.USER_RIGHTSTableAdapter() Me.USER_RIGHTSTableAdapter = New DD_Record_Organizer.DD_ECMAdminTableAdapters.USER_RIGHTSTableAdapter()
Me.TBDD_GROUPSTableAdapter = New DD_Record_Organizer.DD_ECMAdminTableAdapters.TBDD_GROUPSTableAdapter() Me.TBDD_GROUPSTableAdapter = New DD_Record_Organizer.DD_ECMAdminTableAdapters.TBDD_GROUPSTableAdapter()
Me.GUIDTextBox = New System.Windows.Forms.TextBox() Me.VWPMO_RIGHT_GROUPTableAdapter = New DD_Record_Organizer.DD_ECMAdminTableAdapters.VWPMO_RIGHT_GROUPTableAdapter()
Me.ENTITY_IDComboBox = New System.Windows.Forms.ComboBox() Me.GroupBox1 = New System.Windows.Forms.GroupBox()
Me.GROUP_IDComboBox = New System.Windows.Forms.ComboBox() IDLabel = New System.Windows.Forms.Label()
Me.EDIT_RECCheckBox = New System.Windows.Forms.CheckBox() ENTITY_NAMELabel = New System.Windows.Forms.Label()
Me.ADD_RECCheckBox = New System.Windows.Forms.CheckBox() GROUP_NAMELabel = New System.Windows.Forms.Label()
Me.DELETE_RECCheckBox = New System.Windows.Forms.CheckBox()
Me.ADD_DOCCheckBox = New System.Windows.Forms.CheckBox()
Me.VIEW_DOCCheckBox = New System.Windows.Forms.CheckBox()
Me.DELETE_DOCCheckBox = New System.Windows.Forms.CheckBox()
Me.ADDED_WHOTextBox = New System.Windows.Forms.TextBox()
Me.ADDED_WHENTextBox = New System.Windows.Forms.TextBox()
Me.CHANGED_WHOTextBox = New System.Windows.Forms.TextBox()
Me.CHANGED_WHENTextBox = New System.Windows.Forms.TextBox()
GUIDLabel = New System.Windows.Forms.Label()
ENTITY_IDLabel = New System.Windows.Forms.Label()
GROUP_IDLabel = New System.Windows.Forms.Label()
ADDED_WHOLabel = New System.Windows.Forms.Label() ADDED_WHOLabel = New System.Windows.Forms.Label()
ADDED_WHENLabel = New System.Windows.Forms.Label()
CHANGED_WHOLabel = New System.Windows.Forms.Label() CHANGED_WHOLabel = New System.Windows.Forms.Label()
ADDED_WHENLabel = New System.Windows.Forms.Label()
CHANGED_WHENLabel = New System.Windows.Forms.Label() CHANGED_WHENLabel = New System.Windows.Forms.Label()
CType(Me.BindingNavigator1, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.BindingNavigator1, System.ComponentModel.ISupportInitialize).BeginInit()
Me.BindingNavigator1.SuspendLayout() Me.BindingNavigator1.SuspendLayout()
CType(Me.VWPMO_RIGHT_GROUPBindingSource2, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.DD_ECMAdmin, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.TBPMO_RIGHT_GROUPBindingSource, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.TBPMO_RIGHT_GROUPBindingSource, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.DD_DMSDataSet, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.DD_DMSDataSet, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.TBPMO_RIGHT_GROUPDataGridView, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.TBWH_ENTITIESBindingSource, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.TBWH_ENTITIESBindingSource, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.DD_ECMAdmin, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.TBDD_GROUPSBindingSource, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.TBDD_GROUPSBindingSource, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.TBDD_USER_GROUPSBindingSource, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.TBDD_USER_GROUPSBindingSource, System.ComponentModel.ISupportInitialize).BeginInit()
Me.StatusStrip1.SuspendLayout() Me.StatusStrip1.SuspendLayout()
Me.TabControl1.SuspendLayout() Me.TabControl1.SuspendLayout()
Me.TabPage1.SuspendLayout() Me.TabPage1.SuspendLayout()
CType(Me.VWPMO_RIGHT_GROUPDataGridView, System.ComponentModel.ISupportInitialize).BeginInit()
Me.TabPage2.SuspendLayout() Me.TabPage2.SuspendLayout()
CType(Me.GridControlUsers2Menue, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.GridControlUsers2Menue, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.TBAD_UsersBindingSource, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.TBAD_UsersBindingSource, System.ComponentModel.ISupportInitialize).BeginInit()
@ -168,16 +175,52 @@ Partial Class frmRight_Management
CType(Me.USER_RIGHTSBindingSource, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.USER_RIGHTSBindingSource, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.TBDD_USERBindingSource, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.TBDD_USERBindingSource, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.TBWH_USER_GROUPSBindingSource, System.ComponentModel.ISupportInitialize).BeginInit() CType(Me.TBWH_USER_GROUPSBindingSource, System.ComponentModel.ISupportInitialize).BeginInit()
Me.GroupBox1.SuspendLayout()
Me.SuspendLayout() Me.SuspendLayout()
' '
'IDLabel
'
resources.ApplyResources(IDLabel, "IDLabel")
IDLabel.Name = "IDLabel"
'
'ENTITY_NAMELabel
'
resources.ApplyResources(ENTITY_NAMELabel, "ENTITY_NAMELabel")
ENTITY_NAMELabel.Name = "ENTITY_NAMELabel"
'
'GROUP_NAMELabel
'
resources.ApplyResources(GROUP_NAMELabel, "GROUP_NAMELabel")
GROUP_NAMELabel.Name = "GROUP_NAMELabel"
'
'ADDED_WHOLabel
'
resources.ApplyResources(ADDED_WHOLabel, "ADDED_WHOLabel")
ADDED_WHOLabel.Name = "ADDED_WHOLabel"
'
'CHANGED_WHOLabel
'
resources.ApplyResources(CHANGED_WHOLabel, "CHANGED_WHOLabel")
CHANGED_WHOLabel.Name = "CHANGED_WHOLabel"
'
'ADDED_WHENLabel
'
resources.ApplyResources(ADDED_WHENLabel, "ADDED_WHENLabel")
ADDED_WHENLabel.Name = "ADDED_WHENLabel"
'
'CHANGED_WHENLabel
'
resources.ApplyResources(CHANGED_WHENLabel, "CHANGED_WHENLabel")
CHANGED_WHENLabel.Name = "CHANGED_WHENLabel"
'
'BindingNavigator1 'BindingNavigator1
' '
Me.BindingNavigator1.AddNewItem = Me.BindingNavigatorAddNewItem Me.BindingNavigator1.AddNewItem = Nothing
Me.BindingNavigator1.BindingSource = Me.TBPMO_RIGHT_GROUPBindingSource Me.BindingNavigator1.BindingSource = Me.VWPMO_RIGHT_GROUPBindingSource2
Me.BindingNavigator1.CountItem = Me.BindingNavigatorCountItem Me.BindingNavigator1.CountItem = Me.BindingNavigatorCountItem
Me.BindingNavigator1.CountItemFormat = "of {0} GroupRights" Me.BindingNavigator1.CountItemFormat = "von {0} Gruppenrechten"
Me.BindingNavigator1.DeleteItem = Me.BindingNavigatorDeleteItem Me.BindingNavigator1.DeleteItem = Me.BindingNavigatorDeleteItem
Me.BindingNavigator1.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.BindingNavigatorMoveFirstItem, Me.BindingNavigatorMovePreviousItem, Me.BindingNavigatorSeparator, Me.BindingNavigatorPositionItem, Me.BindingNavigatorCountItem, Me.BindingNavigatorSeparator1, Me.BindingNavigatorMoveNextItem, Me.BindingNavigatorMoveLastItem, Me.BindingNavigatorSeparator2, Me.BindingNavigatorAddNewItem, Me.BindingNavigatorDeleteItem, Me.ToolStripButton1, Me.ToolStripButton2}) Me.BindingNavigator1.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.BindingNavigatorMoveFirstItem, Me.BindingNavigatorMovePreviousItem, Me.BindingNavigatorSeparator, Me.BindingNavigatorPositionItem, Me.BindingNavigatorCountItem, Me.BindingNavigatorSeparator1, Me.BindingNavigatorMoveNextItem, Me.BindingNavigatorMoveLastItem, Me.BindingNavigatorSeparator2, Me.BindingNavigatorDeleteItem, Me.ToolStripButton2})
resources.ApplyResources(Me.BindingNavigator1, "BindingNavigator1") resources.ApplyResources(Me.BindingNavigator1, "BindingNavigator1")
Me.BindingNavigator1.MoveFirstItem = Me.BindingNavigatorMoveFirstItem Me.BindingNavigator1.MoveFirstItem = Me.BindingNavigatorMoveFirstItem
Me.BindingNavigator1.MoveLastItem = Me.BindingNavigatorMoveLastItem Me.BindingNavigator1.MoveLastItem = Me.BindingNavigatorMoveLastItem
@ -186,21 +229,15 @@ Partial Class frmRight_Management
Me.BindingNavigator1.Name = "BindingNavigator1" Me.BindingNavigator1.Name = "BindingNavigator1"
Me.BindingNavigator1.PositionItem = Me.BindingNavigatorPositionItem Me.BindingNavigator1.PositionItem = Me.BindingNavigatorPositionItem
' '
'BindingNavigatorAddNewItem 'VWPMO_RIGHT_GROUPBindingSource2
' '
Me.BindingNavigatorAddNewItem.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image Me.VWPMO_RIGHT_GROUPBindingSource2.DataMember = "VWPMO_RIGHT_GROUP"
resources.ApplyResources(Me.BindingNavigatorAddNewItem, "BindingNavigatorAddNewItem") Me.VWPMO_RIGHT_GROUPBindingSource2.DataSource = Me.DD_ECMAdmin
Me.BindingNavigatorAddNewItem.Name = "BindingNavigatorAddNewItem"
' '
'TBPMO_RIGHT_GROUPBindingSource 'DD_ECMAdmin
' '
Me.TBPMO_RIGHT_GROUPBindingSource.DataMember = "TBPMO_RIGHT_GROUP" Me.DD_ECMAdmin.DataSetName = "DD_ECMAdmin"
Me.TBPMO_RIGHT_GROUPBindingSource.DataSource = Me.DD_DMSDataSet Me.DD_ECMAdmin.SchemaSerializationMode = System.Data.SchemaSerializationMode.IncludeSchema
'
'DD_DMSDataSet
'
Me.DD_DMSDataSet.DataSetName = "DD_DMSDataSet"
Me.DD_DMSDataSet.SchemaSerializationMode = System.Data.SchemaSerializationMode.IncludeSchema
' '
'BindingNavigatorCountItem 'BindingNavigatorCountItem
' '
@ -257,13 +294,6 @@ Partial Class frmRight_Management
Me.BindingNavigatorSeparator2.Name = "BindingNavigatorSeparator2" Me.BindingNavigatorSeparator2.Name = "BindingNavigatorSeparator2"
resources.ApplyResources(Me.BindingNavigatorSeparator2, "BindingNavigatorSeparator2") resources.ApplyResources(Me.BindingNavigatorSeparator2, "BindingNavigatorSeparator2")
' '
'ToolStripButton1
'
Me.ToolStripButton1.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image
Me.ToolStripButton1.Image = Global.DD_Record_Organizer.My.Resources.Resources.save
resources.ApplyResources(Me.ToolStripButton1, "ToolStripButton1")
Me.ToolStripButton1.Name = "ToolStripButton1"
'
'ToolStripButton2 'ToolStripButton2
' '
Me.ToolStripButton2.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image Me.ToolStripButton2.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image
@ -271,136 +301,26 @@ Partial Class frmRight_Management
resources.ApplyResources(Me.ToolStripButton2, "ToolStripButton2") resources.ApplyResources(Me.ToolStripButton2, "ToolStripButton2")
Me.ToolStripButton2.Name = "ToolStripButton2" Me.ToolStripButton2.Name = "ToolStripButton2"
' '
'TBPMO_RIGHT_GROUPDataGridView 'TBPMO_RIGHT_GROUPBindingSource
' '
Me.TBPMO_RIGHT_GROUPDataGridView.AllowUserToAddRows = False Me.TBPMO_RIGHT_GROUPBindingSource.DataMember = "TBPMO_RIGHT_GROUP"
Me.TBPMO_RIGHT_GROUPDataGridView.AllowUserToDeleteRows = False Me.TBPMO_RIGHT_GROUPBindingSource.DataSource = Me.DD_DMSDataSet
DataGridViewCellStyle1.BackColor = System.Drawing.Color.Lime
Me.TBPMO_RIGHT_GROUPDataGridView.AlternatingRowsDefaultCellStyle = DataGridViewCellStyle1
resources.ApplyResources(Me.TBPMO_RIGHT_GROUPDataGridView, "TBPMO_RIGHT_GROUPDataGridView")
Me.TBPMO_RIGHT_GROUPDataGridView.AutoGenerateColumns = False
Me.TBPMO_RIGHT_GROUPDataGridView.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize
Me.TBPMO_RIGHT_GROUPDataGridView.Columns.AddRange(New System.Windows.Forms.DataGridViewColumn() {Me.DataGridViewTextBoxColumn1, Me.DataGridViewTextBoxColumn2, Me.DataGridViewTextBoxColumn3, Me.DataGridViewCheckBoxColumn1, Me.DataGridViewCheckBoxColumn2, Me.DataGridViewCheckBoxColumn3, Me.DataGridViewCheckBoxColumn4, Me.DataGridViewCheckBoxColumn5, Me.DataGridViewCheckBoxColumn6, Me.DataGridViewTextBoxColumn4, Me.DataGridViewTextBoxColumn5, Me.DataGridViewTextBoxColumn6, Me.DataGridViewTextBoxColumn7})
Me.TBPMO_RIGHT_GROUPDataGridView.DataSource = Me.TBPMO_RIGHT_GROUPBindingSource
Me.TBPMO_RIGHT_GROUPDataGridView.Name = "TBPMO_RIGHT_GROUPDataGridView"
Me.TBPMO_RIGHT_GROUPDataGridView.ReadOnly = True
' '
'DataGridViewTextBoxColumn1 'DD_DMSDataSet
' '
Me.DataGridViewTextBoxColumn1.DataPropertyName = "GUID" Me.DD_DMSDataSet.DataSetName = "DD_DMSDataSet"
resources.ApplyResources(Me.DataGridViewTextBoxColumn1, "DataGridViewTextBoxColumn1") Me.DD_DMSDataSet.SchemaSerializationMode = System.Data.SchemaSerializationMode.IncludeSchema
Me.DataGridViewTextBoxColumn1.Name = "DataGridViewTextBoxColumn1"
Me.DataGridViewTextBoxColumn1.ReadOnly = True
'
'DataGridViewTextBoxColumn2
'
Me.DataGridViewTextBoxColumn2.DataPropertyName = "ENTITY_ID"
Me.DataGridViewTextBoxColumn2.DataSource = Me.TBWH_ENTITIESBindingSource
Me.DataGridViewTextBoxColumn2.DisplayMember = "CAPTION"
resources.ApplyResources(Me.DataGridViewTextBoxColumn2, "DataGridViewTextBoxColumn2")
Me.DataGridViewTextBoxColumn2.Name = "DataGridViewTextBoxColumn2"
Me.DataGridViewTextBoxColumn2.ReadOnly = True
Me.DataGridViewTextBoxColumn2.Resizable = System.Windows.Forms.DataGridViewTriState.[True]
Me.DataGridViewTextBoxColumn2.SortMode = System.Windows.Forms.DataGridViewColumnSortMode.Automatic
Me.DataGridViewTextBoxColumn2.ValueMember = "GUID"
' '
'TBWH_ENTITIESBindingSource 'TBWH_ENTITIESBindingSource
' '
Me.TBWH_ENTITIESBindingSource.DataMember = "TBWH_ENTITIES" Me.TBWH_ENTITIESBindingSource.DataMember = "TBWH_ENTITIES"
Me.TBWH_ENTITIESBindingSource.DataSource = Me.DD_ECMAdmin Me.TBWH_ENTITIESBindingSource.DataSource = Me.DD_ECMAdmin
' '
'DD_ECMAdmin
'
Me.DD_ECMAdmin.DataSetName = "DD_ECMAdmin"
Me.DD_ECMAdmin.SchemaSerializationMode = System.Data.SchemaSerializationMode.IncludeSchema
'
'DataGridViewTextBoxColumn3
'
Me.DataGridViewTextBoxColumn3.DataPropertyName = "GROUP_ID"
Me.DataGridViewTextBoxColumn3.DataSource = Me.TBDD_GROUPSBindingSource
Me.DataGridViewTextBoxColumn3.DisplayMember = "NAME"
resources.ApplyResources(Me.DataGridViewTextBoxColumn3, "DataGridViewTextBoxColumn3")
Me.DataGridViewTextBoxColumn3.Name = "DataGridViewTextBoxColumn3"
Me.DataGridViewTextBoxColumn3.ReadOnly = True
Me.DataGridViewTextBoxColumn3.Resizable = System.Windows.Forms.DataGridViewTriState.[True]
Me.DataGridViewTextBoxColumn3.SortMode = System.Windows.Forms.DataGridViewColumnSortMode.Automatic
Me.DataGridViewTextBoxColumn3.ValueMember = "GUID"
'
'TBDD_GROUPSBindingSource 'TBDD_GROUPSBindingSource
' '
Me.TBDD_GROUPSBindingSource.DataMember = "TBDD_GROUPS" Me.TBDD_GROUPSBindingSource.DataMember = "TBDD_GROUPS"
Me.TBDD_GROUPSBindingSource.DataSource = Me.DD_ECMAdmin Me.TBDD_GROUPSBindingSource.DataSource = Me.DD_ECMAdmin
' '
'DataGridViewCheckBoxColumn1
'
Me.DataGridViewCheckBoxColumn1.DataPropertyName = "EDIT_REC"
resources.ApplyResources(Me.DataGridViewCheckBoxColumn1, "DataGridViewCheckBoxColumn1")
Me.DataGridViewCheckBoxColumn1.Name = "DataGridViewCheckBoxColumn1"
Me.DataGridViewCheckBoxColumn1.ReadOnly = True
'
'DataGridViewCheckBoxColumn2
'
Me.DataGridViewCheckBoxColumn2.DataPropertyName = "ADD_REC"
resources.ApplyResources(Me.DataGridViewCheckBoxColumn2, "DataGridViewCheckBoxColumn2")
Me.DataGridViewCheckBoxColumn2.Name = "DataGridViewCheckBoxColumn2"
Me.DataGridViewCheckBoxColumn2.ReadOnly = True
'
'DataGridViewCheckBoxColumn3
'
Me.DataGridViewCheckBoxColumn3.DataPropertyName = "DELETE_REC"
resources.ApplyResources(Me.DataGridViewCheckBoxColumn3, "DataGridViewCheckBoxColumn3")
Me.DataGridViewCheckBoxColumn3.Name = "DataGridViewCheckBoxColumn3"
Me.DataGridViewCheckBoxColumn3.ReadOnly = True
'
'DataGridViewCheckBoxColumn4
'
Me.DataGridViewCheckBoxColumn4.DataPropertyName = "ADD_DOC"
resources.ApplyResources(Me.DataGridViewCheckBoxColumn4, "DataGridViewCheckBoxColumn4")
Me.DataGridViewCheckBoxColumn4.Name = "DataGridViewCheckBoxColumn4"
Me.DataGridViewCheckBoxColumn4.ReadOnly = True
'
'DataGridViewCheckBoxColumn5
'
Me.DataGridViewCheckBoxColumn5.DataPropertyName = "VIEW_DOC"
resources.ApplyResources(Me.DataGridViewCheckBoxColumn5, "DataGridViewCheckBoxColumn5")
Me.DataGridViewCheckBoxColumn5.Name = "DataGridViewCheckBoxColumn5"
Me.DataGridViewCheckBoxColumn5.ReadOnly = True
'
'DataGridViewCheckBoxColumn6
'
Me.DataGridViewCheckBoxColumn6.DataPropertyName = "DELETE_DOC"
resources.ApplyResources(Me.DataGridViewCheckBoxColumn6, "DataGridViewCheckBoxColumn6")
Me.DataGridViewCheckBoxColumn6.Name = "DataGridViewCheckBoxColumn6"
Me.DataGridViewCheckBoxColumn6.ReadOnly = True
'
'DataGridViewTextBoxColumn4
'
Me.DataGridViewTextBoxColumn4.DataPropertyName = "ADDED_WHO"
resources.ApplyResources(Me.DataGridViewTextBoxColumn4, "DataGridViewTextBoxColumn4")
Me.DataGridViewTextBoxColumn4.Name = "DataGridViewTextBoxColumn4"
Me.DataGridViewTextBoxColumn4.ReadOnly = True
'
'DataGridViewTextBoxColumn5
'
Me.DataGridViewTextBoxColumn5.DataPropertyName = "ADDED_WHEN"
resources.ApplyResources(Me.DataGridViewTextBoxColumn5, "DataGridViewTextBoxColumn5")
Me.DataGridViewTextBoxColumn5.Name = "DataGridViewTextBoxColumn5"
Me.DataGridViewTextBoxColumn5.ReadOnly = True
'
'DataGridViewTextBoxColumn6
'
Me.DataGridViewTextBoxColumn6.DataPropertyName = "CHANGED_WHO"
resources.ApplyResources(Me.DataGridViewTextBoxColumn6, "DataGridViewTextBoxColumn6")
Me.DataGridViewTextBoxColumn6.Name = "DataGridViewTextBoxColumn6"
Me.DataGridViewTextBoxColumn6.ReadOnly = True
'
'DataGridViewTextBoxColumn7
'
Me.DataGridViewTextBoxColumn7.DataPropertyName = "CHANGED_WHEN"
resources.ApplyResources(Me.DataGridViewTextBoxColumn7, "DataGridViewTextBoxColumn7")
Me.DataGridViewTextBoxColumn7.Name = "DataGridViewTextBoxColumn7"
Me.DataGridViewTextBoxColumn7.ReadOnly = True
'
'TBDD_USER_GROUPSBindingSource 'TBDD_USER_GROUPSBindingSource
' '
Me.TBDD_USER_GROUPSBindingSource.DataMember = "TBDD_USER_GROUPS" Me.TBDD_USER_GROUPSBindingSource.DataMember = "TBDD_USER_GROUPS"
@ -408,7 +328,7 @@ Partial Class frmRight_Management
' '
'StatusStrip1 'StatusStrip1
' '
Me.StatusStrip1.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.tschangedlabel, Me.statelbl}) Me.StatusStrip1.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.tschangedlabel, Me.statelbl, Me.InfoLabel})
resources.ApplyResources(Me.StatusStrip1, "StatusStrip1") resources.ApplyResources(Me.StatusStrip1, "StatusStrip1")
Me.StatusStrip1.Name = "StatusStrip1" Me.StatusStrip1.Name = "StatusStrip1"
' '
@ -423,6 +343,11 @@ Partial Class frmRight_Management
Me.statelbl.Name = "statelbl" Me.statelbl.Name = "statelbl"
resources.ApplyResources(Me.statelbl, "statelbl") resources.ApplyResources(Me.statelbl, "statelbl")
' '
'InfoLabel
'
Me.InfoLabel.Name = "InfoLabel"
resources.ApplyResources(Me.InfoLabel, "InfoLabel")
'
'TabControl1 'TabControl1
' '
Me.TabControl1.Controls.Add(Me.TabPage1) Me.TabControl1.Controls.Add(Me.TabPage1)
@ -434,12 +359,13 @@ Partial Class frmRight_Management
'TabPage1 'TabPage1
' '
resources.ApplyResources(Me.TabPage1, "TabPage1") resources.ApplyResources(Me.TabPage1, "TabPage1")
Me.TabPage1.Controls.Add(Me.GroupBox1)
Me.TabPage1.Controls.Add(CHANGED_WHENLabel) Me.TabPage1.Controls.Add(CHANGED_WHENLabel)
Me.TabPage1.Controls.Add(Me.CHANGED_WHENTextBox) Me.TabPage1.Controls.Add(Me.CHANGED_WHENTextBox)
Me.TabPage1.Controls.Add(CHANGED_WHOLabel)
Me.TabPage1.Controls.Add(Me.CHANGED_WHOTextBox)
Me.TabPage1.Controls.Add(ADDED_WHENLabel) Me.TabPage1.Controls.Add(ADDED_WHENLabel)
Me.TabPage1.Controls.Add(Me.ADDED_WHENTextBox) Me.TabPage1.Controls.Add(Me.ADDED_WHENTextBox)
Me.TabPage1.Controls.Add(CHANGED_WHOLabel)
Me.TabPage1.Controls.Add(Me.CHANGED_WHOTextBox)
Me.TabPage1.Controls.Add(ADDED_WHOLabel) Me.TabPage1.Controls.Add(ADDED_WHOLabel)
Me.TabPage1.Controls.Add(Me.ADDED_WHOTextBox) Me.TabPage1.Controls.Add(Me.ADDED_WHOTextBox)
Me.TabPage1.Controls.Add(Me.DELETE_DOCCheckBox) Me.TabPage1.Controls.Add(Me.DELETE_DOCCheckBox)
@ -448,17 +374,237 @@ Partial Class frmRight_Management
Me.TabPage1.Controls.Add(Me.DELETE_RECCheckBox) Me.TabPage1.Controls.Add(Me.DELETE_RECCheckBox)
Me.TabPage1.Controls.Add(Me.ADD_RECCheckBox) Me.TabPage1.Controls.Add(Me.ADD_RECCheckBox)
Me.TabPage1.Controls.Add(Me.EDIT_RECCheckBox) Me.TabPage1.Controls.Add(Me.EDIT_RECCheckBox)
Me.TabPage1.Controls.Add(GROUP_IDLabel) Me.TabPage1.Controls.Add(GROUP_NAMELabel)
Me.TabPage1.Controls.Add(Me.GROUP_IDComboBox) Me.TabPage1.Controls.Add(Me.GROUP_NAMETextBox)
Me.TabPage1.Controls.Add(ENTITY_IDLabel) Me.TabPage1.Controls.Add(ENTITY_NAMELabel)
Me.TabPage1.Controls.Add(Me.ENTITY_IDComboBox) Me.TabPage1.Controls.Add(Me.ENTITY_NAMETextBox)
Me.TabPage1.Controls.Add(GUIDLabel) Me.TabPage1.Controls.Add(IDLabel)
Me.TabPage1.Controls.Add(Me.GUIDTextBox) Me.TabPage1.Controls.Add(Me.IDTextBox)
Me.TabPage1.Controls.Add(Me.VWPMO_RIGHT_GROUPDataGridView)
Me.TabPage1.Controls.Add(Me.BindingNavigator1) Me.TabPage1.Controls.Add(Me.BindingNavigator1)
Me.TabPage1.Controls.Add(Me.TBPMO_RIGHT_GROUPDataGridView)
Me.TabPage1.Name = "TabPage1" Me.TabPage1.Name = "TabPage1"
Me.TabPage1.UseVisualStyleBackColor = True Me.TabPage1.UseVisualStyleBackColor = True
' '
'Button1
'
Me.Button1.Image = Global.DD_Record_Organizer.My.Resources.Resources.action_add_16xLG
resources.ApplyResources(Me.Button1, "Button1")
Me.Button1.Name = "Button1"
Me.Button1.UseVisualStyleBackColor = True
'
'Label4
'
resources.ApplyResources(Me.Label4, "Label4")
Me.Label4.Name = "Label4"
'
'Label3
'
resources.ApplyResources(Me.Label3, "Label3")
Me.Label3.Name = "Label3"
'
'cmbGroupNew
'
Me.cmbGroupNew.DataSource = Me.TBDD_GROUPSBindingSource
Me.cmbGroupNew.DisplayMember = "NAME"
Me.cmbGroupNew.FormattingEnabled = True
resources.ApplyResources(Me.cmbGroupNew, "cmbGroupNew")
Me.cmbGroupNew.Name = "cmbGroupNew"
Me.cmbGroupNew.ValueMember = "GUID"
'
'cmbSicht
'
Me.cmbSicht.DataSource = Me.TBWH_ENTITIESBindingSource
Me.cmbSicht.DisplayMember = "FORM_TITLE"
Me.cmbSicht.FormattingEnabled = True
resources.ApplyResources(Me.cmbSicht, "cmbSicht")
Me.cmbSicht.Name = "cmbSicht"
Me.cmbSicht.ValueMember = "GUID"
'
'CHANGED_WHENTextBox
'
Me.CHANGED_WHENTextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.VWPMO_RIGHT_GROUPBindingSource2, "CHANGED_WHEN", True))
resources.ApplyResources(Me.CHANGED_WHENTextBox, "CHANGED_WHENTextBox")
Me.CHANGED_WHENTextBox.Name = "CHANGED_WHENTextBox"
Me.CHANGED_WHENTextBox.ReadOnly = True
'
'ADDED_WHENTextBox
'
Me.ADDED_WHENTextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.VWPMO_RIGHT_GROUPBindingSource2, "ADDED_WHEN", True))
resources.ApplyResources(Me.ADDED_WHENTextBox, "ADDED_WHENTextBox")
Me.ADDED_WHENTextBox.Name = "ADDED_WHENTextBox"
Me.ADDED_WHENTextBox.ReadOnly = True
'
'CHANGED_WHOTextBox
'
Me.CHANGED_WHOTextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.VWPMO_RIGHT_GROUPBindingSource2, "CHANGED_WHO", True))
resources.ApplyResources(Me.CHANGED_WHOTextBox, "CHANGED_WHOTextBox")
Me.CHANGED_WHOTextBox.Name = "CHANGED_WHOTextBox"
Me.CHANGED_WHOTextBox.ReadOnly = True
'
'ADDED_WHOTextBox
'
Me.ADDED_WHOTextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.VWPMO_RIGHT_GROUPBindingSource2, "ADDED_WHO", True))
resources.ApplyResources(Me.ADDED_WHOTextBox, "ADDED_WHOTextBox")
Me.ADDED_WHOTextBox.Name = "ADDED_WHOTextBox"
Me.ADDED_WHOTextBox.ReadOnly = True
'
'DELETE_DOCCheckBox
'
Me.DELETE_DOCCheckBox.DataBindings.Add(New System.Windows.Forms.Binding("CheckState", Me.VWPMO_RIGHT_GROUPBindingSource2, "DELETE_DOC", True))
resources.ApplyResources(Me.DELETE_DOCCheckBox, "DELETE_DOCCheckBox")
Me.DELETE_DOCCheckBox.Name = "DELETE_DOCCheckBox"
Me.DELETE_DOCCheckBox.UseVisualStyleBackColor = True
'
'VIEW_DOCCheckBox
'
Me.VIEW_DOCCheckBox.DataBindings.Add(New System.Windows.Forms.Binding("CheckState", Me.VWPMO_RIGHT_GROUPBindingSource2, "VIEW_DOC", True))
resources.ApplyResources(Me.VIEW_DOCCheckBox, "VIEW_DOCCheckBox")
Me.VIEW_DOCCheckBox.Name = "VIEW_DOCCheckBox"
Me.VIEW_DOCCheckBox.UseVisualStyleBackColor = True
'
'ADD_DOCCheckBox
'
Me.ADD_DOCCheckBox.DataBindings.Add(New System.Windows.Forms.Binding("CheckState", Me.VWPMO_RIGHT_GROUPBindingSource2, "ADD_DOC", True))
resources.ApplyResources(Me.ADD_DOCCheckBox, "ADD_DOCCheckBox")
Me.ADD_DOCCheckBox.Name = "ADD_DOCCheckBox"
Me.ADD_DOCCheckBox.UseVisualStyleBackColor = True
'
'DELETE_RECCheckBox
'
Me.DELETE_RECCheckBox.DataBindings.Add(New System.Windows.Forms.Binding("CheckState", Me.VWPMO_RIGHT_GROUPBindingSource2, "DELETE_REC", True))
resources.ApplyResources(Me.DELETE_RECCheckBox, "DELETE_RECCheckBox")
Me.DELETE_RECCheckBox.Name = "DELETE_RECCheckBox"
Me.DELETE_RECCheckBox.UseVisualStyleBackColor = True
'
'ADD_RECCheckBox
'
Me.ADD_RECCheckBox.DataBindings.Add(New System.Windows.Forms.Binding("CheckState", Me.VWPMO_RIGHT_GROUPBindingSource2, "ADD_REC", True))
resources.ApplyResources(Me.ADD_RECCheckBox, "ADD_RECCheckBox")
Me.ADD_RECCheckBox.Name = "ADD_RECCheckBox"
Me.ADD_RECCheckBox.UseVisualStyleBackColor = True
'
'EDIT_RECCheckBox
'
Me.EDIT_RECCheckBox.DataBindings.Add(New System.Windows.Forms.Binding("CheckState", Me.VWPMO_RIGHT_GROUPBindingSource2, "EDIT_REC", True))
resources.ApplyResources(Me.EDIT_RECCheckBox, "EDIT_RECCheckBox")
Me.EDIT_RECCheckBox.Name = "EDIT_RECCheckBox"
Me.EDIT_RECCheckBox.UseVisualStyleBackColor = True
'
'GROUP_NAMETextBox
'
Me.GROUP_NAMETextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.VWPMO_RIGHT_GROUPBindingSource2, "GROUP_NAME", True))
resources.ApplyResources(Me.GROUP_NAMETextBox, "GROUP_NAMETextBox")
Me.GROUP_NAMETextBox.Name = "GROUP_NAMETextBox"
Me.GROUP_NAMETextBox.ReadOnly = True
'
'ENTITY_NAMETextBox
'
Me.ENTITY_NAMETextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.VWPMO_RIGHT_GROUPBindingSource2, "ENTITY_NAME", True))
resources.ApplyResources(Me.ENTITY_NAMETextBox, "ENTITY_NAMETextBox")
Me.ENTITY_NAMETextBox.Name = "ENTITY_NAMETextBox"
Me.ENTITY_NAMETextBox.ReadOnly = True
'
'IDTextBox
'
Me.IDTextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.VWPMO_RIGHT_GROUPBindingSource2, "ID", True))
resources.ApplyResources(Me.IDTextBox, "IDTextBox")
Me.IDTextBox.Name = "IDTextBox"
Me.IDTextBox.ReadOnly = True
'
'VWPMO_RIGHT_GROUPDataGridView
'
Me.VWPMO_RIGHT_GROUPDataGridView.AllowUserToAddRows = False
Me.VWPMO_RIGHT_GROUPDataGridView.AllowUserToDeleteRows = False
Me.VWPMO_RIGHT_GROUPDataGridView.AllowUserToOrderColumns = True
Me.VWPMO_RIGHT_GROUPDataGridView.AllowUserToResizeColumns = False
Me.VWPMO_RIGHT_GROUPDataGridView.AllowUserToResizeRows = False
resources.ApplyResources(Me.VWPMO_RIGHT_GROUPDataGridView, "VWPMO_RIGHT_GROUPDataGridView")
Me.VWPMO_RIGHT_GROUPDataGridView.AutoGenerateColumns = False
Me.VWPMO_RIGHT_GROUPDataGridView.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize
Me.VWPMO_RIGHT_GROUPDataGridView.Columns.AddRange(New System.Windows.Forms.DataGridViewColumn() {Me.IDDataGridViewTextBoxColumn, Me.ENTITYNAMEDataGridViewTextBoxColumn, Me.GROUPNAMEDataGridViewTextBoxColumn, Me.EDITRECDataGridViewCheckBoxColumn, Me.ADDRECDataGridViewCheckBoxColumn, Me.DELETERECDataGridViewCheckBoxColumn, Me.ADDDOCDataGridViewCheckBoxColumn, Me.VIEWDOCDataGridViewCheckBoxColumn, Me.DELETEDOCDataGridViewCheckBoxColumn, Me.ADDEDWHODataGridViewTextBoxColumn, Me.ADDEDWHENDataGridViewTextBoxColumn, Me.CHANGEDWHODataGridViewTextBoxColumn, Me.CHANGEDWHENDataGridViewTextBoxColumn})
Me.VWPMO_RIGHT_GROUPDataGridView.DataSource = Me.VWPMO_RIGHT_GROUPBindingSource2
Me.VWPMO_RIGHT_GROUPDataGridView.Name = "VWPMO_RIGHT_GROUPDataGridView"
'
'IDDataGridViewTextBoxColumn
'
Me.IDDataGridViewTextBoxColumn.DataPropertyName = "ID"
resources.ApplyResources(Me.IDDataGridViewTextBoxColumn, "IDDataGridViewTextBoxColumn")
Me.IDDataGridViewTextBoxColumn.Name = "IDDataGridViewTextBoxColumn"
'
'ENTITYNAMEDataGridViewTextBoxColumn
'
Me.ENTITYNAMEDataGridViewTextBoxColumn.DataPropertyName = "ENTITY_NAME"
Me.ENTITYNAMEDataGridViewTextBoxColumn.FillWeight = 150.0!
resources.ApplyResources(Me.ENTITYNAMEDataGridViewTextBoxColumn, "ENTITYNAMEDataGridViewTextBoxColumn")
Me.ENTITYNAMEDataGridViewTextBoxColumn.Name = "ENTITYNAMEDataGridViewTextBoxColumn"
'
'GROUPNAMEDataGridViewTextBoxColumn
'
Me.GROUPNAMEDataGridViewTextBoxColumn.DataPropertyName = "GROUP_NAME"
Me.GROUPNAMEDataGridViewTextBoxColumn.FillWeight = 150.0!
resources.ApplyResources(Me.GROUPNAMEDataGridViewTextBoxColumn, "GROUPNAMEDataGridViewTextBoxColumn")
Me.GROUPNAMEDataGridViewTextBoxColumn.Name = "GROUPNAMEDataGridViewTextBoxColumn"
'
'EDITRECDataGridViewCheckBoxColumn
'
Me.EDITRECDataGridViewCheckBoxColumn.DataPropertyName = "EDIT_REC"
resources.ApplyResources(Me.EDITRECDataGridViewCheckBoxColumn, "EDITRECDataGridViewCheckBoxColumn")
Me.EDITRECDataGridViewCheckBoxColumn.Name = "EDITRECDataGridViewCheckBoxColumn"
'
'ADDRECDataGridViewCheckBoxColumn
'
Me.ADDRECDataGridViewCheckBoxColumn.DataPropertyName = "ADD_REC"
resources.ApplyResources(Me.ADDRECDataGridViewCheckBoxColumn, "ADDRECDataGridViewCheckBoxColumn")
Me.ADDRECDataGridViewCheckBoxColumn.Name = "ADDRECDataGridViewCheckBoxColumn"
'
'DELETERECDataGridViewCheckBoxColumn
'
Me.DELETERECDataGridViewCheckBoxColumn.DataPropertyName = "DELETE_REC"
resources.ApplyResources(Me.DELETERECDataGridViewCheckBoxColumn, "DELETERECDataGridViewCheckBoxColumn")
Me.DELETERECDataGridViewCheckBoxColumn.Name = "DELETERECDataGridViewCheckBoxColumn"
'
'ADDDOCDataGridViewCheckBoxColumn
'
Me.ADDDOCDataGridViewCheckBoxColumn.DataPropertyName = "ADD_DOC"
resources.ApplyResources(Me.ADDDOCDataGridViewCheckBoxColumn, "ADDDOCDataGridViewCheckBoxColumn")
Me.ADDDOCDataGridViewCheckBoxColumn.Name = "ADDDOCDataGridViewCheckBoxColumn"
'
'VIEWDOCDataGridViewCheckBoxColumn
'
Me.VIEWDOCDataGridViewCheckBoxColumn.DataPropertyName = "VIEW_DOC"
resources.ApplyResources(Me.VIEWDOCDataGridViewCheckBoxColumn, "VIEWDOCDataGridViewCheckBoxColumn")
Me.VIEWDOCDataGridViewCheckBoxColumn.Name = "VIEWDOCDataGridViewCheckBoxColumn"
'
'DELETEDOCDataGridViewCheckBoxColumn
'
Me.DELETEDOCDataGridViewCheckBoxColumn.DataPropertyName = "DELETE_DOC"
resources.ApplyResources(Me.DELETEDOCDataGridViewCheckBoxColumn, "DELETEDOCDataGridViewCheckBoxColumn")
Me.DELETEDOCDataGridViewCheckBoxColumn.Name = "DELETEDOCDataGridViewCheckBoxColumn"
'
'ADDEDWHODataGridViewTextBoxColumn
'
Me.ADDEDWHODataGridViewTextBoxColumn.DataPropertyName = "ADDED_WHO"
resources.ApplyResources(Me.ADDEDWHODataGridViewTextBoxColumn, "ADDEDWHODataGridViewTextBoxColumn")
Me.ADDEDWHODataGridViewTextBoxColumn.Name = "ADDEDWHODataGridViewTextBoxColumn"
'
'ADDEDWHENDataGridViewTextBoxColumn
'
Me.ADDEDWHENDataGridViewTextBoxColumn.DataPropertyName = "ADDED_WHEN"
resources.ApplyResources(Me.ADDEDWHENDataGridViewTextBoxColumn, "ADDEDWHENDataGridViewTextBoxColumn")
Me.ADDEDWHENDataGridViewTextBoxColumn.Name = "ADDEDWHENDataGridViewTextBoxColumn"
'
'CHANGEDWHODataGridViewTextBoxColumn
'
Me.CHANGEDWHODataGridViewTextBoxColumn.DataPropertyName = "CHANGED_WHO"
resources.ApplyResources(Me.CHANGEDWHODataGridViewTextBoxColumn, "CHANGEDWHODataGridViewTextBoxColumn")
Me.CHANGEDWHODataGridViewTextBoxColumn.Name = "CHANGEDWHODataGridViewTextBoxColumn"
'
'CHANGEDWHENDataGridViewTextBoxColumn
'
Me.CHANGEDWHENDataGridViewTextBoxColumn.DataPropertyName = "CHANGED_WHEN"
resources.ApplyResources(Me.CHANGEDWHENDataGridViewTextBoxColumn, "CHANGEDWHENDataGridViewTextBoxColumn")
Me.CHANGEDWHENDataGridViewTextBoxColumn.Name = "CHANGEDWHENDataGridViewTextBoxColumn"
'
'TabPage2 'TabPage2
' '
resources.ApplyResources(Me.TabPage2, "TabPage2") resources.ApplyResources(Me.TabPage2, "TabPage2")
@ -854,132 +1000,20 @@ Partial Class frmRight_Management
' '
Me.TBDD_GROUPSTableAdapter.ClearBeforeFill = True Me.TBDD_GROUPSTableAdapter.ClearBeforeFill = True
' '
'GUIDLabel 'VWPMO_RIGHT_GROUPTableAdapter
' '
resources.ApplyResources(GUIDLabel, "GUIDLabel") Me.VWPMO_RIGHT_GROUPTableAdapter.ClearBeforeFill = True
GUIDLabel.Name = "GUIDLabel"
' '
'GUIDTextBox 'GroupBox1
' '
Me.GUIDTextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBPMO_RIGHT_GROUPBindingSource, "GUID", True)) Me.GroupBox1.Controls.Add(Me.cmbSicht)
resources.ApplyResources(Me.GUIDTextBox, "GUIDTextBox") Me.GroupBox1.Controls.Add(Me.Button1)
Me.GUIDTextBox.Name = "GUIDTextBox" Me.GroupBox1.Controls.Add(Me.Label3)
' Me.GroupBox1.Controls.Add(Me.cmbGroupNew)
'ENTITY_IDLabel Me.GroupBox1.Controls.Add(Me.Label4)
' resources.ApplyResources(Me.GroupBox1, "GroupBox1")
resources.ApplyResources(ENTITY_IDLabel, "ENTITY_IDLabel") Me.GroupBox1.Name = "GroupBox1"
ENTITY_IDLabel.Name = "ENTITY_IDLabel" Me.GroupBox1.TabStop = False
'
'ENTITY_IDComboBox
'
Me.ENTITY_IDComboBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBPMO_RIGHT_GROUPBindingSource, "ENTITY_ID", True))
Me.ENTITY_IDComboBox.DataSource = Me.TBWH_ENTITIESBindingSource
Me.ENTITY_IDComboBox.DisplayMember = "FORM_TITLE"
Me.ENTITY_IDComboBox.FormattingEnabled = True
resources.ApplyResources(Me.ENTITY_IDComboBox, "ENTITY_IDComboBox")
Me.ENTITY_IDComboBox.Name = "ENTITY_IDComboBox"
Me.ENTITY_IDComboBox.ValueMember = "GUID"
'
'GROUP_IDLabel
'
resources.ApplyResources(GROUP_IDLabel, "GROUP_IDLabel")
GROUP_IDLabel.Name = "GROUP_IDLabel"
'
'GROUP_IDComboBox
'
Me.GROUP_IDComboBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBPMO_RIGHT_GROUPBindingSource, "GROUP_ID", True))
Me.GROUP_IDComboBox.DataSource = Me.TBDD_GROUPSBindingSource
Me.GROUP_IDComboBox.DisplayMember = "NAME"
Me.GROUP_IDComboBox.FormattingEnabled = True
resources.ApplyResources(Me.GROUP_IDComboBox, "GROUP_IDComboBox")
Me.GROUP_IDComboBox.Name = "GROUP_IDComboBox"
Me.GROUP_IDComboBox.ValueMember = "GUID"
'
'EDIT_RECCheckBox
'
Me.EDIT_RECCheckBox.DataBindings.Add(New System.Windows.Forms.Binding("CheckState", Me.TBPMO_RIGHT_GROUPBindingSource, "EDIT_REC", True))
resources.ApplyResources(Me.EDIT_RECCheckBox, "EDIT_RECCheckBox")
Me.EDIT_RECCheckBox.Name = "EDIT_RECCheckBox"
Me.EDIT_RECCheckBox.UseVisualStyleBackColor = True
'
'ADD_RECCheckBox
'
Me.ADD_RECCheckBox.DataBindings.Add(New System.Windows.Forms.Binding("CheckState", Me.TBPMO_RIGHT_GROUPBindingSource, "ADD_REC", True))
resources.ApplyResources(Me.ADD_RECCheckBox, "ADD_RECCheckBox")
Me.ADD_RECCheckBox.Name = "ADD_RECCheckBox"
Me.ADD_RECCheckBox.UseVisualStyleBackColor = True
'
'DELETE_RECCheckBox
'
Me.DELETE_RECCheckBox.DataBindings.Add(New System.Windows.Forms.Binding("CheckState", Me.TBPMO_RIGHT_GROUPBindingSource, "DELETE_REC", True))
resources.ApplyResources(Me.DELETE_RECCheckBox, "DELETE_RECCheckBox")
Me.DELETE_RECCheckBox.Name = "DELETE_RECCheckBox"
Me.DELETE_RECCheckBox.UseVisualStyleBackColor = True
'
'ADD_DOCCheckBox
'
Me.ADD_DOCCheckBox.DataBindings.Add(New System.Windows.Forms.Binding("CheckState", Me.TBPMO_RIGHT_GROUPBindingSource, "ADD_DOC", True))
resources.ApplyResources(Me.ADD_DOCCheckBox, "ADD_DOCCheckBox")
Me.ADD_DOCCheckBox.Name = "ADD_DOCCheckBox"
Me.ADD_DOCCheckBox.UseVisualStyleBackColor = True
'
'VIEW_DOCCheckBox
'
Me.VIEW_DOCCheckBox.DataBindings.Add(New System.Windows.Forms.Binding("CheckState", Me.TBPMO_RIGHT_GROUPBindingSource, "VIEW_DOC", True))
resources.ApplyResources(Me.VIEW_DOCCheckBox, "VIEW_DOCCheckBox")
Me.VIEW_DOCCheckBox.Name = "VIEW_DOCCheckBox"
Me.VIEW_DOCCheckBox.UseVisualStyleBackColor = True
'
'DELETE_DOCCheckBox
'
Me.DELETE_DOCCheckBox.DataBindings.Add(New System.Windows.Forms.Binding("CheckState", Me.TBPMO_RIGHT_GROUPBindingSource, "DELETE_DOC", True))
resources.ApplyResources(Me.DELETE_DOCCheckBox, "DELETE_DOCCheckBox")
Me.DELETE_DOCCheckBox.Name = "DELETE_DOCCheckBox"
Me.DELETE_DOCCheckBox.UseVisualStyleBackColor = True
'
'ADDED_WHOLabel
'
resources.ApplyResources(ADDED_WHOLabel, "ADDED_WHOLabel")
ADDED_WHOLabel.Name = "ADDED_WHOLabel"
'
'ADDED_WHOTextBox
'
Me.ADDED_WHOTextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBPMO_RIGHT_GROUPBindingSource, "ADDED_WHO", True))
resources.ApplyResources(Me.ADDED_WHOTextBox, "ADDED_WHOTextBox")
Me.ADDED_WHOTextBox.Name = "ADDED_WHOTextBox"
'
'ADDED_WHENLabel
'
resources.ApplyResources(ADDED_WHENLabel, "ADDED_WHENLabel")
ADDED_WHENLabel.Name = "ADDED_WHENLabel"
'
'ADDED_WHENTextBox
'
Me.ADDED_WHENTextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBPMO_RIGHT_GROUPBindingSource, "ADDED_WHEN", True))
resources.ApplyResources(Me.ADDED_WHENTextBox, "ADDED_WHENTextBox")
Me.ADDED_WHENTextBox.Name = "ADDED_WHENTextBox"
'
'CHANGED_WHOLabel
'
resources.ApplyResources(CHANGED_WHOLabel, "CHANGED_WHOLabel")
CHANGED_WHOLabel.Name = "CHANGED_WHOLabel"
'
'CHANGED_WHOTextBox
'
Me.CHANGED_WHOTextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBPMO_RIGHT_GROUPBindingSource, "CHANGED_WHO", True))
resources.ApplyResources(Me.CHANGED_WHOTextBox, "CHANGED_WHOTextBox")
Me.CHANGED_WHOTextBox.Name = "CHANGED_WHOTextBox"
'
'CHANGED_WHENLabel
'
resources.ApplyResources(CHANGED_WHENLabel, "CHANGED_WHENLabel")
CHANGED_WHENLabel.Name = "CHANGED_WHENLabel"
'
'CHANGED_WHENTextBox
'
Me.CHANGED_WHENTextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBPMO_RIGHT_GROUPBindingSource, "CHANGED_WHEN", True))
resources.ApplyResources(Me.CHANGED_WHENTextBox, "CHANGED_WHENTextBox")
Me.CHANGED_WHENTextBox.Name = "CHANGED_WHENTextBox"
' '
'frmRight_Management 'frmRight_Management
' '
@ -991,11 +1025,11 @@ Partial Class frmRight_Management
CType(Me.BindingNavigator1, System.ComponentModel.ISupportInitialize).EndInit() CType(Me.BindingNavigator1, System.ComponentModel.ISupportInitialize).EndInit()
Me.BindingNavigator1.ResumeLayout(False) Me.BindingNavigator1.ResumeLayout(False)
Me.BindingNavigator1.PerformLayout() Me.BindingNavigator1.PerformLayout()
CType(Me.VWPMO_RIGHT_GROUPBindingSource2, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.DD_ECMAdmin, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.TBPMO_RIGHT_GROUPBindingSource, System.ComponentModel.ISupportInitialize).EndInit() CType(Me.TBPMO_RIGHT_GROUPBindingSource, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.DD_DMSDataSet, System.ComponentModel.ISupportInitialize).EndInit() CType(Me.DD_DMSDataSet, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.TBPMO_RIGHT_GROUPDataGridView, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.TBWH_ENTITIESBindingSource, System.ComponentModel.ISupportInitialize).EndInit() CType(Me.TBWH_ENTITIESBindingSource, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.DD_ECMAdmin, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.TBDD_GROUPSBindingSource, System.ComponentModel.ISupportInitialize).EndInit() CType(Me.TBDD_GROUPSBindingSource, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.TBDD_USER_GROUPSBindingSource, System.ComponentModel.ISupportInitialize).EndInit() CType(Me.TBDD_USER_GROUPSBindingSource, System.ComponentModel.ISupportInitialize).EndInit()
Me.StatusStrip1.ResumeLayout(False) Me.StatusStrip1.ResumeLayout(False)
@ -1003,6 +1037,7 @@ Partial Class frmRight_Management
Me.TabControl1.ResumeLayout(False) Me.TabControl1.ResumeLayout(False)
Me.TabPage1.ResumeLayout(False) Me.TabPage1.ResumeLayout(False)
Me.TabPage1.PerformLayout() Me.TabPage1.PerformLayout()
CType(Me.VWPMO_RIGHT_GROUPDataGridView, System.ComponentModel.ISupportInitialize).EndInit()
Me.TabPage2.ResumeLayout(False) Me.TabPage2.ResumeLayout(False)
Me.TabPage2.PerformLayout() Me.TabPage2.PerformLayout()
CType(Me.GridControlUsers2Menue, System.ComponentModel.ISupportInitialize).EndInit() CType(Me.GridControlUsers2Menue, System.ComponentModel.ISupportInitialize).EndInit()
@ -1016,6 +1051,8 @@ Partial Class frmRight_Management
CType(Me.USER_RIGHTSBindingSource, System.ComponentModel.ISupportInitialize).EndInit() CType(Me.USER_RIGHTSBindingSource, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.TBDD_USERBindingSource, System.ComponentModel.ISupportInitialize).EndInit() CType(Me.TBDD_USERBindingSource, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.TBWH_USER_GROUPSBindingSource, System.ComponentModel.ISupportInitialize).EndInit() CType(Me.TBWH_USER_GROUPSBindingSource, System.ComponentModel.ISupportInitialize).EndInit()
Me.GroupBox1.ResumeLayout(False)
Me.GroupBox1.PerformLayout()
Me.ResumeLayout(False) Me.ResumeLayout(False)
Me.PerformLayout() Me.PerformLayout()
@ -1027,7 +1064,6 @@ Partial Class frmRight_Management
Friend WithEvents TBPMO_RIGHT_GROUPBindingSource As System.Windows.Forms.BindingSource Friend WithEvents TBPMO_RIGHT_GROUPBindingSource As System.Windows.Forms.BindingSource
Friend WithEvents TBPMO_RIGHT_GROUPTableAdapter As DD_Record_Organizer.DD_DMSDataSetTableAdapters.TBPMO_RIGHT_GROUPTableAdapter Friend WithEvents TBPMO_RIGHT_GROUPTableAdapter As DD_Record_Organizer.DD_DMSDataSetTableAdapters.TBPMO_RIGHT_GROUPTableAdapter
Friend WithEvents BindingNavigator1 As System.Windows.Forms.BindingNavigator Friend WithEvents BindingNavigator1 As System.Windows.Forms.BindingNavigator
Friend WithEvents BindingNavigatorAddNewItem As System.Windows.Forms.ToolStripButton
Friend WithEvents BindingNavigatorCountItem As System.Windows.Forms.ToolStripLabel Friend WithEvents BindingNavigatorCountItem As System.Windows.Forms.ToolStripLabel
Friend WithEvents BindingNavigatorDeleteItem As System.Windows.Forms.ToolStripButton Friend WithEvents BindingNavigatorDeleteItem As System.Windows.Forms.ToolStripButton
Friend WithEvents BindingNavigatorMoveFirstItem As System.Windows.Forms.ToolStripButton Friend WithEvents BindingNavigatorMoveFirstItem As System.Windows.Forms.ToolStripButton
@ -1038,14 +1074,12 @@ Partial Class frmRight_Management
Friend WithEvents BindingNavigatorMoveNextItem As System.Windows.Forms.ToolStripButton Friend WithEvents BindingNavigatorMoveNextItem As System.Windows.Forms.ToolStripButton
Friend WithEvents BindingNavigatorMoveLastItem As System.Windows.Forms.ToolStripButton Friend WithEvents BindingNavigatorMoveLastItem As System.Windows.Forms.ToolStripButton
Friend WithEvents BindingNavigatorSeparator2 As System.Windows.Forms.ToolStripSeparator Friend WithEvents BindingNavigatorSeparator2 As System.Windows.Forms.ToolStripSeparator
Friend WithEvents TBPMO_RIGHT_GROUPDataGridView As System.Windows.Forms.DataGridView
Friend WithEvents DD_ECMAdmin As DD_Record_Organizer.DD_ECMAdmin Friend WithEvents DD_ECMAdmin As DD_Record_Organizer.DD_ECMAdmin
Friend WithEvents TBWH_ENTITIESBindingSource As System.Windows.Forms.BindingSource Friend WithEvents TBWH_ENTITIESBindingSource As System.Windows.Forms.BindingSource
Friend WithEvents TBWH_ENTITIESTableAdapter As DD_Record_Organizer.DD_ECMAdminTableAdapters.TBWH_ENTITIESTableAdapter Friend WithEvents TBWH_ENTITIESTableAdapter As DD_Record_Organizer.DD_ECMAdminTableAdapters.TBWH_ENTITIESTableAdapter
Friend WithEvents TableAdapterManager1 As DD_Record_Organizer.DD_ECMAdminTableAdapters.TableAdapterManager Friend WithEvents TableAdapterManager1 As DD_Record_Organizer.DD_ECMAdminTableAdapters.TableAdapterManager
Friend WithEvents TBWH_USER_GROUPSBindingSource As System.Windows.Forms.BindingSource Friend WithEvents TBWH_USER_GROUPSBindingSource As System.Windows.Forms.BindingSource
Friend WithEvents TBWH_USER_GROUPSTableAdapter As DD_Record_Organizer.DD_ECMAdminTableAdapters.TBWH_USER_GROUPSTableAdapter Friend WithEvents TBWH_USER_GROUPSTableAdapter As DD_Record_Organizer.DD_ECMAdminTableAdapters.TBWH_USER_GROUPSTableAdapter
Friend WithEvents ToolStripButton1 As System.Windows.Forms.ToolStripButton
Friend WithEvents StatusStrip1 As System.Windows.Forms.StatusStrip Friend WithEvents StatusStrip1 As System.Windows.Forms.StatusStrip
Friend WithEvents TabControl1 As System.Windows.Forms.TabControl Friend WithEvents TabControl1 As System.Windows.Forms.TabControl
Friend WithEvents TabPage1 As System.Windows.Forms.TabPage Friend WithEvents TabPage1 As System.Windows.Forms.TabPage
@ -1101,30 +1135,40 @@ Partial Class frmRight_Management
Friend WithEvents statelbl As System.Windows.Forms.ToolStripStatusLabel Friend WithEvents statelbl As System.Windows.Forms.ToolStripStatusLabel
Friend WithEvents TBDD_GROUPSBindingSource As BindingSource Friend WithEvents TBDD_GROUPSBindingSource As BindingSource
Friend WithEvents TBDD_GROUPSTableAdapter As DD_ECMAdminTableAdapters.TBDD_GROUPSTableAdapter Friend WithEvents TBDD_GROUPSTableAdapter As DD_ECMAdminTableAdapters.TBDD_GROUPSTableAdapter
Friend WithEvents DataGridViewTextBoxColumn1 As DataGridViewTextBoxColumn Friend WithEvents VWPMO_RIGHT_GROUPTableAdapter As DD_ECMAdminTableAdapters.VWPMO_RIGHT_GROUPTableAdapter
Friend WithEvents DataGridViewTextBoxColumn2 As DataGridViewComboBoxColumn Friend WithEvents VWPMO_RIGHT_GROUPDataGridView As DataGridView
Friend WithEvents DataGridViewTextBoxColumn3 As DataGridViewComboBoxColumn Friend WithEvents VWPMO_RIGHT_GROUPBindingSource2 As BindingSource
Friend WithEvents DataGridViewCheckBoxColumn1 As DataGridViewCheckBoxColumn Friend WithEvents IDDataGridViewTextBoxColumn As DataGridViewTextBoxColumn
Friend WithEvents DataGridViewCheckBoxColumn2 As DataGridViewCheckBoxColumn Friend WithEvents ENTITYNAMEDataGridViewTextBoxColumn As DataGridViewTextBoxColumn
Friend WithEvents DataGridViewCheckBoxColumn3 As DataGridViewCheckBoxColumn Friend WithEvents GROUPNAMEDataGridViewTextBoxColumn As DataGridViewTextBoxColumn
Friend WithEvents DataGridViewCheckBoxColumn4 As DataGridViewCheckBoxColumn Friend WithEvents EDITRECDataGridViewCheckBoxColumn As DataGridViewCheckBoxColumn
Friend WithEvents DataGridViewCheckBoxColumn5 As DataGridViewCheckBoxColumn Friend WithEvents ADDRECDataGridViewCheckBoxColumn As DataGridViewCheckBoxColumn
Friend WithEvents DataGridViewCheckBoxColumn6 As DataGridViewCheckBoxColumn Friend WithEvents DELETERECDataGridViewCheckBoxColumn As DataGridViewCheckBoxColumn
Friend WithEvents DataGridViewTextBoxColumn4 As DataGridViewTextBoxColumn Friend WithEvents ADDDOCDataGridViewCheckBoxColumn As DataGridViewCheckBoxColumn
Friend WithEvents DataGridViewTextBoxColumn5 As DataGridViewTextBoxColumn Friend WithEvents VIEWDOCDataGridViewCheckBoxColumn As DataGridViewCheckBoxColumn
Friend WithEvents DataGridViewTextBoxColumn6 As DataGridViewTextBoxColumn Friend WithEvents DELETEDOCDataGridViewCheckBoxColumn As DataGridViewCheckBoxColumn
Friend WithEvents DataGridViewTextBoxColumn7 As DataGridViewTextBoxColumn Friend WithEvents ADDEDWHODataGridViewTextBoxColumn As DataGridViewTextBoxColumn
Friend WithEvents CHANGED_WHENTextBox As TextBox Friend WithEvents ADDEDWHENDataGridViewTextBoxColumn As DataGridViewTextBoxColumn
Friend WithEvents CHANGED_WHOTextBox As TextBox Friend WithEvents CHANGEDWHODataGridViewTextBoxColumn As DataGridViewTextBoxColumn
Friend WithEvents ADDED_WHENTextBox As TextBox Friend WithEvents CHANGEDWHENDataGridViewTextBoxColumn As DataGridViewTextBoxColumn
Friend WithEvents ADDED_WHOTextBox As TextBox
Friend WithEvents DELETE_DOCCheckBox As CheckBox Friend WithEvents DELETE_DOCCheckBox As CheckBox
Friend WithEvents VIEW_DOCCheckBox As CheckBox Friend WithEvents VIEW_DOCCheckBox As CheckBox
Friend WithEvents ADD_DOCCheckBox As CheckBox Friend WithEvents ADD_DOCCheckBox As CheckBox
Friend WithEvents DELETE_RECCheckBox As CheckBox Friend WithEvents DELETE_RECCheckBox As CheckBox
Friend WithEvents ADD_RECCheckBox As CheckBox Friend WithEvents ADD_RECCheckBox As CheckBox
Friend WithEvents EDIT_RECCheckBox As CheckBox Friend WithEvents EDIT_RECCheckBox As CheckBox
Friend WithEvents GROUP_IDComboBox As ComboBox Friend WithEvents GROUP_NAMETextBox As TextBox
Friend WithEvents ENTITY_IDComboBox As ComboBox Friend WithEvents ENTITY_NAMETextBox As TextBox
Friend WithEvents GUIDTextBox As TextBox Friend WithEvents IDTextBox As TextBox
Friend WithEvents InfoLabel As ToolStripStatusLabel
Friend WithEvents CHANGED_WHOTextBox As TextBox
Friend WithEvents ADDED_WHOTextBox As TextBox
Friend WithEvents CHANGED_WHENTextBox As TextBox
Friend WithEvents ADDED_WHENTextBox As TextBox
Friend WithEvents Button1 As Button
Friend WithEvents Label4 As Label
Friend WithEvents Label3 As Label
Friend WithEvents cmbGroupNew As ComboBox
Friend WithEvents cmbSicht As ComboBox
Friend WithEvents GroupBox1 As GroupBox
End Class End Class

File diff suppressed because it is too large Load Diff

View File

@ -1,6 +1,10 @@
Public Class frmRight_Management Public Class frmRight_Management
Private Shared _Instance As frmRight_Management = Nothing Private Shared _Instance As frmRight_Management = Nothing
Private insert As Boolean = False Private insert As Boolean = False
Private formloaded As Boolean = False
Private updateIP As Boolean = False
Private DGSelection As Boolean = False
Private ID_CURR As Integer = 0
Public Shared Function Instance() As frmRight_Management Public Shared Function Instance() As frmRight_Management
If _Instance Is Nothing OrElse _Instance.IsDisposed = True Then If _Instance Is Nothing OrElse _Instance.IsDisposed = True Then
_Instance = New frmRight_Management _Instance = New frmRight_Management
@ -28,71 +32,14 @@
MsgBox("Error in Save_User_Rights_Data:" & vbNewLine & ex.Message, MsgBoxStyle.Critical) MsgBox("Error in Save_User_Rights_Data:" & vbNewLine & ex.Message, MsgBoxStyle.Critical)
End Try End Try
End Sub End Sub
Private Sub Save_Group_Rights_Data()
Try
Me.Validate()
Me.TBPMO_RIGHT_GROUPBindingSource.EndEdit()
If DD_DMSDataSet.TBPMO_RIGHT_GROUP.GetChanges Is Nothing = False Then
Try
Me.TBPMO_RIGHT_GROUPDataGridView.CurrentRow.Cells("DataGridViewTextBoxColumn6").Value = USER_USERNAME
Catch ex As Exception
End Try
Me.TBPMO_RIGHT_GROUPBindingSource.EndEdit()
Me.TBPMO_RIGHT_GROUPTableAdapter.Update(DD_DMSDataSet.TBPMO_RIGHT_GROUP)
tschangedlabel.Text = "Right Group changed - " & Now
tschangedlabel.Visible = True
Else
tschangedlabel.Visible = False
End If
Catch ex As Exception
MsgBox("Error in Save_Group_Rights_Data:" & vbNewLine & ex.Message, MsgBoxStyle.Critical)
End Try
End Sub
Sub Load_Datagrid(ByVal _Datagrid As DataGridView, ByVal _settings_String As String)
Try
Dim settings() As String
If My.Settings(_settings_String) <> String.Empty Then
settings = My.Settings(_settings_String).Split("$"c)
For idx As Integer = 0 To _Datagrid.Columns.Count - 1
Dim sv() As String = settings(idx).Split("/"c)
_Datagrid.Columns(idx).DisplayIndex = CInt(sv(0))
_Datagrid.Columns(idx).Width = CInt(sv(1))
Next
End If
Catch ex As Exception
End Try
End Sub
Sub Save_Datagrid(ByVal _Datagrid As DataGridView, ByVal _settings_String As String)
Try
Dim settings As String = String.Empty
For idx As Integer = 0 To _Datagrid.Columns.Count - 1
settings += _Datagrid.Columns(idx).DisplayIndex.ToString()
settings += "/"
settings += _Datagrid.Columns(idx).Width.ToString
settings += "$"
Next
My.Settings(_settings_String) = settings
Catch ex As Exception
My.Settings(_settings_String) = String.Empty
End Try
End Sub
Private Sub frmRight_Management_FormClosing(sender As Object, e As FormClosingEventArgs) Handles Me.FormClosing Private Sub frmRight_Management_FormClosing(sender As Object, e As FormClosingEventArgs) Handles Me.FormClosing
Save_Datagrid(TBPMO_RIGHT_GROUPDataGridView, "TBPMO_RIGHT_GROUPDataGridView")
If LICENSE_PROXY = True And DD_LIB_Standards.clsDatabase.DB_PROXY_INITIALIZED Then If LICENSE_PROXY = True And DD_LIB_Standards.clsDatabase.DB_PROXY_INITIALIZED Then
MessageBox.Show("If You changed some data here, be aware that this data needs to be synchronized with Your proxy-data!" & vbNewLine & "The regualar processing-time are 30 minutes", "Attention", MessageBoxButtons.OK, MessageBoxIcon.Information) MessageBox.Show("If You changed some data here, be aware that this data needs to be synchronized with Your proxy-data!" & vbNewLine & "The regualar processing-time are 30 minutes", "Attention", MessageBoxButtons.OK, MessageBoxIcon.Information)
End If End If
'Save_Datagrid(TBPMO_RIGHT_USERDataGridView, "TBPMO_RIGHT_USERDataGridView") 'Save_Datagrid(TBPMO_RIGHT_USERDataGridView, "TBPMO_RIGHT_USERDataGridView")
End Sub End Sub
Private Sub frmGroup_Rights_Load(sender As Object, e As EventArgs) Handles MyBase.Load Private Sub frmGroup_Rights_Load(sender As Object, e As EventArgs) Handles MyBase.Load
'TODO: Diese Codezeile lädt Daten in die Tabelle "DD_ECMAdmin.TBDD_GROUPS". Sie können sie bei Bedarf verschieben oder entfernen.
Refresh_Entities() Refresh_Entities()
Try Try
Me.TBWH_USER_GROUPSTableAdapter.Connection.ConnectionString = MYDB_ECM.CurrentConnectionString Me.TBWH_USER_GROUPSTableAdapter.Connection.ConnectionString = MYDB_ECM.CurrentConnectionString
@ -103,13 +50,14 @@
Me.TBDD_GROUPSTableAdapter.Fill(Me.DD_ECMAdmin.TBDD_GROUPS) Me.TBDD_GROUPSTableAdapter.Fill(Me.DD_ECMAdmin.TBDD_GROUPS)
Me.TBDD_USERTableAdapter.Connection.ConnectionString = MYDB_ECM.CurrentConnectionString Me.TBDD_USERTableAdapter.Connection.ConnectionString = MYDB_ECM.CurrentConnectionString
Me.TBDD_USERTableAdapter.Fill(Me.DD_DMSDataSet.TBDD_USER) Me.TBDD_USERTableAdapter.Fill(Me.DD_DMSDataSet.TBDD_USER)
VWPMO_RIGHT_GROUPTableAdapter.Connection.ConnectionString = MYDB_ECM.CurrentConnectionString
Catch ex As Exception Catch ex As Exception
MsgBox("Error in Loading Form:" & vbNewLine & ex.Message, MsgBoxStyle.Critical) MsgBox("Error in Loading Form:" & vbNewLine & ex.Message, MsgBoxStyle.Critical)
End Try End Try
Refresh_Rights_Groups() Refresh_Rights_Groups()
Load_Datagrid(TBPMO_RIGHT_GROUPDataGridView, "TBPMO_RIGHT_GROUPDataGridView")
'Load_Datagrid(TBPMO_RIGHT_USERDataGridView, "TBPMO_RIGHT_USERDataGridView")
End Sub End Sub
Sub Refresh_Rights_Users(ENTITY_ID As Integer) Sub Refresh_Rights_Users(ENTITY_ID As Integer)
@ -123,8 +71,7 @@
Sub Refresh_Rights_Groups() Sub Refresh_Rights_Groups()
Try Try
Me.TBPMO_RIGHT_GROUPTableAdapter.Connection.ConnectionString = MYDB_ECM.CurrentConnectionString Me.VWPMO_RIGHT_GROUPTableAdapter.Fill(Me.DD_ECMAdmin.VWPMO_RIGHT_GROUP)
Me.TBPMO_RIGHT_GROUPTableAdapter.Fill(Me.DD_DMSDataSet.TBPMO_RIGHT_GROUP)
Catch ex As Exception Catch ex As Exception
MsgBox("Error in Refresh_Rights_Groups:" & vbNewLine & ex.Message, MsgBoxStyle.Critical) MsgBox("Error in Refresh_Rights_Groups:" & vbNewLine & ex.Message, MsgBoxStyle.Critical)
End Try End Try
@ -142,16 +89,15 @@
Me.DD_DMSDataSet.TBPMO_RIGHT_GROUP.ADDED_WHOColumn.DefaultValue = USER_USERNAME Me.DD_DMSDataSet.TBPMO_RIGHT_GROUP.ADDED_WHOColumn.DefaultValue = USER_USERNAME
Me.DD_DMSDataSet.TBPMO_RIGHT_GROUP.ENTITY_IDColumn.DefaultValue = MYDB_ECM.GetScalarValue("SELECT MIN(GUID) FROM TBPMO_FORM") Me.DD_DMSDataSet.TBPMO_RIGHT_GROUP.ENTITY_IDColumn.DefaultValue = MYDB_ECM.GetScalarValue("SELECT MIN(GUID) FROM TBPMO_FORM")
End Sub End Sub
Private Sub ToolStripButton1_Click(sender As Object, e As EventArgs) Handles ToolStripButton1.Click
Save_Group_Rights_Data()
End Sub
Private Sub TBPMO_RIGHT_GROUPBindingSource_CurrentChanged(sender As Object, e As EventArgs) Handles TBPMO_RIGHT_GROUPBindingSource.CurrentChanged Private Sub TBPMO_RIGHT_GROUPBindingSource_CurrentChanged(sender As Object, e As EventArgs) Handles TBPMO_RIGHT_GROUPBindingSource.CurrentChanged
tschangedlabel.Visible = False tschangedlabel.Visible = False
End Sub End Sub
Private Sub ToolStripButton2_Click(sender As Object, e As EventArgs) Handles ToolStripButton2.Click Private Sub ToolStripButton2_Click(sender As Object, e As EventArgs) Handles ToolStripButton2.Click
updateIP = True
Refresh_Rights_Groups() Refresh_Rights_Groups()
updateIP = False
End Sub End Sub
Private Sub ToolStripButton3_Click(sender As Object, e As EventArgs) Private Sub ToolStripButton3_Click(sender As Object, e As EventArgs)
@ -301,4 +247,94 @@ WHERE T2.SHORT_NAME = 'ADDI' AND T.GUID NOT IN (SELECT USER_ID FROM TBPMO_RIGH
End Try End Try
End Sub End Sub
Private Sub EDIT_RECCheckBox_CheckedChanged(sender As Object, e As EventArgs) Handles EDIT_RECCheckBox.CheckedChanged
If updateIP = False Then
Update_RightGroup_VALUE("EDIT_REC", EDIT_RECCheckBox.Checked, IDTextBox.Text)
End If
End Sub
Private Sub Update_RightGroup_VALUE(pItem As String, obit As Boolean, pID As String)
If formloaded = False Or pID = "" Or DGSelection = True Then
Exit Sub
End If
updateIP = True
ID_CURR = pID
Dim oupdate = $"UPDATE TBPMO_RIGHT_GROUP SET {pItem} = '{obit}', CHANGED_WHO = '{Environment.UserName}' WHERE GUID = {pID}
and {pItem} <> '{obit}'"
If MYDB_ECM.ExecuteNonQuery(oupdate) Then
InfoLabel.Text = $"{pItem} updated successfully - {Now.ToLongTimeString}"
Refresh_Rights_Groups()
VWPMO_RIGHT_GROUPBindingSource2.Position = VWPMO_RIGHT_GROUPBindingSource2.Find("ID", ID_CURR)
updateIP = False
End If
End Sub
Private Sub ADD_RECCheckBox_CheckedChanged(sender As Object, e As EventArgs) Handles ADD_RECCheckBox.CheckedChanged
If updateIP = False Then
Update_RightGroup_VALUE("ADD_REC", ADD_RECCheckBox.Checked, IDTextBox.Text)
End If
End Sub
Private Sub DELETE_RECCheckBox_CheckedChanged(sender As Object, e As EventArgs) Handles DELETE_RECCheckBox.CheckedChanged
If updateIP = False Then
Update_RightGroup_VALUE("DELETE_REC", DELETE_RECCheckBox.Checked, IDTextBox.Text)
End If
End Sub
Private Sub ADD_DOCCheckBox_CheckedChanged(sender As Object, e As EventArgs) Handles ADD_DOCCheckBox.CheckedChanged
If updateIP = False Then
Update_RightGroup_VALUE("ADD_DOC", ADD_DOCCheckBox.Checked, IDTextBox.Text)
End If
End Sub
Private Sub VIEW_DOCCheckBox_CheckedChanged(sender As Object, e As EventArgs) Handles VIEW_DOCCheckBox.CheckedChanged
If updateIP = False Then
Update_RightGroup_VALUE("VIEW_DOC", VIEW_DOCCheckBox.Checked, IDTextBox.Text)
End If
End Sub
Private Sub DELETE_DOCCheckBox_CheckedChanged(sender As Object, e As EventArgs) Handles DELETE_DOCCheckBox.CheckedChanged
If updateIP = False Then
Update_RightGroup_VALUE("DELETE_DOC", DELETE_DOCCheckBox.Checked, IDTextBox.Text)
End If
End Sub
Private Sub frmRight_Management_Shown(sender As Object, e As EventArgs) Handles Me.Shown
formloaded = True
End Sub
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
If cmbSicht.SelectedIndex <> -1 And cmbGroupNew.SelectedIndex <> -1 Then
Dim oinsert = $"INSERT INTO [dbo].[TBPMO_RIGHT_GROUP] ([ENTITY_ID],[GROUP_ID],[ADDED_WHO])
VALUES ({cmbSicht.SelectedValue},{cmbGroupNew.SelectedValue},'{Environment.UserName}')"
If MYDB_ECM.ExecuteNonQuery(oinsert) Then
InfoLabel.Text = $"New rightGroup Added successfully - {Now.ToLongTimeString}"
updateIP = True
Refresh_Rights_Groups()
updateIP = False
End If
End If
End Sub
Private Sub BindingNavigatorDeleteItem_Click(sender As Object, e As EventArgs) Handles BindingNavigatorDeleteItem.Click
If MessageBox.Show("Do You really want to delete this relation", "Question", MessageBoxButtons.YesNo) _
= Windows.Forms.DialogResult.Yes Then
Dim odelete = $"DELETE FROM [dbo].[TBPMO_RIGHT_GROUP] WHERE GUID = {IDTextBox.Text}"
If MYDB_ECM.ExecuteNonQuery(odelete) Then
updateIP = True
Refresh_Rights_Groups()
updateIP = False
End If
End If
End Sub
End Class End Class

View File

@ -39,7 +39,6 @@ Partial Class frmStructureNodeConfig
Me.TBPMO_STRUCTURE_NODES_CONFIGURATIONBindingSource = New System.Windows.Forms.BindingSource(Me.components) Me.TBPMO_STRUCTURE_NODES_CONFIGURATIONBindingSource = New System.Windows.Forms.BindingSource(Me.components)
Me.DD_DMSDataSet = New DD_Record_Organizer.DD_DMSDataSet() Me.DD_DMSDataSet = New DD_Record_Organizer.DD_DMSDataSet()
Me.BindingNavigatorCountItem = New System.Windows.Forms.ToolStripLabel() Me.BindingNavigatorCountItem = New System.Windows.Forms.ToolStripLabel()
Me.BindingNavigatorDeleteItem = New System.Windows.Forms.ToolStripButton()
Me.BindingNavigatorMoveFirstItem = New System.Windows.Forms.ToolStripButton() Me.BindingNavigatorMoveFirstItem = New System.Windows.Forms.ToolStripButton()
Me.BindingNavigatorMovePreviousItem = New System.Windows.Forms.ToolStripButton() Me.BindingNavigatorMovePreviousItem = New System.Windows.Forms.ToolStripButton()
Me.BindingNavigatorSeparator = New System.Windows.Forms.ToolStripSeparator() Me.BindingNavigatorSeparator = New System.Windows.Forms.ToolStripSeparator()
@ -62,7 +61,7 @@ Partial Class frmStructureNodeConfig
Me.btnSelectBackground = New System.Windows.Forms.Button() Me.btnSelectBackground = New System.Windows.Forms.Button()
Me.pbBackground = New System.Windows.Forms.PictureBox() Me.pbBackground = New System.Windows.Forms.PictureBox()
Me.OpenFileDialog1 = New System.Windows.Forms.OpenFileDialog() Me.OpenFileDialog1 = New System.Windows.Forms.OpenFileDialog()
Me.ComboBox1 = New System.Windows.Forms.ComboBox() Me.ComboBoxEntity = New System.Windows.Forms.ComboBox()
Me.TBWH_ENTITYBindingSource = New System.Windows.Forms.BindingSource(Me.components) Me.TBWH_ENTITYBindingSource = New System.Windows.Forms.BindingSource(Me.components)
Me.NAMETextBox = New System.Windows.Forms.TextBox() Me.NAMETextBox = New System.Windows.Forms.TextBox()
Me.COMMENTTextBox = New System.Windows.Forms.TextBox() Me.COMMENTTextBox = New System.Windows.Forms.TextBox()
@ -131,9 +130,9 @@ Partial Class frmStructureNodeConfig
ADDED_WHOLabel.Font = New System.Drawing.Font("Segoe UI", 8.25!, System.Drawing.FontStyle.Italic, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) ADDED_WHOLabel.Font = New System.Drawing.Font("Segoe UI", 8.25!, System.Drawing.FontStyle.Italic, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
ADDED_WHOLabel.Location = New System.Drawing.Point(398, 267) ADDED_WHOLabel.Location = New System.Drawing.Point(398, 267)
ADDED_WHOLabel.Name = "ADDED_WHOLabel" ADDED_WHOLabel.Name = "ADDED_WHOLabel"
ADDED_WHOLabel.Size = New System.Drawing.Size(74, 13) ADDED_WHOLabel.Size = New System.Drawing.Size(61, 13)
ADDED_WHOLabel.TabIndex = 9 ADDED_WHOLabel.TabIndex = 9
ADDED_WHOLabel.Text = "ADDED WHO:" ADDED_WHOLabel.Text = "Erstellt Wer"
' '
'ADDED_WHENLabel 'ADDED_WHENLabel
' '
@ -141,9 +140,9 @@ Partial Class frmStructureNodeConfig
ADDED_WHENLabel.Font = New System.Drawing.Font("Segoe UI", 8.25!, System.Drawing.FontStyle.Italic, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) ADDED_WHENLabel.Font = New System.Drawing.Font("Segoe UI", 8.25!, System.Drawing.FontStyle.Italic, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
ADDED_WHENLabel.Location = New System.Drawing.Point(525, 267) ADDED_WHENLabel.Location = New System.Drawing.Point(525, 267)
ADDED_WHENLabel.Name = "ADDED_WHENLabel" ADDED_WHENLabel.Name = "ADDED_WHENLabel"
ADDED_WHENLabel.Size = New System.Drawing.Size(79, 13) ADDED_WHENLabel.Size = New System.Drawing.Size(68, 13)
ADDED_WHENLabel.TabIndex = 11 ADDED_WHENLabel.TabIndex = 11
ADDED_WHENLabel.Text = "ADDED WHEN:" ADDED_WHENLabel.Text = "Erstellt wann"
' '
'CHANGED_WHOLabel 'CHANGED_WHOLabel
' '
@ -151,9 +150,9 @@ Partial Class frmStructureNodeConfig
CHANGED_WHOLabel.Font = New System.Drawing.Font("Segoe UI", 8.25!, System.Drawing.FontStyle.Italic, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) CHANGED_WHOLabel.Font = New System.Drawing.Font("Segoe UI", 8.25!, System.Drawing.FontStyle.Italic, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
CHANGED_WHOLabel.Location = New System.Drawing.Point(655, 267) CHANGED_WHOLabel.Location = New System.Drawing.Point(655, 267)
CHANGED_WHOLabel.Name = "CHANGED_WHOLabel" CHANGED_WHOLabel.Name = "CHANGED_WHOLabel"
CHANGED_WHOLabel.Size = New System.Drawing.Size(89, 13) CHANGED_WHOLabel.Size = New System.Drawing.Size(71, 13)
CHANGED_WHOLabel.TabIndex = 13 CHANGED_WHOLabel.TabIndex = 13
CHANGED_WHOLabel.Text = "CHANGED WHO:" CHANGED_WHOLabel.Text = "Geändert wer"
' '
'CHANGED_WHENLabel 'CHANGED_WHENLabel
' '
@ -161,9 +160,9 @@ Partial Class frmStructureNodeConfig
CHANGED_WHENLabel.Font = New System.Drawing.Font("Segoe UI", 8.25!, System.Drawing.FontStyle.Italic, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) CHANGED_WHENLabel.Font = New System.Drawing.Font("Segoe UI", 8.25!, System.Drawing.FontStyle.Italic, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
CHANGED_WHENLabel.Location = New System.Drawing.Point(782, 267) CHANGED_WHENLabel.Location = New System.Drawing.Point(782, 267)
CHANGED_WHENLabel.Name = "CHANGED_WHENLabel" CHANGED_WHENLabel.Name = "CHANGED_WHENLabel"
CHANGED_WHENLabel.Size = New System.Drawing.Size(94, 13) CHANGED_WHENLabel.Size = New System.Drawing.Size(80, 13)
CHANGED_WHENLabel.TabIndex = 15 CHANGED_WHENLabel.TabIndex = 15
CHANGED_WHENLabel.Text = "CHANGED WHEN:" CHANGED_WHENLabel.Text = "Geändert wann"
' '
'NAMELabel 'NAMELabel
' '
@ -198,8 +197,8 @@ Partial Class frmStructureNodeConfig
Me.TBPMO_STRUCTURE_NODES_CONFIGURATIONBindingNavigator.BindingSource = Me.TBPMO_STRUCTURE_NODES_CONFIGURATIONBindingSource Me.TBPMO_STRUCTURE_NODES_CONFIGURATIONBindingNavigator.BindingSource = Me.TBPMO_STRUCTURE_NODES_CONFIGURATIONBindingSource
Me.TBPMO_STRUCTURE_NODES_CONFIGURATIONBindingNavigator.CountItem = Me.BindingNavigatorCountItem Me.TBPMO_STRUCTURE_NODES_CONFIGURATIONBindingNavigator.CountItem = Me.BindingNavigatorCountItem
Me.TBPMO_STRUCTURE_NODES_CONFIGURATIONBindingNavigator.CountItemFormat = "von {0} Node Configurations" Me.TBPMO_STRUCTURE_NODES_CONFIGURATIONBindingNavigator.CountItemFormat = "von {0} Node Configurations"
Me.TBPMO_STRUCTURE_NODES_CONFIGURATIONBindingNavigator.DeleteItem = Me.BindingNavigatorDeleteItem Me.TBPMO_STRUCTURE_NODES_CONFIGURATIONBindingNavigator.DeleteItem = Nothing
Me.TBPMO_STRUCTURE_NODES_CONFIGURATIONBindingNavigator.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.BindingNavigatorMoveFirstItem, Me.BindingNavigatorMovePreviousItem, Me.BindingNavigatorSeparator, Me.BindingNavigatorPositionItem, Me.BindingNavigatorCountItem, Me.BindingNavigatorSeparator1, Me.BindingNavigatorMoveNextItem, Me.BindingNavigatorMoveLastItem, Me.BindingNavigatorSeparator2, Me.BindingNavigatorAddNewItem, Me.BindingNavigatorDeleteItem, Me.TBPMO_STRUCTURE_NODES_CONFIGURATIONBindingNavigatorSaveItem}) Me.TBPMO_STRUCTURE_NODES_CONFIGURATIONBindingNavigator.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.BindingNavigatorMoveFirstItem, Me.BindingNavigatorMovePreviousItem, Me.BindingNavigatorSeparator, Me.BindingNavigatorPositionItem, Me.BindingNavigatorCountItem, Me.BindingNavigatorSeparator1, Me.BindingNavigatorMoveNextItem, Me.BindingNavigatorMoveLastItem, Me.BindingNavigatorSeparator2, Me.BindingNavigatorAddNewItem, Me.TBPMO_STRUCTURE_NODES_CONFIGURATIONBindingNavigatorSaveItem})
Me.TBPMO_STRUCTURE_NODES_CONFIGURATIONBindingNavigator.Location = New System.Drawing.Point(0, 0) Me.TBPMO_STRUCTURE_NODES_CONFIGURATIONBindingNavigator.Location = New System.Drawing.Point(0, 0)
Me.TBPMO_STRUCTURE_NODES_CONFIGURATIONBindingNavigator.MoveFirstItem = Me.BindingNavigatorMoveFirstItem Me.TBPMO_STRUCTURE_NODES_CONFIGURATIONBindingNavigator.MoveFirstItem = Me.BindingNavigatorMoveFirstItem
Me.TBPMO_STRUCTURE_NODES_CONFIGURATIONBindingNavigator.MoveLastItem = Me.BindingNavigatorMoveLastItem Me.TBPMO_STRUCTURE_NODES_CONFIGURATIONBindingNavigator.MoveLastItem = Me.BindingNavigatorMoveLastItem
@ -237,15 +236,6 @@ Partial Class frmStructureNodeConfig
Me.BindingNavigatorCountItem.Text = "von {0} Node Configurations" Me.BindingNavigatorCountItem.Text = "von {0} Node Configurations"
Me.BindingNavigatorCountItem.ToolTipText = "Die Gesamtanzahl der Elemente." Me.BindingNavigatorCountItem.ToolTipText = "Die Gesamtanzahl der Elemente."
' '
'BindingNavigatorDeleteItem
'
Me.BindingNavigatorDeleteItem.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image
Me.BindingNavigatorDeleteItem.Image = CType(resources.GetObject("BindingNavigatorDeleteItem.Image"), System.Drawing.Image)
Me.BindingNavigatorDeleteItem.Name = "BindingNavigatorDeleteItem"
Me.BindingNavigatorDeleteItem.RightToLeftAutoMirrorImage = True
Me.BindingNavigatorDeleteItem.Size = New System.Drawing.Size(23, 22)
Me.BindingNavigatorDeleteItem.Text = "Löschen"
'
'BindingNavigatorMoveFirstItem 'BindingNavigatorMoveFirstItem
' '
Me.BindingNavigatorMoveFirstItem.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image Me.BindingNavigatorMoveFirstItem.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image
@ -330,7 +320,7 @@ Partial Class frmStructureNodeConfig
'TYPE_NODENumericUpDown 'TYPE_NODENumericUpDown
' '
Me.TYPE_NODENumericUpDown.DataBindings.Add(New System.Windows.Forms.Binding("Value", Me.TBPMO_STRUCTURE_NODES_CONFIGURATIONBindingSource, "TYPE_NODE", True)) Me.TYPE_NODENumericUpDown.DataBindings.Add(New System.Windows.Forms.Binding("Value", Me.TBPMO_STRUCTURE_NODES_CONFIGURATIONBindingSource, "TYPE_NODE", True))
Me.TYPE_NODENumericUpDown.Location = New System.Drawing.Point(659, 153) Me.TYPE_NODENumericUpDown.Location = New System.Drawing.Point(659, 150)
Me.TYPE_NODENumericUpDown.Maximum = New Decimal(New Integer() {1000, 0, 0, 0}) Me.TYPE_NODENumericUpDown.Maximum = New Decimal(New Integer() {1000, 0, 0, 0})
Me.TYPE_NODENumericUpDown.Name = "TYPE_NODENumericUpDown" Me.TYPE_NODENumericUpDown.Name = "TYPE_NODENumericUpDown"
Me.TYPE_NODENumericUpDown.Size = New System.Drawing.Size(55, 22) Me.TYPE_NODENumericUpDown.Size = New System.Drawing.Size(55, 22)
@ -340,11 +330,11 @@ Partial Class frmStructureNodeConfig
'CREATE_RECORDCheckBox 'CREATE_RECORDCheckBox
' '
Me.CREATE_RECORDCheckBox.DataBindings.Add(New System.Windows.Forms.Binding("CheckState", Me.TBPMO_STRUCTURE_NODES_CONFIGURATIONBindingSource, "CREATE_RECORD", True)) Me.CREATE_RECORDCheckBox.DataBindings.Add(New System.Windows.Forms.Binding("CheckState", Me.TBPMO_STRUCTURE_NODES_CONFIGURATIONBindingSource, "CREATE_RECORD", True))
Me.CREATE_RECORDCheckBox.Location = New System.Drawing.Point(764, 150) Me.CREATE_RECORDCheckBox.Location = New System.Drawing.Point(764, 149)
Me.CREATE_RECORDCheckBox.Name = "CREATE_RECORDCheckBox" Me.CREATE_RECORDCheckBox.Name = "CREATE_RECORDCheckBox"
Me.CREATE_RECORDCheckBox.Size = New System.Drawing.Size(185, 24) Me.CREATE_RECORDCheckBox.Size = New System.Drawing.Size(142, 24)
Me.CREATE_RECORDCheckBox.TabIndex = 8 Me.CREATE_RECORDCheckBox.TabIndex = 8
Me.CREATE_RECORDCheckBox.Text = "Create Record? (Yes/No)" Me.CREATE_RECORDCheckBox.Text = "Create Record?"
Me.CREATE_RECORDCheckBox.UseVisualStyleBackColor = True Me.CREATE_RECORDCheckBox.UseVisualStyleBackColor = True
' '
'ADDED_WHOTextBox 'ADDED_WHOTextBox
@ -445,7 +435,7 @@ Partial Class frmStructureNodeConfig
Me.pbBackground.Location = New System.Drawing.Point(6, 21) Me.pbBackground.Location = New System.Drawing.Point(6, 21)
Me.pbBackground.Name = "pbBackground" Me.pbBackground.Name = "pbBackground"
Me.pbBackground.Size = New System.Drawing.Size(76, 51) Me.pbBackground.Size = New System.Drawing.Size(76, 51)
Me.pbBackground.SizeMode = System.Windows.Forms.PictureBoxSizeMode.CenterImage Me.pbBackground.SizeMode = System.Windows.Forms.PictureBoxSizeMode.Zoom
Me.pbBackground.TabIndex = 80 Me.pbBackground.TabIndex = 80
Me.pbBackground.TabStop = False Me.pbBackground.TabStop = False
' '
@ -453,17 +443,17 @@ Partial Class frmStructureNodeConfig
' '
Me.OpenFileDialog1.FileName = "OpenFileDialog1" Me.OpenFileDialog1.FileName = "OpenFileDialog1"
' '
'ComboBox1 'ComboBoxEntity
' '
Me.ComboBox1.DataBindings.Add(New System.Windows.Forms.Binding("SelectedValue", Me.TBPMO_STRUCTURE_NODES_CONFIGURATIONBindingSource, "ENTITY_ID", True)) Me.ComboBoxEntity.DataBindings.Add(New System.Windows.Forms.Binding("SelectedValue", Me.TBPMO_STRUCTURE_NODES_CONFIGURATIONBindingSource, "ENTITY_ID", True))
Me.ComboBox1.DataSource = Me.TBWH_ENTITYBindingSource Me.ComboBoxEntity.DataSource = Me.TBWH_ENTITYBindingSource
Me.ComboBox1.DisplayMember = "FORM_TITLE" Me.ComboBoxEntity.DisplayMember = "FORM_TITLE"
Me.ComboBox1.FormattingEnabled = True Me.ComboBoxEntity.FormattingEnabled = True
Me.ComboBox1.Location = New System.Drawing.Point(401, 151) Me.ComboBoxEntity.Location = New System.Drawing.Point(401, 151)
Me.ComboBox1.Name = "ComboBox1" Me.ComboBoxEntity.Name = "ComboBoxEntity"
Me.ComboBox1.Size = New System.Drawing.Size(252, 21) Me.ComboBoxEntity.Size = New System.Drawing.Size(252, 21)
Me.ComboBox1.TabIndex = 85 Me.ComboBoxEntity.TabIndex = 85
Me.ComboBox1.ValueMember = "FORM_ID" Me.ComboBoxEntity.ValueMember = "FORM_ID"
' '
'TBWH_ENTITYBindingSource 'TBWH_ENTITYBindingSource
' '
@ -594,7 +584,7 @@ Partial Class frmStructureNodeConfig
Me.Controls.Add(Me.COMMENTTextBox) Me.Controls.Add(Me.COMMENTTextBox)
Me.Controls.Add(NAMELabel) Me.Controls.Add(NAMELabel)
Me.Controls.Add(Me.NAMETextBox) Me.Controls.Add(Me.NAMETextBox)
Me.Controls.Add(Me.ComboBox1) Me.Controls.Add(Me.ComboBoxEntity)
Me.Controls.Add(Me.GroupBoxNodeIcon) Me.Controls.Add(Me.GroupBoxNodeIcon)
Me.Controls.Add(Me.lblSave) Me.Controls.Add(Me.lblSave)
Me.Controls.Add(GUIDLabel) Me.Controls.Add(GUIDLabel)
@ -640,7 +630,6 @@ Partial Class frmStructureNodeConfig
Friend WithEvents TBPMO_STRUCTURE_NODES_CONFIGURATIONBindingNavigator As System.Windows.Forms.BindingNavigator Friend WithEvents TBPMO_STRUCTURE_NODES_CONFIGURATIONBindingNavigator As System.Windows.Forms.BindingNavigator
Friend WithEvents BindingNavigatorAddNewItem As System.Windows.Forms.ToolStripButton Friend WithEvents BindingNavigatorAddNewItem As System.Windows.Forms.ToolStripButton
Friend WithEvents BindingNavigatorCountItem As System.Windows.Forms.ToolStripLabel Friend WithEvents BindingNavigatorCountItem As System.Windows.Forms.ToolStripLabel
Friend WithEvents BindingNavigatorDeleteItem As System.Windows.Forms.ToolStripButton
Friend WithEvents BindingNavigatorMoveFirstItem As System.Windows.Forms.ToolStripButton Friend WithEvents BindingNavigatorMoveFirstItem As System.Windows.Forms.ToolStripButton
Friend WithEvents BindingNavigatorMovePreviousItem As System.Windows.Forms.ToolStripButton Friend WithEvents BindingNavigatorMovePreviousItem As System.Windows.Forms.ToolStripButton
Friend WithEvents BindingNavigatorSeparator As System.Windows.Forms.ToolStripSeparator Friend WithEvents BindingNavigatorSeparator As System.Windows.Forms.ToolStripSeparator
@ -665,7 +654,7 @@ Partial Class frmStructureNodeConfig
Friend WithEvents OpenFileDialog1 As System.Windows.Forms.OpenFileDialog Friend WithEvents OpenFileDialog1 As System.Windows.Forms.OpenFileDialog
Friend WithEvents TBWH_ENTITYBindingSource As System.Windows.Forms.BindingSource Friend WithEvents TBWH_ENTITYBindingSource As System.Windows.Forms.BindingSource
Friend WithEvents TBWH_ENTITYTableAdapter As DD_Record_Organizer.DD_DMSDataSetTableAdapters.TBWH_ENTITYTableAdapter Friend WithEvents TBWH_ENTITYTableAdapter As DD_Record_Organizer.DD_DMSDataSetTableAdapters.TBWH_ENTITYTableAdapter
Friend WithEvents ComboBox1 As System.Windows.Forms.ComboBox Friend WithEvents ComboBoxEntity As System.Windows.Forms.ComboBox
Friend WithEvents NAMETextBox As System.Windows.Forms.TextBox Friend WithEvents NAMETextBox As System.Windows.Forms.TextBox
Friend WithEvents COMMENTTextBox As System.Windows.Forms.TextBox Friend WithEvents COMMENTTextBox As System.Windows.Forms.TextBox
Friend WithEvents TreeView1 As System.Windows.Forms.TreeView Friend WithEvents TreeView1 As System.Windows.Forms.TreeView

View File

@ -154,7 +154,7 @@
<data name="BindingNavigatorAddNewItem.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64"> <data name="BindingNavigatorAddNewItem.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value> <value>
iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO
wAAADsABataJCQAAAUpJREFUOE9jGLzg7gL2/7fmcf6/Oofr/8UZvP+hwsSD60CNfx41/v/zsOH/yckC vQAADr0BR/uQrQAAAUpJREFUOE9jGLzg7gL2/7fmcf6/Oofr/8UZvP+hwsSD60CNfx41/v/zsOH/yckC
pBtwfjov3ICDPSKkG3B8kiBQc93/Pw+q/u9oFydswKWZPP/PTuX7fxKo8Ui/0P993SJAzeX//94r+r++ pBtwfjov3ICDPSKkG3B8kiBQc93/Pw+q/u9oFydswKWZPP/PTuX7fxKo8Ui/0P993SJAzeX//94r+r++
Qeb/qhq5/0srFf/PL1X+P6tIFdPAU0B//nlYD9RUC8SV///cKwHivP9/72b+/3sn+f/f23H//92MAOKQ Qeb/qhq5/0srFf/PL1X+P6tIFdPAU0B//nlYD9RUC8SV///cKwHivP9/72b+/3sn+f/f23H//92MAOKQ
/5NyNDENONQrDHbu3/ulQI0FQI3ZQI2pQI0J///digZqDPv/70bQ/3/X/f53peliGrCzXeL/lmap/+vA /5NyNDENONQrDHbu3/ulQI0FQI3ZQI2pQI0J///digZqDPv/70bQ/3/X/f53peliGrCzXeL/lmap/+vA
@ -169,22 +169,10 @@
<metadata name="DD_DMSDataSet.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"> <metadata name="DD_DMSDataSet.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>
<data name="BindingNavigatorDeleteItem.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO
wAAADsABataJCQAAAW9JREFUOE+1kE0ow2Ecx3dV3krt4oJaOSCTvIRkMqSxyITIzCQHDouEdnFwIOVC
DrhIDiQl5UTiNG/z2ppafy1S2gX/uDwfY6i1v7Hie3nqeb7fz+/7/FR/Ilwn0G0Exw4fV5GJlXlEZxXC
rIet9bAQvB5Ymgn2sLYAvSZEux7RUQFzE4qQt4bCXAYjPaHvnDoCkLpsRGMB2JqCTGLIijDlwqQ9bEMV
i9OIytR3EMNWcJ/BWH8A6j8/bOGFxwXNxYEvGbMQ9XnQ1/K78KfY3/VXzkMY0qFGG2H4RoLGQshJQNbG
86CNhdrsX9a/uQZTPhQl4rMY4OLofbl3aX7I8uwPC7y/g1YdjyVJuEvT8e1tfwUYteHUxCCfHChDeHmG
QQvokjlOU+PbWA0x3pZnILVVI3uvQyHsbiLnqnGmRCF1NYD8pDhpRxOH7HQoAKZGkFKjceszQbpSrumX
bO+G80MFwKUTxgfgcO/b8D9IpXoFiiMDHIQm0skAAAAASUVORK5CYII=
</value>
</data>
<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
wAAADsABataJCQAAASpJREFUOE9jGDygcNbz/00Lnv/PnPj4P1QIA4S3P8Apx5A789n/VUfe/8elKL77 vQAADr0BR/uQrQAAASpJREFUOE9jGDygcNbz/00Lnv/PnPj4P1QIA4S3P8Apx5A789n/VUfe/8elKL77
wf/ghmu4DciY8vT/wn0fsCqK73n4f+n+///9qy/gNiCh58n/aVveYyiKaL8P1pw56/9/r9ITuA2I7Hr0 wf/ghmu4DciY8vT/wn0fsCqK73n4f+n+///9qy/gNiCh58n/aVveYyiKaL8P1pw56/9/r9ITuA2I7Hr0
v3f1BxRFoa33wJpb1wFt7/z73yX/AG4DApsf/q+b/w6uKLjl7v9Fe///7wBqzpjz879d3c//9hnbcRvg v3f1BxRFoa33wJpb1wFt7/z73yX/AG4DApsf/q+b/w6uKLjl7v9Fe///7wBqzpjz879d3c//9hnbcRvg
UXX/f/60NyiK7Ipv/0+f8/u/f9e3/zqF7/5bJKzHbYB96d3/2ZNfYyjSTzn/36ToxX+VrE//jSOX4TbA UXX/f/60NyiK7Ipv/0+f8/u/f9e3/zqF7/5bJKzHbYB96d3/2ZNfYyjSTzn/36ToxX+VrE//jSOX4TbA
@ -195,7 +183,7 @@
<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
wAAADsABataJCQAAALZJREFUOE9jGDogvP3BfyiTdBDf/eB/cMM18gyI73n4f+n+///9qy+QbkBE+32w vQAADr0BR/uQrQAAALZJREFUOE9jGDogvP3BfyiTdBDf/eB/cMM18gyI73n4f+n+///9qy+QbkBE+32w
5sxZ//97lZ4gzYDQ1ntgza3rgLZ3/v3vkn+AeAOCW+7+X7T3//8OoOaMOT//29X9/G+fsZ00F9gV3/6f 5sxZ//97lZ4gzYDQ1ntgza3rgLZ3/v3vkn+AeAOCW+7+X7T3//8OoOaMOT//29X9/G+fsZ00F9gV3/6f
Puf3f/+ub/91Ct/9t0hYT3oY6Kec/29S9OK/Stan/8aRy0g3AAQMkk78l037+l83eB55BoCAfurl/xq+ Puf3f/+ub/91Ct/9t0hYT3oY6Kec/29S9OK/Stan/8aRy0g3AAQMkk78l037+l83eB55BoCAfurl/xq+
08g3AARUPCZQZsBgBQwMANAUYJgEulBVAAAAAElFTkSuQmCC 08g3AARUPCZQZsBgBQwMANAUYJgEulBVAAAAAElFTkSuQmCC
@ -204,7 +192,7 @@
<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
wAAADsABataJCQAAAKNJREFUOE9jGHygcNbz/1AmeSB35rP/Cd33yDckY8rT//P2//6f0HWHPEMSep78 vQAADr0BR/uQrQAAAKNJREFUOE9jGHygcNbz/1AmeSB35rP/Cd33yDckY8rT//P2//6f0HWHPEMSep78
n73v1//OrX//u5VeJt2QyK5H/6ds+/W/ZOnf/wnT//63yT1LmiGBzQ//t659D9ZsXPLlv3T0tf/GkcuI n73v1//OrX//u5VeJt2QyK5H/6ds+/W/ZOnf/wnT//63yT1LmiGBzQ//t659D9ZsXPLlv3T0tf/GkcuI
N8Sj6v7/krnv4JoVXXpIc4F96d3/gS3PyNMMAhZ5d/7bFFwhTzMIGGbdJl8zCOik3SBf81AEDAwAoH5f N8Sj6v7/krnv4JoVXXpIc4F96d3/gS3PyNMMAhZ5d/7bFFwhTzMIGGbdJl8zCOik3SBf81AEDAwAoH5f
oAc0QjgAAAAASUVORK5CYII= oAc0QjgAAAAASUVORK5CYII=
@ -213,7 +201,7 @@
<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
wAAADsABataJCQAAASxJREFUOE9jGFygcNbz/1AmBgDJNS14/j9z4mOcahhyZz77n9B9D6sCkNyqI+// vQAADr0BR/uQrQAAASxJREFUOE9jGFygcNbz/1AmBgDJNS14/j9z4mOcahhyZz77n9B9D6sCkNyqI+//
h7c/wG1AxpSn/+ft//0/oesOhiKQ3MJ9H/4HN1zDbUBCz5P/s/f9+t+59e9/t9LLKApBctO2vP/vX30B h7c/wG1AxpSn/+ft//0/oesOhiKQ3MJ9H/4HN1zDbUBCz5P/s/f9+t+59e9/t9LLKApBctO2vP/vX30B
twGRXY/+T9n263/J0r//E6b//W+TexauGCTXu/rDf6/SE7gNCGx++L917XuwZuOSL/+lo6/9N45cBtYA twGRXY/+T9n263/J0r//E6b//W+TexauGCTXu/rDf6/SE7gNCGx++L917XuwZuOSL/+lo6/9N45cBtYA
kqub/+6/S/4B3AZ4VN3/XzL3HVyzoksPXDFILn/am//2GdtxG2Bfevd/YMszDM0gAJLLnvz6v0XCetwG kqub/+6/S/4B3AZ4VN3/XzL3HVyzoksPXDFILn/am//2GdtxG2Bfevd/YMszDM0gAJLLnvz6v0XCetwG
@ -224,16 +212,22 @@
<data name="TBPMO_STRUCTURE_NODES_CONFIGURATIONBindingNavigatorSaveItem.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64"> <data name="TBPMO_STRUCTURE_NODES_CONFIGURATIONBindingNavigatorSaveItem.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value> <value>
iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO
wAAADsABataJCQAAAExJREFUOE9joAr49u3bf1IxVCsEgAWC58Dxh/cf4RhZDETHTNiHaQgpBoAwzBCo vQAADr0BR/uQrQAAAExJREFUOE9joAr49u3bf1IxVCsEgAWC58Dxh/cf4RhZDETHTNiHaQgpBoAwzBCo
dtINAGGiDUDGyGpoawAxeNSAQWkAORiqnRLAwAAA9EMMU8Daa3MAAAAASUVORK5CYII= dtINAGGiDUDGyGpoawAxeNSAQWkAORiqnRLAwAAA9EMMU8Daa3MAAAAASUVORK5CYII=
</value> </value>
</data> </data>
<metadata name="DD_DMSDataSet.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>17, 17</value>
</metadata>
<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>422, 56</value> <value>422, 56</value>
</metadata> </metadata>
<metadata name="TBWH_ENTITYBindingSource.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"> <metadata name="TBWH_ENTITYBindingSource.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>564, 56</value> <value>564, 56</value>
</metadata> </metadata>
<metadata name="TBWH_ENTITYBindingSource.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>564, 56</value>
</metadata>
<metadata name="TBPMO_STRUCTURE_NODES_CONFIGURATIONTableAdapter.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"> <metadata name="TBPMO_STRUCTURE_NODES_CONFIGURATIONTableAdapter.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>548, 17</value> <value>548, 17</value>
</metadata> </metadata>
@ -249,6 +243,9 @@
<metadata name="DD_ECMAdmin.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"> <metadata name="DD_ECMAdmin.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>974, 56</value> <value>974, 56</value>
</metadata> </metadata>
<metadata name="DD_ECMAdmin.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>974, 56</value>
</metadata>
<metadata name="TBPMO_FORM_CONSTRUCTORTableAdapter.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"> <metadata name="TBPMO_FORM_CONSTRUCTORTableAdapter.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>318, 95</value> <value>318, 95</value>
</metadata> </metadata>

View File

@ -378,9 +378,7 @@
End Sub End Sub
Private Sub TBPMO_STRUCTURE_NODES_CONFIGURATIONBindingSource_CurrentChanged(sender As Object, e As EventArgs) Handles TBPMO_STRUCTURE_NODES_CONFIGURATIONBindingSource.CurrentChanged
Load_image()
End Sub
Sub Load_Image() Sub Load_Image()
If GUIDTextBox.Text <> "" Then If GUIDTextBox.Text <> "" Then
Try Try
@ -416,6 +414,7 @@
Dim ID = SelectedNode.Tag Dim ID = SelectedNode.Tag
If IsNumeric(ID) Then If IsNumeric(ID) Then
TBPMO_STRUCTURE_NODES_CONFIGURATIONBindingSource.Filter = "GUID = " & ID TBPMO_STRUCTURE_NODES_CONFIGURATIONBindingSource.Filter = "GUID = " & ID
Load_Image()
End If End If
End If End If
Me.lblSave.Visible = False Me.lblSave.Visible = False
@ -438,12 +437,22 @@
End Sub End Sub
Private Sub BindingNavigatorAddNewItem_Click(sender As Object, e As EventArgs) Handles BindingNavigatorAddNewItem.Click Private Sub BindingNavigatorAddNewItem_Click(sender As Object, e As EventArgs) Handles BindingNavigatorAddNewItem.Click
Try 'Try
TBPMO_STRUCTURE_NODES_CONFIGURATIONBindingSource.AddNew() ' TBPMO_STRUCTURE_NODES_CONFIGURATIONBindingSource.AddNew()
GroupBoxNodeIcon.Enabled = False ' GroupBoxNodeIcon.Enabled = False
Catch ex As Exception 'Catch ex As Exception
MsgBox("Error in AddNode:" & vbNewLine & ex.Message, MsgBoxStyle.Critical) ' MsgBox("Error in AddNode:" & vbNewLine & ex.Message, MsgBoxStyle.Critical)
End Try 'End Try
Dim oParentID = GUIDTextBox.Text
If oParentID = "" Then
oParentID = 0
End If
Dim NewAddForm As New frmNodeConfigAdd(GUIDTextBox.Text, ComboBoxEntity.SelectedValue, ComboBoxEntity.Text)
NewAddForm.ShowDialog()
LoadData()
End Sub
Private Sub BindingNavigatorDeleteItem_Click(sender As Object, e As EventArgs)
End Sub End Sub
End Class End Class