Rename TBEDI_XML_CONFIG To TBMT_CONFIG

This commit is contained in:
Jonathan Jenne
2022-03-16 13:40:33 +01:00
parent 5c30528a83
commit 5dc8d9f50b
8 changed files with 214 additions and 214 deletions

View File

@@ -35,7 +35,7 @@ Partial Public Class DS_DD_ECM
Private tableTBEDI_XML_FUNCTIONS As TBEDI_XML_FUNCTIONSDataTable
Private tableTBEDI_XML_CONFIG As TBEDI_XML_CONFIGDataTable
Private tableTBMT_CONFIG As TBMT_CONFIGDataTable
Private relationTBEDI_XML_TEMPLATE_ITEMS_TBEDI_XML_FUNCTIONS As Global.System.Data.DataRelation
@@ -87,8 +87,8 @@ Partial Public Class DS_DD_ECM
If (Not (ds.Tables("TBEDI_XML_FUNCTIONS")) Is Nothing) Then
MyBase.Tables.Add(New TBEDI_XML_FUNCTIONSDataTable(ds.Tables("TBEDI_XML_FUNCTIONS")))
End If
If (Not (ds.Tables("TBEDI_XML_CONFIG")) Is Nothing) Then
MyBase.Tables.Add(New TBEDI_XML_CONFIGDataTable(ds.Tables("TBEDI_XML_CONFIG")))
If (Not (ds.Tables("TBMT_CONFIG")) Is Nothing) Then
MyBase.Tables.Add(New TBMT_CONFIGDataTable(ds.Tables("TBMT_CONFIG")))
End If
Me.DataSetName = ds.DataSetName
Me.Prefix = ds.Prefix
@@ -161,9 +161,9 @@ Partial Public Class DS_DD_ECM
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0"), _
Global.System.ComponentModel.Browsable(false), _
Global.System.ComponentModel.DesignerSerializationVisibility(Global.System.ComponentModel.DesignerSerializationVisibility.Content)> _
Public ReadOnly Property TBEDI_XML_CONFIG() As TBEDI_XML_CONFIGDataTable
Public ReadOnly Property TBMT_CONFIG() As TBMT_CONFIGDataTable
Get
Return Me.tableTBEDI_XML_CONFIG
Return Me.tableTBMT_CONFIG
End Get
End Property
@@ -249,8 +249,8 @@ Partial Public Class DS_DD_ECM
If (Not (ds.Tables("TBEDI_XML_FUNCTIONS")) Is Nothing) Then
MyBase.Tables.Add(New TBEDI_XML_FUNCTIONSDataTable(ds.Tables("TBEDI_XML_FUNCTIONS")))
End If
If (Not (ds.Tables("TBEDI_XML_CONFIG")) Is Nothing) Then
MyBase.Tables.Add(New TBEDI_XML_CONFIGDataTable(ds.Tables("TBEDI_XML_CONFIG")))
If (Not (ds.Tables("TBMT_CONFIG")) Is Nothing) Then
MyBase.Tables.Add(New TBMT_CONFIGDataTable(ds.Tables("TBMT_CONFIG")))
End If
Me.DataSetName = ds.DataSetName
Me.Prefix = ds.Prefix
@@ -314,10 +314,10 @@ Partial Public Class DS_DD_ECM
Me.tableTBEDI_XML_FUNCTIONS.InitVars
End If
End If
Me.tableTBEDI_XML_CONFIG = CType(MyBase.Tables("TBEDI_XML_CONFIG"),TBEDI_XML_CONFIGDataTable)
Me.tableTBMT_CONFIG = CType(MyBase.Tables("TBMT_CONFIG"),TBMT_CONFIGDataTable)
If (initTable = true) Then
If (Not (Me.tableTBEDI_XML_CONFIG) Is Nothing) Then
Me.tableTBEDI_XML_CONFIG.InitVars
If (Not (Me.tableTBMT_CONFIG) Is Nothing) Then
Me.tableTBMT_CONFIG.InitVars
End If
End If
Me.relationTBEDI_XML_TEMPLATE_ITEMS_TBEDI_XML_FUNCTIONS = Me.Relations("TBEDI_XML_TEMPLATE_ITEMS_TBEDI_XML_FUNCTIONS")
@@ -343,8 +343,8 @@ Partial Public Class DS_DD_ECM
MyBase.Tables.Add(Me.tableTBEDI_XML_NODES)
Me.tableTBEDI_XML_FUNCTIONS = New TBEDI_XML_FUNCTIONSDataTable()
MyBase.Tables.Add(Me.tableTBEDI_XML_FUNCTIONS)
Me.tableTBEDI_XML_CONFIG = New TBEDI_XML_CONFIGDataTable()
MyBase.Tables.Add(Me.tableTBEDI_XML_CONFIG)
Me.tableTBMT_CONFIG = New TBMT_CONFIGDataTable()
MyBase.Tables.Add(Me.tableTBMT_CONFIG)
Me.relationTBEDI_XML_TEMPLATE_ITEMS_TBEDI_XML_FUNCTIONS = New Global.System.Data.DataRelation("TBEDI_XML_TEMPLATE_ITEMS_TBEDI_XML_FUNCTIONS", New Global.System.Data.DataColumn() {Me.tableTBEDI_XML_TEMPLATE_ITEMS.FUNCTION_IDColumn}, New Global.System.Data.DataColumn() {Me.tableTBEDI_XML_FUNCTIONS.GUIDColumn}, false)
Me.Relations.Add(Me.relationTBEDI_XML_TEMPLATE_ITEMS_TBEDI_XML_FUNCTIONS)
Me.relationTBEDI_XML_TEMPLATE_ITEMS_TBEDI_XML_TYPES = New Global.System.Data.DataRelation("TBEDI_XML_TEMPLATE_ITEMS_TBEDI_XML_TYPES", New Global.System.Data.DataColumn() {Me.tableTBEDI_XML_TEMPLATE_ITEMS.XML_TYPE_IDColumn}, New Global.System.Data.DataColumn() {Me.tableTBEDI_XML_TYPES.GUIDColumn}, false)
@@ -385,7 +385,7 @@ Partial Public Class DS_DD_ECM
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Private Function ShouldSerializeTBEDI_XML_CONFIG() As Boolean
Private Function ShouldSerializeTBMT_CONFIG() As Boolean
Return false
End Function
@@ -463,7 +463,7 @@ Partial Public Class DS_DD_ECM
Public Delegate Sub TBEDI_XML_FUNCTIONSRowChangeEventHandler(ByVal sender As Object, ByVal e As TBEDI_XML_FUNCTIONSRowChangeEvent)
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Public Delegate Sub TBEDI_XML_CONFIGRowChangeEventHandler(ByVal sender As Object, ByVal e As TBEDI_XML_CONFIGRowChangeEvent)
Public Delegate Sub TBMT_CONFIGRowChangeEventHandler(ByVal sender As Object, ByVal e As TBMT_CONFIGRowChangeEvent)
'''<summary>
'''Represents the strongly named DataTable class.
@@ -2121,8 +2121,8 @@ Partial Public Class DS_DD_ECM
'''</summary>
<Global.System.Serializable(), _
Global.System.Xml.Serialization.XmlSchemaProviderAttribute("GetTypedTableSchema")> _
Partial Public Class TBEDI_XML_CONFIGDataTable
Inherits Global.System.Data.TypedTableBase(Of TBEDI_XML_CONFIGRow)
Partial Public Class TBMT_CONFIGDataTable
Inherits Global.System.Data.TypedTableBase(Of TBMT_CONFIGRow)
Private columnGUID As Global.System.Data.DataColumn
@@ -2148,7 +2148,7 @@ Partial Public Class DS_DD_ECM
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Public Sub New()
MyBase.New
Me.TableName = "TBEDI_XML_CONFIG"
Me.TableName = "TBMT_CONFIG"
Me.BeginInit
Me.InitClass
Me.EndInit
@@ -2270,50 +2270,50 @@ Partial Public Class DS_DD_ECM
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Public Default ReadOnly Property Item(ByVal index As Integer) As TBEDI_XML_CONFIGRow
Public Default ReadOnly Property Item(ByVal index As Integer) As TBMT_CONFIGRow
Get
Return CType(Me.Rows(index),TBEDI_XML_CONFIGRow)
Return CType(Me.Rows(index),TBMT_CONFIGRow)
End Get
End Property
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Public Event TBEDI_XML_CONFIGRowChanging As TBEDI_XML_CONFIGRowChangeEventHandler
Public Event TBMT_CONFIGRowChanging As TBMT_CONFIGRowChangeEventHandler
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Public Event TBEDI_XML_CONFIGRowChanged As TBEDI_XML_CONFIGRowChangeEventHandler
Public Event TBMT_CONFIGRowChanged As TBMT_CONFIGRowChangeEventHandler
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Public Event TBEDI_XML_CONFIGRowDeleting As TBEDI_XML_CONFIGRowChangeEventHandler
Public Event TBMT_CONFIGRowDeleting As TBMT_CONFIGRowChangeEventHandler
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Public Event TBEDI_XML_CONFIGRowDeleted As TBEDI_XML_CONFIGRowChangeEventHandler
Public Event TBMT_CONFIGRowDeleted As TBMT_CONFIGRowChangeEventHandler
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Public Overloads Sub AddTBEDI_XML_CONFIGRow(ByVal row As TBEDI_XML_CONFIGRow)
Public Overloads Sub AddTBMT_CONFIGRow(ByVal row As TBMT_CONFIGRow)
Me.Rows.Add(row)
End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Public Overloads Function AddTBEDI_XML_CONFIGRow(ByVal KEY As String, ByVal VALUE As String, ByVal ADDED_WHO As String, ByVal ADDED_WHEN As Date, ByVal CHANGED_WHO As String, ByVal CHANGED_WHEN As Date, ByVal ACTIVE As Boolean, ByVal TEMPLATE_ID As Integer, ByVal COMMENT As String) As TBEDI_XML_CONFIGRow
Dim rowTBEDI_XML_CONFIGRow As TBEDI_XML_CONFIGRow = CType(Me.NewRow,TBEDI_XML_CONFIGRow)
Public Overloads Function AddTBMT_CONFIGRow(ByVal KEY As String, ByVal VALUE As String, ByVal ADDED_WHO As String, ByVal ADDED_WHEN As Date, ByVal CHANGED_WHO As String, ByVal CHANGED_WHEN As Date, ByVal ACTIVE As Boolean, ByVal TEMPLATE_ID As Integer, ByVal COMMENT As String) As TBMT_CONFIGRow
Dim rowTBMT_CONFIGRow As TBMT_CONFIGRow = CType(Me.NewRow,TBMT_CONFIGRow)
Dim columnValuesArray() As Object = New Object() {Nothing, KEY, VALUE, ADDED_WHO, ADDED_WHEN, CHANGED_WHO, CHANGED_WHEN, ACTIVE, TEMPLATE_ID, COMMENT}
rowTBEDI_XML_CONFIGRow.ItemArray = columnValuesArray
Me.Rows.Add(rowTBEDI_XML_CONFIGRow)
Return rowTBEDI_XML_CONFIGRow
rowTBMT_CONFIGRow.ItemArray = columnValuesArray
Me.Rows.Add(rowTBMT_CONFIGRow)
Return rowTBMT_CONFIGRow
End Function
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Public Function FindByGUID(ByVal GUID As Integer) As TBEDI_XML_CONFIGRow
Return CType(Me.Rows.Find(New Object() {GUID}),TBEDI_XML_CONFIGRow)
Public Function FindByGUID(ByVal GUID As Integer) As TBMT_CONFIGRow
Return CType(Me.Rows.Find(New Object() {GUID}),TBMT_CONFIGRow)
End Function
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Public Overrides Function Clone() As Global.System.Data.DataTable
Dim cln As TBEDI_XML_CONFIGDataTable = CType(MyBase.Clone,TBEDI_XML_CONFIGDataTable)
Dim cln As TBMT_CONFIGDataTable = CType(MyBase.Clone,TBMT_CONFIGDataTable)
cln.InitVars
Return cln
End Function
@@ -2321,7 +2321,7 @@ Partial Public Class DS_DD_ECM
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Protected Overrides Function CreateInstance() As Global.System.Data.DataTable
Return New TBEDI_XML_CONFIGDataTable()
Return New TBMT_CONFIGDataTable()
End Function
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
@@ -2383,28 +2383,28 @@ Partial Public Class DS_DD_ECM
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Public Function NewTBEDI_XML_CONFIGRow() As TBEDI_XML_CONFIGRow
Return CType(Me.NewRow,TBEDI_XML_CONFIGRow)
Public Function NewTBMT_CONFIGRow() As TBMT_CONFIGRow
Return CType(Me.NewRow,TBMT_CONFIGRow)
End Function
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Protected Overrides Function NewRowFromBuilder(ByVal builder As Global.System.Data.DataRowBuilder) As Global.System.Data.DataRow
Return New TBEDI_XML_CONFIGRow(builder)
Return New TBMT_CONFIGRow(builder)
End Function
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Protected Overrides Function GetRowType() As Global.System.Type
Return GetType(TBEDI_XML_CONFIGRow)
Return GetType(TBMT_CONFIGRow)
End Function
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Protected Overrides Sub OnRowChanged(ByVal e As Global.System.Data.DataRowChangeEventArgs)
MyBase.OnRowChanged(e)
If (Not (Me.TBEDI_XML_CONFIGRowChangedEvent) Is Nothing) Then
RaiseEvent TBEDI_XML_CONFIGRowChanged(Me, New TBEDI_XML_CONFIGRowChangeEvent(CType(e.Row,TBEDI_XML_CONFIGRow), e.Action))
If (Not (Me.TBMT_CONFIGRowChangedEvent) Is Nothing) Then
RaiseEvent TBMT_CONFIGRowChanged(Me, New TBMT_CONFIGRowChangeEvent(CType(e.Row,TBMT_CONFIGRow), e.Action))
End If
End Sub
@@ -2412,8 +2412,8 @@ Partial Public Class DS_DD_ECM
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Protected Overrides Sub OnRowChanging(ByVal e As Global.System.Data.DataRowChangeEventArgs)
MyBase.OnRowChanging(e)
If (Not (Me.TBEDI_XML_CONFIGRowChangingEvent) Is Nothing) Then
RaiseEvent TBEDI_XML_CONFIGRowChanging(Me, New TBEDI_XML_CONFIGRowChangeEvent(CType(e.Row,TBEDI_XML_CONFIGRow), e.Action))
If (Not (Me.TBMT_CONFIGRowChangingEvent) Is Nothing) Then
RaiseEvent TBMT_CONFIGRowChanging(Me, New TBMT_CONFIGRowChangeEvent(CType(e.Row,TBMT_CONFIGRow), e.Action))
End If
End Sub
@@ -2421,8 +2421,8 @@ Partial Public Class DS_DD_ECM
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Protected Overrides Sub OnRowDeleted(ByVal e As Global.System.Data.DataRowChangeEventArgs)
MyBase.OnRowDeleted(e)
If (Not (Me.TBEDI_XML_CONFIGRowDeletedEvent) Is Nothing) Then
RaiseEvent TBEDI_XML_CONFIGRowDeleted(Me, New TBEDI_XML_CONFIGRowChangeEvent(CType(e.Row,TBEDI_XML_CONFIGRow), e.Action))
If (Not (Me.TBMT_CONFIGRowDeletedEvent) Is Nothing) Then
RaiseEvent TBMT_CONFIGRowDeleted(Me, New TBMT_CONFIGRowChangeEvent(CType(e.Row,TBMT_CONFIGRow), e.Action))
End If
End Sub
@@ -2430,14 +2430,14 @@ Partial Public Class DS_DD_ECM
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Protected Overrides Sub OnRowDeleting(ByVal e As Global.System.Data.DataRowChangeEventArgs)
MyBase.OnRowDeleting(e)
If (Not (Me.TBEDI_XML_CONFIGRowDeletingEvent) Is Nothing) Then
RaiseEvent TBEDI_XML_CONFIGRowDeleting(Me, New TBEDI_XML_CONFIGRowChangeEvent(CType(e.Row,TBEDI_XML_CONFIGRow), e.Action))
If (Not (Me.TBMT_CONFIGRowDeletingEvent) Is Nothing) Then
RaiseEvent TBMT_CONFIGRowDeleting(Me, New TBMT_CONFIGRowChangeEvent(CType(e.Row,TBMT_CONFIGRow), e.Action))
End If
End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Public Sub RemoveTBEDI_XML_CONFIGRow(ByVal row As TBEDI_XML_CONFIGRow)
Public Sub RemoveTBMT_CONFIGRow(ByVal row As TBMT_CONFIGRow)
Me.Rows.Remove(row)
End Sub
@@ -2464,7 +2464,7 @@ Partial Public Class DS_DD_ECM
type.Attributes.Add(attribute1)
Dim attribute2 As Global.System.Xml.Schema.XmlSchemaAttribute = New Global.System.Xml.Schema.XmlSchemaAttribute()
attribute2.Name = "tableTypeName"
attribute2.FixedValue = "TBEDI_XML_CONFIGDataTable"
attribute2.FixedValue = "TBMT_CONFIGDataTable"
type.Attributes.Add(attribute2)
type.Particle = sequence
Dim dsSchema As Global.System.Xml.Schema.XmlSchema = ds.GetSchemaSerializable
@@ -3075,26 +3075,26 @@ Partial Public Class DS_DD_ECM
'''<summary>
'''Represents strongly named DataRow class.
'''</summary>
Partial Public Class TBEDI_XML_CONFIGRow
Partial Public Class TBMT_CONFIGRow
Inherits Global.System.Data.DataRow
Private tableTBEDI_XML_CONFIG As TBEDI_XML_CONFIGDataTable
Private tableTBMT_CONFIG As TBMT_CONFIGDataTable
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Friend Sub New(ByVal rb As Global.System.Data.DataRowBuilder)
MyBase.New(rb)
Me.tableTBEDI_XML_CONFIG = CType(Me.Table,TBEDI_XML_CONFIGDataTable)
Me.tableTBMT_CONFIG = CType(Me.Table,TBMT_CONFIGDataTable)
End Sub
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Public Property GUID() As Integer
Get
Return CType(Me(Me.tableTBEDI_XML_CONFIG.GUIDColumn),Integer)
Return CType(Me(Me.tableTBMT_CONFIG.GUIDColumn),Integer)
End Get
Set
Me(Me.tableTBEDI_XML_CONFIG.GUIDColumn) = value
Me(Me.tableTBMT_CONFIG.GUIDColumn) = value
End Set
End Property
@@ -3102,10 +3102,10 @@ Partial Public Class DS_DD_ECM
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Public Property KEY() As String
Get
Return CType(Me(Me.tableTBEDI_XML_CONFIG.KEYColumn),String)
Return CType(Me(Me.tableTBMT_CONFIG.KEYColumn),String)
End Get
Set
Me(Me.tableTBEDI_XML_CONFIG.KEYColumn) = value
Me(Me.tableTBMT_CONFIG.KEYColumn) = value
End Set
End Property
@@ -3113,10 +3113,10 @@ Partial Public Class DS_DD_ECM
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Public Property VALUE() As String
Get
Return CType(Me(Me.tableTBEDI_XML_CONFIG.VALUEColumn),String)
Return CType(Me(Me.tableTBMT_CONFIG.VALUEColumn),String)
End Get
Set
Me(Me.tableTBEDI_XML_CONFIG.VALUEColumn) = value
Me(Me.tableTBMT_CONFIG.VALUEColumn) = value
End Set
End Property
@@ -3124,10 +3124,10 @@ Partial Public Class DS_DD_ECM
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Public Property ADDED_WHO() As String
Get
Return CType(Me(Me.tableTBEDI_XML_CONFIG.ADDED_WHOColumn),String)
Return CType(Me(Me.tableTBMT_CONFIG.ADDED_WHOColumn),String)
End Get
Set
Me(Me.tableTBEDI_XML_CONFIG.ADDED_WHOColumn) = value
Me(Me.tableTBMT_CONFIG.ADDED_WHOColumn) = value
End Set
End Property
@@ -3136,13 +3136,13 @@ Partial Public Class DS_DD_ECM
Public Property ADDED_WHEN() As Date
Get
Try
Return CType(Me(Me.tableTBEDI_XML_CONFIG.ADDED_WHENColumn),Date)
Return CType(Me(Me.tableTBMT_CONFIG.ADDED_WHENColumn),Date)
Catch e As Global.System.InvalidCastException
Throw New Global.System.Data.StrongTypingException("Der Wert für Spalte ADDED_WHEN in Tabelle TBEDI_XML_CONFIG ist DBNull.", e)
Throw New Global.System.Data.StrongTypingException("Der Wert für Spalte ADDED_WHEN in Tabelle TBMT_CONFIG ist DBNull.", e)
End Try
End Get
Set
Me(Me.tableTBEDI_XML_CONFIG.ADDED_WHENColumn) = value
Me(Me.tableTBMT_CONFIG.ADDED_WHENColumn) = value
End Set
End Property
@@ -3151,13 +3151,13 @@ Partial Public Class DS_DD_ECM
Public Property CHANGED_WHO() As String
Get
Try
Return CType(Me(Me.tableTBEDI_XML_CONFIG.CHANGED_WHOColumn),String)
Return CType(Me(Me.tableTBMT_CONFIG.CHANGED_WHOColumn),String)
Catch e As Global.System.InvalidCastException
Throw New Global.System.Data.StrongTypingException("Der Wert für Spalte CHANGED_WHO in Tabelle TBEDI_XML_CONFIG ist DBNull.", e)
Throw New Global.System.Data.StrongTypingException("Der Wert für Spalte CHANGED_WHO in Tabelle TBMT_CONFIG ist DBNull.", e)
End Try
End Get
Set
Me(Me.tableTBEDI_XML_CONFIG.CHANGED_WHOColumn) = value
Me(Me.tableTBMT_CONFIG.CHANGED_WHOColumn) = value
End Set
End Property
@@ -3166,13 +3166,13 @@ Partial Public Class DS_DD_ECM
Public Property CHANGED_WHEN() As Date
Get
Try
Return CType(Me(Me.tableTBEDI_XML_CONFIG.CHANGED_WHENColumn),Date)
Return CType(Me(Me.tableTBMT_CONFIG.CHANGED_WHENColumn),Date)
Catch e As Global.System.InvalidCastException
Throw New Global.System.Data.StrongTypingException("Der Wert für Spalte CHANGED_WHEN in Tabelle TBEDI_XML_CONFIG ist DBNull.", e)
Throw New Global.System.Data.StrongTypingException("Der Wert für Spalte CHANGED_WHEN in Tabelle TBMT_CONFIG ist DBNull.", e)
End Try
End Get
Set
Me(Me.tableTBEDI_XML_CONFIG.CHANGED_WHENColumn) = value
Me(Me.tableTBMT_CONFIG.CHANGED_WHENColumn) = value
End Set
End Property
@@ -3180,10 +3180,10 @@ Partial Public Class DS_DD_ECM
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Public Property ACTIVE() As Boolean
Get
Return CType(Me(Me.tableTBEDI_XML_CONFIG.ACTIVEColumn),Boolean)
Return CType(Me(Me.tableTBMT_CONFIG.ACTIVEColumn),Boolean)
End Get
Set
Me(Me.tableTBEDI_XML_CONFIG.ACTIVEColumn) = value
Me(Me.tableTBMT_CONFIG.ACTIVEColumn) = value
End Set
End Property
@@ -3192,13 +3192,13 @@ Partial Public Class DS_DD_ECM
Public Property TEMPLATE_ID() As Integer
Get
Try
Return CType(Me(Me.tableTBEDI_XML_CONFIG.TEMPLATE_IDColumn),Integer)
Return CType(Me(Me.tableTBMT_CONFIG.TEMPLATE_IDColumn),Integer)
Catch e As Global.System.InvalidCastException
Throw New Global.System.Data.StrongTypingException("Der Wert für Spalte TEMPLATE_ID in Tabelle TBEDI_XML_CONFIG ist DBNull.", e)
Throw New Global.System.Data.StrongTypingException("Der Wert für Spalte TEMPLATE_ID in Tabelle TBMT_CONFIG ist DBNull.", e)
End Try
End Get
Set
Me(Me.tableTBEDI_XML_CONFIG.TEMPLATE_IDColumn) = value
Me(Me.tableTBMT_CONFIG.TEMPLATE_IDColumn) = value
End Set
End Property
@@ -3207,74 +3207,74 @@ Partial Public Class DS_DD_ECM
Public Property COMMENT() As String
Get
Try
Return CType(Me(Me.tableTBEDI_XML_CONFIG.COMMENTColumn),String)
Return CType(Me(Me.tableTBMT_CONFIG.COMMENTColumn),String)
Catch e As Global.System.InvalidCastException
Throw New Global.System.Data.StrongTypingException("Der Wert für Spalte COMMENT in Tabelle TBEDI_XML_CONFIG ist DBNull.", e)
Throw New Global.System.Data.StrongTypingException("Der Wert für Spalte COMMENT in Tabelle TBMT_CONFIG ist DBNull.", e)
End Try
End Get
Set
Me(Me.tableTBEDI_XML_CONFIG.COMMENTColumn) = value
Me(Me.tableTBMT_CONFIG.COMMENTColumn) = value
End Set
End Property
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Public Function IsADDED_WHENNull() As Boolean
Return Me.IsNull(Me.tableTBEDI_XML_CONFIG.ADDED_WHENColumn)
Return Me.IsNull(Me.tableTBMT_CONFIG.ADDED_WHENColumn)
End Function
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Public Sub SetADDED_WHENNull()
Me(Me.tableTBEDI_XML_CONFIG.ADDED_WHENColumn) = Global.System.Convert.DBNull
Me(Me.tableTBMT_CONFIG.ADDED_WHENColumn) = 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 IsCHANGED_WHONull() As Boolean
Return Me.IsNull(Me.tableTBEDI_XML_CONFIG.CHANGED_WHOColumn)
Return Me.IsNull(Me.tableTBMT_CONFIG.CHANGED_WHOColumn)
End Function
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Public Sub SetCHANGED_WHONull()
Me(Me.tableTBEDI_XML_CONFIG.CHANGED_WHOColumn) = Global.System.Convert.DBNull
Me(Me.tableTBMT_CONFIG.CHANGED_WHOColumn) = 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 IsCHANGED_WHENNull() As Boolean
Return Me.IsNull(Me.tableTBEDI_XML_CONFIG.CHANGED_WHENColumn)
Return Me.IsNull(Me.tableTBMT_CONFIG.CHANGED_WHENColumn)
End Function
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Public Sub SetCHANGED_WHENNull()
Me(Me.tableTBEDI_XML_CONFIG.CHANGED_WHENColumn) = Global.System.Convert.DBNull
Me(Me.tableTBMT_CONFIG.CHANGED_WHENColumn) = 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 IsTEMPLATE_IDNull() As Boolean
Return Me.IsNull(Me.tableTBEDI_XML_CONFIG.TEMPLATE_IDColumn)
Return Me.IsNull(Me.tableTBMT_CONFIG.TEMPLATE_IDColumn)
End Function
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Public Sub SetTEMPLATE_IDNull()
Me(Me.tableTBEDI_XML_CONFIG.TEMPLATE_IDColumn) = Global.System.Convert.DBNull
Me(Me.tableTBMT_CONFIG.TEMPLATE_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
Return Me.IsNull(Me.tableTBEDI_XML_CONFIG.COMMENTColumn)
Return Me.IsNull(Me.tableTBMT_CONFIG.COMMENTColumn)
End Function
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Public Sub SetCOMMENTNull()
Me(Me.tableTBEDI_XML_CONFIG.COMMENTColumn) = Global.System.Convert.DBNull
Me(Me.tableTBMT_CONFIG.COMMENTColumn) = Global.System.Convert.DBNull
End Sub
End Class
@@ -3462,16 +3462,16 @@ Partial Public Class DS_DD_ECM
'''Row event argument class
'''</summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Public Class TBEDI_XML_CONFIGRowChangeEvent
Public Class TBMT_CONFIGRowChangeEvent
Inherits Global.System.EventArgs
Private eventRow As TBEDI_XML_CONFIGRow
Private eventRow As TBMT_CONFIGRow
Private eventAction As Global.System.Data.DataRowAction
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Public Sub New(ByVal row As TBEDI_XML_CONFIGRow, ByVal action As Global.System.Data.DataRowAction)
Public Sub New(ByVal row As TBMT_CONFIGRow, ByVal action As Global.System.Data.DataRowAction)
MyBase.New
Me.eventRow = row
Me.eventAction = action
@@ -3479,7 +3479,7 @@ Partial Public Class DS_DD_ECM
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Public ReadOnly Property Row() As TBEDI_XML_CONFIGRow
Public ReadOnly Property Row() As TBMT_CONFIGRow
Get
Return Me.eventRow
End Get
@@ -5245,7 +5245,7 @@ Namespace DS_DD_ECMTableAdapters
Global.System.ComponentModel.DesignerAttribute("Microsoft.VSDesigner.DataSource.Design.TableAdapterDesigner, Microsoft.VSDesigner"& _
", Version=10.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"), _
Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")> _
Partial Public Class TBEDI_XML_CONFIGTableAdapter
Partial Public Class TBMT_CONFIGTableAdapter
Inherits Global.System.ComponentModel.Component
Private WithEvents _adapter As Global.System.Data.SqlClient.SqlDataAdapter
@@ -5362,7 +5362,7 @@ Namespace DS_DD_ECMTableAdapters
Me._adapter = New Global.System.Data.SqlClient.SqlDataAdapter()
Dim tableMapping As Global.System.Data.Common.DataTableMapping = New Global.System.Data.Common.DataTableMapping()
tableMapping.SourceTable = "Table"
tableMapping.DataSetTable = "TBEDI_XML_CONFIG"
tableMapping.DataSetTable = "TBMT_CONFIG"
tableMapping.ColumnMappings.Add("GUID", "GUID")
tableMapping.ColumnMappings.Add("KEY", "KEY")
tableMapping.ColumnMappings.Add("VALUE", "VALUE")
@@ -5376,15 +5376,15 @@ Namespace DS_DD_ECMTableAdapters
Me._adapter.TableMappings.Add(tableMapping)
Me._adapter.DeleteCommand = New Global.System.Data.SqlClient.SqlCommand()
Me._adapter.DeleteCommand.Connection = Me.Connection
Me._adapter.DeleteCommand.CommandText = "DELETE FROM TBEDI_XML_CONFIG"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"WHERE (GUID = @Original_GUID)"
Me._adapter.DeleteCommand.CommandText = "DELETE FROM TBMT_CONFIG"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"WHERE (GUID = @Original_GUID)"
Me._adapter.DeleteCommand.CommandType = Global.System.Data.CommandType.Text
Me._adapter.DeleteCommand.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.InsertCommand = New Global.System.Data.SqlClient.SqlCommand()
Me._adapter.InsertCommand.Connection = Me.Connection
Me._adapter.InsertCommand.CommandText = "INSERT INTO TBEDI_XML_CONFIG"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" ([KEY], VALUE, ADDED_WHO, "& _
"ADDED_WHEN, CHANGED_WHO, CHANGED_WHEN, ACTIVE, TEMPLATE_ID, COMMENT)"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"VALUES "& _
" (@KEY,@VALUE,@ADDED_WHO,@ADDED_WHEN,@CHANGED_WHO,@CHANGED_WHEN,@ACTIVE,@TEMP"& _
"LATE_ID,@COMMENT)"
Me._adapter.InsertCommand.CommandText = "INSERT INTO TBMT_CONFIG"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" ([KEY], VALUE, ADDED_WHO, ADDED"& _
"_WHEN, CHANGED_WHO, CHANGED_WHEN, ACTIVE, TEMPLATE_ID, COMMENT)"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"VALUES ("& _
"@KEY,@VALUE,@ADDED_WHO,@ADDED_WHEN,@CHANGED_WHO,@CHANGED_WHEN,@ACTIVE,@TEMPLATE_"& _
"ID,@COMMENT)"
Me._adapter.InsertCommand.CommandType = Global.System.Data.CommandType.Text
Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@KEY", Global.System.Data.SqlDbType.NVarChar, 100, Global.System.Data.ParameterDirection.Input, 0, 0, "KEY", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@VALUE", Global.System.Data.SqlDbType.NVarChar, 500, Global.System.Data.ParameterDirection.Input, 0, 0, "VALUE", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
@@ -5397,10 +5397,10 @@ Namespace DS_DD_ECMTableAdapters
Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@COMMENT", Global.System.Data.SqlDbType.NVarChar, 100, Global.System.Data.ParameterDirection.Input, 0, 0, "COMMENT", 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 TBEDI_XML_CONFIG"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"SET [KEY] = @KEY, VALUE = @VALUE, A"& _
"DDED_WHO = @ADDED_WHO, ADDED_WHEN = @ADDED_WHEN, CHANGED_WHO = @CHANGED_WHO, CHA"& _
"NGED_WHEN = @CHANGED_WHEN, ACTIVE = @ACTIVE, "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" TEMPLATE"& _
"_ID = @TEMPLATE_ID, COMMENT = @COMMENT"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"WHERE (GUID = @Original_GUID)"
Me._adapter.UpdateCommand.CommandText = "UPDATE TBMT_CONFIG"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"SET [KEY] = @KEY, VALUE = @VALUE, ADDED_"& _
"WHO = @ADDED_WHO, ADDED_WHEN = @ADDED_WHEN, CHANGED_WHO = @CHANGED_WHO, CHANGED_"& _
"WHEN = @CHANGED_WHEN, ACTIVE = @ACTIVE, "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" TEMPLATE_ID ="& _
" @TEMPLATE_ID, COMMENT = @COMMENT"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"WHERE (GUID = @Original_GUID)"
Me._adapter.UpdateCommand.CommandType = Global.System.Data.CommandType.Text
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@KEY", Global.System.Data.SqlDbType.NVarChar, 100, Global.System.Data.ParameterDirection.Input, 0, 0, "KEY", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@VALUE", Global.System.Data.SqlDbType.NVarChar, 500, Global.System.Data.ParameterDirection.Input, 0, 0, "VALUE", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
@@ -5428,7 +5428,7 @@ Namespace DS_DD_ECMTableAdapters
Me._commandCollection(0) = New Global.System.Data.SqlClient.SqlCommand()
Me._commandCollection(0).Connection = Me.Connection
Me._commandCollection(0).CommandText = "SELECT GUID, [KEY], VALUE, ADDED_WHO, ADDED_WHEN, CHANGED_WHO, CHANGED_WHE"& _
"N, ACTIVE, TEMPLATE_ID, COMMENT"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"FROM TBEDI_XML_CONFIG"
"N, ACTIVE, TEMPLATE_ID, COMMENT"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"FROM TBMT_CONFIG"
Me._commandCollection(0).CommandType = Global.System.Data.CommandType.Text
End Sub
@@ -5436,7 +5436,7 @@ Namespace DS_DD_ECMTableAdapters
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.Fill, true)> _
Public Overloads Overridable Function Fill(ByVal dataTable As DS_DD_ECM.TBEDI_XML_CONFIGDataTable) As Integer
Public Overloads Overridable Function Fill(ByVal dataTable As DS_DD_ECM.TBMT_CONFIGDataTable) As Integer
Me.Adapter.SelectCommand = Me.CommandCollection(0)
If (Me.ClearBeforeFill = true) Then
dataTable.Clear
@@ -5449,9 +5449,9 @@ Namespace DS_DD_ECMTableAdapters
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.[Select], true)> _
Public Overloads Overridable Function GetData() As DS_DD_ECM.TBEDI_XML_CONFIGDataTable
Public Overloads Overridable Function GetData() As DS_DD_ECM.TBMT_CONFIGDataTable
Me.Adapter.SelectCommand = Me.CommandCollection(0)
Dim dataTable As DS_DD_ECM.TBEDI_XML_CONFIGDataTable = New DS_DD_ECM.TBEDI_XML_CONFIGDataTable()
Dim dataTable As DS_DD_ECM.TBMT_CONFIGDataTable = New DS_DD_ECM.TBMT_CONFIGDataTable()
Me.Adapter.Fill(dataTable)
Return dataTable
End Function
@@ -5459,7 +5459,7 @@ Namespace DS_DD_ECMTableAdapters
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0"), _
Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")> _
Public Overloads Overridable Function Update(ByVal dataTable As DS_DD_ECM.TBEDI_XML_CONFIGDataTable) As Integer
Public Overloads Overridable Function Update(ByVal dataTable As DS_DD_ECM.TBMT_CONFIGDataTable) As Integer
Return Me.Adapter.Update(dataTable)
End Function
@@ -5467,7 +5467,7 @@ Namespace DS_DD_ECMTableAdapters
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0"), _
Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")> _
Public Overloads Overridable Function Update(ByVal dataSet As DS_DD_ECM) As Integer
Return Me.Adapter.Update(dataSet, "TBEDI_XML_CONFIG")
Return Me.Adapter.Update(dataSet, "TBMT_CONFIG")
End Function
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
@@ -5652,7 +5652,7 @@ Namespace DS_DD_ECMTableAdapters
Private _tBEDI_XML_FUNCTIONSTableAdapter As TBEDI_XML_FUNCTIONSTableAdapter
Private _tBEDI_XML_CONFIGTableAdapter As TBEDI_XML_CONFIGTableAdapter
Private _tBMT_CONFIGTableAdapter As TBMT_CONFIGTableAdapter
Private _backupDataSetBeforeUpdate As Boolean
@@ -5744,12 +5744,12 @@ Namespace DS_DD_ECMTableAdapters
Global.System.ComponentModel.EditorAttribute("Microsoft.VSDesigner.DataSource.Design.TableAdapterManagerPropertyEditor, Microso"& _
"ft.VSDesigner, Version=10.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3"& _
"a", "System.Drawing.Design.UITypeEditor")> _
Public Property TBEDI_XML_CONFIGTableAdapter() As TBEDI_XML_CONFIGTableAdapter
Public Property TBMT_CONFIGTableAdapter() As TBMT_CONFIGTableAdapter
Get
Return Me._tBEDI_XML_CONFIGTableAdapter
Return Me._tBMT_CONFIGTableAdapter
End Get
Set
Me._tBEDI_XML_CONFIGTableAdapter = value
Me._tBMT_CONFIGTableAdapter = value
End Set
End Property
@@ -5792,9 +5792,9 @@ Namespace DS_DD_ECMTableAdapters
AndAlso (Not (Me._tBEDI_XML_FUNCTIONSTableAdapter.Connection) Is Nothing)) Then
Return Me._tBEDI_XML_FUNCTIONSTableAdapter.Connection
End If
If ((Not (Me._tBEDI_XML_CONFIGTableAdapter) Is Nothing) _
AndAlso (Not (Me._tBEDI_XML_CONFIGTableAdapter.Connection) Is Nothing)) Then
Return Me._tBEDI_XML_CONFIGTableAdapter.Connection
If ((Not (Me._tBMT_CONFIGTableAdapter) Is Nothing) _
AndAlso (Not (Me._tBMT_CONFIGTableAdapter.Connection) Is Nothing)) Then
Return Me._tBMT_CONFIGTableAdapter.Connection
End If
Return Nothing
End Get
@@ -5824,7 +5824,7 @@ Namespace DS_DD_ECMTableAdapters
If (Not (Me._tBEDI_XML_FUNCTIONSTableAdapter) Is Nothing) Then
count = (count + 1)
End If
If (Not (Me._tBEDI_XML_CONFIGTableAdapter) Is Nothing) Then
If (Not (Me._tBMT_CONFIGTableAdapter) Is Nothing) Then
count = (count + 1)
End If
Return count
@@ -5883,12 +5883,12 @@ Namespace DS_DD_ECMTableAdapters
allChangedRows.AddRange(updatedRows)
End If
End If
If (Not (Me._tBEDI_XML_CONFIGTableAdapter) Is Nothing) Then
Dim updatedRows() As Global.System.Data.DataRow = dataSet.TBEDI_XML_CONFIG.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.ModifiedCurrent)
If (Not (Me._tBMT_CONFIGTableAdapter) Is Nothing) Then
Dim updatedRows() As Global.System.Data.DataRow = dataSet.TBMT_CONFIG.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.ModifiedCurrent)
updatedRows = Me.GetRealUpdatedRows(updatedRows, allAddedRows)
If ((Not (updatedRows) Is Nothing) _
AndAlso (0 < updatedRows.Length)) Then
result = (result + Me._tBEDI_XML_CONFIGTableAdapter.Update(updatedRows))
result = (result + Me._tBMT_CONFIGTableAdapter.Update(updatedRows))
allChangedRows.AddRange(updatedRows)
End If
End If
@@ -5942,11 +5942,11 @@ Namespace DS_DD_ECMTableAdapters
allAddedRows.AddRange(addedRows)
End If
End If
If (Not (Me._tBEDI_XML_CONFIGTableAdapter) Is Nothing) Then
Dim addedRows() As Global.System.Data.DataRow = dataSet.TBEDI_XML_CONFIG.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.Added)
If (Not (Me._tBMT_CONFIGTableAdapter) Is Nothing) Then
Dim addedRows() As Global.System.Data.DataRow = dataSet.TBMT_CONFIG.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.Added)
If ((Not (addedRows) Is Nothing) _
AndAlso (0 < addedRows.Length)) Then
result = (result + Me._tBEDI_XML_CONFIGTableAdapter.Update(addedRows))
result = (result + Me._tBMT_CONFIGTableAdapter.Update(addedRows))
allAddedRows.AddRange(addedRows)
End If
End If
@@ -5960,11 +5960,11 @@ Namespace DS_DD_ECMTableAdapters
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
Private Function UpdateDeletedRows(ByVal dataSet As DS_DD_ECM, ByVal allChangedRows As Global.System.Collections.Generic.List(Of Global.System.Data.DataRow)) As Integer
Dim result As Integer = 0
If (Not (Me._tBEDI_XML_CONFIGTableAdapter) Is Nothing) Then
Dim deletedRows() As Global.System.Data.DataRow = dataSet.TBEDI_XML_CONFIG.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.Deleted)
If (Not (Me._tBMT_CONFIGTableAdapter) Is Nothing) Then
Dim deletedRows() As Global.System.Data.DataRow = dataSet.TBMT_CONFIG.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.Deleted)
If ((Not (deletedRows) Is Nothing) _
AndAlso (0 < deletedRows.Length)) Then
result = (result + Me._tBEDI_XML_CONFIGTableAdapter.Update(deletedRows))
result = (result + Me._tBMT_CONFIGTableAdapter.Update(deletedRows))
allChangedRows.AddRange(deletedRows)
End If
End If
@@ -6074,8 +6074,8 @@ Namespace DS_DD_ECMTableAdapters
Throw New Global.System.ArgumentException("Für alle von einem TableAdapterManager verwalteten Instanzen von TableAdapter mus"& _
"s die gleiche Verbindungszeichenfolge verwendet werden.")
End If
If ((Not (Me._tBEDI_XML_CONFIGTableAdapter) Is Nothing) _
AndAlso (Me.MatchTableAdapterConnection(Me._tBEDI_XML_CONFIGTableAdapter.Connection) = false)) Then
If ((Not (Me._tBMT_CONFIGTableAdapter) Is Nothing) _
AndAlso (Me.MatchTableAdapterConnection(Me._tBMT_CONFIGTableAdapter.Connection) = false)) Then
Throw New Global.System.ArgumentException("Für alle von einem TableAdapterManager verwalteten Instanzen von TableAdapter mus"& _
"s die gleiche Verbindungszeichenfolge verwendet werden.")
End If
@@ -6158,13 +6158,13 @@ Namespace DS_DD_ECMTableAdapters
adaptersWithAcceptChangesDuringUpdate.Add(Me._tBEDI_XML_FUNCTIONSTableAdapter.Adapter)
End If
End If
If (Not (Me._tBEDI_XML_CONFIGTableAdapter) Is Nothing) Then
revertConnections.Add(Me._tBEDI_XML_CONFIGTableAdapter, Me._tBEDI_XML_CONFIGTableAdapter.Connection)
Me._tBEDI_XML_CONFIGTableAdapter.Connection = CType(workConnection,Global.System.Data.SqlClient.SqlConnection)
Me._tBEDI_XML_CONFIGTableAdapter.Transaction = CType(workTransaction,Global.System.Data.SqlClient.SqlTransaction)
If Me._tBEDI_XML_CONFIGTableAdapter.Adapter.AcceptChangesDuringUpdate Then
Me._tBEDI_XML_CONFIGTableAdapter.Adapter.AcceptChangesDuringUpdate = false
adaptersWithAcceptChangesDuringUpdate.Add(Me._tBEDI_XML_CONFIGTableAdapter.Adapter)
If (Not (Me._tBMT_CONFIGTableAdapter) Is Nothing) Then
revertConnections.Add(Me._tBMT_CONFIGTableAdapter, Me._tBMT_CONFIGTableAdapter.Connection)
Me._tBMT_CONFIGTableAdapter.Connection = CType(workConnection,Global.System.Data.SqlClient.SqlConnection)
Me._tBMT_CONFIGTableAdapter.Transaction = CType(workTransaction,Global.System.Data.SqlClient.SqlTransaction)
If Me._tBMT_CONFIGTableAdapter.Adapter.AcceptChangesDuringUpdate Then
Me._tBMT_CONFIGTableAdapter.Adapter.AcceptChangesDuringUpdate = false
adaptersWithAcceptChangesDuringUpdate.Add(Me._tBMT_CONFIGTableAdapter.Adapter)
End If
End If
'
@@ -6247,9 +6247,9 @@ Namespace DS_DD_ECMTableAdapters
Me._tBEDI_XML_FUNCTIONSTableAdapter.Connection = CType(revertConnections(Me._tBEDI_XML_FUNCTIONSTableAdapter),Global.System.Data.SqlClient.SqlConnection)
Me._tBEDI_XML_FUNCTIONSTableAdapter.Transaction = Nothing
End If
If (Not (Me._tBEDI_XML_CONFIGTableAdapter) Is Nothing) Then
Me._tBEDI_XML_CONFIGTableAdapter.Connection = CType(revertConnections(Me._tBEDI_XML_CONFIGTableAdapter),Global.System.Data.SqlClient.SqlConnection)
Me._tBEDI_XML_CONFIGTableAdapter.Transaction = Nothing
If (Not (Me._tBMT_CONFIGTableAdapter) Is Nothing) Then
Me._tBMT_CONFIGTableAdapter.Connection = CType(revertConnections(Me._tBMT_CONFIGTableAdapter),Global.System.Data.SqlClient.SqlConnection)
Me._tBMT_CONFIGTableAdapter.Transaction = Nothing
End If
If (0 < adaptersWithAcceptChangesDuringUpdate.Count) Then
Dim adapters((adaptersWithAcceptChangesDuringUpdate.Count) - 1) As Global.System.Data.Common.DataAdapter