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

MS

Browse Source
This commit is contained in:
SchreiberM 2016-05-11 17:19:17 +02:00
parent 4a40698a13
commit d37acafcd9
12 changed files with 429 additions and 221 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
app/DD-Record-Organiser/DD-Record-Organiser.vbproj
View File

@ -1191,6 +1191,7 @@
<None Include="Resources\brick.png" />
</ItemGroup>
<ItemGroup>
<None Include="Resources\TableView_nameonly_263.png" />
<None Include="Resources\InsertColumn_5626.png" />
<None Include="Resources\lock_16xMD.png" />
<None Include="Resources\NetworkPipes_32xLG.png" />

106
app/DD-Record-Organiser/DD_ECMAdmin.Designer.vb generated
View File

@ -3019,6 +3019,8 @@ Partial Public Class DD_ECMAdmin
Private columnWHERE_CLAUSE As Global.System.Data.DataColumn
Private columnMethod As Global.System.Data.DataColumn
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
Public Sub New()
@ -3190,6 +3192,14 @@ Partial Public Class DD_ECMAdmin
End Get
End Property
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
Public ReadOnly Property MethodColumn() As Global.System.Data.DataColumn
Get
Return Me.columnMethod
End Get
End Property
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
Global.System.ComponentModel.Browsable(False)> _
@ -3243,9 +3253,10 @@ Partial Public Class DD_ECMAdmin
ByVal ADDED_WHEN As Date, _
ByVal CHANGED_WHO As String, _
ByVal CHANGED_WHEN As Date, _
ByVal WHERE_CLAUSE As String) As TBPMO_SAP_FUBARow
ByVal WHERE_CLAUSE As String, _
ByVal Method As String) As TBPMO_SAP_FUBARow
Dim rowTBPMO_SAP_FUBARow As TBPMO_SAP_FUBARow = CType(Me.NewRow, TBPMO_SAP_FUBARow)
Dim columnValuesArray() As Object = New Object() {Nothing, NAME, COMMENT, TableName, Host, SystemNumber, UserName, Password, Client, Language, TempTableName, ACTIVE, ADDED_WHO, ADDED_WHEN, CHANGED_WHO, CHANGED_WHEN, WHERE_CLAUSE}
Dim columnValuesArray() As Object = New Object() {Nothing, NAME, COMMENT, TableName, Host, SystemNumber, UserName, Password, Client, Language, TempTableName, ACTIVE, ADDED_WHO, ADDED_WHEN, CHANGED_WHO, CHANGED_WHEN, WHERE_CLAUSE, Method}
rowTBPMO_SAP_FUBARow.ItemArray = columnValuesArray
Me.Rows.Add(rowTBPMO_SAP_FUBARow)
Return rowTBPMO_SAP_FUBARow
@ -3291,6 +3302,7 @@ Partial Public Class DD_ECMAdmin
Me.columnCHANGED_WHO = MyBase.Columns("CHANGED_WHO")
Me.columnCHANGED_WHEN = MyBase.Columns("CHANGED_WHEN")
Me.columnWHERE_CLAUSE = MyBase.Columns("WHERE_CLAUSE")
Me.columnMethod = MyBase.Columns("Method")
End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
@ -3330,6 +3342,8 @@ Partial Public Class DD_ECMAdmin
MyBase.Columns.Add(Me.columnCHANGED_WHEN)
Me.columnWHERE_CLAUSE = New Global.System.Data.DataColumn("WHERE_CLAUSE", GetType(String), Nothing, Global.System.Data.MappingType.Element)
MyBase.Columns.Add(Me.columnWHERE_CLAUSE)
Me.columnMethod = New Global.System.Data.DataColumn("Method", GetType(String), Nothing, Global.System.Data.MappingType.Element)
MyBase.Columns.Add(Me.columnMethod)
Me.Constraints.Add(New Global.System.Data.UniqueConstraint("Constraint1", New Global.System.Data.DataColumn() {Me.columnGUID}, True))
Me.columnGUID.AutoIncrement = True
Me.columnGUID.AllowDBNull = False
@ -3360,6 +3374,9 @@ Partial Public Class DD_ECMAdmin
Me.columnADDED_WHO.MaxLength = 50
Me.columnCHANGED_WHO.MaxLength = 50
Me.columnWHERE_CLAUSE.MaxLength = 500
Me.columnMethod.AllowDBNull = False
Me.columnMethod.DefaultValue = CType("TABLE", String)
Me.columnMethod.MaxLength = 50
End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
@ -6238,6 +6255,17 @@ Partial Public Class DD_ECMAdmin
End Set
End Property
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
Public Property Method() As String
Get
Return CType(Me(Me.tableTBPMO_SAP_FUBA.MethodColumn), String)
End Get
Set(value As String)
Me(Me.tableTBPMO_SAP_FUBA.MethodColumn) = value
End Set
End Property
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
Public Function IsCOMMENTNull() As Boolean
@ -9316,6 +9344,7 @@ Namespace DD_ECMAdminTableAdapters
tableMapping.ColumnMappings.Add("CHANGED_WHO", "CHANGED_WHO")
tableMapping.ColumnMappings.Add("CHANGED_WHEN", "CHANGED_WHEN")
tableMapping.ColumnMappings.Add("WHERE_CLAUSE", "WHERE_CLAUSE")
tableMapping.ColumnMappings.Add("Method", "Method")
Me._adapter.TableMappings.Add(tableMapping)
Me._adapter.DeleteCommand = New Global.System.Data.SqlClient.SqlCommand()
Me._adapter.DeleteCommand.Connection = Me.Connection
@ -9326,11 +9355,12 @@ Namespace DD_ECMAdminTableAdapters
Me._adapter.InsertCommand.Connection = Me.Connection
Me._adapter.InsertCommand.CommandText = "INSERT INTO TBPMO_SAP_FUBA" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & " (NAME, COMMENT, TableName, H" & _
"ost, SystemNumber, UserName, Password, Client, Language, TempTableName, ACTIVE, " & _
"ADDED_WHO, WHERE_CLAUSE)" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "VALUES (@NAME,@COMMENT,@TableName,@Host,@System" & _
"Number,@UserName,@Password,@Client,@Language,@TempTableName,@ACTIVE,@ADDED_WHO,@" & _
"WHERE_CLAUSE); " & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "SELECT GUID, NAME, COMMENT, TableName, Host, SystemNumber, Use" & _
"rName, Password, Client, Language, TempTableName, ACTIVE, ADDED_WHO, ADDED_WHEN," & _
" CHANGED_WHO, CHANGED_WHEN FROM TBPMO_SAP_FUBA WHERE (GUID = SCOPE_IDENTITY())"
"ADDED_WHO, WHERE_CLAUSE, Method)" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "VALUES (@NAME,@COMMENT,@TableName,@Host" & _
",@SystemNumber,@UserName,@Password,@Client,@Language,@TempTableName,@ACTIVE,@ADD" & _
"ED_WHO,@WHERE_CLAUSE,@Method); " & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "SELECT GUID, NAME, COMMENT, TableName, Host, " & _
"SystemNumber, UserName, Password, Client, Language, TempTableName, ACTIVE, ADDED" & _
"_WHO, ADDED_WHEN, CHANGED_WHO, CHANGED_WHEN FROM TBPMO_SAP_FUBA WHERE (GUID = SC" & _
"OPE_IDENTITY())"
Me._adapter.InsertCommand.CommandType = Global.System.Data.CommandType.Text
Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@NAME", Global.System.Data.SqlDbType.VarChar, 100, Global.System.Data.ParameterDirection.Input, 0, 0, "NAME", Global.System.Data.DataRowVersion.Current, False, Nothing, "", "", ""))
Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@COMMENT", Global.System.Data.SqlDbType.VarChar, 500, Global.System.Data.ParameterDirection.Input, 0, 0, "COMMENT", Global.System.Data.DataRowVersion.Current, False, Nothing, "", "", ""))
@ -9345,16 +9375,17 @@ Namespace DD_ECMAdminTableAdapters
Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@ACTIVE", Global.System.Data.SqlDbType.Bit, 1, Global.System.Data.ParameterDirection.Input, 0, 0, "ACTIVE", Global.System.Data.DataRowVersion.Current, False, Nothing, "", "", ""))
Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@ADDED_WHO", Global.System.Data.SqlDbType.VarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "ADDED_WHO", Global.System.Data.DataRowVersion.Current, False, Nothing, "", "", ""))
Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@WHERE_CLAUSE", Global.System.Data.SqlDbType.VarChar, 500, Global.System.Data.ParameterDirection.Input, 0, 0, "WHERE_CLAUSE", Global.System.Data.DataRowVersion.Current, False, Nothing, "", "", ""))
Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Method", Global.System.Data.SqlDbType.VarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "Method", Global.System.Data.DataRowVersion.Current, False, Nothing, "", "", ""))
Me._adapter.UpdateCommand = New Global.System.Data.SqlClient.SqlCommand()
Me._adapter.UpdateCommand.Connection = Me.Connection
Me._adapter.UpdateCommand.CommandText = "UPDATE TBPMO_SAP_FUBA" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "SET NAME = @NAME, COMMENT = @COMMENT," & _
" TableName = @TableName, Host = @Host, SystemNumber = @SystemNumber, UserName = " & _
"@UserName, Password = @Password, Client = @Client, " & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & " La" & _
"nguage = @Language, TempTableName = @TempTableName, ACTIVE = @ACTIVE, CHANGED_WH" & _
"O = @CHANGED_WHO, WHERE_CLAUSE = @WHERE_CLAUSE" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "WHERE (GUID = @Original_G" & _
"UID); " & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "SELECT GUID, NAME, COMMENT, TableName, Host, SystemNumber, UserName, Pa" & _
"ssword, Client, Language, TempTableName, ACTIVE, ADDED_WHO, ADDED_WHEN, CHANGED_" & _
"WHO, CHANGED_WHEN FROM TBPMO_SAP_FUBA WHERE (GUID = @GUID)"
"O = @CHANGED_WHO, WHERE_CLAUSE = @WHERE_CLAUSE, Method = @Method" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "WHERE (" & _
"GUID = @Original_GUID); " & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "SELECT GUID, NAME, COMMENT, TableName, Host, SystemN" & _
"umber, UserName, Password, Client, Language, TempTableName, ACTIVE, ADDED_WHO, A" & _
"DDED_WHEN, CHANGED_WHO, CHANGED_WHEN FROM TBPMO_SAP_FUBA WHERE (GUID = @GUID)"
Me._adapter.UpdateCommand.CommandType = Global.System.Data.CommandType.Text
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@NAME", Global.System.Data.SqlDbType.VarChar, 100, Global.System.Data.ParameterDirection.Input, 0, 0, "NAME", Global.System.Data.DataRowVersion.Current, False, Nothing, "", "", ""))
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@COMMENT", Global.System.Data.SqlDbType.VarChar, 500, Global.System.Data.ParameterDirection.Input, 0, 0, "COMMENT", Global.System.Data.DataRowVersion.Current, False, Nothing, "", "", ""))
@ -9369,6 +9400,7 @@ Namespace DD_ECMAdminTableAdapters
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@ACTIVE", Global.System.Data.SqlDbType.Bit, 1, Global.System.Data.ParameterDirection.Input, 0, 0, "ACTIVE", Global.System.Data.DataRowVersion.Current, False, Nothing, "", "", ""))
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@CHANGED_WHO", Global.System.Data.SqlDbType.VarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "CHANGED_WHO", Global.System.Data.DataRowVersion.Current, False, Nothing, "", "", ""))
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@WHERE_CLAUSE", Global.System.Data.SqlDbType.VarChar, 500, Global.System.Data.ParameterDirection.Input, 0, 0, "WHERE_CLAUSE", Global.System.Data.DataRowVersion.Current, False, Nothing, "", "", ""))
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Method", Global.System.Data.SqlDbType.VarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "Method", Global.System.Data.DataRowVersion.Current, False, Nothing, "", "", ""))
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_GUID", Global.System.Data.SqlDbType.Int, 4, Global.System.Data.ParameterDirection.Input, 0, 0, "GUID", Global.System.Data.DataRowVersion.Original, False, Nothing, "", "", ""))
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@GUID", Global.System.Data.SqlDbType.Int, 4, Global.System.Data.ParameterDirection.Input, 0, 0, "GUID", Global.System.Data.DataRowVersion.Original, False, Nothing, "", "", ""))
End Sub
@ -9388,8 +9420,8 @@ Namespace DD_ECMAdminTableAdapters
Me._commandCollection(0).Connection = Me.Connection
Me._commandCollection(0).CommandText = "SELECT GUID, NAME, COMMENT, TableName, Host, SystemNumber, UserName, Passw" & _
"ord, Client, Language, TempTableName, WHERE_CLAUSE, ACTIVE, ADDED_WHO, ADDED_WHE" & _
"N, CHANGED_WHO, " & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & " CHANGED_WHEN" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "FROM TBPMO_S" & _
"AP_FUBA"
"N, CHANGED_WHO, " & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & " CHANGED_WHEN, Method" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "FROM " & _
" TBPMO_SAP_FUBA"
Me._commandCollection(0).CommandType = Global.System.Data.CommandType.Text
End Sub
@ -9470,7 +9502,7 @@ Namespace DD_ECMAdminTableAdapters
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"), _
Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Insert, True)> _
Public Overridable Overloads Function Insert(ByVal NAME As String, ByVal COMMENT As String, ByVal TableName As String, ByVal Host As String, ByVal SystemNumber As String, ByVal UserName As String, ByVal Password As String, ByVal Client As String, ByVal Language As String, ByVal TempTableName As String, ByVal ACTIVE As Boolean, ByVal ADDED_WHO As String, ByVal WHERE_CLAUSE As String) As Integer
Public Overridable Overloads Function Insert(ByVal NAME As String, ByVal COMMENT As String, ByVal TableName As String, ByVal Host As String, ByVal SystemNumber As String, ByVal UserName As String, ByVal Password As String, ByVal Client As String, ByVal Language As String, ByVal TempTableName As String, ByVal ACTIVE As Boolean, ByVal ADDED_WHO As String, ByVal WHERE_CLAUSE As String, ByVal Method As String) As Integer
If (NAME Is Nothing) Then
Throw New Global.System.ArgumentNullException("NAME")
Else
@ -9532,6 +9564,11 @@ Namespace DD_ECMAdminTableAdapters
Else
Me.Adapter.InsertCommand.Parameters(12).Value = CType(WHERE_CLAUSE, String)
End If
If (Method Is Nothing) Then
Throw New Global.System.ArgumentNullException("Method")
Else
Me.Adapter.InsertCommand.Parameters(13).Value = CType(Method, String)
End If
Dim previousConnectionState As Global.System.Data.ConnectionState = Me.Adapter.InsertCommand.Connection.State
If ((Me.Adapter.InsertCommand.Connection.State And Global.System.Data.ConnectionState.Open) _
<> Global.System.Data.ConnectionState.Open) Then
@ -9551,7 +9588,23 @@ Namespace DD_ECMAdminTableAdapters
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0"), _
Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"), _
Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Update, True)> _
Public Overridable Overloads Function Update(ByVal NAME As String, ByVal COMMENT As String, ByVal TableName As String, ByVal Host As String, ByVal SystemNumber As String, ByVal UserName As String, ByVal Password As String, ByVal Client As String, ByVal Language As String, ByVal TempTableName As String, ByVal ACTIVE As Boolean, ByVal CHANGED_WHO As String, ByVal WHERE_CLAUSE As String, ByVal Original_GUID As Integer, ByVal GUID As Integer) As Integer
Public Overridable Overloads Function Update( _
ByVal NAME As String, _
ByVal COMMENT As String, _
ByVal TableName As String, _
ByVal Host As String, _
ByVal SystemNumber As String, _
ByVal UserName As String, _
ByVal Password As String, _
ByVal Client As String, _
ByVal Language As String, _
ByVal TempTableName As String, _
ByVal ACTIVE As Boolean, _
ByVal CHANGED_WHO As String, _
ByVal WHERE_CLAUSE As String, _
ByVal Method As String, _
ByVal Original_GUID As Integer, _
ByVal GUID As Integer) As Integer
If (NAME Is Nothing) Then
Throw New Global.System.ArgumentNullException("NAME")
Else
@ -9613,8 +9666,13 @@ Namespace DD_ECMAdminTableAdapters
Else
Me.Adapter.UpdateCommand.Parameters(12).Value = CType(WHERE_CLAUSE, String)
End If
Me.Adapter.UpdateCommand.Parameters(13).Value = CType(Original_GUID, Integer)
Me.Adapter.UpdateCommand.Parameters(14).Value = CType(GUID, Integer)
If (Method Is Nothing) Then
Throw New Global.System.ArgumentNullException("Method")
Else
Me.Adapter.UpdateCommand.Parameters(13).Value = CType(Method, String)
End If
Me.Adapter.UpdateCommand.Parameters(14).Value = CType(Original_GUID, Integer)
Me.Adapter.UpdateCommand.Parameters(15).Value = CType(GUID, Integer)
Dim previousConnectionState As Global.System.Data.ConnectionState = Me.Adapter.UpdateCommand.Connection.State
If ((Me.Adapter.UpdateCommand.Connection.State And Global.System.Data.ConnectionState.Open) _
<> Global.System.Data.ConnectionState.Open) Then
@ -9663,7 +9721,7 @@ Namespace DD_ECMAdminTableAdapters
Return Me._updateOrder
End Get
Set(value As UpdateOrderOption)
Me._updateOrder = Value
Me._updateOrder = value
End Set
End Property
@ -9677,7 +9735,7 @@ Namespace DD_ECMAdminTableAdapters
Return Me._tBPMO_FORM_CONSTRUCTORTableAdapter
End Get
Set(value As TBPMO_FORM_CONSTRUCTORTableAdapter)
Me._tBPMO_FORM_CONSTRUCTORTableAdapter = Value
Me._tBPMO_FORM_CONSTRUCTORTableAdapter = value
End Set
End Property
@ -9691,7 +9749,7 @@ Namespace DD_ECMAdminTableAdapters
Return Me._tBPMO_FORM_CONSTRUCTOR_DETAILTableAdapter
End Get
Set(value As TBPMO_FORM_CONSTRUCTOR_DETAILTableAdapter)
Me._tBPMO_FORM_CONSTRUCTOR_DETAILTableAdapter = Value
Me._tBPMO_FORM_CONSTRUCTOR_DETAILTableAdapter = value
End Set
End Property
@ -9705,7 +9763,7 @@ Namespace DD_ECMAdminTableAdapters
Return Me._tBDD_CONNECTIONTableAdapter
End Get
Set(value As TBDD_CONNECTIONTableAdapter)
Me._tBDD_CONNECTIONTableAdapter = Value
Me._tBDD_CONNECTIONTableAdapter = value
End Set
End Property
@ -9719,7 +9777,7 @@ Namespace DD_ECMAdminTableAdapters
Return Me._tBPMO_SAP_FUBATableAdapter
End Get
Set(value As TBPMO_SAP_FUBATableAdapter)
Me._tBPMO_SAP_FUBATableAdapter = Value
Me._tBPMO_SAP_FUBATableAdapter = value
End Set
End Property
@ -9730,7 +9788,7 @@ Namespace DD_ECMAdminTableAdapters
Return Me._backupDataSetBeforeUpdate
End Get
Set(value As Boolean)
Me._backupDataSetBeforeUpdate = Value
Me._backupDataSetBeforeUpdate = value
End Set
End Property
@ -9761,7 +9819,7 @@ Namespace DD_ECMAdminTableAdapters
Return Nothing
End Get
Set(value As Global.System.Data.IDbConnection)
Me._connection = Value
Me._connection = value
End Set
End Property

