ZooFlow: Administration
This commit is contained in:
Jonathan Jenne
49
GUIs.ZooFlow/DSIDB_Stammdaten.Designer.vb
generated
49
GUIs.ZooFlow/DSIDB_Stammdaten.Designer.vb
generated
@@ -2403,8 +2403,9 @@ Partial Public Class DSIDB_Stammdaten
|
||||
Me.columnGUID.AllowDBNull = false
|
||||
Me.columnGUID.ReadOnly = true
|
||||
Me.columnGUID.Unique = true
|
||||
Me.columnPARENT_ID.AllowDBNull = false
|
||||
Me.columnPARENT_ID.DefaultValue = CType(0,Integer)
|
||||
Me.columnENTITY_TITLE.AllowDBNull = false
|
||||
Me.columnENTITY_TITLE.DefaultValue = CType("Unbenannt",String)
|
||||
Me.columnENTITY_TITLE.MaxLength = 100
|
||||
Me.columnSCOPE.AllowDBNull = false
|
||||
Me.columnSCOPE.MaxLength = 100
|
||||
@@ -3434,7 +3435,11 @@ Partial Public Class DSIDB_Stammdaten
|
||||
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
|
||||
Public Property PARENT_ID() As Integer
|
||||
Get
|
||||
Return CType(Me(Me.tableTBZF_ADMIN_SOURCE_SQL.PARENT_IDColumn),Integer)
|
||||
Try
|
||||
Return CType(Me(Me.tableTBZF_ADMIN_SOURCE_SQL.PARENT_IDColumn),Integer)
|
||||
Catch e As Global.System.InvalidCastException
|
||||
Throw New Global.System.Data.StrongTypingException("Der Wert für Spalte PARENT_ID in Tabelle TBZF_ADMIN_SOURCE_SQL ist DBNull.", e)
|
||||
End Try
|
||||
End Get
|
||||
Set
|
||||
Me(Me.tableTBZF_ADMIN_SOURCE_SQL.PARENT_IDColumn) = value
|
||||
@@ -3575,6 +3580,18 @@ Partial Public Class DSIDB_Stammdaten
|
||||
End Set
|
||||
End Property
|
||||
|
||||
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
|
||||
Public Function IsPARENT_IDNull() As Boolean
|
||||
Return Me.IsNull(Me.tableTBZF_ADMIN_SOURCE_SQL.PARENT_IDColumn)
|
||||
End Function
|
||||
|
||||
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
|
||||
Public Sub SetPARENT_IDNull()
|
||||
Me(Me.tableTBZF_ADMIN_SOURCE_SQL.PARENT_IDColumn) = Global.System.Convert.DBNull
|
||||
End Sub
|
||||
|
||||
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
|
||||
Public Function IsCOMMENTNull() As Boolean
|
||||
@@ -5492,8 +5509,12 @@ Namespace DSIDB_StammdatenTableAdapters
|
||||
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0"), _
|
||||
Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"), _
|
||||
Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Insert, true)> _
|
||||
Public Overloads Overridable Function Insert(ByVal PARENT_ID As Integer, ByVal ENTITY_TITLE As String, ByVal SCOPE As String, ByVal PK_COLUMN As String, ByVal COMMENT As String, ByVal SQL_COMMAND As String, ByVal ADDED_WHO As String, ByVal ADDED_WHEN As Global.System.Nullable(Of Date), ByVal CHANGED_WHO As String, ByVal CHANGED_WHEN As Global.System.Nullable(Of Date), ByVal FK_COLUMN As String) As Integer
|
||||
Me.Adapter.InsertCommand.Parameters(0).Value = CType(PARENT_ID,Integer)
|
||||
Public Overloads Overridable Function Insert(ByVal PARENT_ID As Global.System.Nullable(Of Integer), ByVal ENTITY_TITLE As String, ByVal SCOPE As String, ByVal PK_COLUMN As String, ByVal COMMENT As String, ByVal SQL_COMMAND As String, ByVal ADDED_WHO As String, ByVal ADDED_WHEN As Global.System.Nullable(Of Date), ByVal CHANGED_WHO As String, ByVal CHANGED_WHEN As Global.System.Nullable(Of Date), ByVal FK_COLUMN As String) As Integer
|
||||
If (PARENT_ID.HasValue = true) Then
|
||||
Me.Adapter.InsertCommand.Parameters(0).Value = CType(PARENT_ID.Value,Integer)
|
||||
Else
|
||||
Me.Adapter.InsertCommand.Parameters(0).Value = Global.System.DBNull.Value
|
||||
End If
|
||||
If (ENTITY_TITLE Is Nothing) Then
|
||||
Throw New Global.System.ArgumentNullException("ENTITY_TITLE")
|
||||
Else
|
||||
@@ -5564,7 +5585,7 @@ Namespace DSIDB_StammdatenTableAdapters
|
||||
Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"), _
|
||||
Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Update, true)> _
|
||||
Public Overloads Overridable Function Update( _
|
||||
ByVal PARENT_ID As Integer, _
|
||||
ByVal PARENT_ID As Global.System.Nullable(Of Integer), _
|
||||
ByVal ENTITY_TITLE As String, _
|
||||
ByVal SCOPE As String, _
|
||||
ByVal PK_COLUMN As String, _
|
||||
@@ -5576,7 +5597,7 @@ Namespace DSIDB_StammdatenTableAdapters
|
||||
ByVal CHANGED_WHEN As Global.System.Nullable(Of Date), _
|
||||
ByVal FK_COLUMN As String, _
|
||||
ByVal Original_GUID As Integer, _
|
||||
ByVal Original_PARENT_ID As Integer, _
|
||||
ByVal Original_PARENT_ID As Global.System.Nullable(Of Integer), _
|
||||
ByVal Original_ENTITY_TITLE As String, _
|
||||
ByVal Original_SCOPE As String, _
|
||||
ByVal Original_PK_COLUMN As String, _
|
||||
@@ -5587,7 +5608,11 @@ Namespace DSIDB_StammdatenTableAdapters
|
||||
ByVal Original_CHANGED_WHEN As Global.System.Nullable(Of Date), _
|
||||
ByVal Original_FK_COLUMN As String, _
|
||||
ByVal GUID As Integer) As Integer
|
||||
Me.Adapter.UpdateCommand.Parameters(0).Value = CType(PARENT_ID,Integer)
|
||||
If (PARENT_ID.HasValue = true) Then
|
||||
Me.Adapter.UpdateCommand.Parameters(0).Value = CType(PARENT_ID.Value,Integer)
|
||||
Else
|
||||
Me.Adapter.UpdateCommand.Parameters(0).Value = Global.System.DBNull.Value
|
||||
End If
|
||||
If (ENTITY_TITLE Is Nothing) Then
|
||||
Throw New Global.System.ArgumentNullException("ENTITY_TITLE")
|
||||
Else
|
||||
@@ -5639,7 +5664,11 @@ Namespace DSIDB_StammdatenTableAdapters
|
||||
Me.Adapter.UpdateCommand.Parameters(10).Value = CType(FK_COLUMN,String)
|
||||
End If
|
||||
Me.Adapter.UpdateCommand.Parameters(11).Value = CType(Original_GUID,Integer)
|
||||
Me.Adapter.UpdateCommand.Parameters(12).Value = CType(Original_PARENT_ID,Integer)
|
||||
If (Original_PARENT_ID.HasValue = true) Then
|
||||
Me.Adapter.UpdateCommand.Parameters(12).Value = CType(Original_PARENT_ID.Value,Integer)
|
||||
Else
|
||||
Me.Adapter.UpdateCommand.Parameters(12).Value = Global.System.DBNull.Value
|
||||
End If
|
||||
If (Original_ENTITY_TITLE Is Nothing) Then
|
||||
Throw New Global.System.ArgumentNullException("Original_ENTITY_TITLE")
|
||||
Else
|
||||
@@ -5718,7 +5747,7 @@ Namespace DSIDB_StammdatenTableAdapters
|
||||
Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"), _
|
||||
Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Update, true)> _
|
||||
Public Overloads Overridable Function Update( _
|
||||
ByVal PARENT_ID As Integer, _
|
||||
ByVal PARENT_ID As Global.System.Nullable(Of Integer), _
|
||||
ByVal ENTITY_TITLE As String, _
|
||||
ByVal SCOPE As String, _
|
||||
ByVal PK_COLUMN As String, _
|
||||
@@ -5730,7 +5759,7 @@ Namespace DSIDB_StammdatenTableAdapters
|
||||
ByVal CHANGED_WHEN As Global.System.Nullable(Of Date), _
|
||||
ByVal FK_COLUMN As String, _
|
||||
ByVal Original_GUID As Integer, _
|
||||
ByVal Original_PARENT_ID As Integer, _
|
||||
ByVal Original_PARENT_ID As Global.System.Nullable(Of Integer), _
|
||||
ByVal Original_ENTITY_TITLE As String, _
|
||||
ByVal Original_SCOPE As String, _
|
||||
ByVal Original_PK_COLUMN As String, _
|
||||
|
||||
Reference in New Issue
Block a user