12
app/DD-Record-Organiser/DD_ECMAdmin.xsc
View File

@ -48,18 +48,14 @@
<TableUISetting Name="TBPMO_SAP_FUBA">
<ColumnUISettings>
<ColumnUISetting Name="ADDED_WHEN">
<ControlSettings>
<ControlSetting ArtifactName="Microsoft:System.Windows.Forms:Form">
<ControlSettings><ControlSetting ArtifactName="Microsoft:System.Windows.Forms:Form" xmlns="urn:schemas-microsoft-com:xml-msdatasource">
<BindableControlInfo Name="TextBox" Type="System.Windows.Forms.TextBox" AssemblyName="System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" />
</ControlSetting>
</ControlSettings>
</ControlSetting></ControlSettings>
</ColumnUISetting>
<ColumnUISetting Name="CHANGED_WHEN">
<ControlSettings>
<ControlSetting ArtifactName="Microsoft:System.Windows.Forms:Form">
<ControlSettings><ControlSetting ArtifactName="Microsoft:System.Windows.Forms:Form" xmlns="urn:schemas-microsoft-com:xml-msdatasource">
<BindableControlInfo Name="TextBox" Type="System.Windows.Forms.TextBox" AssemblyName="System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" />
</ControlSetting>
</ControlSettings>
</ControlSetting></ControlSettings>
</ColumnUISetting>
</ColumnUISettings>
</TableUISetting>

44
app/DD-Record-Organiser/DD_ECMAdmin.xsd
View File

@ -369,8 +369,8 @@ WHERE (GUID = @Original_GUID)</CommandText>
<InsertCommand>
<DbCommand CommandType="Text" ModifiedByUser="true">
<CommandText>INSERT INTO TBPMO_SAP_FUBA
(NAME, COMMENT, TableName, Host, SystemNumber, UserName, Password, Client, Language, TempTableName, ACTIVE, ADDED_WHO, WHERE_CLAUSE)
VALUES (@NAME,@COMMENT,@TableName,@Host,@SystemNumber,@UserName,@Password,@Client,@Language,@TempTableName,@ACTIVE,@ADDED_WHO,@WHERE_CLAUSE);
(NAME, COMMENT, TableName, Host, SystemNumber, UserName, Password, Client, Language, TempTableName, ACTIVE, ADDED_WHO, WHERE_CLAUSE, Method)
VALUES (@NAME,@COMMENT,@TableName,@Host,@SystemNumber,@UserName,@Password,@Client,@Language,@TempTableName,@ACTIVE,@ADDED_WHO,@WHERE_CLAUSE,@Method);
SELECT GUID, NAME, COMMENT, TableName, Host, SystemNumber, UserName, Password, Client, Language, TempTableName, ACTIVE, ADDED_WHO, ADDED_WHEN, CHANGED_WHO, CHANGED_WHEN FROM TBPMO_SAP_FUBA WHERE (GUID = SCOPE_IDENTITY())</CommandText>
<Parameters>
<Parameter AllowDbNull="false" AutogeneratedName="NAME" ColumnName="NAME" DataSourceName="DD_ECM.dbo.TBPMO_SAP_FUBA" DataTypeServer="varchar(100)" DbType="AnsiString" Direction="Input" ParameterName="@NAME" Precision="0" ProviderType="VarChar" Scale="0" Size="100" SourceColumn="NAME" SourceColumnNullMapping="false" SourceVersion="Current" />
@ -386,13 +386,14 @@ SELECT GUID, NAME, COMMENT, TableName, Host, SystemNumber, UserName, Password, C
<Parameter AllowDbNull="false" AutogeneratedName="ACTIVE" ColumnName="ACTIVE" DataSourceName="DD_ECM.dbo.TBPMO_SAP_FUBA" DataTypeServer="bit" DbType="Boolean" Direction="Input" ParameterName="@ACTIVE" Precision="0" ProviderType="Bit" Scale="0" Size="1" SourceColumn="ACTIVE" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="ADDED_WHO" ColumnName="ADDED_WHO" DataSourceName="DD_ECM.dbo.TBPMO_SAP_FUBA" DataTypeServer="varchar(50)" DbType="AnsiString" Direction="Input" ParameterName="@ADDED_WHO" Precision="0" ProviderType="VarChar" Scale="0" Size="50" SourceColumn="ADDED_WHO" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="true" AutogeneratedName="WHERE_CLAUSE" ColumnName="WHERE_CLAUSE" DataSourceName="DD_ECM.dbo.TBPMO_SAP_FUBA" DataTypeServer="varchar(500)" DbType="AnsiString" Direction="Input" ParameterName="@WHERE_CLAUSE" Precision="0" ProviderType="VarChar" Scale="0" Size="500" SourceColumn="WHERE_CLAUSE" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="Method" ColumnName="Method" DataSourceName="DD_ECM.dbo.TBPMO_SAP_FUBA" DataTypeServer="varchar(50)" DbType="AnsiString" Direction="Input" ParameterName="@Method" Precision="0" ProviderType="VarChar" Scale="0" Size="50" SourceColumn="Method" SourceColumnNullMapping="false" SourceVersion="Current" />
</Parameters>
</DbCommand>
</InsertCommand>
<SelectCommand>
<DbCommand CommandType="Text" ModifiedByUser="false">
<CommandText>SELECT GUID, NAME, COMMENT, TableName, Host, SystemNumber, UserName, Password, Client, Language, TempTableName, WHERE_CLAUSE, ACTIVE, ADDED_WHO, ADDED_WHEN, CHANGED_WHO,
CHANGED_WHEN
CHANGED_WHEN, Method
FROM TBPMO_SAP_FUBA</CommandText>
<Parameters />
</DbCommand>
@ -401,8 +402,8 @@ FROM TBPMO_SAP_FUBA</CommandText>
<DbCommand CommandType="Text" ModifiedByUser="true">
<CommandText>UPDATE TBPMO_SAP_FUBA
SET NAME = @NAME, COMMENT = @COMMENT, TableName = @TableName, Host = @Host, SystemNumber = @SystemNumber, UserName = @UserName, Password = @Password, Client = @Client,
Language = @Language, TempTableName = @TempTableName, ACTIVE = @ACTIVE, CHANGED_WHO = @CHANGED_WHO, WHERE_CLAUSE = @WHERE_CLAUSE
WHERE (GUID = @Original_GUID);
Language = @Language, TempTableName = @TempTableName, ACTIVE = @ACTIVE, CHANGED_WHO = @CHANGED_WHO, WHERE_CLAUSE = @WHERE_CLAUSE, Method = @Method
WHERE (GUID = @Original_GUID);
SELECT GUID, NAME, COMMENT, TableName, Host, SystemNumber, UserName, Password, Client, Language, TempTableName, ACTIVE, ADDED_WHO, ADDED_WHEN, CHANGED_WHO, CHANGED_WHEN FROM TBPMO_SAP_FUBA WHERE (GUID = @GUID)</CommandText>
<Parameters>
<Parameter AllowDbNull="false" AutogeneratedName="NAME" ColumnName="NAME" DataSourceName="DD_ECM.dbo.TBPMO_SAP_FUBA" DataTypeServer="varchar(100)" DbType="AnsiString" Direction="Input" ParameterName="@NAME" Precision="0" ProviderType="VarChar" Scale="0" Size="100" SourceColumn="NAME" SourceColumnNullMapping="false" SourceVersion="Current" />
@ -418,6 +419,7 @@ SELECT GUID, NAME, COMMENT, TableName, Host, SystemNumber, UserName, Password, C
<Parameter AllowDbNull="false" AutogeneratedName="ACTIVE" ColumnName="ACTIVE" DataSourceName="DD_ECM.dbo.TBPMO_SAP_FUBA" DataTypeServer="bit" DbType="Boolean" Direction="Input" ParameterName="@ACTIVE" Precision="0" ProviderType="Bit" Scale="0" Size="1" SourceColumn="ACTIVE" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="true" AutogeneratedName="CHANGED_WHO" ColumnName="CHANGED_WHO" DataSourceName="DD_ECM.dbo.TBPMO_SAP_FUBA" DataTypeServer="varchar(50)" DbType="AnsiString" Direction="Input" ParameterName="@CHANGED_WHO" Precision="0" ProviderType="VarChar" Scale="0" Size="50" SourceColumn="CHANGED_WHO" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="true" AutogeneratedName="WHERE_CLAUSE" ColumnName="WHERE_CLAUSE" DataSourceName="DD_ECM.dbo.TBPMO_SAP_FUBA" DataTypeServer="varchar(500)" DbType="AnsiString" Direction="Input" ParameterName="@WHERE_CLAUSE" Precision="0" ProviderType="VarChar" Scale="0" Size="500" SourceColumn="WHERE_CLAUSE" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="Method" ColumnName="Method" DataSourceName="DD_ECM.dbo.TBPMO_SAP_FUBA" DataTypeServer="varchar(50)" DbType="AnsiString" Direction="Input" ParameterName="@Method" Precision="0" ProviderType="VarChar" Scale="0" Size="50" SourceColumn="Method" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="false" AutogeneratedName="Original_GUID" ColumnName="GUID" DataSourceName="DD_ECM.dbo.TBPMO_SAP_FUBA" DataTypeServer="int" DbType="Int32" Direction="Input" ParameterName="@Original_GUID" Precision="0" ProviderType="Int" Scale="0" Size="4" SourceColumn="GUID" SourceColumnNullMapping="false" SourceVersion="Original" />
<Parameter AllowDbNull="false" AutogeneratedName="GUID" ColumnName="GUID" DataSourceName="DD_ECM.dbo.TBPMO_SAP_FUBA" DataTypeServer="int" DbType="Int32" Direction="Input" ParameterName="@GUID" Precision="0" ProviderType="Int" Scale="0" Size="4" SourceColumn="GUID" SourceColumnNullMapping="false" SourceVersion="Original" />
</Parameters>
@ -443,6 +445,7 @@ SELECT GUID, NAME, COMMENT, TableName, Host, SystemNumber, UserName, Password, C
<Mapping SourceColumn="CHANGED_WHO" DataSetColumn="CHANGED_WHO" />
<Mapping SourceColumn="CHANGED_WHEN" DataSetColumn="CHANGED_WHEN" />
<Mapping SourceColumn="WHERE_CLAUSE" DataSetColumn="WHERE_CLAUSE" />
<Mapping SourceColumn="Method" DataSetColumn="Method" />
</Mappings>
<Sources />
</TableAdapter>
@ -454,7 +457,7 @@ SELECT GUID, NAME, COMMENT, TableName, Host, SystemNumber, UserName, Password, C
<xs:element name="DD_ECMAdmin" msdata:IsDataSet="true" msdata:UseCurrentLocale="true" msprop:EnableTableAdapterManager="true" msprop:Generator_DataSetName="DD_ECMAdmin" msprop:Generator_UserDSName="DD_ECMAdmin">
<xs:complexType>
<xs:choice minOccurs="0" maxOccurs="unbounded">
<xs:element name="TBPMO_FORM_CONSTRUCTOR" msprop:Generator_TableClassName="TBPMO_FORM_CONSTRUCTORDataTable" msprop:Generator_TableVarName="tableTBPMO_FORM_CONSTRUCTOR" msprop:Generator_RowChangedName="TBPMO_FORM_CONSTRUCTORRowChanged" msprop:Generator_TablePropName="TBPMO_FORM_CONSTRUCTOR" msprop:Generator_RowDeletingName="TBPMO_FORM_CONSTRUCTORRowDeleting" msprop:Generator_RowChangingName="TBPMO_FORM_CONSTRUCTORRowChanging" msprop:Generator_RowEvHandlerName="TBPMO_FORM_CONSTRUCTORRowChangeEventHandler" msprop:Generator_RowDeletedName="TBPMO_FORM_CONSTRUCTORRowDeleted" msprop:Generator_RowClassName="TBPMO_FORM_CONSTRUCTORRow" msprop:Generator_UserTableName="TBPMO_FORM_CONSTRUCTOR" msprop:Generator_RowEvArgName="TBPMO_FORM_CONSTRUCTORRowChangeEvent">
<xs:element name="TBPMO_FORM_CONSTRUCTOR" msprop:Generator_TableClassName="TBPMO_FORM_CONSTRUCTORDataTable" msprop:Generator_TableVarName="tableTBPMO_FORM_CONSTRUCTOR" msprop:Generator_TablePropName="TBPMO_FORM_CONSTRUCTOR" msprop:Generator_RowDeletingName="TBPMO_FORM_CONSTRUCTORRowDeleting" msprop:Generator_RowChangingName="TBPMO_FORM_CONSTRUCTORRowChanging" msprop:Generator_RowEvHandlerName="TBPMO_FORM_CONSTRUCTORRowChangeEventHandler" msprop:Generator_RowDeletedName="TBPMO_FORM_CONSTRUCTORRowDeleted" msprop:Generator_UserTableName="TBPMO_FORM_CONSTRUCTOR" msprop:Generator_RowChangedName="TBPMO_FORM_CONSTRUCTORRowChanged" msprop:Generator_RowEvArgName="TBPMO_FORM_CONSTRUCTORRowChangeEvent" msprop:Generator_RowClassName="TBPMO_FORM_CONSTRUCTORRow">
<xs:complexType>
<xs:sequence>
<xs:element name="GUID" msdata:ReadOnly="true" msdata:AutoIncrement="true" msprop:Generator_ColumnVarNameInTable="columnGUID" msprop:Generator_ColumnPropNameInRow="GUID" msprop:Generator_ColumnPropNameInTable="GUIDColumn" msprop:Generator_UserColumnName="GUID" type="xs:int" />
@ -500,7 +503,7 @@ SELECT GUID, NAME, COMMENT, TableName, Host, SystemNumber, UserName, Password, C
</xs:sequence>
</xs:complexType>
</xs:element>
<xs:element name="TBPMO_FORM_CONSTRUCTOR_DETAIL" msprop:Generator_TableClassName="TBPMO_FORM_CONSTRUCTOR_DETAILDataTable" msprop:Generator_TableVarName="tableTBPMO_FORM_CONSTRUCTOR_DETAIL" msprop:Generator_RowChangedName="TBPMO_FORM_CONSTRUCTOR_DETAILRowChanged" msprop:Generator_TablePropName="TBPMO_FORM_CONSTRUCTOR_DETAIL" msprop:Generator_RowDeletingName="TBPMO_FORM_CONSTRUCTOR_DETAILRowDeleting" msprop:Generator_RowChangingName="TBPMO_FORM_CONSTRUCTOR_DETAILRowChanging" msprop:Generator_RowEvHandlerName="TBPMO_FORM_CONSTRUCTOR_DETAILRowChangeEventHandler" msprop:Generator_RowDeletedName="TBPMO_FORM_CONSTRUCTOR_DETAILRowDeleted" msprop:Generator_RowClassName="TBPMO_FORM_CONSTRUCTOR_DETAILRow" msprop:Generator_UserTableName="TBPMO_FORM_CONSTRUCTOR_DETAIL" msprop:Generator_RowEvArgName="TBPMO_FORM_CONSTRUCTOR_DETAILRowChangeEvent">
<xs:element name="TBPMO_FORM_CONSTRUCTOR_DETAIL" msprop:Generator_TableClassName="TBPMO_FORM_CONSTRUCTOR_DETAILDataTable" msprop:Generator_TableVarName="tableTBPMO_FORM_CONSTRUCTOR_DETAIL" msprop:Generator_TablePropName="TBPMO_FORM_CONSTRUCTOR_DETAIL" msprop:Generator_RowDeletingName="TBPMO_FORM_CONSTRUCTOR_DETAILRowDeleting" msprop:Generator_RowChangingName="TBPMO_FORM_CONSTRUCTOR_DETAILRowChanging" msprop:Generator_RowEvHandlerName="TBPMO_FORM_CONSTRUCTOR_DETAILRowChangeEventHandler" msprop:Generator_RowDeletedName="TBPMO_FORM_CONSTRUCTOR_DETAILRowDeleted" msprop:Generator_UserTableName="TBPMO_FORM_CONSTRUCTOR_DETAIL" msprop:Generator_RowChangedName="TBPMO_FORM_CONSTRUCTOR_DETAILRowChanged" msprop:Generator_RowEvArgName="TBPMO_FORM_CONSTRUCTOR_DETAILRowChangeEvent" msprop:Generator_RowClassName="TBPMO_FORM_CONSTRUCTOR_DETAILRow">
<xs:complexType>
<xs:sequence>
<xs:element name="GUID" msdata:ReadOnly="true" msdata:AutoIncrement="true" msprop:Generator_ColumnVarNameInTable="columnGUID" msprop:Generator_ColumnPropNameInRow="GUID" msprop:Generator_ColumnPropNameInTable="GUIDColumn" msprop:Generator_UserColumnName="GUID" type="xs:int" />
@ -621,7 +624,7 @@ SELECT GUID, NAME, COMMENT, TableName, Host, SystemNumber, UserName, Password, C
</xs:sequence>
</xs:complexType>
</xs:element>
<xs:element name="TBDD_CONNECTION" msprop:Generator_TableClassName="TBDD_CONNECTIONDataTable" msprop:Generator_TableVarName="tableTBDD_CONNECTION" msprop:Generator_TablePropName="TBDD_CONNECTION" msprop:Generator_RowDeletingName="TBDD_CONNECTIONRowDeleting" msprop:Generator_RowChangingName="TBDD_CONNECTIONRowChanging" msprop:Generator_RowEvHandlerName="TBDD_CONNECTIONRowChangeEventHandler" msprop:Generator_RowDeletedName="TBDD_CONNECTIONRowDeleted" msprop:Generator_UserTableName="TBDD_CONNECTION" msprop:Generator_RowChangedName="TBDD_CONNECTIONRowChanged" msprop:Generator_RowEvArgName="TBDD_CONNECTIONRowChangeEvent" msprop:Generator_RowClassName="TBDD_CONNECTIONRow">
<xs:element name="TBDD_CONNECTION" msprop:Generator_TableClassName="TBDD_CONNECTIONDataTable" msprop:Generator_TableVarName="tableTBDD_CONNECTION" msprop:Generator_RowChangedName="TBDD_CONNECTIONRowChanged" msprop:Generator_TablePropName="TBDD_CONNECTION" msprop:Generator_RowDeletingName="TBDD_CONNECTIONRowDeleting" msprop:Generator_RowChangingName="TBDD_CONNECTIONRowChanging" msprop:Generator_RowEvHandlerName="TBDD_CONNECTIONRowChangeEventHandler" msprop:Generator_RowDeletedName="TBDD_CONNECTIONRowDeleted" msprop:Generator_RowClassName="TBDD_CONNECTIONRow" msprop:Generator_UserTableName="TBDD_CONNECTION" msprop:Generator_RowEvArgName="TBDD_CONNECTIONRowChangeEvent">
<xs:complexType>
<xs:sequence>
<xs:element name="GUID" msdata:ReadOnly="true" msdata:AutoIncrement="true" msprop:Generator_ColumnVarNameInTable="columnGUID" msprop:Generator_ColumnPropNameInRow="GUID" msprop:Generator_ColumnPropNameInTable="GUIDColumn" msprop:Generator_UserColumnName="GUID" type="xs:short" />
@ -694,14 +697,14 @@ SELECT GUID, NAME, COMMENT, TableName, Host, SystemNumber, UserName, Password, C
</xs:sequence>
</xs:complexType>
</xs:element>
<xs:element name="DT_VORSCHAU" msprop:Generator_TableClassName="DT_VORSCHAUDataTable" msprop:Generator_TableVarName="tableDT_VORSCHAU" msprop:Generator_RowChangedName="DT_VORSCHAURowChanged" msprop:Generator_TablePropName="DT_VORSCHAU" msprop:Generator_RowDeletingName="DT_VORSCHAURowDeleting" msprop:Generator_RowChangingName="DT_VORSCHAURowChanging" msprop:Generator_RowEvHandlerName="DT_VORSCHAURowChangeEventHandler" msprop:Generator_RowDeletedName="DT_VORSCHAURowDeleted" msprop:Generator_RowClassName="DT_VORSCHAURow" msprop:Generator_UserTableName="DT_VORSCHAU" msprop:Generator_RowEvArgName="DT_VORSCHAURowChangeEvent">
<xs:element name="DT_VORSCHAU" msprop:Generator_TableClassName="DT_VORSCHAUDataTable" msprop:Generator_TableVarName="tableDT_VORSCHAU" msprop:Generator_TablePropName="DT_VORSCHAU" msprop:Generator_RowDeletingName="DT_VORSCHAURowDeleting" msprop:Generator_RowChangingName="DT_VORSCHAURowChanging" msprop:Generator_RowEvHandlerName="DT_VORSCHAURowChangeEventHandler" msprop:Generator_RowDeletedName="DT_VORSCHAURowDeleted" msprop:Generator_UserTableName="DT_VORSCHAU" msprop:Generator_RowChangedName="DT_VORSCHAURowChanged" msprop:Generator_RowEvArgName="DT_VORSCHAURowChangeEvent" msprop:Generator_RowClassName="DT_VORSCHAURow">
<xs:complexType>
<xs:sequence>
<xs:element name="VALUE" msprop:Generator_ColumnVarNameInTable="columnVALUE" msprop:Generator_ColumnPropNameInRow="VALUE" msprop:Generator_ColumnPropNameInTable="VALUEColumn" msprop:Generator_UserColumnName="VALUE" type="xs:string" minOccurs="0" />
</xs:sequence>
</xs:complexType>
</xs:element>
<xs:element name="VWTEMPQUICKVIEW" msprop:Generator_TableClassName="VWTEMPQUICKVIEWDataTable" msprop:Generator_TableVarName="tableVWTEMPQUICKVIEW" msprop:Generator_TablePropName="VWTEMPQUICKVIEW" msprop:Generator_RowDeletingName="VWTEMPQUICKVIEWRowDeleting" msprop:Generator_RowChangingName="VWTEMPQUICKVIEWRowChanging" msprop:Generator_RowEvHandlerName="VWTEMPQUICKVIEWRowChangeEventHandler" msprop:Generator_RowDeletedName="VWTEMPQUICKVIEWRowDeleted" msprop:Generator_UserTableName="VWTEMPQUICKVIEW" msprop:Generator_RowChangedName="VWTEMPQUICKVIEWRowChanged" msprop:Generator_RowEvArgName="VWTEMPQUICKVIEWRowChangeEvent" msprop:Generator_RowClassName="VWTEMPQUICKVIEWRow">
<xs:element name="VWTEMPQUICKVIEW" msprop:Generator_TableClassName="VWTEMPQUICKVIEWDataTable" msprop:Generator_TableVarName="tableVWTEMPQUICKVIEW" msprop:Generator_RowChangedName="VWTEMPQUICKVIEWRowChanged" msprop:Generator_TablePropName="VWTEMPQUICKVIEW" msprop:Generator_RowDeletingName="VWTEMPQUICKVIEWRowDeleting" msprop:Generator_RowChangingName="VWTEMPQUICKVIEWRowChanging" msprop:Generator_RowEvHandlerName="VWTEMPQUICKVIEWRowChangeEventHandler" msprop:Generator_RowDeletedName="VWTEMPQUICKVIEWRowDeleted" msprop:Generator_RowClassName="VWTEMPQUICKVIEWRow" msprop:Generator_UserTableName="VWTEMPQUICKVIEW" msprop:Generator_RowEvArgName="VWTEMPQUICKVIEWRowChangeEvent">
<xs:complexType>
<xs:sequence>
<xs:element name="Record-ID" msprop:Generator_ColumnVarNameInTable="_columnRecord_ID" msprop:Generator_ColumnPropNameInRow="_Record_ID" msprop:Generator_ColumnPropNameInTable="_Record_IDColumn" msprop:Generator_UserColumnName="Record-ID" type="xs:int" />
@ -730,7 +733,7 @@ SELECT GUID, NAME, COMMENT, TableName, Host, SystemNumber, UserName, Password, C
</xs:sequence>
</xs:complexType>
</xs:element>
<xs:element name="TBAD_Users" msprop:Generator_TableClassName="TBAD_UsersDataTable" msprop:Generator_TableVarName="tableTBAD_Users" msprop:Generator_RowChangedName="TBAD_UsersRowChanged" msprop:Generator_TablePropName="TBAD_Users" msprop:Generator_RowDeletingName="TBAD_UsersRowDeleting" msprop:Generator_RowChangingName="TBAD_UsersRowChanging" msprop:Generator_RowEvHandlerName="TBAD_UsersRowChangeEventHandler" msprop:Generator_RowDeletedName="TBAD_UsersRowDeleted" msprop:Generator_RowClassName="TBAD_UsersRow" msprop:Generator_UserTableName="TBAD_Users" msprop:Generator_RowEvArgName="TBAD_UsersRowChangeEvent">
<xs:element name="TBAD_Users" msprop:Generator_TableClassName="TBAD_UsersDataTable" msprop:Generator_TableVarName="tableTBAD_Users" msprop:Generator_TablePropName="TBAD_Users" msprop:Generator_RowDeletingName="TBAD_UsersRowDeleting" msprop:Generator_RowChangingName="TBAD_UsersRowChanging" msprop:Generator_RowEvHandlerName="TBAD_UsersRowChangeEventHandler" msprop:Generator_RowDeletedName="TBAD_UsersRowDeleted" msprop:Generator_UserTableName="TBAD_Users" msprop:Generator_RowChangedName="TBAD_UsersRowChanged" msprop:Generator_RowEvArgName="TBAD_UsersRowChangeEvent" msprop:Generator_RowClassName="TBAD_UsersRow">
<xs:complexType>
<xs:sequence>
<xs:element name="Select" msprop:Generator_ColumnVarNameInTable="columnSelect" msprop:Generator_ColumnPropNameInRow="_Select" msprop:Generator_ColumnPropNameInTable="SelectColumn" msprop:Generator_UserColumnName="Select" type="xs:boolean" default="false" minOccurs="0" />
@ -742,7 +745,7 @@ SELECT GUID, NAME, COMMENT, TableName, Host, SystemNumber, UserName, Password, C
</xs:sequence>
</xs:complexType>
</xs:element>
<xs:element name="TBWH_ENTITIES" msprop:Generator_TableClassName="TBWH_ENTITIESDataTable" msprop:Generator_TableVarName="tableTBWH_ENTITIES" msprop:Generator_TablePropName="TBWH_ENTITIES" msprop:Generator_RowDeletingName="TBWH_ENTITIESRowDeleting" msprop:Generator_RowChangingName="TBWH_ENTITIESRowChanging" msprop:Generator_RowEvHandlerName="TBWH_ENTITIESRowChangeEventHandler" msprop:Generator_RowDeletedName="TBWH_ENTITIESRowDeleted" msprop:Generator_UserTableName="TBWH_ENTITIES" msprop:Generator_RowChangedName="TBWH_ENTITIESRowChanged" msprop:Generator_RowEvArgName="TBWH_ENTITIESRowChangeEvent" msprop:Generator_RowClassName="TBWH_ENTITIESRow">
<xs:element name="TBWH_ENTITIES" msprop:Generator_TableClassName="TBWH_ENTITIESDataTable" msprop:Generator_TableVarName="tableTBWH_ENTITIES" msprop:Generator_RowChangedName="TBWH_ENTITIESRowChanged" msprop:Generator_TablePropName="TBWH_ENTITIES" msprop:Generator_RowDeletingName="TBWH_ENTITIESRowDeleting" msprop:Generator_RowChangingName="TBWH_ENTITIESRowChanging" msprop:Generator_RowEvHandlerName="TBWH_ENTITIESRowChangeEventHandler" msprop:Generator_RowDeletedName="TBWH_ENTITIESRowDeleted" msprop:Generator_RowClassName="TBWH_ENTITIESRow" msprop:Generator_UserTableName="TBWH_ENTITIES" msprop:Generator_RowEvArgName="TBWH_ENTITIESRowChangeEvent">
<xs:complexType>
<xs:sequence>
<xs:element name="GUID" msdata:ReadOnly="true" msdata:AutoIncrement="true" msdata:AutoIncrementSeed="-1" msdata:AutoIncrementStep="-1" msprop:Generator_ColumnVarNameInTable="columnGUID" msprop:Generator_ColumnPropNameInRow="GUID" msprop:Generator_ColumnPropNameInTable="GUIDColumn" msprop:Generator_UserColumnName="GUID" type="xs:int" />
@ -763,7 +766,7 @@ SELECT GUID, NAME, COMMENT, TableName, Host, SystemNumber, UserName, Password, C
</xs:sequence>
</xs:complexType>
</xs:element>
<xs:element name="TBWH_USER_GROUPS" msprop:Generator_TableClassName="TBWH_USER_GROUPSDataTable" msprop:Generator_TableVarName="tableTBWH_USER_GROUPS" msprop:Generator_TablePropName="TBWH_USER_GROUPS" msprop:Generator_RowDeletingName="TBWH_USER_GROUPSRowDeleting" msprop:Generator_RowChangingName="TBWH_USER_GROUPSRowChanging" msprop:Generator_RowEvHandlerName="TBWH_USER_GROUPSRowChangeEventHandler" msprop:Generator_RowDeletedName="TBWH_USER_GROUPSRowDeleted" msprop:Generator_UserTableName="TBWH_USER_GROUPS" msprop:Generator_RowChangedName="TBWH_USER_GROUPSRowChanged" msprop:Generator_RowEvArgName="TBWH_USER_GROUPSRowChangeEvent" msprop:Generator_RowClassName="TBWH_USER_GROUPSRow">
<xs:element name="TBWH_USER_GROUPS" msprop:Generator_TableClassName="TBWH_USER_GROUPSDataTable" msprop:Generator_TableVarName="tableTBWH_USER_GROUPS" msprop:Generator_RowChangedName="TBWH_USER_GROUPSRowChanged" msprop:Generator_TablePropName="TBWH_USER_GROUPS" msprop:Generator_RowDeletingName="TBWH_USER_GROUPSRowDeleting" msprop:Generator_RowChangingName="TBWH_USER_GROUPSRowChanging" msprop:Generator_RowEvHandlerName="TBWH_USER_GROUPSRowChangeEventHandler" msprop:Generator_RowDeletedName="TBWH_USER_GROUPSRowDeleted" msprop:Generator_RowClassName="TBWH_USER_GROUPSRow" msprop:Generator_UserTableName="TBWH_USER_GROUPS" msprop:Generator_RowEvArgName="TBWH_USER_GROUPSRowChangeEvent">
<xs:complexType>
<xs:sequence>
<xs:element name="GUID" msdata:ReadOnly="true" msdata:AutoIncrement="true" msdata:AutoIncrementSeed="-1" msdata:AutoIncrementStep="-1" msprop:Generator_ColumnVarNameInTable="columnGUID" msprop:Generator_ColumnPropNameInRow="GUID" msprop:Generator_ColumnPropNameInTable="GUIDColumn" msprop:Generator_UserColumnName="GUID" type="xs:int" />
@ -777,7 +780,7 @@ SELECT GUID, NAME, COMMENT, TableName, Host, SystemNumber, UserName, Password, C
</xs:sequence>
</xs:complexType>
</xs:element>
<xs:element name="TBWH_Users1" msprop:Generator_TableClassName="TBWH_Users1DataTable" msprop:Generator_TableVarName="tableTBWH_Users1" msprop:Generator_TablePropName="TBWH_Users1" msprop:Generator_RowDeletingName="TBWH_Users1RowDeleting" msprop:Generator_RowChangingName="TBWH_Users1RowChanging" msprop:Generator_RowEvHandlerName="TBWH_Users1RowChangeEventHandler" msprop:Generator_RowDeletedName="TBWH_Users1RowDeleted" msprop:Generator_UserTableName="TBWH_Users1" msprop:Generator_RowChangedName="TBWH_Users1RowChanged" msprop:Generator_RowEvArgName="TBWH_Users1RowChangeEvent" msprop:Generator_RowClassName="TBWH_Users1Row">
<xs:element name="TBWH_Users1" msprop:Generator_TableClassName="TBWH_Users1DataTable" msprop:Generator_TableVarName="tableTBWH_Users1" msprop:Generator_RowChangedName="TBWH_Users1RowChanged" msprop:Generator_TablePropName="TBWH_Users1" msprop:Generator_RowDeletingName="TBWH_Users1RowDeleting" msprop:Generator_RowChangingName="TBWH_Users1RowChanging" msprop:Generator_RowEvHandlerName="TBWH_Users1RowChangeEventHandler" msprop:Generator_RowDeletedName="TBWH_Users1RowDeleted" msprop:Generator_RowClassName="TBWH_Users1Row" msprop:Generator_UserTableName="TBWH_Users1" msprop:Generator_RowEvArgName="TBWH_Users1RowChangeEvent">
<xs:complexType>
<xs:sequence>
<xs:element name="Select" msprop:Generator_ColumnVarNameInTable="columnSelect" msprop:Generator_ColumnPropNameInRow="_Select" msprop:Generator_ColumnPropNameInTable="SelectColumn" msprop:Generator_UserColumnName="Select" type="xs:boolean" default="false" minOccurs="0" />
@ -789,7 +792,7 @@ SELECT GUID, NAME, COMMENT, TableName, Host, SystemNumber, UserName, Password, C
</xs:sequence>
</xs:complexType>
</xs:element>
<xs:element name="TBWH_Users2" msprop:Generator_TableClassName="TBWH_Users2DataTable" msprop:Generator_TableVarName="tableTBWH_Users2" msprop:Generator_RowChangedName="TBWH_Users2RowChanged" msprop:Generator_TablePropName="TBWH_Users2" msprop:Generator_RowDeletingName="TBWH_Users2RowDeleting" msprop:Generator_RowChangingName="TBWH_Users2RowChanging" msprop:Generator_RowEvHandlerName="TBWH_Users2RowChangeEventHandler" msprop:Generator_RowDeletedName="TBWH_Users2RowDeleted" msprop:Generator_RowClassName="TBWH_Users2Row" msprop:Generator_UserTableName="TBWH_Users2" msprop:Generator_RowEvArgName="TBWH_Users2RowChangeEvent">
<xs:element name="TBWH_Users2" msprop:Generator_TableClassName="TBWH_Users2DataTable" msprop:Generator_TableVarName="tableTBWH_Users2" msprop:Generator_TablePropName="TBWH_Users2" msprop:Generator_RowDeletingName="TBWH_Users2RowDeleting" msprop:Generator_RowChangingName="TBWH_Users2RowChanging" msprop:Generator_RowEvHandlerName="TBWH_Users2RowChangeEventHandler" msprop:Generator_RowDeletedName="TBWH_Users2RowDeleted" msprop:Generator_UserTableName="TBWH_Users2" msprop:Generator_RowChangedName="TBWH_Users2RowChanged" msprop:Generator_RowEvArgName="TBWH_Users2RowChangeEvent" msprop:Generator_RowClassName="TBWH_Users2Row">
<xs:complexType>
<xs:sequence>
<xs:element name="Select" msprop:Generator_ColumnVarNameInTable="columnSelect" msprop:Generator_ColumnPropNameInRow="_Select" msprop:Generator_ColumnPropNameInTable="SelectColumn" msprop:Generator_UserColumnName="Select" type="xs:boolean" default="false" minOccurs="0" />
@ -801,7 +804,7 @@ SELECT GUID, NAME, COMMENT, TableName, Host, SystemNumber, UserName, Password, C
</xs:sequence>
</xs:complexType>
</xs:element>
<xs:element name="TBPMO_SAP_FUBA" msprop:Generator_TableClassName="TBPMO_SAP_FUBADataTable" msprop:Generator_TableVarName="tableTBPMO_SAP_FUBA" msprop:Generator_RowChangedName="TBPMO_SAP_FUBARowChanged" msprop:Generator_TablePropName="TBPMO_SAP_FUBA" msprop:Generator_RowDeletingName="TBPMO_SAP_FUBARowDeleting" msprop:Generator_RowChangingName="TBPMO_SAP_FUBARowChanging" msprop:Generator_RowEvHandlerName="TBPMO_SAP_FUBARowChangeEventHandler" msprop:Generator_RowDeletedName="TBPMO_SAP_FUBARowDeleted" msprop:Generator_RowClassName="TBPMO_SAP_FUBARow" msprop:Generator_UserTableName="TBPMO_SAP_FUBA" msprop:Generator_RowEvArgName="TBPMO_SAP_FUBARowChangeEvent">
<xs:element name="TBPMO_SAP_FUBA" msprop:Generator_TableClassName="TBPMO_SAP_FUBADataTable" msprop:Generator_TableVarName="tableTBPMO_SAP_FUBA" msprop:Generator_TablePropName="TBPMO_SAP_FUBA" msprop:Generator_RowDeletingName="TBPMO_SAP_FUBARowDeleting" msprop:Generator_RowChangingName="TBPMO_SAP_FUBARowChanging" msprop:Generator_RowEvHandlerName="TBPMO_SAP_FUBARowChangeEventHandler" msprop:Generator_RowDeletedName="TBPMO_SAP_FUBARowDeleted" msprop:Generator_UserTableName="TBPMO_SAP_FUBA" msprop:Generator_RowChangedName="TBPMO_SAP_FUBARowChanged" msprop:Generator_RowEvArgName="TBPMO_SAP_FUBARowChangeEvent" msprop:Generator_RowClassName="TBPMO_SAP_FUBARow">
<xs:complexType>
<xs:sequence>
<xs:element name="GUID" msdata:ReadOnly="true" msdata:AutoIncrement="true" msprop:Generator_ColumnVarNameInTable="columnGUID" msprop:Generator_ColumnPropNameInRow="GUID" msprop:Generator_ColumnPropNameInTable="GUIDColumn" msprop:Generator_UserColumnName="GUID" type="xs:int" />
@ -899,6 +902,13 @@ SELECT GUID, NAME, COMMENT, TableName, Host, SystemNumber, UserName, Password, C
</xs:restriction>
</xs:simpleType>
</xs:element>
<xs:element name="Method" msprop:Generator_ColumnVarNameInTable="columnMethod" msprop:Generator_ColumnPropNameInRow="Method" msprop:Generator_ColumnPropNameInTable="MethodColumn" msprop:Generator_UserColumnName="Method" default="TABLE">
<xs:simpleType>
<xs:restriction base="xs:string">
<xs:maxLength value="50" />
</xs:restriction>
</xs:simpleType>
</xs:element>
</xs:sequence>
</xs:complexType>
</xs:element>
@ -935,7 +945,7 @@ SELECT GUID, NAME, COMMENT, TableName, Host, SystemNumber, UserName, Password, C
</xs:element>
<xs:annotation>
<xs:appinfo>
<msdata:Relationship name="FK_TBPMO_FORM_CONSTRUCTOR_DETAIL_CONSTRUCT_ID" msdata:parent="TBPMO_FORM_CONSTRUCTOR" msdata:child="TBPMO_FORM_CONSTRUCTOR_DETAIL" msdata:parentkey="GUID" msdata:childkey="CONSTRUCT_ID" msprop:Generator_UserChildTable="TBPMO_FORM_CONSTRUCTOR_DETAIL" msprop:Generator_ChildPropName="GetTBPMO_FORM_CONSTRUCTOR_DETAILRows" msprop:Generator_UserRelationName="FK_TBPMO_FORM_CONSTRUCTOR_DETAIL_CONSTRUCT_ID" msprop:Generator_RelationVarName="relationFK_TBPMO_FORM_CONSTRUCTOR_DETAIL_CONSTRUCT_ID" msprop:Generator_UserParentTable="TBPMO_FORM_CONSTRUCTOR" msprop:Generator_ParentPropName="TBPMO_FORM_CONSTRUCTORRow" />
<msdata:Relationship name="FK_TBPMO_FORM_CONSTRUCTOR_DETAIL_CONSTRUCT_ID" msdata:parent="TBPMO_FORM_CONSTRUCTOR" msdata:child="TBPMO_FORM_CONSTRUCTOR_DETAIL" msdata:parentkey="GUID" msdata:childkey="CONSTRUCT_ID" msprop:Generator_UserChildTable="TBPMO_FORM_CONSTRUCTOR_DETAIL" msprop:Generator_ChildPropName="GetTBPMO_FORM_CONSTRUCTOR_DETAILRows" msprop:Generator_UserRelationName="FK_TBPMO_FORM_CONSTRUCTOR_DETAIL_CONSTRUCT_ID" msprop:Generator_ParentPropName="TBPMO_FORM_CONSTRUCTORRow" msprop:Generator_RelationVarName="relationFK_TBPMO_FORM_CONSTRUCTOR_DETAIL_CONSTRUCT_ID" msprop:Generator_UserParentTable="TBPMO_FORM_CONSTRUCTOR" />
</xs:appinfo>
</xs:annotation>
</xs:schema>

10
app/DD-Record-Organiser/My Project/Resources.Designer.vb generated
View File

@ -1600,6 +1600,16 @@ Namespace My.Resources
End Get
End Property
'''<summary>
''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
'''</summary>
Friend ReadOnly Property TableView_nameonly_263() As System.Drawing.Bitmap
Get
Dim obj As Object = ResourceManager.GetObject("TableView_nameonly_263", resourceCulture)
Return CType(obj,System.Drawing.Bitmap)
End Get
End Property
'''<summary>
''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
'''</summary>

93
app/DD-Record-Organiser/My Project/Resources.resx
View File

@ -130,8 +130,8 @@
<data name="UserInterfaceEditor_5845_32x" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\UserInterfaceEditor_5845_32x.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="windream-Logo-transparent" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\windream-Logo-transparent.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
<data name="Carousel_16x16" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\Carousel_16x16.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="DD_Icons-ADDI" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\DD_Icons-ADDI.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
@ -193,6 +193,12 @@
<data name="userAccounts" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\userAccounts.bmp;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="key_go" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\key_go.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="mail" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\mail.bmp;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="user_green" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\user_green.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
@ -202,9 +208,6 @@
<data name="bell_go" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\bell_go.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="dtp1" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\dtp1.PNG;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="checkbox_16xLG" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\checkbox_16xLG.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
@ -214,9 +217,6 @@
<data name="112_RefreshArrow_Blue_24x24_72" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\112_RefreshArrow_Blue_24x24_72.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="Filter" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\Filter.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="module_32xLG" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\module_32xLG.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
@ -244,24 +244,30 @@
<data name="table" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\table.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="changechartlegendalignment_32x32" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\changechartlegendalignment_32x32.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="page_excel" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\page_excel.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="database_delete" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\database_delete.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="dtp" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\dtp.PNG;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="FilteredObject_13400_16x" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\FilteredObject_13400_16x.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="InsertColumn_5626" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\InsertColumn_5626.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="application_view_tile" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\application_view_tile.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="application_view_detail" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\application_view_detail.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="database_save" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\database_save.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="magifier_zoom_out" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\magifier_zoom_out.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
@ -274,8 +280,8 @@
<data name="folder_go" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\folder_go.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="Carousel_16x16" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\Carousel_16x16.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
<data name="dtp1" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\dtp1.PNG;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="f5" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\f5.ico;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
@ -283,12 +289,15 @@
<data name="Einstellungen6" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\Einstellungen6.ico;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="mail" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\mail.bmp;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
<data name="Filter" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\Filter.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="flag_green" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\flag_green.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="add1" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\add1.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="ComboBox_672" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\ComboBox_672.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
@ -301,8 +310,8 @@
<data name="save" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\save.bmp;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="windream_Logo_transparent_klein" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\windream-Logo-transparent_klein.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
<data name="save_16xLG" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\save_16xLG.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="Go" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\Go.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
@ -310,12 +319,6 @@
<data name="page_copy" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\page_copy.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="AddTable_5632" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\AddTable_5632.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="arrow_refresh" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\arrow_refresh.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="lightbulb" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\lightbulb.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
@ -364,15 +367,9 @@
<data name="lock_16xMD" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\lock_16xMD.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="database_go1" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\database_go1.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="xls" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\xls.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="doc_excel_csv" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\doc_excel_csv.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="database_lightning" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\database_lightning.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
@ -433,11 +430,11 @@
<data name="database_key" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\database_key.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="key_go" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\key_go.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
<data name="AddTable_5632" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\AddTable_5632.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="1532_Flag_Blue" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\1532_Flag_Blue.ico;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
<data name="windream-Logo-transparent" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\windream-Logo-transparent.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="Men6" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\Men6.ico;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
@ -445,8 +442,8 @@
<data name="f2" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\f2.ico;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="save_16xLG" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\save_16xLG.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
<data name="database_go1" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\database_go1.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="brainpool" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\brainpool.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
@ -481,6 +478,9 @@
<data name="user_suit" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\user_suit.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="windream_Logo_transparent_klein" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\windream-Logo-transparent_klein.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="WebUserControl(ascx)_11270_16x" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\WebUserControl(ascx)_11270_16x.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
@ -523,6 +523,9 @@
<data name="folder_Open_32xMD" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\folder_Open_32xMD.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="Men5" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\Men5.ico;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="page_red" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\page_red.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
@ -541,8 +544,8 @@
<data name="page_refresh" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\page_refresh.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="add1" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\add1.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
<data name="doc_excel_csv" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\doc_excel_csv.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="Men4" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\Men4.ico;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
@ -553,8 +556,8 @@
<data name="keinbild" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\keinbild.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="changechartlegendalignment_32x32" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\changechartlegendalignment_32x32.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
<data name="1532_Flag_Blue" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\1532_Flag_Blue.ico;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="email_go" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\email_go.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
@ -565,8 +568,8 @@
<data name="f1" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\f1.ico;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="database_save" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\database_save.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
<data name="arrow_refresh" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\arrow_refresh.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="_blank" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\_blank.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
@ -607,8 +610,8 @@
<data name="138_PushPin_32x42_72" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\138_PushPin_32x42_721.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="Men5" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\Men5.ico;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
<data name="database_delete" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\database_delete.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="database_edit" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\database_edit.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
@ -631,7 +634,7 @@
<data name="action_Cancel_16xLG" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\action_Cancel_16xLG.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="InsertColumn_5626" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\InsertColumn_5626.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
<data name="TableView_nameonly_263" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\TableView_nameonly_263.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
</root>

25
app/DD-Record-Organiser/frmConstructor_Main.Designer.vb generated
View File

@ -22,6 +22,7 @@ Partial Class frmConstructor_Main
'Das Bearbeiten mit dem Code-Editor ist nicht möglich.
<System.Diagnostics.DebuggerStepThrough()> _
Private Sub InitializeComponent()
Me.components = New System.ComponentModel.Container()
Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(frmConstructor_Main))
Dim GridLevelNode1 As DevExpress.XtraGrid.GridLevelNode = New DevExpress.XtraGrid.GridLevelNode()
Dim GridLevelNode2 As DevExpress.XtraGrid.GridLevelNode = New DevExpress.XtraGrid.GridLevelNode()
@ -29,12 +30,12 @@ Partial Class frmConstructor_Main
Me.SplitContainerMain = New DevExpress.XtraEditors.SplitContainerControl()
Me.SplitContainerTop = New DevExpress.XtraEditors.SplitContainerControl()
Me.TreeViewMain = New System.Windows.Forms.TreeView()
Me.CMSEntity = New System.Windows.Forms.ContextMenuStrip()
Me.CMSEntity = New System.Windows.Forms.ContextMenuStrip(Me.components)
Me.ResetEbenenAuswahlToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
Me.DateiimportEntitätToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
Me.FormDesignerToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
Me.GridControlMain = New DevExpress.XtraGrid.GridControl()
Me.ContextMenuGrid = New System.Windows.Forms.ContextMenuStrip()
Me.ContextMenuGrid = New System.Windows.Forms.ContextMenuStrip(Me.components)
Me.FunktionenDataGridToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
Me.ToolStripSeparator1 = New System.Windows.Forms.ToolStripSeparator()
Me.AnsichtUmschaltenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
@ -58,7 +59,7 @@ Partial Class frmConstructor_Main
Me.pnlDetails = New System.Windows.Forms.Panel()
Me.TabWindream = New DevExpress.XtraTab.XtraTabPage()
Me.GridControlDocSearch = New DevExpress.XtraGrid.GridControl()
Me.ContextMenuStripResultFiles = New System.Windows.Forms.ContextMenuStrip()
Me.ContextMenuStripResultFiles = New System.Windows.Forms.ContextMenuStrip(Me.components)
Me.DateiÖffnenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
Me.ToolStripSeparator7 = New System.Windows.Forms.ToolStripSeparator()
Me.CopyToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
@ -93,7 +94,7 @@ Partial Class frmConstructor_Main
Me.Panel1 = New System.Windows.Forms.Panel()
Me.GridControlPos = New DevExpress.XtraGrid.GridControl()
Me.grvwGridPos = New DevExpress.XtraGrid.Views.Grid.GridView()
Me.BindingNavigatorPOS = New System.Windows.Forms.BindingNavigator()
Me.BindingNavigatorPOS = New System.Windows.Forms.BindingNavigator(Me.components)
Me.BindingNavigatorAddNewItem = New System.Windows.Forms.ToolStripButton()
Me.BindingNavigatorCountItem = New System.Windows.Forms.ToolStripLabel()
Me.BindingNavigatorDeleteItem = New System.Windows.Forms.ToolStripButton()
@ -129,7 +130,7 @@ Partial Class frmConstructor_Main
Me.GridControlParent = New DevExpress.XtraGrid.GridControl()
Me.GridViewParent = New DevExpress.XtraGrid.Views.Grid.GridView()
Me.btnRelinkParentID = New System.Windows.Forms.Button()
Me.BindingSource_Entity = New System.Windows.Forms.BindingSource()
Me.BindingSource_Entity = New System.Windows.Forms.BindingSource(Me.components)
Me.NavPane = New DevExpress.XtraBars.Navigation.TileNavPane()
Me.NavButtonHome = New DevExpress.XtraBars.Navigation.NavButton()
Me.NavButtonRefresh = New DevExpress.XtraBars.Navigation.NavButton()
@ -138,18 +139,18 @@ Partial Class frmConstructor_Main
Me.tsslblRecord = New System.Windows.Forms.ToolStripStatusLabel()
Me.tsslblWorkflowstate = New System.Windows.Forms.ToolStripStatusLabel()
Me.DD_ECMAdmin = New DD_Record_Organiser.DD_ECMAdmin()
Me.ImageCollection1 = New DevExpress.Utils.ImageCollection()
Me.ttToolTip = New System.Windows.Forms.ToolTip()
Me.ContextMenuDetails = New System.Windows.Forms.ContextMenuStrip()
Me.ImageCollection1 = New DevExpress.Utils.ImageCollection(Me.components)
Me.ttToolTip = New System.Windows.Forms.ToolTip(Me.components)
Me.ContextMenuDetails = New System.Windows.Forms.ContextMenuStrip(Me.components)
Me.DD_DMSDataSet = New DD_Record_Organiser.DD_DMSDataSet()
Me.VWPMO_WF_USER_ACTIVEBindingSource = New System.Windows.Forms.BindingSource()
Me.VWPMO_WF_USER_ACTIVEBindingSource = New System.Windows.Forms.BindingSource(Me.components)
Me.VWPMO_WF_USER_ACTIVETableAdapter = New DD_Record_Organiser.DD_DMSDataSetTableAdapters.VWPMO_WF_ACTIVETableAdapter()
Me.TableAdapterManager = New DD_Record_Organiser.DD_DMSDataSetTableAdapters.TableAdapterManager()
Me.TBPMO_FILES_USERTableAdapter = New DD_Record_Organiser.DD_DMSDataSetTableAdapters.TBPMO_FILES_USERTableAdapter()
Me.VWPMO_WF_ACTIVEBindingSource = New System.Windows.Forms.BindingSource()
Me.VWPMO_WF_ACTIVEBindingSource = New System.Windows.Forms.BindingSource(Me.components)
Me.VWPMO_WF_ACTIVETableAdapter = New DD_Record_Organiser.DD_DMSDataSetTableAdapters.VWPMO_WF_ACTIVETableAdapter()
Me.TBPMO_FILES_USERBindingSource = New System.Windows.Forms.BindingSource()
Me.ToolTipController = New DevExpress.Utils.ToolTipController()
Me.TBPMO_FILES_USERBindingSource = New System.Windows.Forms.BindingSource(Me.components)
Me.ToolTipController = New DevExpress.Utils.ToolTipController(Me.components)
CType(Me.SplitContainerMain, System.ComponentModel.ISupportInitialize).BeginInit()
Me.SplitContainerMain.SuspendLayout()
CType(Me.SplitContainerTop, System.ComponentModel.ISupportInitialize).BeginInit()

28
app/DD-Record-Organiser/frmConstructor_Main.resx
View File

@ -298,7 +298,7 @@
<value>0, 0</value>
</data>
<data name="GridControlMain.Size" type="System.Drawing.Size, System.Drawing">
<value>795, 248</value>
<value>788, 248</value>
</data>
<data name="GridControlMain.TabIndex" type="System.Int32, mscorlib">
<value>0</value>
@ -373,7 +373,7 @@
<value>0, 0</value>
</data>
<data name="pnlDetails.Size" type="System.Drawing.Size, System.Drawing">
<value>1072, 338</value>
<value>1069, 334</value>
</data>
<data name="pnlDetails.TabIndex" type="System.Int32, mscorlib">
<value>0</value>
@ -391,7 +391,7 @@
<value>0</value>
</data>
<data name="TabDetails.Size" type="System.Drawing.Size, System.Drawing">
<value>1072, 338</value>
<value>1069, 334</value>
</data>
<data name="TabDetails.Text" xml:space="preserve">
<value>Detailansicht</value>
@ -409,7 +409,7 @@
<value>0</value>
</data>
<data name="TCDetails.Size" type="System.Drawing.Size, System.Drawing">
<value>1078, 369</value>
<value>1071, 362</value>
</data>
<data name="TCDetails.TabIndex" type="System.Int32, mscorlib">
<value>1</value>
@ -469,7 +469,7 @@
<value>192, 255, 192</value>
</data>
<data name="GridControlDocSearch.Size" type="System.Drawing.Size, System.Drawing">
<value>1072, 313</value>
<value>1069, 309</value>
</data>
<data name="GridControlDocSearch.TabIndex" type="System.Int32, mscorlib">
<value>7</value>
@ -565,7 +565,7 @@
<value>0, 0</value>
</data>
<data name="ToolStripDokumente.Size" type="System.Drawing.Size, System.Drawing">
<value>1072, 25</value>
<value>1069, 25</value>
</data>
<data name="ToolStripDokumente.TabIndex" type="System.Int32, mscorlib">
<value>2</value>
@ -586,7 +586,7 @@
<value>2</value>
</data>
<data name="TabWindream.Size" type="System.Drawing.Size, System.Drawing">
<value>1072, 338</value>
<value>1069, 334</value>
</data>
<data name="TabWindream.Text" xml:space="preserve">
<value>windream-Dateien</value>
@ -1017,7 +1017,7 @@
<value>2</value>
</data>
<data name="TabFollowUp.Size" type="System.Drawing.Size, System.Drawing">
<value>1072, 338</value>
<value>1069, 334</value>
</data>
<data name="TabFollowUp.Text" xml:space="preserve">
<value>Wiedervorlage</value>
@ -1044,7 +1044,7 @@
<value>Cyan</value>
</data>
<data name="GridControlPos.Size" type="System.Drawing.Size, System.Drawing">
<value>1072, 313</value>
<value>1069, 309</value>
</data>
<data name="GridControlPos.TabIndex" type="System.Int32, mscorlib">
<value>0</value>
@ -1068,7 +1068,7 @@
<value>0, 25</value>
</data>
<data name="Panel1.Size" type="System.Drawing.Size, System.Drawing">
<value>1072, 313</value>
<value>1069, 309</value>
</data>
<data name="Panel1.TabIndex" type="System.Int32, mscorlib">
<value>2</value>
@ -1243,7 +1243,7 @@
<value>0, 0</value>
</data>
<data name="BindingNavigatorPOS.Size" type="System.Drawing.Size, System.Drawing">
<value>1072, 25</value>
<value>1069, 25</value>
</data>
<data name="BindingNavigatorPOS.TabIndex" type="System.Int32, mscorlib">
<value>1</value>
@ -1272,7 +1272,7 @@
</value>
</data>
<data name="TabPos.Size" type="System.Drawing.Size, System.Drawing">
<value>1072, 338</value>
<value>1069, 334</value>
</data>
<data name="TabPos.Text" xml:space="preserve">
<value>Positionen</value>
@ -1472,7 +1472,7 @@
<value>0, 0</value>
</data>
<data name="ToolStripEdit.Size" type="System.Drawing.Size, System.Drawing">
<value>1078, 25</value>
<value>1071, 25</value>
</data>
<data name="ToolStripEdit.TabIndex" type="System.Int32, mscorlib">
<value>0</value>
@ -1577,7 +1577,7 @@
<value>Panel2</value>
</data>
<data name="SplitContainerBottom.Size" type="System.Drawing.Size, System.Drawing">
<value>1083, 394</value>
<value>1083, 387</value>
</data>
<data name="SplitContainerBottom.TabIndex" type="System.Int32, mscorlib">
<value>0</value>

8
app/DD-Record-Organiser/frmConstructor_Main.vb
View File

@ -2034,6 +2034,7 @@ Public Class frmConstructor_Main
Check_FOLLOWUP_IsConfigured(ENTITY_ID)
Load_Grid_Layout()
Load_Splitter_Layout()
SET_ROWCOUNT_STRING()
End If
If POS_ENTITY > 0 Then
If USER_LANGUAGE <> "de-DE" Then
@ -4901,7 +4902,12 @@ Public Class frmConstructor_Main
End Sub
Private Sub grvwGrid_ColumnFilterChanged(sender As Object, e As EventArgs) Handles grvwGrid.ColumnFilterChanged
Console.WriteLine("Filter changed: " & Now)
SET_ROWCOUNT_STRING()
End Sub
Sub SET_ROWCOUNT_STRING()
Dim nodetext = ACT_EBENE_STRING
nodetext = nodetext & " (" & grvwGrid.RowCount & ")"
TreeViewMain.SelectedNode.Text = nodetext
End Sub
Public Sub New()
' Dieser Aufruf ist für den Designer erforderlich.

153
app/DD-Record-Organiser/frmSAP_FuBa.Designer.vb generated
View File

@ -26,7 +26,6 @@ Partial Class frmSAP_FuBa
Dim GUIDLabel As System.Windows.Forms.Label
Dim NAMELabel As System.Windows.Forms.Label
Dim COMMENTLabel As System.Windows.Forms.Label
Dim TableNameLabel As System.Windows.Forms.Label
Dim HostLabel As System.Windows.Forms.Label
Dim SystemNumberLabel As System.Windows.Forms.Label
Dim UserNameLabel As System.Windows.Forms.Label
@ -84,10 +83,14 @@ Partial Class frmSAP_FuBa
Me.Button1 = New System.Windows.Forms.Button()
Me.Label1 = New System.Windows.Forms.Label()
Me.txtLimitRows = New System.Windows.Forms.TextBox()
Me.rBFuba = New System.Windows.Forms.RadioButton()
Me.rbTable = New System.Windows.Forms.RadioButton()
Me.MethodTextBox = New System.Windows.Forms.TextBox()
Me.lblMethodname = New System.Windows.Forms.Label()
Me.btnGetResult = New System.Windows.Forms.Button()
GUIDLabel = New System.Windows.Forms.Label()
NAMELabel = New System.Windows.Forms.Label()
COMMENTLabel = New System.Windows.Forms.Label()
TableNameLabel = New System.Windows.Forms.Label()
HostLabel = New System.Windows.Forms.Label()
SystemNumberLabel = New System.Windows.Forms.Label()
UserNameLabel = New System.Windows.Forms.Label()
@ -135,19 +138,10 @@ Partial Class frmSAP_FuBa
COMMENTLabel.TabIndex = 5
COMMENTLabel.Text = "Kommentar:"
'
'TableNameLabel
'
TableNameLabel.AutoSize = True
TableNameLabel.Location = New System.Drawing.Point(184, 69)
TableNameLabel.Name = "TableNameLabel"
TableNameLabel.Size = New System.Drawing.Size(69, 13)
TableNameLabel.TabIndex = 7
TableNameLabel.Text = "Table Name:"
'
'HostLabel
'
HostLabel.AutoSize = True
HostLabel.Location = New System.Drawing.Point(375, 69)
HostLabel.Location = New System.Drawing.Point(184, 69)
HostLabel.Name = "HostLabel"
HostLabel.Size = New System.Drawing.Size(84, 13)
HostLabel.TabIndex = 9
@ -156,7 +150,7 @@ Partial Class frmSAP_FuBa
'SystemNumberLabel
'
SystemNumberLabel.AutoSize = True
SystemNumberLabel.Location = New System.Drawing.Point(574, 69)
SystemNumberLabel.Location = New System.Drawing.Point(375, 69)
SystemNumberLabel.Name = "SystemNumberLabel"
SystemNumberLabel.Size = New System.Drawing.Size(108, 13)
SystemNumberLabel.TabIndex = 11
@ -210,7 +204,7 @@ Partial Class frmSAP_FuBa
'ADDED_WHOLabel
'
ADDED_WHOLabel.AutoSize = True
ADDED_WHOLabel.Location = New System.Drawing.Point(185, 233)
ADDED_WHOLabel.Location = New System.Drawing.Point(180, 280)
ADDED_WHOLabel.Name = "ADDED_WHOLabel"
ADDED_WHOLabel.Size = New System.Drawing.Size(67, 13)
ADDED_WHOLabel.TabIndex = 25
@ -219,7 +213,7 @@ Partial Class frmSAP_FuBa
'ADDED_WHENLabel
'
ADDED_WHENLabel.AutoSize = True
ADDED_WHENLabel.Location = New System.Drawing.Point(331, 233)
ADDED_WHENLabel.Location = New System.Drawing.Point(326, 280)
ADDED_WHENLabel.Name = "ADDED_WHENLabel"
ADDED_WHENLabel.Size = New System.Drawing.Size(77, 13)
ADDED_WHENLabel.TabIndex = 27
@ -228,7 +222,7 @@ Partial Class frmSAP_FuBa
'CHANGED_WHOLabel
'
CHANGED_WHOLabel.AutoSize = True
CHANGED_WHOLabel.Location = New System.Drawing.Point(465, 232)
CHANGED_WHOLabel.Location = New System.Drawing.Point(460, 279)
CHANGED_WHOLabel.Name = "CHANGED_WHOLabel"
CHANGED_WHOLabel.Size = New System.Drawing.Size(80, 13)
CHANGED_WHOLabel.TabIndex = 29
@ -237,7 +231,7 @@ Partial Class frmSAP_FuBa
'CHANGED_WHENLabel
'
CHANGED_WHENLabel.AutoSize = True
CHANGED_WHENLabel.Location = New System.Drawing.Point(606, 232)
CHANGED_WHENLabel.Location = New System.Drawing.Point(601, 279)
CHANGED_WHENLabel.Name = "CHANGED_WHENLabel"
CHANGED_WHENLabel.Size = New System.Drawing.Size(90, 13)
CHANGED_WHENLabel.TabIndex = 31
@ -246,7 +240,7 @@ Partial Class frmSAP_FuBa
'WHERE_CLAUSELabel
'
WHERE_CLAUSELabel.AutoSize = True
WHERE_CLAUSELabel.Location = New System.Drawing.Point(184, 189)
WHERE_CLAUSELabel.Location = New System.Drawing.Point(184, 238)
WHERE_CLAUSELabel.Name = "WHERE_CLAUSELabel"
WHERE_CLAUSELabel.Size = New System.Drawing.Size(430, 13)
WHERE_CLAUSELabel.TabIndex = 83
@ -290,7 +284,7 @@ Partial Class frmSAP_FuBa
Me.TBPMO_SAP_FUBABindingNavigator.MovePreviousItem = Me.BindingNavigatorMovePreviousItem
Me.TBPMO_SAP_FUBABindingNavigator.Name = "TBPMO_SAP_FUBABindingNavigator"
Me.TBPMO_SAP_FUBABindingNavigator.PositionItem = Me.BindingNavigatorPositionItem
Me.TBPMO_SAP_FUBABindingNavigator.Size = New System.Drawing.Size(983, 25)
Me.TBPMO_SAP_FUBABindingNavigator.Size = New System.Drawing.Size(1207, 25)
Me.TBPMO_SAP_FUBABindingNavigator.TabIndex = 0
Me.TBPMO_SAP_FUBABindingNavigator.Text = "BindingNavigator1"
'
@ -417,7 +411,7 @@ Partial Class frmSAP_FuBa
'TableNameTextBox
'
Me.TableNameTextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBPMO_SAP_FUBABindingSource, "TableName", True))
Me.TableNameTextBox.Location = New System.Drawing.Point(187, 85)
Me.TableNameTextBox.Location = New System.Drawing.Point(187, 205)
Me.TableNameTextBox.Name = "TableNameTextBox"
Me.TableNameTextBox.Size = New System.Drawing.Size(182, 22)
Me.TableNameTextBox.TabIndex = 8
@ -425,15 +419,15 @@ Partial Class frmSAP_FuBa
'HostTextBox
'
Me.HostTextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBPMO_SAP_FUBABindingSource, "Host", True))
Me.HostTextBox.Location = New System.Drawing.Point(378, 85)
Me.HostTextBox.Location = New System.Drawing.Point(187, 85)
Me.HostTextBox.Name = "HostTextBox"
Me.HostTextBox.Size = New System.Drawing.Size(190, 22)
Me.HostTextBox.Size = New System.Drawing.Size(182, 22)
Me.HostTextBox.TabIndex = 10
'
'SystemNumberTextBox
'
Me.SystemNumberTextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBPMO_SAP_FUBABindingSource, "SystemNumber", True))
Me.SystemNumberTextBox.Location = New System.Drawing.Point(577, 85)
Me.SystemNumberTextBox.Location = New System.Drawing.Point(378, 85)
Me.SystemNumberTextBox.Name = "SystemNumberTextBox"
Me.SystemNumberTextBox.Size = New System.Drawing.Size(86, 22)
Me.SystemNumberTextBox.TabIndex = 12
@ -468,7 +462,7 @@ Partial Class frmSAP_FuBa
Me.LanguageTextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBPMO_SAP_FUBABindingSource, "Language", True))
Me.LanguageTextBox.Location = New System.Drawing.Point(672, 123)
Me.LanguageTextBox.Name = "LanguageTextBox"
Me.LanguageTextBox.Size = New System.Drawing.Size(148, 22)
Me.LanguageTextBox.Size = New System.Drawing.Size(84, 22)
Me.LanguageTextBox.TabIndex = 20
'
'TempTableNameTextBox
@ -476,7 +470,7 @@ Partial Class frmSAP_FuBa
Me.TempTableNameTextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBPMO_SAP_FUBABindingSource, "TempTableName", True))
Me.TempTableNameTextBox.Location = New System.Drawing.Point(187, 164)
Me.TempTableNameTextBox.Name = "TempTableNameTextBox"
Me.TempTableNameTextBox.Size = New System.Drawing.Size(291, 22)
Me.TempTableNameTextBox.Size = New System.Drawing.Size(182, 22)
Me.TempTableNameTextBox.TabIndex = 22
'
'ACTIVECheckBox
@ -495,7 +489,7 @@ Partial Class frmSAP_FuBa
Me.ADDED_WHOTextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBPMO_SAP_FUBABindingSource, "ADDED_WHO", True))
Me.ADDED_WHOTextBox.Enabled = False
Me.ADDED_WHOTextBox.Font = New System.Drawing.Font("Segoe UI", 8.25!, System.Drawing.FontStyle.Italic, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.ADDED_WHOTextBox.Location = New System.Drawing.Point(188, 249)
Me.ADDED_WHOTextBox.Location = New System.Drawing.Point(183, 296)
Me.ADDED_WHOTextBox.Name = "ADDED_WHOTextBox"
Me.ADDED_WHOTextBox.Size = New System.Drawing.Size(140, 22)
Me.ADDED_WHOTextBox.TabIndex = 26
@ -506,7 +500,7 @@ Partial Class frmSAP_FuBa
Me.ADDED_WHENTextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBPMO_SAP_FUBABindingSource, "ADDED_WHEN", True))
Me.ADDED_WHENTextBox.Enabled = False
Me.ADDED_WHENTextBox.Font = New System.Drawing.Font("Segoe UI", 8.25!, System.Drawing.FontStyle.Italic, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.ADDED_WHENTextBox.Location = New System.Drawing.Point(334, 249)
Me.ADDED_WHENTextBox.Location = New System.Drawing.Point(329, 296)
Me.ADDED_WHENTextBox.Name = "ADDED_WHENTextBox"
Me.ADDED_WHENTextBox.Size = New System.Drawing.Size(130, 22)
Me.ADDED_WHENTextBox.TabIndex = 28
@ -517,7 +511,7 @@ Partial Class frmSAP_FuBa
Me.CHANGED_WHOTextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBPMO_SAP_FUBABindingSource, "CHANGED_WHO", True))
Me.CHANGED_WHOTextBox.Enabled = False
Me.CHANGED_WHOTextBox.Font = New System.Drawing.Font("Segoe UI", 8.25!, System.Drawing.FontStyle.Italic, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.CHANGED_WHOTextBox.Location = New System.Drawing.Point(468, 248)
Me.CHANGED_WHOTextBox.Location = New System.Drawing.Point(463, 295)
Me.CHANGED_WHOTextBox.Name = "CHANGED_WHOTextBox"
Me.CHANGED_WHOTextBox.Size = New System.Drawing.Size(132, 22)
Me.CHANGED_WHOTextBox.TabIndex = 30
@ -528,7 +522,7 @@ Partial Class frmSAP_FuBa
Me.CHANGED_WHENTextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBPMO_SAP_FUBABindingSource, "CHANGED_WHEN", True))
Me.CHANGED_WHENTextBox.Enabled = False
Me.CHANGED_WHENTextBox.Font = New System.Drawing.Font("Segoe UI", 8.25!, System.Drawing.FontStyle.Italic, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.CHANGED_WHENTextBox.Location = New System.Drawing.Point(609, 248)
Me.CHANGED_WHENTextBox.Location = New System.Drawing.Point(604, 295)
Me.CHANGED_WHENTextBox.Name = "CHANGED_WHENTextBox"
Me.CHANGED_WHENTextBox.Size = New System.Drawing.Size(147, 22)
Me.CHANGED_WHENTextBox.TabIndex = 32
@ -540,7 +534,7 @@ Partial Class frmSAP_FuBa
Me.ListBox1.FormattingEnabled = True
Me.ListBox1.Location = New System.Drawing.Point(5, 28)
Me.ListBox1.Name = "ListBox1"
Me.ListBox1.Size = New System.Drawing.Size(120, 199)
Me.ListBox1.Size = New System.Drawing.Size(120, 186)
Me.ListBox1.TabIndex = 33
'
'btnERPConnect
@ -549,11 +543,11 @@ Partial Class frmSAP_FuBa
Me.btnERPConnect.Image = Global.DD_Record_Organiser.My.Resources.Resources.database_connect
Me.btnERPConnect.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
Me.btnERPConnect.ImeMode = System.Windows.Forms.ImeMode.NoControl
Me.btnERPConnect.Location = New System.Drawing.Point(827, 116)
Me.btnERPConnect.Location = New System.Drawing.Point(762, 117)
Me.btnERPConnect.Name = "btnERPConnect"
Me.btnERPConnect.Size = New System.Drawing.Size(126, 29)
Me.btnERPConnect.Size = New System.Drawing.Size(191, 29)
Me.btnERPConnect.TabIndex = 78
Me.btnERPConnect.Text = "Connect testen"
Me.btnERPConnect.Text = "SAP Verbindung testen"
Me.btnERPConnect.TextAlign = System.Drawing.ContentAlignment.MiddleRight
Me.btnERPConnect.UseVisualStyleBackColor = True
'
@ -562,10 +556,10 @@ Partial Class frmSAP_FuBa
Me.GridControl2.Anchor = CType((((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom) _
Or System.Windows.Forms.AnchorStyles.Left) _
Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
Me.GridControl2.Location = New System.Drawing.Point(5, 303)
Me.GridControl2.Location = New System.Drawing.Point(5, 358)
Me.GridControl2.MainView = Me.GridView2
Me.GridControl2.Name = "GridControl2"
Me.GridControl2.Size = New System.Drawing.Size(966, 375)
Me.GridControl2.Size = New System.Drawing.Size(1190, 339)
Me.GridControl2.TabIndex = 83
Me.GridControl2.ViewCollection.AddRange(New DevExpress.XtraGrid.Views.Base.BaseView() {Me.GridView2})
'
@ -588,7 +582,7 @@ Partial Class frmSAP_FuBa
'WHERE_CLAUSETextBox
'
Me.WHERE_CLAUSETextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBPMO_SAP_FUBABindingSource, "WHERE_CLAUSE", True))
Me.WHERE_CLAUSETextBox.Location = New System.Drawing.Point(187, 205)
Me.WHERE_CLAUSETextBox.Location = New System.Drawing.Point(187, 254)
Me.WHERE_CLAUSETextBox.Name = "WHERE_CLAUSETextBox"
Me.WHERE_CLAUSETextBox.Size = New System.Drawing.Size(766, 22)
Me.WHERE_CLAUSETextBox.TabIndex = 84
@ -599,7 +593,7 @@ Partial Class frmSAP_FuBa
Me.lblSave.BackColor = System.Drawing.Color.Yellow
Me.lblSave.Font = New System.Drawing.Font("Segoe UI", 8.25!, System.Drawing.FontStyle.Bold)
Me.lblSave.ImeMode = System.Windows.Forms.ImeMode.NoControl
Me.lblSave.Location = New System.Drawing.Point(785, 252)
Me.lblSave.Location = New System.Drawing.Point(780, 299)
Me.lblSave.Name = "lblSave"
Me.lblSave.Size = New System.Drawing.Size(132, 13)
Me.lblSave.TabIndex = 85
@ -612,11 +606,11 @@ Partial Class frmSAP_FuBa
Me.lblConnectionopen.BackColor = System.Drawing.Color.Yellow
Me.lblConnectionopen.Font = New System.Drawing.Font("Segoe UI", 8.25!, System.Drawing.FontStyle.Bold)
Me.lblConnectionopen.ImeMode = System.Windows.Forms.ImeMode.NoControl
Me.lblConnectionopen.Location = New System.Drawing.Point(828, 148)
Me.lblConnectionopen.Location = New System.Drawing.Point(804, 149)
Me.lblConnectionopen.Name = "lblConnectionopen"
Me.lblConnectionopen.Size = New System.Drawing.Size(125, 13)
Me.lblConnectionopen.Size = New System.Drawing.Size(149, 13)
Me.lblConnectionopen.TabIndex = 86
Me.lblConnectionopen.Text = "Connection successfull"
Me.lblConnectionopen.Text = "SAP Connection successfull"
Me.lblConnectionopen.Visible = False
'
'lblResult
@ -625,7 +619,7 @@ Partial Class frmSAP_FuBa
Me.lblResult.BackColor = System.Drawing.Color.Yellow
Me.lblResult.Font = New System.Drawing.Font("Segoe UI", 8.25!, System.Drawing.FontStyle.Bold)
Me.lblResult.ImeMode = System.Windows.Forms.ImeMode.NoControl
Me.lblResult.Location = New System.Drawing.Point(2, 287)
Me.lblResult.Location = New System.Drawing.Point(2, 332)
Me.lblResult.Name = "lblResult"
Me.lblResult.Size = New System.Drawing.Size(155, 13)
Me.lblResult.TabIndex = 87
@ -634,9 +628,10 @@ Partial Class frmSAP_FuBa
'
'Button1
'
Me.Button1.Font = New System.Drawing.Font("Segoe UI", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.Button1.Image = Global.DD_Record_Organiser.My.Resources.Resources.InsertColumn_5626
Me.Button1.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
Me.Button1.Location = New System.Drawing.Point(487, 162)
Me.Button1.Location = New System.Drawing.Point(389, 161)
Me.Button1.Name = "Button1"
Me.Button1.Size = New System.Drawing.Size(176, 24)
Me.Button1.TabIndex = 88
@ -648,7 +643,7 @@ Partial Class frmSAP_FuBa
'
Me.Label1.AutoSize = True
Me.Label1.ForeColor = System.Drawing.Color.Brown
Me.Label1.Location = New System.Drawing.Point(824, 69)
Me.Label1.Location = New System.Drawing.Point(810, 88)
Me.Label1.Name = "Label1"
Me.Label1.Size = New System.Drawing.Size(92, 13)
Me.Label1.TabIndex = 89
@ -657,17 +652,76 @@ Partial Class frmSAP_FuBa
'txtLimitRows
'
Me.txtLimitRows.ForeColor = System.Drawing.Color.Brown
Me.txtLimitRows.Location = New System.Drawing.Point(827, 85)
Me.txtLimitRows.Location = New System.Drawing.Point(908, 85)
Me.txtLimitRows.Name = "txtLimitRows"
Me.txtLimitRows.Size = New System.Drawing.Size(75, 22)
Me.txtLimitRows.Size = New System.Drawing.Size(45, 22)
Me.txtLimitRows.TabIndex = 90
Me.txtLimitRows.Text = "1000"
Me.txtLimitRows.TextAlign = System.Windows.Forms.HorizontalAlignment.Right
'
'rBFuba
'
Me.rBFuba.AutoSize = True
Me.rBFuba.Location = New System.Drawing.Point(487, 86)
Me.rBFuba.Name = "rBFuba"
Me.rBFuba.Size = New System.Drawing.Size(51, 17)
Me.rBFuba.TabIndex = 91
Me.rBFuba.TabStop = True
Me.rBFuba.Text = "FuBa"
Me.rBFuba.UseVisualStyleBackColor = True
'
'rbTable
'
Me.rbTable.AutoSize = True
Me.rbTable.Location = New System.Drawing.Point(554, 86)
Me.rbTable.Name = "rbTable"
Me.rbTable.Size = New System.Drawing.Size(84, 17)
Me.rbTable.TabIndex = 92
Me.rbTable.TabStop = True
Me.rbTable.Text = "Table direct"
Me.rbTable.UseVisualStyleBackColor = True
'
'MethodTextBox
'
Me.MethodTextBox.BackColor = System.Drawing.SystemColors.Control
Me.MethodTextBox.DataBindings.Add(New System.Windows.Forms.Binding("Text", Me.TBPMO_SAP_FUBABindingSource, "Method", True))
Me.MethodTextBox.ForeColor = System.Drawing.SystemColors.Control
Me.MethodTextBox.Location = New System.Drawing.Point(932, 123)
Me.MethodTextBox.Name = "MethodTextBox"
Me.MethodTextBox.ReadOnly = True
Me.MethodTextBox.Size = New System.Drawing.Size(10, 22)
Me.MethodTextBox.TabIndex = 93
'
'lblMethodname
'
Me.lblMethodname.AutoSize = True
Me.lblMethodname.Location = New System.Drawing.Point(184, 189)
Me.lblMethodname.Name = "lblMethodname"
Me.lblMethodname.Size = New System.Drawing.Size(40, 13)
Me.lblMethodname.TabIndex = 94
Me.lblMethodname.Text = "Label2"
'
'btnGetResult
'
Me.btnGetResult.Font = New System.Drawing.Font("Segoe UI", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.btnGetResult.Image = Global.DD_Record_Organiser.My.Resources.Resources.TableView_nameonly_263
Me.btnGetResult.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
Me.btnGetResult.Location = New System.Drawing.Point(389, 203)
Me.btnGetResult.Name = "btnGetResult"
Me.btnGetResult.Size = New System.Drawing.Size(176, 23)
Me.btnGetResult.TabIndex = 95
Me.btnGetResult.Text = "SAP Result testen"
Me.btnGetResult.UseVisualStyleBackColor = True
'
'frmSAP_FuBa
'
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
Me.ClientSize = New System.Drawing.Size(983, 679)
Me.ClientSize = New System.Drawing.Size(1207, 698)
Me.Controls.Add(Me.btnGetResult)
Me.Controls.Add(Me.lblMethodname)
Me.Controls.Add(Me.rbTable)
Me.Controls.Add(Me.rBFuba)
Me.Controls.Add(Me.txtLimitRows)
Me.Controls.Add(Me.Label1)
Me.Controls.Add(Me.Button1)
@ -702,7 +756,6 @@ Partial Class frmSAP_FuBa
Me.Controls.Add(Me.SystemNumberTextBox)
Me.Controls.Add(HostLabel)
Me.Controls.Add(Me.HostTextBox)
Me.Controls.Add(TableNameLabel)
Me.Controls.Add(Me.TableNameTextBox)
Me.Controls.Add(COMMENTLabel)
Me.Controls.Add(Me.COMMENTTextBox)
@ -711,6 +764,7 @@ Partial Class frmSAP_FuBa
Me.Controls.Add(GUIDLabel)
Me.Controls.Add(Me.GUIDTextBox)
Me.Controls.Add(Me.TBPMO_SAP_FUBABindingNavigator)
Me.Controls.Add(Me.MethodTextBox)
Me.Font = New System.Drawing.Font("Segoe UI", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.Icon = CType(resources.GetObject("$this.Icon"), System.Drawing.Icon)
Me.Name = "frmSAP_FuBa"
@ -770,4 +824,9 @@ Partial Class frmSAP_FuBa
Friend WithEvents Button1 As System.Windows.Forms.Button
Friend WithEvents Label1 As System.Windows.Forms.Label
Friend WithEvents txtLimitRows As System.Windows.Forms.TextBox
Friend WithEvents rBFuba As System.Windows.Forms.RadioButton
Friend WithEvents rbTable As System.Windows.Forms.RadioButton
Friend WithEvents MethodTextBox As System.Windows.Forms.TextBox
Friend WithEvents lblMethodname As System.Windows.Forms.Label
Friend WithEvents btnGetResult As System.Windows.Forms.Button
End Class

3
app/DD-Record-Organiser/frmSAP_FuBa.resx
View File

@ -126,9 +126,6 @@
<metadata name="COMMENTLabel.GenerateMember" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>False</value>
</metadata>
<metadata name="TableNameLabel.GenerateMember" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>False</value>
</metadata>
<metadata name="HostLabel.GenerateMember" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>False</value>
</metadata>

167
app/DD-Record-Organiser/frmSAP_FuBa.vb
View File

@ -30,6 +30,13 @@ Public Class frmSAP_FuBa
Try
Me.TBPMO_SAP_FUBATableAdapter.Connection.ConnectionString = MyConnectionString
Me.TBPMO_SAP_FUBATableAdapter.Fill(Me.DD_ECMAdmin.TBPMO_SAP_FUBA)
If MethodTextBox.Text <> "" Then
If MethodTextBox.Text = "TABLE" Then
rbTable.Checked = True
Else
rBFuba.Checked = True
End If
End If
Catch ex As Exception
MsgBox("Error in Load Fubas:" & vbNewLine & ex.Message, MsgBoxStyle.Critical)
End Try
@ -59,58 +66,9 @@ Public Class frmSAP_FuBa
Me.Cursor = Cursors.Default
lblResult.Visible = False
GridControl2.DataSource = Nothing
lblSave.Visible = False
Exit Sub
End Try
Try
Dim table As New ERPConnect.Utils.ReadTable(con)
'Dim cWhereClause = "SAP_OBJECT EQ '<ObjectType>' AND AR_DATE GE '<AR_DATE>'"
'Dim sSearchDate1 = "20160101"
'cWhereClause = Replace(cWhereClause, "<ObjectType>", Objekttyp.Text)
'cWhereClause = Replace(cWhereClause, "<AR_DATE>", sSearchDate1)
If WHERE_CLAUSETextBox.Text <> "" Then
table.AddCriteria(WHERE_CLAUSETextBox.Text)
End If
'ClassLogger.Add(">> cWhereClause: " & cWhereClause, False)
'table.AddField("MATNR")
'table.AddField("MAKTX")
' table.AddCriteria("SPRAS = 'DE'")
table.TableName = TableNameTextBox.Text
If txtLimitRows.Text <> "" Then
table.RowCount = CInt(txtLimitRows.Text)
End If
table.Run()
Dim resulttable As DataTable
resulttable = table.Result
Try
GridControl2.DataSource = resulttable
Catch ex As Exception
MsgBox("Fehler bei GridControl2 >> DataTable: " & ex.Message, MsgBoxStyle.Critical)
End Try
Dim i As Integer
'For Each row As DataRow In resulttable.Rows
' ClassLogger.Add(">> " & row.Item(0).ToString & "|" & row.Item(1).ToString & "|" & row.Item(2).ToString)
'Next
con.Close()
If txtLimitRows.Text <> "" Then
lblResult.Text = "Result of FuBa (limited to " & txtLimitRows.Text & " rows)"
Else
lblResult.Text = "Result of FuBa (unlimited) >> " & resulttable.Rows.Count & " rows retreived"
End If
lblResult.Visible = True
Me.Cursor = Cursors.Default
Catch ex As Exception
MsgBox("Unexpected Error in SAP Table Result: " & ex.Message, MsgBoxStyle.Critical)
lblResult.Visible = False
Me.Cursor = Cursors.Default
GridControl2.DataSource = Nothing
End Try
End Sub
Private Sub TBPMO_SAP_FUBABindingSource_AddingNew(sender As Object, e As System.ComponentModel.AddingNewEventArgs) Handles TBPMO_SAP_FUBABindingSource.AddingNew
@ -121,6 +79,13 @@ Public Class frmSAP_FuBa
lblSave.Visible = False
GridControl2.DataSource = Nothing
lblConnectionopen.Visible = False
If MethodTextBox.Text <> "" Then
If MethodTextBox.Text = "TABLE" Then
rbTable.Checked = True
Else
rBFuba.Checked = True
End If
End If
End Sub
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
@ -232,4 +197,106 @@ Public Class frmSAP_FuBa
End Try
End If
End Sub
Private Sub rbTable_CheckedChanged(sender As Object, e As EventArgs) Handles rbTable.CheckedChanged
If rbTable.Checked Then
MethodTextBox.Text = "TABLE"
lblMethodname.Text = "Table Name"
Else
lblMethodname.Text = "FuBa Name"
MethodTextBox.Text = "FUBA"
End If
End Sub
Private Sub MethodTextBox_TextChanged(sender As Object, e As EventArgs) Handles MethodTextBox.TextChanged
If MethodTextBox.Text = "TABLE" Then
rbTable.Checked = True
End If
End Sub
Private Sub btnGetResult_Click(sender As Object, e As EventArgs) Handles btnGetResult.Click
Dim con As New R3Connection
Try
Me.Cursor = Cursors.WaitCursor
If LogErrorsOnly = False Then ClassLogger.Add("", False)
If LogErrorsOnly = False Then ClassLogger.Add(">> SAP Connect started:", False)
ERPConnect.LIC.SetLic("W86DWC992C")
con.Host = HostTextBox.Text
con.SystemNumber = SystemNumberTextBox.Text
con.UserName = UserNameTextBox.Text
con.Password = PasswordTextBox.Text
con.Client = ClientTextBox.Text
con.Language = LanguageTextBox.Text
If LogErrorsOnly = False Then ClassLogger.Add(">> HOST: " & HostTextBox.Text & " |SystemNumber: " & SystemNumberTextBox.Text & " |UserName: " & UserNameTextBox.Text & " |Password: " & PasswordTextBox.Text & " |Client: " & ClientTextBox.Text & " |Language: " & LanguageTextBox.Text, False)
con.Open(False)
If LogErrorsOnly = False Then ClassLogger.Add(">> SAP-Connection erfolgreich aufgebaut!", False)
If LogErrorsOnly = False Then ClassLogger.Add("", False)
lblConnectionopen.Visible = True
Catch ex As Exception
MsgBox("Unexpected Error in SAP Connect: " & ex.Message, MsgBoxStyle.Critical)
lblConnectionopen.Visible = False
Me.Cursor = Cursors.Default
lblResult.Visible = False
GridControl2.DataSource = Nothing
lblSave.Visible = False
Exit Sub
End Try
If rbTable.Checked = True Then
Try
Dim table As New ERPConnect.Utils.ReadTable(con)
'Dim cWhereClause = "SAP_OBJECT EQ '<ObjectType>' AND AR_DATE GE '<AR_DATE>'"
'Dim sSearchDate1 = "20160101"
'cWhereClause = Replace(cWhereClause, "<ObjectType>", Objekttyp.Text)
'cWhereClause = Replace(cWhereClause, "<AR_DATE>", sSearchDate1)
If WHERE_CLAUSETextBox.Text <> "" Then
table.AddCriteria(WHERE_CLAUSETextBox.Text)
End If
'ClassLogger.Add(">> cWhereClause: " & cWhereClause, False)
'table.AddField("MATNR")
'table.AddField("MAKTX")
' table.AddCriteria("SPRAS = 'DE'")
table.TableName = TableNameTextBox.Text
If txtLimitRows.Text <> "" Then
table.RowCount = CInt(txtLimitRows.Text)
End If
table.Run()
Dim resulttable As DataTable
resulttable = table.Result
Try
GridControl2.DataSource = resulttable
Catch ex As Exception
MsgBox("Fehler bei GridControl2 >> DataTable: " & ex.Message, MsgBoxStyle.Critical)
End Try
Dim i As Integer
'For Each row As DataRow In resulttable.Rows
' ClassLogger.Add(">> " & row.Item(0).ToString & "|" & row.Item(1).ToString & "|" & row.Item(2).ToString)
'Next
con.Close()
If txtLimitRows.Text <> "" Then
lblResult.Text = "Result of FuBa (limited to " & txtLimitRows.Text & " rows)"
Else
lblResult.Text = "Result of FuBa (unlimited) >> " & resulttable.Rows.Count & " rows retreived"
End If
lblResult.Visible = True
Me.Cursor = Cursors.Default
lblSave.Visible = False
Catch ex As Exception
MsgBox("Unexpected Error in SAP Table Result: " & ex.Message, MsgBoxStyle.Critical)
lblResult.Visible = False
Me.Cursor = Cursors.Default
lblSave.Visible = False
GridControl2.DataSource = Nothing
End Try
Else
sss()
End If
End Sub
End Class