diff --git a/MultiTool.Common/MultiTool.Common.vbproj b/MultiTool.Common/MultiTool.Common.vbproj index f86f2ac..a1799d9 100644 --- a/MultiTool.Common/MultiTool.Common.vbproj +++ b/MultiTool.Common/MultiTool.Common.vbproj @@ -10,8 +10,9 @@ MultiTool.Common 512 Windows - v4.6.1 + v4.6.2 true + true diff --git a/MultiTool.Common/My Project/AssemblyInfo.vb b/MultiTool.Common/My Project/AssemblyInfo.vb index decd321..296f7dc 100644 --- a/MultiTool.Common/My Project/AssemblyInfo.vb +++ b/MultiTool.Common/My Project/AssemblyInfo.vb @@ -12,8 +12,8 @@ Imports System.Runtime.InteropServices - - + + @@ -31,5 +31,5 @@ Imports System.Runtime.InteropServices ' indem Sie "*" wie unten gezeigt eingeben: ' - + diff --git a/MultiTool.Common/My Project/Resources.Designer.vb b/MultiTool.Common/My Project/Resources.Designer.vb index 51883d8..5a51bc6 100644 --- a/MultiTool.Common/My Project/Resources.Designer.vb +++ b/MultiTool.Common/My Project/Resources.Designer.vb @@ -22,7 +22,7 @@ Namespace My.Resources ''' ''' Eine stark typisierte Ressourcenklasse zum Suchen von lokalisierten Zeichenfolgen usw. ''' - _ diff --git a/MultiTool.Common/My Project/Settings.Designer.vb b/MultiTool.Common/My Project/Settings.Designer.vb index 27e2706..be141ae 100644 --- a/MultiTool.Common/My Project/Settings.Designer.vb +++ b/MultiTool.Common/My Project/Settings.Designer.vb @@ -15,7 +15,7 @@ Option Explicit On Namespace My _ Partial Friend NotInheritable Class MySettings Inherits Global.System.Configuration.ApplicationSettingsBase diff --git a/MultiTool.Form/App.config b/MultiTool.Form/App.config index 274b20e..b35ca63 100644 --- a/MultiTool.Form/App.config +++ b/MultiTool.Form/App.config @@ -1,8 +1,8 @@ - + -
+
@@ -41,22 +41,22 @@ PerMonitorV2 - + - + - + - - + + - \ No newline at end of file + diff --git a/MultiTool.Form/DS_DD_ECM.Designer.vb b/MultiTool.Form/DS_DD_ECM.Designer.vb index af39fa1..d077618 100644 --- a/MultiTool.Form/DS_DD_ECM.Designer.vb +++ b/MultiTool.Form/DS_DD_ECM.Designer.vb @@ -48,7 +48,7 @@ Partial Public Class DS_DD_ECM Private _schemaSerializationMode As Global.System.Data.SchemaSerializationMode = Global.System.Data.SchemaSerializationMode.IncludeSchema _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Sub New() MyBase.New Me.BeginInit @@ -60,7 +60,7 @@ Partial Public Class DS_DD_ECM End Sub _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Protected Sub New(ByVal info As Global.System.Runtime.Serialization.SerializationInfo, ByVal context As Global.System.Runtime.Serialization.StreamingContext) MyBase.New(info, context, false) If (Me.IsBinarySerialized(info, context) = true) Then @@ -113,7 +113,7 @@ Partial Public Class DS_DD_ECM End Sub _ Public ReadOnly Property TBMT_TEMPLATE_ITEMS() As TBMT_TEMPLATE_ITEMSDataTable @@ -123,7 +123,7 @@ Partial Public Class DS_DD_ECM End Property _ Public ReadOnly Property TBEDI_XML_TYPES() As TBEDI_XML_TYPESDataTable @@ -133,7 +133,7 @@ Partial Public Class DS_DD_ECM End Property _ Public ReadOnly Property TBMT_TEMPLATES() As TBMT_TEMPLATESDataTable @@ -143,7 +143,7 @@ Partial Public Class DS_DD_ECM End Property _ Public ReadOnly Property TBEDI_XML_NODES() As TBEDI_XML_NODESDataTable @@ -153,7 +153,7 @@ Partial Public Class DS_DD_ECM End Property _ Public ReadOnly Property TBMT_FUNCTIONS() As TBMT_FUNCTIONSDataTable @@ -163,7 +163,7 @@ Partial Public Class DS_DD_ECM End Property _ Public ReadOnly Property TBMT_CONFIG() As TBMT_CONFIGDataTable @@ -173,7 +173,7 @@ Partial Public Class DS_DD_ECM End Property _ Public ReadOnly Property TBMT_TABLES() As TBMT_TABLESDataTable @@ -183,7 +183,7 @@ Partial Public Class DS_DD_ECM End Property _ Public Overrides Property SchemaSerializationMode() As Global.System.Data.SchemaSerializationMode @@ -196,7 +196,7 @@ Partial Public Class DS_DD_ECM End Property _ Public Shadows ReadOnly Property Tables() As Global.System.Data.DataTableCollection Get @@ -205,7 +205,7 @@ Partial Public Class DS_DD_ECM End Property _ Public Shadows ReadOnly Property Relations() As Global.System.Data.DataRelationCollection Get @@ -214,7 +214,7 @@ Partial Public Class DS_DD_ECM End Property _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Protected Overrides Sub InitializeDerivedDataSet() Me.BeginInit Me.InitClass @@ -222,7 +222,7 @@ Partial Public Class DS_DD_ECM End Sub _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Overrides Function Clone() As Global.System.Data.DataSet Dim cln As DS_DD_ECM = CType(MyBase.Clone,DS_DD_ECM) cln.InitVars @@ -231,19 +231,19 @@ Partial Public Class DS_DD_ECM End Function _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Protected Overrides Function ShouldSerializeTables() As Boolean Return false End Function _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Protected Overrides Function ShouldSerializeRelations() As Boolean Return false End Function _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Protected Overrides Sub ReadXmlSerializable(ByVal reader As Global.System.Xml.XmlReader) If (Me.DetermineSchemaSerializationMode(reader) = Global.System.Data.SchemaSerializationMode.IncludeSchema) Then Me.Reset @@ -285,7 +285,7 @@ Partial Public Class DS_DD_ECM End Sub _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Protected Overrides Function GetSchemaSerializable() As Global.System.Xml.Schema.XmlSchema Dim stream As Global.System.IO.MemoryStream = New Global.System.IO.MemoryStream() Me.WriteXmlSchema(New Global.System.Xml.XmlTextWriter(stream, Nothing)) @@ -294,13 +294,13 @@ Partial Public Class DS_DD_ECM End Function _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Friend Overloads Sub InitVars() Me.InitVars(true) End Sub _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Friend Overloads Sub InitVars(ByVal initTable As Boolean) Me.tableTBMT_TEMPLATE_ITEMS = CType(MyBase.Tables("TBMT_TEMPLATE_ITEMS"),TBMT_TEMPLATE_ITEMSDataTable) If (initTable = true) Then @@ -350,7 +350,7 @@ Partial Public Class DS_DD_ECM End Sub _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Private Sub InitClass() Me.DataSetName = "DS_DD_ECM" Me.Prefix = "" @@ -380,49 +380,49 @@ Partial Public Class DS_DD_ECM End Sub _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Private Function ShouldSerializeTBMT_TEMPLATE_ITEMS() As Boolean Return false End Function _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Private Function ShouldSerializeTBEDI_XML_TYPES() As Boolean Return false End Function _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Private Function ShouldSerializeTBMT_TEMPLATES() As Boolean Return false End Function _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Private Function ShouldSerializeTBEDI_XML_NODES() As Boolean Return false End Function _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Private Function ShouldSerializeTBMT_FUNCTIONS() As Boolean Return false End Function _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Private Function ShouldSerializeTBMT_CONFIG() As Boolean Return false End Function _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Private Function ShouldSerializeTBMT_TABLES() As Boolean Return false End Function _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Private Sub SchemaChanged(ByVal sender As Object, ByVal e As Global.System.ComponentModel.CollectionChangeEventArgs) If (e.Action = Global.System.ComponentModel.CollectionChangeAction.Remove) Then Me.InitVars @@ -430,7 +430,7 @@ Partial Public Class DS_DD_ECM End Sub _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Shared Function GetTypedDataSetSchema(ByVal xs As Global.System.Xml.Schema.XmlSchemaSet) As Global.System.Xml.Schema.XmlSchemaComplexType Dim ds As DS_DD_ECM = New DS_DD_ECM() Dim type As Global.System.Xml.Schema.XmlSchemaComplexType = New Global.System.Xml.Schema.XmlSchemaComplexType() @@ -479,25 +479,25 @@ Partial Public Class DS_DD_ECM Return type End Function - _ + _ Public Delegate Sub TBMT_TEMPLATE_ITEMSRowChangeEventHandler(ByVal sender As Object, ByVal e As TBMT_TEMPLATE_ITEMSRowChangeEvent) - _ + _ Public Delegate Sub TBEDI_XML_TYPESRowChangeEventHandler(ByVal sender As Object, ByVal e As TBEDI_XML_TYPESRowChangeEvent) - _ + _ Public Delegate Sub TBMT_TEMPLATESRowChangeEventHandler(ByVal sender As Object, ByVal e As TBMT_TEMPLATESRowChangeEvent) - _ + _ Public Delegate Sub TBEDI_XML_NODESRowChangeEventHandler(ByVal sender As Object, ByVal e As TBEDI_XML_NODESRowChangeEvent) - _ + _ Public Delegate Sub TBMT_FUNCTIONSRowChangeEventHandler(ByVal sender As Object, ByVal e As TBMT_FUNCTIONSRowChangeEvent) - _ + _ Public Delegate Sub TBMT_CONFIGRowChangeEventHandler(ByVal sender As Object, ByVal e As TBMT_CONFIGRowChangeEvent) - _ + _ Public Delegate Sub TBMT_TABLESRowChangeEventHandler(ByVal sender As Object, ByVal e As TBMT_TABLESRowChangeEvent) ''' @@ -549,7 +549,7 @@ Partial Public Class DS_DD_ECM Private columnPREFER_EXTERNAL As Global.System.Data.DataColumn _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Sub New() MyBase.New Me.TableName = "TBMT_TEMPLATE_ITEMS" @@ -559,7 +559,7 @@ Partial Public Class DS_DD_ECM End Sub _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Friend Sub New(ByVal table As Global.System.Data.DataTable) MyBase.New Me.TableName = table.TableName @@ -577,14 +577,14 @@ Partial Public Class DS_DD_ECM End Sub _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Protected Sub New(ByVal info As Global.System.Runtime.Serialization.SerializationInfo, ByVal context As Global.System.Runtime.Serialization.StreamingContext) MyBase.New(info, context) Me.InitVars End Sub _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public ReadOnly Property GUIDColumn() As Global.System.Data.DataColumn Get Return Me.columnGUID @@ -592,7 +592,7 @@ Partial Public Class DS_DD_ECM End Property _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public ReadOnly Property NAMEColumn() As Global.System.Data.DataColumn Get Return Me.columnNAME @@ -600,7 +600,7 @@ Partial Public Class DS_DD_ECM End Property _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public ReadOnly Property TYPE_IDColumn() As Global.System.Data.DataColumn Get Return Me.columnTYPE_ID @@ -608,7 +608,7 @@ Partial Public Class DS_DD_ECM End Property _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public ReadOnly Property IS_READ_ONLYColumn() As Global.System.Data.DataColumn Get Return Me.columnIS_READ_ONLY @@ -616,7 +616,7 @@ Partial Public Class DS_DD_ECM End Property _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public ReadOnly Property IS_VISIBLEColumn() As Global.System.Data.DataColumn Get Return Me.columnIS_VISIBLE @@ -624,7 +624,7 @@ Partial Public Class DS_DD_ECM End Property _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public ReadOnly Property ORDER_KEYColumn() As Global.System.Data.DataColumn Get Return Me.columnORDER_KEY @@ -632,7 +632,7 @@ Partial Public Class DS_DD_ECM End Property _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public ReadOnly Property FUNCTION_IDColumn() As Global.System.Data.DataColumn Get Return Me.columnFUNCTION_ID @@ -640,7 +640,7 @@ Partial Public Class DS_DD_ECM End Property _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public ReadOnly Property IS_REQUIREDColumn() As Global.System.Data.DataColumn Get Return Me.columnIS_REQUIRED @@ -648,7 +648,7 @@ Partial Public Class DS_DD_ECM End Property _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public ReadOnly Property TABLE_IDColumn() As Global.System.Data.DataColumn Get Return Me.columnTABLE_ID @@ -656,7 +656,7 @@ Partial Public Class DS_DD_ECM End Property _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public ReadOnly Property IS_VIRTUALColumn() As Global.System.Data.DataColumn Get Return Me.columnIS_VIRTUAL @@ -664,7 +664,7 @@ Partial Public Class DS_DD_ECM End Property _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public ReadOnly Property FUNCTION_PARAMETERSColumn() As Global.System.Data.DataColumn Get Return Me.columnFUNCTION_PARAMETERS @@ -672,7 +672,7 @@ Partial Public Class DS_DD_ECM End Property _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public ReadOnly Property ADDED_WHOColumn() As Global.System.Data.DataColumn Get Return Me.columnADDED_WHO @@ -680,7 +680,7 @@ Partial Public Class DS_DD_ECM End Property _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public ReadOnly Property ADDED_WHENColumn() As Global.System.Data.DataColumn Get Return Me.columnADDED_WHEN @@ -688,7 +688,7 @@ Partial Public Class DS_DD_ECM End Property _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public ReadOnly Property CHANGED_WHOColumn() As Global.System.Data.DataColumn Get Return Me.columnCHANGED_WHO @@ -696,7 +696,7 @@ Partial Public Class DS_DD_ECM End Property _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public ReadOnly Property CHANGED_WHENColumn() As Global.System.Data.DataColumn Get Return Me.columnCHANGED_WHEN @@ -704,7 +704,7 @@ Partial Public Class DS_DD_ECM End Property _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public ReadOnly Property ACTIVEColumn() As Global.System.Data.DataColumn Get Return Me.columnACTIVE @@ -712,7 +712,7 @@ Partial Public Class DS_DD_ECM End Property _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public ReadOnly Property COMMENTColumn() As Global.System.Data.DataColumn Get Return Me.columnCOMMENT @@ -720,7 +720,7 @@ Partial Public Class DS_DD_ECM End Property _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public ReadOnly Property TEMPLATE_NAMEColumn() As Global.System.Data.DataColumn Get Return Me.columnTEMPLATE_NAME @@ -728,7 +728,7 @@ Partial Public Class DS_DD_ECM End Property _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public ReadOnly Property TABLE_NAMEColumn() As Global.System.Data.DataColumn Get Return Me.columnTABLE_NAME @@ -736,7 +736,7 @@ Partial Public Class DS_DD_ECM End Property _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public ReadOnly Property PREFER_EXTERNALColumn() As Global.System.Data.DataColumn Get Return Me.columnPREFER_EXTERNAL @@ -744,7 +744,7 @@ Partial Public Class DS_DD_ECM End Property _ Public ReadOnly Property Count() As Integer Get @@ -753,33 +753,33 @@ Partial Public Class DS_DD_ECM End Property _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Default ReadOnly Property Item(ByVal index As Integer) As TBMT_TEMPLATE_ITEMSRow Get Return CType(Me.Rows(index),TBMT_TEMPLATE_ITEMSRow) End Get End Property - _ + _ Public Event TBMT_TEMPLATE_ITEMSRowChanging As TBMT_TEMPLATE_ITEMSRowChangeEventHandler - _ + _ Public Event TBMT_TEMPLATE_ITEMSRowChanged As TBMT_TEMPLATE_ITEMSRowChangeEventHandler - _ + _ Public Event TBMT_TEMPLATE_ITEMSRowDeleting As TBMT_TEMPLATE_ITEMSRowChangeEventHandler - _ + _ Public Event TBMT_TEMPLATE_ITEMSRowDeleted As TBMT_TEMPLATE_ITEMSRowChangeEventHandler _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Overloads Sub AddTBMT_TEMPLATE_ITEMSRow(ByVal row As TBMT_TEMPLATE_ITEMSRow) Me.Rows.Add(row) End Sub _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Overloads Function AddTBMT_TEMPLATE_ITEMSRow( _ ByVal NAME As String, _ ByVal TYPE_ID As Integer, _ @@ -808,13 +808,13 @@ Partial Public Class DS_DD_ECM End Function _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Function FindByGUID(ByVal GUID As Integer) As TBMT_TEMPLATE_ITEMSRow Return CType(Me.Rows.Find(New Object() {GUID}),TBMT_TEMPLATE_ITEMSRow) End Function _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Overrides Function Clone() As Global.System.Data.DataTable Dim cln As TBMT_TEMPLATE_ITEMSDataTable = CType(MyBase.Clone,TBMT_TEMPLATE_ITEMSDataTable) cln.InitVars @@ -822,13 +822,13 @@ Partial Public Class DS_DD_ECM End Function _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Protected Overrides Function CreateInstance() As Global.System.Data.DataTable Return New TBMT_TEMPLATE_ITEMSDataTable() End Function _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Friend Sub InitVars() Me.columnGUID = MyBase.Columns("GUID") Me.columnNAME = MyBase.Columns("NAME") @@ -853,7 +853,7 @@ Partial Public Class DS_DD_ECM End Sub _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Private Sub InitClass() Me.columnGUID = New Global.System.Data.DataColumn("GUID", GetType(Integer), Nothing, Global.System.Data.MappingType.Element) MyBase.Columns.Add(Me.columnGUID) @@ -925,25 +925,25 @@ Partial Public Class DS_DD_ECM End Sub _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Function NewTBMT_TEMPLATE_ITEMSRow() As TBMT_TEMPLATE_ITEMSRow Return CType(Me.NewRow,TBMT_TEMPLATE_ITEMSRow) End Function _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Protected Overrides Function NewRowFromBuilder(ByVal builder As Global.System.Data.DataRowBuilder) As Global.System.Data.DataRow Return New TBMT_TEMPLATE_ITEMSRow(builder) End Function _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Protected Overrides Function GetRowType() As Global.System.Type Return GetType(TBMT_TEMPLATE_ITEMSRow) End Function _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Protected Overrides Sub OnRowChanged(ByVal e As Global.System.Data.DataRowChangeEventArgs) MyBase.OnRowChanged(e) If (Not (Me.TBMT_TEMPLATE_ITEMSRowChangedEvent) Is Nothing) Then @@ -952,7 +952,7 @@ Partial Public Class DS_DD_ECM End Sub _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Protected Overrides Sub OnRowChanging(ByVal e As Global.System.Data.DataRowChangeEventArgs) MyBase.OnRowChanging(e) If (Not (Me.TBMT_TEMPLATE_ITEMSRowChangingEvent) Is Nothing) Then @@ -961,7 +961,7 @@ Partial Public Class DS_DD_ECM End Sub _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Protected Overrides Sub OnRowDeleted(ByVal e As Global.System.Data.DataRowChangeEventArgs) MyBase.OnRowDeleted(e) If (Not (Me.TBMT_TEMPLATE_ITEMSRowDeletedEvent) Is Nothing) Then @@ -970,7 +970,7 @@ Partial Public Class DS_DD_ECM End Sub _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Protected Overrides Sub OnRowDeleting(ByVal e As Global.System.Data.DataRowChangeEventArgs) MyBase.OnRowDeleting(e) If (Not (Me.TBMT_TEMPLATE_ITEMSRowDeletingEvent) Is Nothing) Then @@ -979,13 +979,13 @@ Partial Public Class DS_DD_ECM End Sub _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Sub RemoveTBMT_TEMPLATE_ITEMSRow(ByVal row As TBMT_TEMPLATE_ITEMSRow) Me.Rows.Remove(row) End Sub _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Shared Function GetTypedTableSchema(ByVal xs As Global.System.Xml.Schema.XmlSchemaSet) As Global.System.Xml.Schema.XmlSchemaComplexType Dim type As Global.System.Xml.Schema.XmlSchemaComplexType = New Global.System.Xml.Schema.XmlSchemaComplexType() Dim sequence As Global.System.Xml.Schema.XmlSchemaSequence = New Global.System.Xml.Schema.XmlSchemaSequence() @@ -1064,7 +1064,7 @@ Partial Public Class DS_DD_ECM Private columnNAME As Global.System.Data.DataColumn _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Sub New() MyBase.New Me.TableName = "TBEDI_XML_TYPES" @@ -1074,7 +1074,7 @@ Partial Public Class DS_DD_ECM End Sub _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Friend Sub New(ByVal table As Global.System.Data.DataTable) MyBase.New Me.TableName = table.TableName @@ -1092,14 +1092,14 @@ Partial Public Class DS_DD_ECM End Sub _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Protected Sub New(ByVal info As Global.System.Runtime.Serialization.SerializationInfo, ByVal context As Global.System.Runtime.Serialization.StreamingContext) MyBase.New(info, context) Me.InitVars End Sub _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public ReadOnly Property GUIDColumn() As Global.System.Data.DataColumn Get Return Me.columnGUID @@ -1107,7 +1107,7 @@ Partial Public Class DS_DD_ECM End Property _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public ReadOnly Property NAMEColumn() As Global.System.Data.DataColumn Get Return Me.columnNAME @@ -1115,7 +1115,7 @@ Partial Public Class DS_DD_ECM End Property _ Public ReadOnly Property Count() As Integer Get @@ -1124,33 +1124,33 @@ Partial Public Class DS_DD_ECM End Property _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Default ReadOnly Property Item(ByVal index As Integer) As TBEDI_XML_TYPESRow Get Return CType(Me.Rows(index),TBEDI_XML_TYPESRow) End Get End Property - _ + _ Public Event TBEDI_XML_TYPESRowChanging As TBEDI_XML_TYPESRowChangeEventHandler - _ + _ Public Event TBEDI_XML_TYPESRowChanged As TBEDI_XML_TYPESRowChangeEventHandler - _ + _ Public Event TBEDI_XML_TYPESRowDeleting As TBEDI_XML_TYPESRowChangeEventHandler - _ + _ Public Event TBEDI_XML_TYPESRowDeleted As TBEDI_XML_TYPESRowChangeEventHandler _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Overloads Sub AddTBEDI_XML_TYPESRow(ByVal row As TBEDI_XML_TYPESRow) Me.Rows.Add(row) End Sub _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Overloads Function AddTBEDI_XML_TYPESRow(ByVal NAME As String) As TBEDI_XML_TYPESRow Dim rowTBEDI_XML_TYPESRow As TBEDI_XML_TYPESRow = CType(Me.NewRow,TBEDI_XML_TYPESRow) Dim columnValuesArray() As Object = New Object() {Nothing, NAME} @@ -1160,13 +1160,13 @@ Partial Public Class DS_DD_ECM End Function _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Function FindByGUID(ByVal GUID As Integer) As TBEDI_XML_TYPESRow Return CType(Me.Rows.Find(New Object() {GUID}),TBEDI_XML_TYPESRow) End Function _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Overrides Function Clone() As Global.System.Data.DataTable Dim cln As TBEDI_XML_TYPESDataTable = CType(MyBase.Clone,TBEDI_XML_TYPESDataTable) cln.InitVars @@ -1174,20 +1174,20 @@ Partial Public Class DS_DD_ECM End Function _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Protected Overrides Function CreateInstance() As Global.System.Data.DataTable Return New TBEDI_XML_TYPESDataTable() End Function _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Friend Sub InitVars() Me.columnGUID = MyBase.Columns("GUID") Me.columnNAME = MyBase.Columns("NAME") End Sub _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Private Sub InitClass() Me.columnGUID = New Global.System.Data.DataColumn("GUID", GetType(Integer), Nothing, Global.System.Data.MappingType.Element) MyBase.Columns.Add(Me.columnGUID) @@ -1205,25 +1205,25 @@ Partial Public Class DS_DD_ECM End Sub _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Function NewTBEDI_XML_TYPESRow() As TBEDI_XML_TYPESRow Return CType(Me.NewRow,TBEDI_XML_TYPESRow) End Function _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Protected Overrides Function NewRowFromBuilder(ByVal builder As Global.System.Data.DataRowBuilder) As Global.System.Data.DataRow Return New TBEDI_XML_TYPESRow(builder) End Function _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Protected Overrides Function GetRowType() As Global.System.Type Return GetType(TBEDI_XML_TYPESRow) End Function _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Protected Overrides Sub OnRowChanged(ByVal e As Global.System.Data.DataRowChangeEventArgs) MyBase.OnRowChanged(e) If (Not (Me.TBEDI_XML_TYPESRowChangedEvent) Is Nothing) Then @@ -1232,7 +1232,7 @@ Partial Public Class DS_DD_ECM End Sub _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Protected Overrides Sub OnRowChanging(ByVal e As Global.System.Data.DataRowChangeEventArgs) MyBase.OnRowChanging(e) If (Not (Me.TBEDI_XML_TYPESRowChangingEvent) Is Nothing) Then @@ -1241,7 +1241,7 @@ Partial Public Class DS_DD_ECM End Sub _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Protected Overrides Sub OnRowDeleted(ByVal e As Global.System.Data.DataRowChangeEventArgs) MyBase.OnRowDeleted(e) If (Not (Me.TBEDI_XML_TYPESRowDeletedEvent) Is Nothing) Then @@ -1250,7 +1250,7 @@ Partial Public Class DS_DD_ECM End Sub _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Protected Overrides Sub OnRowDeleting(ByVal e As Global.System.Data.DataRowChangeEventArgs) MyBase.OnRowDeleting(e) If (Not (Me.TBEDI_XML_TYPESRowDeletingEvent) Is Nothing) Then @@ -1259,13 +1259,13 @@ Partial Public Class DS_DD_ECM End Sub _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Sub RemoveTBEDI_XML_TYPESRow(ByVal row As TBEDI_XML_TYPESRow) Me.Rows.Remove(row) End Sub _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Shared Function GetTypedTableSchema(ByVal xs As Global.System.Xml.Schema.XmlSchemaSet) As Global.System.Xml.Schema.XmlSchemaComplexType Dim type As Global.System.Xml.Schema.XmlSchemaComplexType = New Global.System.Xml.Schema.XmlSchemaComplexType() Dim sequence As Global.System.Xml.Schema.XmlSchemaSequence = New Global.System.Xml.Schema.XmlSchemaSequence() @@ -1346,7 +1346,7 @@ Partial Public Class DS_DD_ECM Private columnDESCRIPTION As Global.System.Data.DataColumn _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Sub New() MyBase.New Me.TableName = "TBMT_TEMPLATES" @@ -1356,7 +1356,7 @@ Partial Public Class DS_DD_ECM End Sub _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Friend Sub New(ByVal table As Global.System.Data.DataTable) MyBase.New Me.TableName = table.TableName @@ -1374,14 +1374,14 @@ Partial Public Class DS_DD_ECM End Sub _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Protected Sub New(ByVal info As Global.System.Runtime.Serialization.SerializationInfo, ByVal context As Global.System.Runtime.Serialization.StreamingContext) MyBase.New(info, context) Me.InitVars End Sub _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public ReadOnly Property GUIDColumn() As Global.System.Data.DataColumn Get Return Me.columnGUID @@ -1389,7 +1389,7 @@ Partial Public Class DS_DD_ECM End Property _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public ReadOnly Property NAMEColumn() As Global.System.Data.DataColumn Get Return Me.columnNAME @@ -1397,7 +1397,7 @@ Partial Public Class DS_DD_ECM End Property _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public ReadOnly Property DESCRIPTIONColumn() As Global.System.Data.DataColumn Get Return Me.columnDESCRIPTION @@ -1405,7 +1405,7 @@ Partial Public Class DS_DD_ECM End Property _ Public ReadOnly Property Count() As Integer Get @@ -1414,33 +1414,33 @@ Partial Public Class DS_DD_ECM End Property _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Default ReadOnly Property Item(ByVal index As Integer) As TBMT_TEMPLATESRow Get Return CType(Me.Rows(index),TBMT_TEMPLATESRow) End Get End Property - _ + _ Public Event TBMT_TEMPLATESRowChanging As TBMT_TEMPLATESRowChangeEventHandler - _ + _ Public Event TBMT_TEMPLATESRowChanged As TBMT_TEMPLATESRowChangeEventHandler - _ + _ Public Event TBMT_TEMPLATESRowDeleting As TBMT_TEMPLATESRowChangeEventHandler - _ + _ Public Event TBMT_TEMPLATESRowDeleted As TBMT_TEMPLATESRowChangeEventHandler _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Overloads Sub AddTBMT_TEMPLATESRow(ByVal row As TBMT_TEMPLATESRow) Me.Rows.Add(row) End Sub _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Overloads Function AddTBMT_TEMPLATESRow(ByVal NAME As String, ByVal DESCRIPTION As String) As TBMT_TEMPLATESRow Dim rowTBMT_TEMPLATESRow As TBMT_TEMPLATESRow = CType(Me.NewRow,TBMT_TEMPLATESRow) Dim columnValuesArray() As Object = New Object() {Nothing, NAME, DESCRIPTION} @@ -1450,13 +1450,13 @@ Partial Public Class DS_DD_ECM End Function _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Function FindByGUID(ByVal GUID As Integer) As TBMT_TEMPLATESRow Return CType(Me.Rows.Find(New Object() {GUID}),TBMT_TEMPLATESRow) End Function _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Overrides Function Clone() As Global.System.Data.DataTable Dim cln As TBMT_TEMPLATESDataTable = CType(MyBase.Clone,TBMT_TEMPLATESDataTable) cln.InitVars @@ -1464,13 +1464,13 @@ Partial Public Class DS_DD_ECM End Function _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Protected Overrides Function CreateInstance() As Global.System.Data.DataTable Return New TBMT_TEMPLATESDataTable() End Function _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Friend Sub InitVars() Me.columnGUID = MyBase.Columns("GUID") Me.columnNAME = MyBase.Columns("NAME") @@ -1478,7 +1478,7 @@ Partial Public Class DS_DD_ECM End Sub _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Private Sub InitClass() Me.columnGUID = New Global.System.Data.DataColumn("GUID", GetType(Integer), Nothing, Global.System.Data.MappingType.Element) MyBase.Columns.Add(Me.columnGUID) @@ -1499,25 +1499,25 @@ Partial Public Class DS_DD_ECM End Sub _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Function NewTBMT_TEMPLATESRow() As TBMT_TEMPLATESRow Return CType(Me.NewRow,TBMT_TEMPLATESRow) End Function _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Protected Overrides Function NewRowFromBuilder(ByVal builder As Global.System.Data.DataRowBuilder) As Global.System.Data.DataRow Return New TBMT_TEMPLATESRow(builder) End Function _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Protected Overrides Function GetRowType() As Global.System.Type Return GetType(TBMT_TEMPLATESRow) End Function _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Protected Overrides Sub OnRowChanged(ByVal e As Global.System.Data.DataRowChangeEventArgs) MyBase.OnRowChanged(e) If (Not (Me.TBMT_TEMPLATESRowChangedEvent) Is Nothing) Then @@ -1526,7 +1526,7 @@ Partial Public Class DS_DD_ECM End Sub _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Protected Overrides Sub OnRowChanging(ByVal e As Global.System.Data.DataRowChangeEventArgs) MyBase.OnRowChanging(e) If (Not (Me.TBMT_TEMPLATESRowChangingEvent) Is Nothing) Then @@ -1535,7 +1535,7 @@ Partial Public Class DS_DD_ECM End Sub _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Protected Overrides Sub OnRowDeleted(ByVal e As Global.System.Data.DataRowChangeEventArgs) MyBase.OnRowDeleted(e) If (Not (Me.TBMT_TEMPLATESRowDeletedEvent) Is Nothing) Then @@ -1544,7 +1544,7 @@ Partial Public Class DS_DD_ECM End Sub _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Protected Overrides Sub OnRowDeleting(ByVal e As Global.System.Data.DataRowChangeEventArgs) MyBase.OnRowDeleting(e) If (Not (Me.TBMT_TEMPLATESRowDeletingEvent) Is Nothing) Then @@ -1553,13 +1553,13 @@ Partial Public Class DS_DD_ECM End Sub _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Sub RemoveTBMT_TEMPLATESRow(ByVal row As TBMT_TEMPLATESRow) Me.Rows.Remove(row) End Sub _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Shared Function GetTypedTableSchema(ByVal xs As Global.System.Xml.Schema.XmlSchemaSet) As Global.System.Xml.Schema.XmlSchemaComplexType Dim type As Global.System.Xml.Schema.XmlSchemaComplexType = New Global.System.Xml.Schema.XmlSchemaComplexType() Dim sequence As Global.System.Xml.Schema.XmlSchemaSequence = New Global.System.Xml.Schema.XmlSchemaSequence() @@ -1642,7 +1642,7 @@ Partial Public Class DS_DD_ECM Private columnIS_HEAD As Global.System.Data.DataColumn _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Sub New() MyBase.New Me.TableName = "TBEDI_XML_NODES" @@ -1652,7 +1652,7 @@ Partial Public Class DS_DD_ECM End Sub _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Friend Sub New(ByVal table As Global.System.Data.DataTable) MyBase.New Me.TableName = table.TableName @@ -1670,14 +1670,14 @@ Partial Public Class DS_DD_ECM End Sub _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Protected Sub New(ByVal info As Global.System.Runtime.Serialization.SerializationInfo, ByVal context As Global.System.Runtime.Serialization.StreamingContext) MyBase.New(info, context) Me.InitVars End Sub _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public ReadOnly Property GUIDColumn() As Global.System.Data.DataColumn Get Return Me.columnGUID @@ -1685,7 +1685,7 @@ Partial Public Class DS_DD_ECM End Property _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public ReadOnly Property NAMEColumn() As Global.System.Data.DataColumn Get Return Me.columnNAME @@ -1693,7 +1693,7 @@ Partial Public Class DS_DD_ECM End Property _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public ReadOnly Property TEMPLATE_IDColumn() As Global.System.Data.DataColumn Get Return Me.columnTEMPLATE_ID @@ -1701,7 +1701,7 @@ Partial Public Class DS_DD_ECM End Property _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public ReadOnly Property IS_HEADColumn() As Global.System.Data.DataColumn Get Return Me.columnIS_HEAD @@ -1709,7 +1709,7 @@ Partial Public Class DS_DD_ECM End Property _ Public ReadOnly Property Count() As Integer Get @@ -1718,33 +1718,33 @@ Partial Public Class DS_DD_ECM End Property _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Default ReadOnly Property Item(ByVal index As Integer) As TBEDI_XML_NODESRow Get Return CType(Me.Rows(index),TBEDI_XML_NODESRow) End Get End Property - _ + _ Public Event TBEDI_XML_NODESRowChanging As TBEDI_XML_NODESRowChangeEventHandler - _ + _ Public Event TBEDI_XML_NODESRowChanged As TBEDI_XML_NODESRowChangeEventHandler - _ + _ Public Event TBEDI_XML_NODESRowDeleting As TBEDI_XML_NODESRowChangeEventHandler - _ + _ Public Event TBEDI_XML_NODESRowDeleted As TBEDI_XML_NODESRowChangeEventHandler _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Overloads Sub AddTBEDI_XML_NODESRow(ByVal row As TBEDI_XML_NODESRow) Me.Rows.Add(row) End Sub _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Overloads Function AddTBEDI_XML_NODESRow(ByVal NAME As String, ByVal TEMPLATE_ID As Integer, ByVal IS_HEAD As Boolean) As TBEDI_XML_NODESRow Dim rowTBEDI_XML_NODESRow As TBEDI_XML_NODESRow = CType(Me.NewRow,TBEDI_XML_NODESRow) Dim columnValuesArray() As Object = New Object() {Nothing, NAME, TEMPLATE_ID, IS_HEAD} @@ -1754,13 +1754,13 @@ Partial Public Class DS_DD_ECM End Function _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Function FindByGUID(ByVal GUID As Integer) As TBEDI_XML_NODESRow Return CType(Me.Rows.Find(New Object() {GUID}),TBEDI_XML_NODESRow) End Function _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Overrides Function Clone() As Global.System.Data.DataTable Dim cln As TBEDI_XML_NODESDataTable = CType(MyBase.Clone,TBEDI_XML_NODESDataTable) cln.InitVars @@ -1768,13 +1768,13 @@ Partial Public Class DS_DD_ECM End Function _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Protected Overrides Function CreateInstance() As Global.System.Data.DataTable Return New TBEDI_XML_NODESDataTable() End Function _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Friend Sub InitVars() Me.columnGUID = MyBase.Columns("GUID") Me.columnNAME = MyBase.Columns("NAME") @@ -1783,7 +1783,7 @@ Partial Public Class DS_DD_ECM End Sub _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Private Sub InitClass() Me.columnGUID = New Global.System.Data.DataColumn("GUID", GetType(Integer), Nothing, Global.System.Data.MappingType.Element) MyBase.Columns.Add(Me.columnGUID) @@ -1807,25 +1807,25 @@ Partial Public Class DS_DD_ECM End Sub _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Function NewTBEDI_XML_NODESRow() As TBEDI_XML_NODESRow Return CType(Me.NewRow,TBEDI_XML_NODESRow) End Function _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Protected Overrides Function NewRowFromBuilder(ByVal builder As Global.System.Data.DataRowBuilder) As Global.System.Data.DataRow Return New TBEDI_XML_NODESRow(builder) End Function _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Protected Overrides Function GetRowType() As Global.System.Type Return GetType(TBEDI_XML_NODESRow) End Function _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Protected Overrides Sub OnRowChanged(ByVal e As Global.System.Data.DataRowChangeEventArgs) MyBase.OnRowChanged(e) If (Not (Me.TBEDI_XML_NODESRowChangedEvent) Is Nothing) Then @@ -1834,7 +1834,7 @@ Partial Public Class DS_DD_ECM End Sub _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Protected Overrides Sub OnRowChanging(ByVal e As Global.System.Data.DataRowChangeEventArgs) MyBase.OnRowChanging(e) If (Not (Me.TBEDI_XML_NODESRowChangingEvent) Is Nothing) Then @@ -1843,7 +1843,7 @@ Partial Public Class DS_DD_ECM End Sub _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Protected Overrides Sub OnRowDeleted(ByVal e As Global.System.Data.DataRowChangeEventArgs) MyBase.OnRowDeleted(e) If (Not (Me.TBEDI_XML_NODESRowDeletedEvent) Is Nothing) Then @@ -1852,7 +1852,7 @@ Partial Public Class DS_DD_ECM End Sub _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Protected Overrides Sub OnRowDeleting(ByVal e As Global.System.Data.DataRowChangeEventArgs) MyBase.OnRowDeleting(e) If (Not (Me.TBEDI_XML_NODESRowDeletingEvent) Is Nothing) Then @@ -1861,13 +1861,13 @@ Partial Public Class DS_DD_ECM End Sub _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Sub RemoveTBEDI_XML_NODESRow(ByVal row As TBEDI_XML_NODESRow) Me.Rows.Remove(row) End Sub _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Shared Function GetTypedTableSchema(ByVal xs As Global.System.Xml.Schema.XmlSchemaSet) As Global.System.Xml.Schema.XmlSchemaComplexType Dim type As Global.System.Xml.Schema.XmlSchemaComplexType = New Global.System.Xml.Schema.XmlSchemaComplexType() Dim sequence As Global.System.Xml.Schema.XmlSchemaSequence = New Global.System.Xml.Schema.XmlSchemaSequence() @@ -1950,7 +1950,7 @@ Partial Public Class DS_DD_ECM Private columnPARAMETERS As Global.System.Data.DataColumn _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Sub New() MyBase.New Me.TableName = "TBMT_FUNCTIONS" @@ -1960,7 +1960,7 @@ Partial Public Class DS_DD_ECM End Sub _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Friend Sub New(ByVal table As Global.System.Data.DataTable) MyBase.New Me.TableName = table.TableName @@ -1978,14 +1978,14 @@ Partial Public Class DS_DD_ECM End Sub _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Protected Sub New(ByVal info As Global.System.Runtime.Serialization.SerializationInfo, ByVal context As Global.System.Runtime.Serialization.StreamingContext) MyBase.New(info, context) Me.InitVars End Sub _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public ReadOnly Property GUIDColumn() As Global.System.Data.DataColumn Get Return Me.columnGUID @@ -1993,7 +1993,7 @@ Partial Public Class DS_DD_ECM End Property _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public ReadOnly Property NAMEColumn() As Global.System.Data.DataColumn Get Return Me.columnNAME @@ -2001,7 +2001,7 @@ Partial Public Class DS_DD_ECM End Property _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public ReadOnly Property DESCRIPTIONColumn() As Global.System.Data.DataColumn Get Return Me.columnDESCRIPTION @@ -2009,7 +2009,7 @@ Partial Public Class DS_DD_ECM End Property _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public ReadOnly Property PARAMETERSColumn() As Global.System.Data.DataColumn Get Return Me.columnPARAMETERS @@ -2017,7 +2017,7 @@ Partial Public Class DS_DD_ECM End Property _ Public ReadOnly Property Count() As Integer Get @@ -2026,33 +2026,33 @@ Partial Public Class DS_DD_ECM End Property _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Default ReadOnly Property Item(ByVal index As Integer) As TBMT_FUNCTIONSRow Get Return CType(Me.Rows(index),TBMT_FUNCTIONSRow) End Get End Property - _ + _ Public Event TBMT_FUNCTIONSRowChanging As TBMT_FUNCTIONSRowChangeEventHandler - _ + _ Public Event TBMT_FUNCTIONSRowChanged As TBMT_FUNCTIONSRowChangeEventHandler - _ + _ Public Event TBMT_FUNCTIONSRowDeleting As TBMT_FUNCTIONSRowChangeEventHandler - _ + _ Public Event TBMT_FUNCTIONSRowDeleted As TBMT_FUNCTIONSRowChangeEventHandler _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Overloads Sub AddTBMT_FUNCTIONSRow(ByVal row As TBMT_FUNCTIONSRow) Me.Rows.Add(row) End Sub _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Overloads Function AddTBMT_FUNCTIONSRow(ByVal NAME As String, ByVal DESCRIPTION As String, ByVal PARAMETERS As String) As TBMT_FUNCTIONSRow Dim rowTBMT_FUNCTIONSRow As TBMT_FUNCTIONSRow = CType(Me.NewRow,TBMT_FUNCTIONSRow) Dim columnValuesArray() As Object = New Object() {Nothing, NAME, DESCRIPTION, PARAMETERS} @@ -2062,13 +2062,13 @@ Partial Public Class DS_DD_ECM End Function _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Function FindByGUID(ByVal GUID As Integer) As TBMT_FUNCTIONSRow Return CType(Me.Rows.Find(New Object() {GUID}),TBMT_FUNCTIONSRow) End Function _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Overrides Function Clone() As Global.System.Data.DataTable Dim cln As TBMT_FUNCTIONSDataTable = CType(MyBase.Clone,TBMT_FUNCTIONSDataTable) cln.InitVars @@ -2076,13 +2076,13 @@ Partial Public Class DS_DD_ECM End Function _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Protected Overrides Function CreateInstance() As Global.System.Data.DataTable Return New TBMT_FUNCTIONSDataTable() End Function _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Friend Sub InitVars() Me.columnGUID = MyBase.Columns("GUID") Me.columnNAME = MyBase.Columns("NAME") @@ -2091,7 +2091,7 @@ Partial Public Class DS_DD_ECM End Sub _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Private Sub InitClass() Me.columnGUID = New Global.System.Data.DataColumn("GUID", GetType(Integer), Nothing, Global.System.Data.MappingType.Element) MyBase.Columns.Add(Me.columnGUID) @@ -2116,25 +2116,25 @@ Partial Public Class DS_DD_ECM End Sub _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Function NewTBMT_FUNCTIONSRow() As TBMT_FUNCTIONSRow Return CType(Me.NewRow,TBMT_FUNCTIONSRow) End Function _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Protected Overrides Function NewRowFromBuilder(ByVal builder As Global.System.Data.DataRowBuilder) As Global.System.Data.DataRow Return New TBMT_FUNCTIONSRow(builder) End Function _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Protected Overrides Function GetRowType() As Global.System.Type Return GetType(TBMT_FUNCTIONSRow) End Function _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Protected Overrides Sub OnRowChanged(ByVal e As Global.System.Data.DataRowChangeEventArgs) MyBase.OnRowChanged(e) If (Not (Me.TBMT_FUNCTIONSRowChangedEvent) Is Nothing) Then @@ -2143,7 +2143,7 @@ Partial Public Class DS_DD_ECM End Sub _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Protected Overrides Sub OnRowChanging(ByVal e As Global.System.Data.DataRowChangeEventArgs) MyBase.OnRowChanging(e) If (Not (Me.TBMT_FUNCTIONSRowChangingEvent) Is Nothing) Then @@ -2152,7 +2152,7 @@ Partial Public Class DS_DD_ECM End Sub _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Protected Overrides Sub OnRowDeleted(ByVal e As Global.System.Data.DataRowChangeEventArgs) MyBase.OnRowDeleted(e) If (Not (Me.TBMT_FUNCTIONSRowDeletedEvent) Is Nothing) Then @@ -2161,7 +2161,7 @@ Partial Public Class DS_DD_ECM End Sub _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Protected Overrides Sub OnRowDeleting(ByVal e As Global.System.Data.DataRowChangeEventArgs) MyBase.OnRowDeleting(e) If (Not (Me.TBMT_FUNCTIONSRowDeletingEvent) Is Nothing) Then @@ -2170,13 +2170,13 @@ Partial Public Class DS_DD_ECM End Sub _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Sub RemoveTBMT_FUNCTIONSRow(ByVal row As TBMT_FUNCTIONSRow) Me.Rows.Remove(row) End Sub _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Shared Function GetTypedTableSchema(ByVal xs As Global.System.Xml.Schema.XmlSchemaSet) As Global.System.Xml.Schema.XmlSchemaComplexType Dim type As Global.System.Xml.Schema.XmlSchemaComplexType = New Global.System.Xml.Schema.XmlSchemaComplexType() Dim sequence As Global.System.Xml.Schema.XmlSchemaSequence = New Global.System.Xml.Schema.XmlSchemaSequence() @@ -2271,7 +2271,7 @@ Partial Public Class DS_DD_ECM Private columnCOMMENT As Global.System.Data.DataColumn _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Sub New() MyBase.New Me.TableName = "TBMT_CONFIG" @@ -2281,7 +2281,7 @@ Partial Public Class DS_DD_ECM End Sub _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Friend Sub New(ByVal table As Global.System.Data.DataTable) MyBase.New Me.TableName = table.TableName @@ -2299,14 +2299,14 @@ Partial Public Class DS_DD_ECM End Sub _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Protected Sub New(ByVal info As Global.System.Runtime.Serialization.SerializationInfo, ByVal context As Global.System.Runtime.Serialization.StreamingContext) MyBase.New(info, context) Me.InitVars End Sub _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public ReadOnly Property GUIDColumn() As Global.System.Data.DataColumn Get Return Me.columnGUID @@ -2314,7 +2314,7 @@ Partial Public Class DS_DD_ECM End Property _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public ReadOnly Property KEYColumn() As Global.System.Data.DataColumn Get Return Me.columnKEY @@ -2322,7 +2322,7 @@ Partial Public Class DS_DD_ECM End Property _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public ReadOnly Property VALUEColumn() As Global.System.Data.DataColumn Get Return Me.columnVALUE @@ -2330,7 +2330,7 @@ Partial Public Class DS_DD_ECM End Property _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public ReadOnly Property ADDED_WHOColumn() As Global.System.Data.DataColumn Get Return Me.columnADDED_WHO @@ -2338,7 +2338,7 @@ Partial Public Class DS_DD_ECM End Property _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public ReadOnly Property ADDED_WHENColumn() As Global.System.Data.DataColumn Get Return Me.columnADDED_WHEN @@ -2346,7 +2346,7 @@ Partial Public Class DS_DD_ECM End Property _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public ReadOnly Property CHANGED_WHOColumn() As Global.System.Data.DataColumn Get Return Me.columnCHANGED_WHO @@ -2354,7 +2354,7 @@ Partial Public Class DS_DD_ECM End Property _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public ReadOnly Property CHANGED_WHENColumn() As Global.System.Data.DataColumn Get Return Me.columnCHANGED_WHEN @@ -2362,7 +2362,7 @@ Partial Public Class DS_DD_ECM End Property _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public ReadOnly Property ACTIVEColumn() As Global.System.Data.DataColumn Get Return Me.columnACTIVE @@ -2370,7 +2370,7 @@ Partial Public Class DS_DD_ECM End Property _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public ReadOnly Property TEMPLATE_IDColumn() As Global.System.Data.DataColumn Get Return Me.columnTEMPLATE_ID @@ -2378,7 +2378,7 @@ Partial Public Class DS_DD_ECM End Property _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public ReadOnly Property COMMENTColumn() As Global.System.Data.DataColumn Get Return Me.columnCOMMENT @@ -2386,7 +2386,7 @@ Partial Public Class DS_DD_ECM End Property _ Public ReadOnly Property Count() As Integer Get @@ -2395,33 +2395,33 @@ Partial Public Class DS_DD_ECM End Property _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Default ReadOnly Property Item(ByVal index As Integer) As TBMT_CONFIGRow Get Return CType(Me.Rows(index),TBMT_CONFIGRow) End Get End Property - _ + _ Public Event TBMT_CONFIGRowChanging As TBMT_CONFIGRowChangeEventHandler - _ + _ Public Event TBMT_CONFIGRowChanged As TBMT_CONFIGRowChangeEventHandler - _ + _ Public Event TBMT_CONFIGRowDeleting As TBMT_CONFIGRowChangeEventHandler - _ + _ Public Event TBMT_CONFIGRowDeleted As TBMT_CONFIGRowChangeEventHandler _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Overloads Sub AddTBMT_CONFIGRow(ByVal row As TBMT_CONFIGRow) Me.Rows.Add(row) End Sub _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ 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} @@ -2431,13 +2431,13 @@ Partial Public Class DS_DD_ECM End Function _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Function FindByGUID(ByVal GUID As Integer) As TBMT_CONFIGRow Return CType(Me.Rows.Find(New Object() {GUID}),TBMT_CONFIGRow) End Function _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Overrides Function Clone() As Global.System.Data.DataTable Dim cln As TBMT_CONFIGDataTable = CType(MyBase.Clone,TBMT_CONFIGDataTable) cln.InitVars @@ -2445,13 +2445,13 @@ Partial Public Class DS_DD_ECM End Function _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Protected Overrides Function CreateInstance() As Global.System.Data.DataTable Return New TBMT_CONFIGDataTable() End Function _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Friend Sub InitVars() Me.columnGUID = MyBase.Columns("GUID") Me.columnKEY = MyBase.Columns("KEY") @@ -2466,7 +2466,7 @@ Partial Public Class DS_DD_ECM End Sub _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Private Sub InitClass() Me.columnGUID = New Global.System.Data.DataColumn("GUID", GetType(Integer), Nothing, Global.System.Data.MappingType.Element) MyBase.Columns.Add(Me.columnGUID) @@ -2508,25 +2508,25 @@ Partial Public Class DS_DD_ECM End Sub _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Function NewTBMT_CONFIGRow() As TBMT_CONFIGRow Return CType(Me.NewRow,TBMT_CONFIGRow) End Function _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Protected Overrides Function NewRowFromBuilder(ByVal builder As Global.System.Data.DataRowBuilder) As Global.System.Data.DataRow Return New TBMT_CONFIGRow(builder) End Function _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Protected Overrides Function GetRowType() As Global.System.Type Return GetType(TBMT_CONFIGRow) End Function _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Protected Overrides Sub OnRowChanged(ByVal e As Global.System.Data.DataRowChangeEventArgs) MyBase.OnRowChanged(e) If (Not (Me.TBMT_CONFIGRowChangedEvent) Is Nothing) Then @@ -2535,7 +2535,7 @@ Partial Public Class DS_DD_ECM End Sub _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Protected Overrides Sub OnRowChanging(ByVal e As Global.System.Data.DataRowChangeEventArgs) MyBase.OnRowChanging(e) If (Not (Me.TBMT_CONFIGRowChangingEvent) Is Nothing) Then @@ -2544,7 +2544,7 @@ Partial Public Class DS_DD_ECM End Sub _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Protected Overrides Sub OnRowDeleted(ByVal e As Global.System.Data.DataRowChangeEventArgs) MyBase.OnRowDeleted(e) If (Not (Me.TBMT_CONFIGRowDeletedEvent) Is Nothing) Then @@ -2553,7 +2553,7 @@ Partial Public Class DS_DD_ECM End Sub _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Protected Overrides Sub OnRowDeleting(ByVal e As Global.System.Data.DataRowChangeEventArgs) MyBase.OnRowDeleting(e) If (Not (Me.TBMT_CONFIGRowDeletingEvent) Is Nothing) Then @@ -2562,13 +2562,13 @@ Partial Public Class DS_DD_ECM End Sub _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Sub RemoveTBMT_CONFIGRow(ByVal row As TBMT_CONFIGRow) Me.Rows.Remove(row) End Sub _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Shared Function GetTypedTableSchema(ByVal xs As Global.System.Xml.Schema.XmlSchemaSet) As Global.System.Xml.Schema.XmlSchemaComplexType Dim type As Global.System.Xml.Schema.XmlSchemaComplexType = New Global.System.Xml.Schema.XmlSchemaComplexType() Dim sequence As Global.System.Xml.Schema.XmlSchemaSequence = New Global.System.Xml.Schema.XmlSchemaSequence() @@ -2663,7 +2663,7 @@ Partial Public Class DS_DD_ECM Private columnCHANGED_WHEN As Global.System.Data.DataColumn _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Sub New() MyBase.New Me.TableName = "TBMT_TABLES" @@ -2673,7 +2673,7 @@ Partial Public Class DS_DD_ECM End Sub _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Friend Sub New(ByVal table As Global.System.Data.DataTable) MyBase.New Me.TableName = table.TableName @@ -2691,14 +2691,14 @@ Partial Public Class DS_DD_ECM End Sub _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Protected Sub New(ByVal info As Global.System.Runtime.Serialization.SerializationInfo, ByVal context As Global.System.Runtime.Serialization.StreamingContext) MyBase.New(info, context) Me.InitVars End Sub _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public ReadOnly Property GUIDColumn() As Global.System.Data.DataColumn Get Return Me.columnGUID @@ -2706,7 +2706,7 @@ Partial Public Class DS_DD_ECM End Property _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public ReadOnly Property NAMEColumn() As Global.System.Data.DataColumn Get Return Me.columnNAME @@ -2714,7 +2714,7 @@ Partial Public Class DS_DD_ECM End Property _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public ReadOnly Property TEMPLATE_IDColumn() As Global.System.Data.DataColumn Get Return Me.columnTEMPLATE_ID @@ -2722,7 +2722,7 @@ Partial Public Class DS_DD_ECM End Property _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public ReadOnly Property IS_HEADColumn() As Global.System.Data.DataColumn Get Return Me.columnIS_HEAD @@ -2730,7 +2730,7 @@ Partial Public Class DS_DD_ECM End Property _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public ReadOnly Property ACTIVEColumn() As Global.System.Data.DataColumn Get Return Me.columnACTIVE @@ -2738,7 +2738,7 @@ Partial Public Class DS_DD_ECM End Property _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public ReadOnly Property COMMENTColumn() As Global.System.Data.DataColumn Get Return Me.columnCOMMENT @@ -2746,7 +2746,7 @@ Partial Public Class DS_DD_ECM End Property _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public ReadOnly Property ADDED_WHOColumn() As Global.System.Data.DataColumn Get Return Me.columnADDED_WHO @@ -2754,7 +2754,7 @@ Partial Public Class DS_DD_ECM End Property _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public ReadOnly Property ADDED_WHENColumn() As Global.System.Data.DataColumn Get Return Me.columnADDED_WHEN @@ -2762,7 +2762,7 @@ Partial Public Class DS_DD_ECM End Property _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public ReadOnly Property CHANGED_WHOColumn() As Global.System.Data.DataColumn Get Return Me.columnCHANGED_WHO @@ -2770,7 +2770,7 @@ Partial Public Class DS_DD_ECM End Property _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public ReadOnly Property CHANGED_WHENColumn() As Global.System.Data.DataColumn Get Return Me.columnCHANGED_WHEN @@ -2778,7 +2778,7 @@ Partial Public Class DS_DD_ECM End Property _ Public ReadOnly Property Count() As Integer Get @@ -2787,33 +2787,33 @@ Partial Public Class DS_DD_ECM End Property _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Default ReadOnly Property Item(ByVal index As Integer) As TBMT_TABLESRow Get Return CType(Me.Rows(index),TBMT_TABLESRow) End Get End Property - _ + _ Public Event TBMT_TABLESRowChanging As TBMT_TABLESRowChangeEventHandler - _ + _ Public Event TBMT_TABLESRowChanged As TBMT_TABLESRowChangeEventHandler - _ + _ Public Event TBMT_TABLESRowDeleting As TBMT_TABLESRowChangeEventHandler - _ + _ Public Event TBMT_TABLESRowDeleted As TBMT_TABLESRowChangeEventHandler _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Overloads Sub AddTBMT_TABLESRow(ByVal row As TBMT_TABLESRow) Me.Rows.Add(row) End Sub _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Overloads Function AddTBMT_TABLESRow(ByVal NAME As String, ByVal TEMPLATE_ID As Integer, ByVal IS_HEAD As Boolean, ByVal ACTIVE As Boolean, ByVal COMMENT As String, ByVal ADDED_WHO As String, ByVal ADDED_WHEN As Date, ByVal CHANGED_WHO As String, ByVal CHANGED_WHEN As Date) As TBMT_TABLESRow Dim rowTBMT_TABLESRow As TBMT_TABLESRow = CType(Me.NewRow,TBMT_TABLESRow) Dim columnValuesArray() As Object = New Object() {Nothing, NAME, TEMPLATE_ID, IS_HEAD, ACTIVE, COMMENT, ADDED_WHO, ADDED_WHEN, CHANGED_WHO, CHANGED_WHEN} @@ -2823,13 +2823,13 @@ Partial Public Class DS_DD_ECM End Function _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Function FindByGUID(ByVal GUID As Integer) As TBMT_TABLESRow Return CType(Me.Rows.Find(New Object() {GUID}),TBMT_TABLESRow) End Function _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Overrides Function Clone() As Global.System.Data.DataTable Dim cln As TBMT_TABLESDataTable = CType(MyBase.Clone,TBMT_TABLESDataTable) cln.InitVars @@ -2837,13 +2837,13 @@ Partial Public Class DS_DD_ECM End Function _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Protected Overrides Function CreateInstance() As Global.System.Data.DataTable Return New TBMT_TABLESDataTable() End Function _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Friend Sub InitVars() Me.columnGUID = MyBase.Columns("GUID") Me.columnNAME = MyBase.Columns("NAME") @@ -2858,7 +2858,7 @@ Partial Public Class DS_DD_ECM End Sub _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Private Sub InitClass() Me.columnGUID = New Global.System.Data.DataColumn("GUID", GetType(Integer), Nothing, Global.System.Data.MappingType.Element) MyBase.Columns.Add(Me.columnGUID) @@ -2899,25 +2899,25 @@ Partial Public Class DS_DD_ECM End Sub _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Function NewTBMT_TABLESRow() As TBMT_TABLESRow Return CType(Me.NewRow,TBMT_TABLESRow) End Function _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Protected Overrides Function NewRowFromBuilder(ByVal builder As Global.System.Data.DataRowBuilder) As Global.System.Data.DataRow Return New TBMT_TABLESRow(builder) End Function _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Protected Overrides Function GetRowType() As Global.System.Type Return GetType(TBMT_TABLESRow) End Function _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Protected Overrides Sub OnRowChanged(ByVal e As Global.System.Data.DataRowChangeEventArgs) MyBase.OnRowChanged(e) If (Not (Me.TBMT_TABLESRowChangedEvent) Is Nothing) Then @@ -2926,7 +2926,7 @@ Partial Public Class DS_DD_ECM End Sub _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Protected Overrides Sub OnRowChanging(ByVal e As Global.System.Data.DataRowChangeEventArgs) MyBase.OnRowChanging(e) If (Not (Me.TBMT_TABLESRowChangingEvent) Is Nothing) Then @@ -2935,7 +2935,7 @@ Partial Public Class DS_DD_ECM End Sub _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Protected Overrides Sub OnRowDeleted(ByVal e As Global.System.Data.DataRowChangeEventArgs) MyBase.OnRowDeleted(e) If (Not (Me.TBMT_TABLESRowDeletedEvent) Is Nothing) Then @@ -2944,7 +2944,7 @@ Partial Public Class DS_DD_ECM End Sub _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Protected Overrides Sub OnRowDeleting(ByVal e As Global.System.Data.DataRowChangeEventArgs) MyBase.OnRowDeleting(e) If (Not (Me.TBMT_TABLESRowDeletingEvent) Is Nothing) Then @@ -2953,13 +2953,13 @@ Partial Public Class DS_DD_ECM End Sub _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Sub RemoveTBMT_TABLESRow(ByVal row As TBMT_TABLESRow) Me.Rows.Remove(row) End Sub _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Shared Function GetTypedTableSchema(ByVal xs As Global.System.Xml.Schema.XmlSchemaSet) As Global.System.Xml.Schema.XmlSchemaComplexType Dim type As Global.System.Xml.Schema.XmlSchemaComplexType = New Global.System.Xml.Schema.XmlSchemaComplexType() Dim sequence As Global.System.Xml.Schema.XmlSchemaSequence = New Global.System.Xml.Schema.XmlSchemaSequence() @@ -3034,14 +3034,14 @@ Partial Public Class DS_DD_ECM Private tableTBMT_TEMPLATE_ITEMS As TBMT_TEMPLATE_ITEMSDataTable _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Friend Sub New(ByVal rb As Global.System.Data.DataRowBuilder) MyBase.New(rb) Me.tableTBMT_TEMPLATE_ITEMS = CType(Me.Table,TBMT_TEMPLATE_ITEMSDataTable) End Sub _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Property GUID() As Integer Get Return CType(Me(Me.tableTBMT_TEMPLATE_ITEMS.GUIDColumn),Integer) @@ -3052,7 +3052,7 @@ Partial Public Class DS_DD_ECM End Property _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Property NAME() As String Get Return CType(Me(Me.tableTBMT_TEMPLATE_ITEMS.NAMEColumn),String) @@ -3063,7 +3063,7 @@ Partial Public Class DS_DD_ECM End Property _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Property TYPE_ID() As Integer Get Return CType(Me(Me.tableTBMT_TEMPLATE_ITEMS.TYPE_IDColumn),Integer) @@ -3074,7 +3074,7 @@ Partial Public Class DS_DD_ECM End Property _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Property IS_READ_ONLY() As Boolean Get Return CType(Me(Me.tableTBMT_TEMPLATE_ITEMS.IS_READ_ONLYColumn),Boolean) @@ -3085,7 +3085,7 @@ Partial Public Class DS_DD_ECM End Property _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Property IS_VISIBLE() As Boolean Get Return CType(Me(Me.tableTBMT_TEMPLATE_ITEMS.IS_VISIBLEColumn),Boolean) @@ -3096,7 +3096,7 @@ Partial Public Class DS_DD_ECM End Property _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Property ORDER_KEY() As Integer Get Return CType(Me(Me.tableTBMT_TEMPLATE_ITEMS.ORDER_KEYColumn),Integer) @@ -3107,7 +3107,7 @@ Partial Public Class DS_DD_ECM End Property _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Property FUNCTION_ID() As Integer Get Try @@ -3122,7 +3122,7 @@ Partial Public Class DS_DD_ECM End Property _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Property IS_REQUIRED() As Boolean Get Return CType(Me(Me.tableTBMT_TEMPLATE_ITEMS.IS_REQUIREDColumn),Boolean) @@ -3133,7 +3133,7 @@ Partial Public Class DS_DD_ECM End Property _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Property TABLE_ID() As Integer Get Return CType(Me(Me.tableTBMT_TEMPLATE_ITEMS.TABLE_IDColumn),Integer) @@ -3144,7 +3144,7 @@ Partial Public Class DS_DD_ECM End Property _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Property IS_VIRTUAL() As Boolean Get Return CType(Me(Me.tableTBMT_TEMPLATE_ITEMS.IS_VIRTUALColumn),Boolean) @@ -3155,7 +3155,7 @@ Partial Public Class DS_DD_ECM End Property _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Property FUNCTION_PARAMETERS() As String Get Try @@ -3171,7 +3171,7 @@ Partial Public Class DS_DD_ECM End Property _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Property ADDED_WHO() As String Get Return CType(Me(Me.tableTBMT_TEMPLATE_ITEMS.ADDED_WHOColumn),String) @@ -3182,7 +3182,7 @@ Partial Public Class DS_DD_ECM End Property _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Property ADDED_WHEN() As Date Get Try @@ -3197,7 +3197,7 @@ Partial Public Class DS_DD_ECM End Property _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Property CHANGED_WHO() As String Get Try @@ -3212,7 +3212,7 @@ Partial Public Class DS_DD_ECM End Property _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Property CHANGED_WHEN() As Date Get Try @@ -3227,7 +3227,7 @@ Partial Public Class DS_DD_ECM End Property _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Property ACTIVE() As Boolean Get Return CType(Me(Me.tableTBMT_TEMPLATE_ITEMS.ACTIVEColumn),Boolean) @@ -3238,7 +3238,7 @@ Partial Public Class DS_DD_ECM End Property _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Property COMMENT() As String Get Try @@ -3253,7 +3253,7 @@ Partial Public Class DS_DD_ECM End Property _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Property TEMPLATE_NAME() As String Get Return CType(Me(Me.tableTBMT_TEMPLATE_ITEMS.TEMPLATE_NAMEColumn),String) @@ -3264,7 +3264,7 @@ Partial Public Class DS_DD_ECM End Property _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Property TABLE_NAME() As String Get Return CType(Me(Me.tableTBMT_TEMPLATE_ITEMS.TABLE_NAMEColumn),String) @@ -3275,7 +3275,7 @@ Partial Public Class DS_DD_ECM End Property _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Property PREFER_EXTERNAL() As Boolean Get Return CType(Me(Me.tableTBMT_TEMPLATE_ITEMS.PREFER_EXTERNALColumn),Boolean) @@ -3286,79 +3286,79 @@ Partial Public Class DS_DD_ECM End Property _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Function IsFUNCTION_IDNull() As Boolean Return Me.IsNull(Me.tableTBMT_TEMPLATE_ITEMS.FUNCTION_IDColumn) End Function _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Sub SetFUNCTION_IDNull() Me(Me.tableTBMT_TEMPLATE_ITEMS.FUNCTION_IDColumn) = Global.System.Convert.DBNull End Sub _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Function IsFUNCTION_PARAMETERSNull() As Boolean Return Me.IsNull(Me.tableTBMT_TEMPLATE_ITEMS.FUNCTION_PARAMETERSColumn) End Function _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Sub SetFUNCTION_PARAMETERSNull() Me(Me.tableTBMT_TEMPLATE_ITEMS.FUNCTION_PARAMETERSColumn) = Global.System.Convert.DBNull End Sub _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Function IsADDED_WHENNull() As Boolean Return Me.IsNull(Me.tableTBMT_TEMPLATE_ITEMS.ADDED_WHENColumn) End Function _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Sub SetADDED_WHENNull() Me(Me.tableTBMT_TEMPLATE_ITEMS.ADDED_WHENColumn) = Global.System.Convert.DBNull End Sub _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Function IsCHANGED_WHONull() As Boolean Return Me.IsNull(Me.tableTBMT_TEMPLATE_ITEMS.CHANGED_WHOColumn) End Function _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Sub SetCHANGED_WHONull() Me(Me.tableTBMT_TEMPLATE_ITEMS.CHANGED_WHOColumn) = Global.System.Convert.DBNull End Sub _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Function IsCHANGED_WHENNull() As Boolean Return Me.IsNull(Me.tableTBMT_TEMPLATE_ITEMS.CHANGED_WHENColumn) End Function _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Sub SetCHANGED_WHENNull() Me(Me.tableTBMT_TEMPLATE_ITEMS.CHANGED_WHENColumn) = Global.System.Convert.DBNull End Sub _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Function IsCOMMENTNull() As Boolean Return Me.IsNull(Me.tableTBMT_TEMPLATE_ITEMS.COMMENTColumn) End Function _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Sub SetCOMMENTNull() Me(Me.tableTBMT_TEMPLATE_ITEMS.COMMENTColumn) = Global.System.Convert.DBNull End Sub _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Function GetTBMT_FUNCTIONSRows() As TBMT_FUNCTIONSRow() If (Me.Table.ChildRelations("TBMT_TEMPLATE_ITEMS_TBMT_FUNCTIONS") Is Nothing) Then Return New TBMT_FUNCTIONSRow(-1) {} @@ -3368,7 +3368,7 @@ Partial Public Class DS_DD_ECM End Function _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Function GetTBEDI_XML_TYPESRows() As TBEDI_XML_TYPESRow() If (Me.Table.ChildRelations("TBMT_TEMPLATE_ITEMS_TBEDI_XML_TYPES") Is Nothing) Then Return New TBEDI_XML_TYPESRow(-1) {} @@ -3387,14 +3387,14 @@ Partial Public Class DS_DD_ECM Private tableTBEDI_XML_TYPES As TBEDI_XML_TYPESDataTable _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Friend Sub New(ByVal rb As Global.System.Data.DataRowBuilder) MyBase.New(rb) Me.tableTBEDI_XML_TYPES = CType(Me.Table,TBEDI_XML_TYPESDataTable) End Sub _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Property GUID() As Integer Get Return CType(Me(Me.tableTBEDI_XML_TYPES.GUIDColumn),Integer) @@ -3405,7 +3405,7 @@ Partial Public Class DS_DD_ECM End Property _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Property NAME() As String Get Return CType(Me(Me.tableTBEDI_XML_TYPES.NAMEColumn),String) @@ -3416,7 +3416,7 @@ Partial Public Class DS_DD_ECM End Property _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Property TBMT_TEMPLATE_ITEMSRow() As TBMT_TEMPLATE_ITEMSRow Get Return CType(Me.GetParentRow(Me.Table.ParentRelations("TBMT_TEMPLATE_ITEMS_TBEDI_XML_TYPES")),TBMT_TEMPLATE_ITEMSRow) @@ -3436,14 +3436,14 @@ Partial Public Class DS_DD_ECM Private tableTBMT_TEMPLATES As TBMT_TEMPLATESDataTable _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Friend Sub New(ByVal rb As Global.System.Data.DataRowBuilder) MyBase.New(rb) Me.tableTBMT_TEMPLATES = CType(Me.Table,TBMT_TEMPLATESDataTable) End Sub _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Property GUID() As Integer Get Return CType(Me(Me.tableTBMT_TEMPLATES.GUIDColumn),Integer) @@ -3454,7 +3454,7 @@ Partial Public Class DS_DD_ECM End Property _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Property NAME() As String Get Return CType(Me(Me.tableTBMT_TEMPLATES.NAMEColumn),String) @@ -3465,7 +3465,7 @@ Partial Public Class DS_DD_ECM End Property _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Property DESCRIPTION() As String Get Try @@ -3480,7 +3480,7 @@ Partial Public Class DS_DD_ECM End Property _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Property TBEDI_XML_NODESRow() As TBEDI_XML_NODESRow Get Return CType(Me.GetParentRow(Me.Table.ParentRelations("TBEDI_XML_NODES_TBMT_TEMPLATES")),TBEDI_XML_NODESRow) @@ -3491,13 +3491,13 @@ Partial Public Class DS_DD_ECM End Property _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Function IsDESCRIPTIONNull() As Boolean Return Me.IsNull(Me.tableTBMT_TEMPLATES.DESCRIPTIONColumn) End Function _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Sub SetDESCRIPTIONNull() Me(Me.tableTBMT_TEMPLATES.DESCRIPTIONColumn) = Global.System.Convert.DBNull End Sub @@ -3512,14 +3512,14 @@ Partial Public Class DS_DD_ECM Private tableTBEDI_XML_NODES As TBEDI_XML_NODESDataTable _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Friend Sub New(ByVal rb As Global.System.Data.DataRowBuilder) MyBase.New(rb) Me.tableTBEDI_XML_NODES = CType(Me.Table,TBEDI_XML_NODESDataTable) End Sub _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Property GUID() As Integer Get Return CType(Me(Me.tableTBEDI_XML_NODES.GUIDColumn),Integer) @@ -3530,7 +3530,7 @@ Partial Public Class DS_DD_ECM End Property _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Property NAME() As String Get Return CType(Me(Me.tableTBEDI_XML_NODES.NAMEColumn),String) @@ -3541,7 +3541,7 @@ Partial Public Class DS_DD_ECM End Property _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Property TEMPLATE_ID() As Integer Get Return CType(Me(Me.tableTBEDI_XML_NODES.TEMPLATE_IDColumn),Integer) @@ -3552,7 +3552,7 @@ Partial Public Class DS_DD_ECM End Property _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Property IS_HEAD() As Boolean Get Return CType(Me(Me.tableTBEDI_XML_NODES.IS_HEADColumn),Boolean) @@ -3563,7 +3563,7 @@ Partial Public Class DS_DD_ECM End Property _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Function GetTBMT_TEMPLATESRows() As TBMT_TEMPLATESRow() If (Me.Table.ChildRelations("TBEDI_XML_NODES_TBMT_TEMPLATES") Is Nothing) Then Return New TBMT_TEMPLATESRow(-1) {} @@ -3582,14 +3582,14 @@ Partial Public Class DS_DD_ECM Private tableTBMT_FUNCTIONS As TBMT_FUNCTIONSDataTable _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Friend Sub New(ByVal rb As Global.System.Data.DataRowBuilder) MyBase.New(rb) Me.tableTBMT_FUNCTIONS = CType(Me.Table,TBMT_FUNCTIONSDataTable) End Sub _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Property GUID() As Integer Get Return CType(Me(Me.tableTBMT_FUNCTIONS.GUIDColumn),Integer) @@ -3600,7 +3600,7 @@ Partial Public Class DS_DD_ECM End Property _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Property NAME() As String Get Return CType(Me(Me.tableTBMT_FUNCTIONS.NAMEColumn),String) @@ -3611,7 +3611,7 @@ Partial Public Class DS_DD_ECM End Property _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Property DESCRIPTION() As String Get Return CType(Me(Me.tableTBMT_FUNCTIONS.DESCRIPTIONColumn),String) @@ -3622,7 +3622,7 @@ Partial Public Class DS_DD_ECM End Property _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Property PARAMETERS() As String Get Try @@ -3637,7 +3637,7 @@ Partial Public Class DS_DD_ECM End Property _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Property TBMT_TEMPLATE_ITEMSRow() As TBMT_TEMPLATE_ITEMSRow Get Return CType(Me.GetParentRow(Me.Table.ParentRelations("TBMT_TEMPLATE_ITEMS_TBMT_FUNCTIONS")),TBMT_TEMPLATE_ITEMSRow) @@ -3648,13 +3648,13 @@ Partial Public Class DS_DD_ECM End Property _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Function IsPARAMETERSNull() As Boolean Return Me.IsNull(Me.tableTBMT_FUNCTIONS.PARAMETERSColumn) End Function _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Sub SetPARAMETERSNull() Me(Me.tableTBMT_FUNCTIONS.PARAMETERSColumn) = Global.System.Convert.DBNull End Sub @@ -3669,14 +3669,14 @@ Partial Public Class DS_DD_ECM Private tableTBMT_CONFIG As TBMT_CONFIGDataTable _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Friend Sub New(ByVal rb As Global.System.Data.DataRowBuilder) MyBase.New(rb) Me.tableTBMT_CONFIG = CType(Me.Table,TBMT_CONFIGDataTable) End Sub _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Property GUID() As Integer Get Return CType(Me(Me.tableTBMT_CONFIG.GUIDColumn),Integer) @@ -3687,7 +3687,7 @@ Partial Public Class DS_DD_ECM End Property _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Property KEY() As String Get Return CType(Me(Me.tableTBMT_CONFIG.KEYColumn),String) @@ -3698,7 +3698,7 @@ Partial Public Class DS_DD_ECM End Property _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Property VALUE() As String Get Return CType(Me(Me.tableTBMT_CONFIG.VALUEColumn),String) @@ -3709,7 +3709,7 @@ Partial Public Class DS_DD_ECM End Property _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Property ADDED_WHO() As String Get Return CType(Me(Me.tableTBMT_CONFIG.ADDED_WHOColumn),String) @@ -3720,7 +3720,7 @@ Partial Public Class DS_DD_ECM End Property _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Property ADDED_WHEN() As Date Get Try @@ -3735,7 +3735,7 @@ Partial Public Class DS_DD_ECM End Property _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Property CHANGED_WHO() As String Get Try @@ -3750,7 +3750,7 @@ Partial Public Class DS_DD_ECM End Property _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Property CHANGED_WHEN() As Date Get Try @@ -3765,7 +3765,7 @@ Partial Public Class DS_DD_ECM End Property _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Property ACTIVE() As Boolean Get Return CType(Me(Me.tableTBMT_CONFIG.ACTIVEColumn),Boolean) @@ -3776,7 +3776,7 @@ Partial Public Class DS_DD_ECM End Property _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Property TEMPLATE_ID() As Integer Get Try @@ -3791,7 +3791,7 @@ Partial Public Class DS_DD_ECM End Property _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Property COMMENT() As String Get Try @@ -3806,61 +3806,61 @@ Partial Public Class DS_DD_ECM End Property _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Function IsADDED_WHENNull() As Boolean Return Me.IsNull(Me.tableTBMT_CONFIG.ADDED_WHENColumn) End Function _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Sub SetADDED_WHENNull() Me(Me.tableTBMT_CONFIG.ADDED_WHENColumn) = Global.System.Convert.DBNull End Sub _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Function IsCHANGED_WHONull() As Boolean Return Me.IsNull(Me.tableTBMT_CONFIG.CHANGED_WHOColumn) End Function _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Sub SetCHANGED_WHONull() Me(Me.tableTBMT_CONFIG.CHANGED_WHOColumn) = Global.System.Convert.DBNull End Sub _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Function IsCHANGED_WHENNull() As Boolean Return Me.IsNull(Me.tableTBMT_CONFIG.CHANGED_WHENColumn) End Function _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Sub SetCHANGED_WHENNull() Me(Me.tableTBMT_CONFIG.CHANGED_WHENColumn) = Global.System.Convert.DBNull End Sub _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Function IsTEMPLATE_IDNull() As Boolean Return Me.IsNull(Me.tableTBMT_CONFIG.TEMPLATE_IDColumn) End Function _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Sub SetTEMPLATE_IDNull() Me(Me.tableTBMT_CONFIG.TEMPLATE_IDColumn) = Global.System.Convert.DBNull End Sub _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Function IsCOMMENTNull() As Boolean Return Me.IsNull(Me.tableTBMT_CONFIG.COMMENTColumn) End Function _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Sub SetCOMMENTNull() Me(Me.tableTBMT_CONFIG.COMMENTColumn) = Global.System.Convert.DBNull End Sub @@ -3875,14 +3875,14 @@ Partial Public Class DS_DD_ECM Private tableTBMT_TABLES As TBMT_TABLESDataTable _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Friend Sub New(ByVal rb As Global.System.Data.DataRowBuilder) MyBase.New(rb) Me.tableTBMT_TABLES = CType(Me.Table,TBMT_TABLESDataTable) End Sub _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Property GUID() As Integer Get Return CType(Me(Me.tableTBMT_TABLES.GUIDColumn),Integer) @@ -3893,7 +3893,7 @@ Partial Public Class DS_DD_ECM End Property _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Property NAME() As String Get Return CType(Me(Me.tableTBMT_TABLES.NAMEColumn),String) @@ -3904,7 +3904,7 @@ Partial Public Class DS_DD_ECM End Property _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Property TEMPLATE_ID() As Integer Get Return CType(Me(Me.tableTBMT_TABLES.TEMPLATE_IDColumn),Integer) @@ -3915,7 +3915,7 @@ Partial Public Class DS_DD_ECM End Property _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Property IS_HEAD() As Boolean Get Return CType(Me(Me.tableTBMT_TABLES.IS_HEADColumn),Boolean) @@ -3926,7 +3926,7 @@ Partial Public Class DS_DD_ECM End Property _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Property ACTIVE() As Boolean Get Return CType(Me(Me.tableTBMT_TABLES.ACTIVEColumn),Boolean) @@ -3937,7 +3937,7 @@ Partial Public Class DS_DD_ECM End Property _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Property COMMENT() As String Get Try @@ -3952,7 +3952,7 @@ Partial Public Class DS_DD_ECM End Property _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Property ADDED_WHO() As String Get Return CType(Me(Me.tableTBMT_TABLES.ADDED_WHOColumn),String) @@ -3963,7 +3963,7 @@ Partial Public Class DS_DD_ECM End Property _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Property ADDED_WHEN() As Date Get Try @@ -3978,7 +3978,7 @@ Partial Public Class DS_DD_ECM End Property _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Property CHANGED_WHO() As String Get Try @@ -3993,7 +3993,7 @@ Partial Public Class DS_DD_ECM End Property _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Property CHANGED_WHEN() As Date Get Try @@ -4008,49 +4008,49 @@ Partial Public Class DS_DD_ECM End Property _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Function IsCOMMENTNull() As Boolean Return Me.IsNull(Me.tableTBMT_TABLES.COMMENTColumn) End Function _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Sub SetCOMMENTNull() Me(Me.tableTBMT_TABLES.COMMENTColumn) = Global.System.Convert.DBNull End Sub _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Function IsADDED_WHENNull() As Boolean Return Me.IsNull(Me.tableTBMT_TABLES.ADDED_WHENColumn) End Function _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Sub SetADDED_WHENNull() Me(Me.tableTBMT_TABLES.ADDED_WHENColumn) = Global.System.Convert.DBNull End Sub _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Function IsCHANGED_WHONull() As Boolean Return Me.IsNull(Me.tableTBMT_TABLES.CHANGED_WHOColumn) End Function _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Sub SetCHANGED_WHONull() Me(Me.tableTBMT_TABLES.CHANGED_WHOColumn) = Global.System.Convert.DBNull End Sub _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Function IsCHANGED_WHENNull() As Boolean Return Me.IsNull(Me.tableTBMT_TABLES.CHANGED_WHENColumn) End Function _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Sub SetCHANGED_WHENNull() Me(Me.tableTBMT_TABLES.CHANGED_WHENColumn) = Global.System.Convert.DBNull End Sub @@ -4059,7 +4059,7 @@ Partial Public Class DS_DD_ECM ''' '''Row event argument class ''' - _ + _ Public Class TBMT_TEMPLATE_ITEMSRowChangeEvent Inherits Global.System.EventArgs @@ -4068,7 +4068,7 @@ Partial Public Class DS_DD_ECM Private eventAction As Global.System.Data.DataRowAction _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Sub New(ByVal row As TBMT_TEMPLATE_ITEMSRow, ByVal action As Global.System.Data.DataRowAction) MyBase.New Me.eventRow = row @@ -4076,7 +4076,7 @@ Partial Public Class DS_DD_ECM End Sub _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public ReadOnly Property Row() As TBMT_TEMPLATE_ITEMSRow Get Return Me.eventRow @@ -4084,7 +4084,7 @@ Partial Public Class DS_DD_ECM End Property _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public ReadOnly Property Action() As Global.System.Data.DataRowAction Get Return Me.eventAction @@ -4095,7 +4095,7 @@ Partial Public Class DS_DD_ECM ''' '''Row event argument class ''' - _ + _ Public Class TBEDI_XML_TYPESRowChangeEvent Inherits Global.System.EventArgs @@ -4104,7 +4104,7 @@ Partial Public Class DS_DD_ECM Private eventAction As Global.System.Data.DataRowAction _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Sub New(ByVal row As TBEDI_XML_TYPESRow, ByVal action As Global.System.Data.DataRowAction) MyBase.New Me.eventRow = row @@ -4112,7 +4112,7 @@ Partial Public Class DS_DD_ECM End Sub _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public ReadOnly Property Row() As TBEDI_XML_TYPESRow Get Return Me.eventRow @@ -4120,7 +4120,7 @@ Partial Public Class DS_DD_ECM End Property _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public ReadOnly Property Action() As Global.System.Data.DataRowAction Get Return Me.eventAction @@ -4131,7 +4131,7 @@ Partial Public Class DS_DD_ECM ''' '''Row event argument class ''' - _ + _ Public Class TBMT_TEMPLATESRowChangeEvent Inherits Global.System.EventArgs @@ -4140,7 +4140,7 @@ Partial Public Class DS_DD_ECM Private eventAction As Global.System.Data.DataRowAction _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Sub New(ByVal row As TBMT_TEMPLATESRow, ByVal action As Global.System.Data.DataRowAction) MyBase.New Me.eventRow = row @@ -4148,7 +4148,7 @@ Partial Public Class DS_DD_ECM End Sub _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public ReadOnly Property Row() As TBMT_TEMPLATESRow Get Return Me.eventRow @@ -4156,7 +4156,7 @@ Partial Public Class DS_DD_ECM End Property _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public ReadOnly Property Action() As Global.System.Data.DataRowAction Get Return Me.eventAction @@ -4167,7 +4167,7 @@ Partial Public Class DS_DD_ECM ''' '''Row event argument class ''' - _ + _ Public Class TBEDI_XML_NODESRowChangeEvent Inherits Global.System.EventArgs @@ -4176,7 +4176,7 @@ Partial Public Class DS_DD_ECM Private eventAction As Global.System.Data.DataRowAction _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Sub New(ByVal row As TBEDI_XML_NODESRow, ByVal action As Global.System.Data.DataRowAction) MyBase.New Me.eventRow = row @@ -4184,7 +4184,7 @@ Partial Public Class DS_DD_ECM End Sub _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public ReadOnly Property Row() As TBEDI_XML_NODESRow Get Return Me.eventRow @@ -4192,7 +4192,7 @@ Partial Public Class DS_DD_ECM End Property _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public ReadOnly Property Action() As Global.System.Data.DataRowAction Get Return Me.eventAction @@ -4203,7 +4203,7 @@ Partial Public Class DS_DD_ECM ''' '''Row event argument class ''' - _ + _ Public Class TBMT_FUNCTIONSRowChangeEvent Inherits Global.System.EventArgs @@ -4212,7 +4212,7 @@ Partial Public Class DS_DD_ECM Private eventAction As Global.System.Data.DataRowAction _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Sub New(ByVal row As TBMT_FUNCTIONSRow, ByVal action As Global.System.Data.DataRowAction) MyBase.New Me.eventRow = row @@ -4220,7 +4220,7 @@ Partial Public Class DS_DD_ECM End Sub _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public ReadOnly Property Row() As TBMT_FUNCTIONSRow Get Return Me.eventRow @@ -4228,7 +4228,7 @@ Partial Public Class DS_DD_ECM End Property _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public ReadOnly Property Action() As Global.System.Data.DataRowAction Get Return Me.eventAction @@ -4239,7 +4239,7 @@ Partial Public Class DS_DD_ECM ''' '''Row event argument class ''' - _ + _ Public Class TBMT_CONFIGRowChangeEvent Inherits Global.System.EventArgs @@ -4248,7 +4248,7 @@ Partial Public Class DS_DD_ECM Private eventAction As Global.System.Data.DataRowAction _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Sub New(ByVal row As TBMT_CONFIGRow, ByVal action As Global.System.Data.DataRowAction) MyBase.New Me.eventRow = row @@ -4256,7 +4256,7 @@ Partial Public Class DS_DD_ECM End Sub _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public ReadOnly Property Row() As TBMT_CONFIGRow Get Return Me.eventRow @@ -4264,7 +4264,7 @@ Partial Public Class DS_DD_ECM End Property _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public ReadOnly Property Action() As Global.System.Data.DataRowAction Get Return Me.eventAction @@ -4275,7 +4275,7 @@ Partial Public Class DS_DD_ECM ''' '''Row event argument class ''' - _ + _ Public Class TBMT_TABLESRowChangeEvent Inherits Global.System.EventArgs @@ -4284,7 +4284,7 @@ Partial Public Class DS_DD_ECM Private eventAction As Global.System.Data.DataRowAction _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Sub New(ByVal row As TBMT_TABLESRow, ByVal action As Global.System.Data.DataRowAction) MyBase.New Me.eventRow = row @@ -4292,7 +4292,7 @@ Partial Public Class DS_DD_ECM End Sub _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public ReadOnly Property Row() As TBMT_TABLESRow Get Return Me.eventRow @@ -4300,7 +4300,7 @@ Partial Public Class DS_DD_ECM End Property _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public ReadOnly Property Action() As Global.System.Data.DataRowAction Get Return Me.eventAction @@ -4334,14 +4334,14 @@ Namespace DS_DD_ECMTableAdapters Private _clearBeforeFill As Boolean _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Sub New() MyBase.New Me.ClearBeforeFill = true End Sub _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Protected Friend ReadOnly Property Adapter() As Global.System.Data.SqlClient.SqlDataAdapter Get If (Me._adapter Is Nothing) Then @@ -4352,7 +4352,7 @@ Namespace DS_DD_ECMTableAdapters End Property _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Friend Property Connection() As Global.System.Data.SqlClient.SqlConnection Get If (Me._connection Is Nothing) Then @@ -4382,7 +4382,7 @@ Namespace DS_DD_ECMTableAdapters End Property _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Friend Property Transaction() As Global.System.Data.SqlClient.SqlTransaction Get Return Me._transaction @@ -4410,7 +4410,7 @@ Namespace DS_DD_ECMTableAdapters End Property _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Protected ReadOnly Property CommandCollection() As Global.System.Data.SqlClient.SqlCommand() Get If (Me._commandCollection Is Nothing) Then @@ -4421,7 +4421,7 @@ Namespace DS_DD_ECMTableAdapters End Property _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Property ClearBeforeFill() As Boolean Get Return Me._clearBeforeFill @@ -4432,7 +4432,7 @@ Namespace DS_DD_ECMTableAdapters End Property _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Private Sub InitAdapter() Me._adapter = New Global.System.Data.SqlClient.SqlDataAdapter() Dim tableMapping As Global.System.Data.Common.DataTableMapping = New Global.System.Data.Common.DataTableMapping() @@ -4528,14 +4528,14 @@ Namespace DS_DD_ECMTableAdapters End Sub _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Private Sub InitConnection() Me._connection = New Global.System.Data.SqlClient.SqlConnection() Me._connection.ConnectionString = Global.MultiTool.Form.My.MySettings.Default.DD_ECMConnectionString End Sub _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Private Sub InitCommandCollection() Me._commandCollection = New Global.System.Data.SqlClient.SqlCommand(0) {} Me._commandCollection(0) = New Global.System.Data.SqlClient.SqlCommand() @@ -4559,7 +4559,7 @@ Namespace DS_DD_ECMTableAdapters End Sub _ Public Overloads Overridable Function Fill(ByVal dataTable As DS_DD_ECM.TBMT_TEMPLATE_ITEMSDataTable, ByVal TABLE_ID As Integer) As Integer @@ -4573,7 +4573,7 @@ Namespace DS_DD_ECMTableAdapters End Function _ Public Overloads Overridable Function GetData(ByVal TABLE_ID As Integer) As DS_DD_ECM.TBMT_TEMPLATE_ITEMSDataTable @@ -4585,35 +4585,35 @@ Namespace DS_DD_ECMTableAdapters End Function _ Public Overloads Overridable Function Update(ByVal dataTable As DS_DD_ECM.TBMT_TEMPLATE_ITEMSDataTable) As Integer Return Me.Adapter.Update(dataTable) End Function _ Public Overloads Overridable Function Update(ByVal dataSet As DS_DD_ECM) As Integer Return Me.Adapter.Update(dataSet, "TBMT_TEMPLATE_ITEMS") End Function _ Public Overloads Overridable Function Update(ByVal dataRow As Global.System.Data.DataRow) As Integer Return Me.Adapter.Update(New Global.System.Data.DataRow() {dataRow}) End Function _ Public Overloads Overridable Function Update(ByVal dataRows() As Global.System.Data.DataRow) As Integer Return Me.Adapter.Update(dataRows) End Function _ Public Overloads Overridable Function Delete(ByVal Original_GUID As Integer) As Integer @@ -4634,7 +4634,7 @@ Namespace DS_DD_ECMTableAdapters End Function _ Public Overloads Overridable Function Insert(ByVal ORDER_KEY As Integer, ByVal NAME As String, ByVal TABLE_ID As Integer, ByVal TYPE_ID As Integer, ByVal IS_READ_ONLY As Boolean, ByVal IS_VISIBLE As Boolean, ByVal IS_REQUIRED As Boolean, ByVal IS_VIRTUAL As Boolean, ByVal FUNCTION_ID As Global.System.Nullable(Of Integer), ByVal FUNCTION_PARAMETERS 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)) As Integer @@ -4696,7 +4696,7 @@ Namespace DS_DD_ECMTableAdapters End Function _ Public Overloads Overridable Function Update( _ @@ -4803,14 +4803,14 @@ Namespace DS_DD_ECMTableAdapters Private _clearBeforeFill As Boolean _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Sub New() MyBase.New Me.ClearBeforeFill = true End Sub _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Protected Friend ReadOnly Property Adapter() As Global.System.Data.SqlClient.SqlDataAdapter Get If (Me._adapter Is Nothing) Then @@ -4821,7 +4821,7 @@ Namespace DS_DD_ECMTableAdapters End Property _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Friend Property Connection() As Global.System.Data.SqlClient.SqlConnection Get If (Me._connection Is Nothing) Then @@ -4851,7 +4851,7 @@ Namespace DS_DD_ECMTableAdapters End Property _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Friend Property Transaction() As Global.System.Data.SqlClient.SqlTransaction Get Return Me._transaction @@ -4879,7 +4879,7 @@ Namespace DS_DD_ECMTableAdapters End Property _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Protected ReadOnly Property CommandCollection() As Global.System.Data.SqlClient.SqlCommand() Get If (Me._commandCollection Is Nothing) Then @@ -4890,7 +4890,7 @@ Namespace DS_DD_ECMTableAdapters End Property _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Property ClearBeforeFill() As Boolean Get Return Me._clearBeforeFill @@ -4901,7 +4901,7 @@ Namespace DS_DD_ECMTableAdapters End Property _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Private Sub InitAdapter() Me._adapter = New Global.System.Data.SqlClient.SqlDataAdapter() Dim tableMapping As Global.System.Data.Common.DataTableMapping = New Global.System.Data.Common.DataTableMapping() @@ -4936,14 +4936,14 @@ Namespace DS_DD_ECMTableAdapters End Sub _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Private Sub InitConnection() Me._connection = New Global.System.Data.SqlClient.SqlConnection() Me._connection.ConnectionString = Global.MultiTool.Form.My.MySettings.Default.DD_ECMConnectionString End Sub _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Private Sub InitCommandCollection() Me._commandCollection = New Global.System.Data.SqlClient.SqlCommand(0) {} Me._commandCollection(0) = New Global.System.Data.SqlClient.SqlCommand() @@ -4953,7 +4953,7 @@ Namespace DS_DD_ECMTableAdapters End Sub _ Public Overloads Overridable Function Fill(ByVal dataTable As DS_DD_ECM.TBEDI_XML_TYPESDataTable) As Integer @@ -4966,7 +4966,7 @@ Namespace DS_DD_ECMTableAdapters End Function _ Public Overloads Overridable Function GetData() As DS_DD_ECM.TBEDI_XML_TYPESDataTable @@ -4977,35 +4977,35 @@ Namespace DS_DD_ECMTableAdapters End Function _ Public Overloads Overridable Function Update(ByVal dataTable As DS_DD_ECM.TBEDI_XML_TYPESDataTable) As Integer Return Me.Adapter.Update(dataTable) End Function _ Public Overloads Overridable Function Update(ByVal dataSet As DS_DD_ECM) As Integer Return Me.Adapter.Update(dataSet, "TBEDI_XML_TYPES") End Function _ Public Overloads Overridable Function Update(ByVal dataRow As Global.System.Data.DataRow) As Integer Return Me.Adapter.Update(New Global.System.Data.DataRow() {dataRow}) End Function _ Public Overloads Overridable Function Update(ByVal dataRows() As Global.System.Data.DataRow) As Integer Return Me.Adapter.Update(dataRows) End Function _ Public Overloads Overridable Function Delete(ByVal Original_GUID As Integer, ByVal Original_NAME As String) As Integer @@ -5031,7 +5031,7 @@ Namespace DS_DD_ECMTableAdapters End Function _ Public Overloads Overridable Function Insert(ByVal NAME As String) As Integer @@ -5056,7 +5056,7 @@ Namespace DS_DD_ECMTableAdapters End Function _ Public Overloads Overridable Function Update(ByVal NAME As String, ByVal Original_GUID As Integer, ByVal Original_NAME As String, ByVal GUID As Integer) As Integer @@ -5088,7 +5088,7 @@ Namespace DS_DD_ECMTableAdapters End Function _ Public Overloads Overridable Function Update(ByVal NAME As String, ByVal Original_GUID As Integer, ByVal Original_NAME As String) As Integer @@ -5119,14 +5119,14 @@ Namespace DS_DD_ECMTableAdapters Private _clearBeforeFill As Boolean _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Sub New() MyBase.New Me.ClearBeforeFill = true End Sub _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Protected Friend ReadOnly Property Adapter() As Global.System.Data.SqlClient.SqlDataAdapter Get If (Me._adapter Is Nothing) Then @@ -5137,7 +5137,7 @@ Namespace DS_DD_ECMTableAdapters End Property _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Friend Property Connection() As Global.System.Data.SqlClient.SqlConnection Get If (Me._connection Is Nothing) Then @@ -5167,7 +5167,7 @@ Namespace DS_DD_ECMTableAdapters End Property _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Friend Property Transaction() As Global.System.Data.SqlClient.SqlTransaction Get Return Me._transaction @@ -5195,7 +5195,7 @@ Namespace DS_DD_ECMTableAdapters End Property _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Protected ReadOnly Property CommandCollection() As Global.System.Data.SqlClient.SqlCommand() Get If (Me._commandCollection Is Nothing) Then @@ -5206,7 +5206,7 @@ Namespace DS_DD_ECMTableAdapters End Property _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Property ClearBeforeFill() As Boolean Get Return Me._clearBeforeFill @@ -5217,7 +5217,7 @@ Namespace DS_DD_ECMTableAdapters End Property _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Private Sub InitAdapter() Me._adapter = New Global.System.Data.SqlClient.SqlDataAdapter() Dim tableMapping As Global.System.Data.Common.DataTableMapping = New Global.System.Data.Common.DataTableMapping() @@ -5256,14 +5256,14 @@ Namespace DS_DD_ECMTableAdapters End Sub _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Private Sub InitConnection() Me._connection = New Global.System.Data.SqlClient.SqlConnection() Me._connection.ConnectionString = Global.MultiTool.Form.My.MySettings.Default.DD_ECMConnectionString End Sub _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Private Sub InitCommandCollection() Me._commandCollection = New Global.System.Data.SqlClient.SqlCommand(0) {} Me._commandCollection(0) = New Global.System.Data.SqlClient.SqlCommand() @@ -5273,7 +5273,7 @@ Namespace DS_DD_ECMTableAdapters End Sub _ Public Overloads Overridable Function Fill(ByVal dataTable As DS_DD_ECM.TBMT_TEMPLATESDataTable) As Integer @@ -5286,7 +5286,7 @@ Namespace DS_DD_ECMTableAdapters End Function _ Public Overloads Overridable Function GetData() As DS_DD_ECM.TBMT_TEMPLATESDataTable @@ -5297,35 +5297,35 @@ Namespace DS_DD_ECMTableAdapters End Function _ Public Overloads Overridable Function Update(ByVal dataTable As DS_DD_ECM.TBMT_TEMPLATESDataTable) As Integer Return Me.Adapter.Update(dataTable) End Function _ Public Overloads Overridable Function Update(ByVal dataSet As DS_DD_ECM) As Integer Return Me.Adapter.Update(dataSet, "TBMT_TEMPLATES") End Function _ Public Overloads Overridable Function Update(ByVal dataRow As Global.System.Data.DataRow) As Integer Return Me.Adapter.Update(New Global.System.Data.DataRow() {dataRow}) End Function _ Public Overloads Overridable Function Update(ByVal dataRows() As Global.System.Data.DataRow) As Integer Return Me.Adapter.Update(dataRows) End Function _ Public Overloads Overridable Function Delete(ByVal Original_GUID As Integer, ByVal Original_NAME As String) As Integer @@ -5351,7 +5351,7 @@ Namespace DS_DD_ECMTableAdapters End Function _ Public Overloads Overridable Function Insert(ByVal NAME As String, ByVal DESCRIPTION As String) As Integer @@ -5381,7 +5381,7 @@ Namespace DS_DD_ECMTableAdapters End Function _ Public Overloads Overridable Function Update(ByVal NAME As String, ByVal DESCRIPTION As String, ByVal Original_GUID As Integer, ByVal Original_NAME As String, ByVal GUID As Integer) As Integer @@ -5418,7 +5418,7 @@ Namespace DS_DD_ECMTableAdapters End Function _ Public Overloads Overridable Function Update(ByVal NAME As String, ByVal DESCRIPTION As String, ByVal Original_GUID As Integer, ByVal Original_NAME As String) As Integer @@ -5449,14 +5449,14 @@ Namespace DS_DD_ECMTableAdapters Private _clearBeforeFill As Boolean _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Sub New() MyBase.New Me.ClearBeforeFill = true End Sub _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Protected Friend ReadOnly Property Adapter() As Global.System.Data.SqlClient.SqlDataAdapter Get If (Me._adapter Is Nothing) Then @@ -5467,7 +5467,7 @@ Namespace DS_DD_ECMTableAdapters End Property _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Friend Property Connection() As Global.System.Data.SqlClient.SqlConnection Get If (Me._connection Is Nothing) Then @@ -5497,7 +5497,7 @@ Namespace DS_DD_ECMTableAdapters End Property _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Friend Property Transaction() As Global.System.Data.SqlClient.SqlTransaction Get Return Me._transaction @@ -5525,7 +5525,7 @@ Namespace DS_DD_ECMTableAdapters End Property _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Protected ReadOnly Property CommandCollection() As Global.System.Data.SqlClient.SqlCommand() Get If (Me._commandCollection Is Nothing) Then @@ -5536,7 +5536,7 @@ Namespace DS_DD_ECMTableAdapters End Property _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Property ClearBeforeFill() As Boolean Get Return Me._clearBeforeFill @@ -5547,7 +5547,7 @@ Namespace DS_DD_ECMTableAdapters End Property _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Private Sub InitAdapter() Me._adapter = New Global.System.Data.SqlClient.SqlDataAdapter() Dim tableMapping As Global.System.Data.Common.DataTableMapping = New Global.System.Data.Common.DataTableMapping() @@ -5592,14 +5592,14 @@ Namespace DS_DD_ECMTableAdapters End Sub _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Private Sub InitConnection() Me._connection = New Global.System.Data.SqlClient.SqlConnection() Me._connection.ConnectionString = Global.MultiTool.Form.My.MySettings.Default.DD_ECMConnectionString End Sub _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Private Sub InitCommandCollection() Me._commandCollection = New Global.System.Data.SqlClient.SqlCommand(0) {} Me._commandCollection(0) = New Global.System.Data.SqlClient.SqlCommand() @@ -5609,7 +5609,7 @@ Namespace DS_DD_ECMTableAdapters End Sub _ Public Overloads Overridable Function Fill(ByVal dataTable As DS_DD_ECM.TBEDI_XML_NODESDataTable) As Integer @@ -5622,7 +5622,7 @@ Namespace DS_DD_ECMTableAdapters End Function _ Public Overloads Overridable Function GetData() As DS_DD_ECM.TBEDI_XML_NODESDataTable @@ -5633,35 +5633,35 @@ Namespace DS_DD_ECMTableAdapters End Function _ Public Overloads Overridable Function Update(ByVal dataTable As DS_DD_ECM.TBEDI_XML_NODESDataTable) As Integer Return Me.Adapter.Update(dataTable) End Function _ Public Overloads Overridable Function Update(ByVal dataSet As DS_DD_ECM) As Integer Return Me.Adapter.Update(dataSet, "TBEDI_XML_NODES") End Function _ Public Overloads Overridable Function Update(ByVal dataRow As Global.System.Data.DataRow) As Integer Return Me.Adapter.Update(New Global.System.Data.DataRow() {dataRow}) End Function _ Public Overloads Overridable Function Update(ByVal dataRows() As Global.System.Data.DataRow) As Integer Return Me.Adapter.Update(dataRows) End Function _ Public Overloads Overridable Function Delete(ByVal Original_GUID As Integer, ByVal Original_TEMPLATE_ID As Integer, ByVal Original_IS_HEAD As Boolean) As Integer @@ -5684,7 +5684,7 @@ Namespace DS_DD_ECMTableAdapters End Function _ Public Overloads Overridable Function Insert(ByVal NAME As String, ByVal TEMPLATE_ID As Integer, ByVal IS_HEAD As Boolean) As Integer @@ -5711,7 +5711,7 @@ Namespace DS_DD_ECMTableAdapters End Function _ Public Overloads Overridable Function Update(ByVal NAME As String, ByVal TEMPLATE_ID As Integer, ByVal IS_HEAD As Boolean, ByVal Original_GUID As Integer, ByVal Original_TEMPLATE_ID As Integer, ByVal Original_IS_HEAD As Boolean, ByVal GUID As Integer) As Integer @@ -5742,7 +5742,7 @@ Namespace DS_DD_ECMTableAdapters End Function _ Public Overloads Overridable Function Update(ByVal NAME As String, ByVal TEMPLATE_ID As Integer, ByVal IS_HEAD As Boolean, ByVal Original_GUID As Integer, ByVal Original_TEMPLATE_ID As Integer, ByVal Original_IS_HEAD As Boolean) As Integer @@ -5773,14 +5773,14 @@ Namespace DS_DD_ECMTableAdapters Private _clearBeforeFill As Boolean _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Sub New() MyBase.New Me.ClearBeforeFill = true End Sub _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Protected Friend ReadOnly Property Adapter() As Global.System.Data.SqlClient.SqlDataAdapter Get If (Me._adapter Is Nothing) Then @@ -5791,7 +5791,7 @@ Namespace DS_DD_ECMTableAdapters End Property _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Friend Property Connection() As Global.System.Data.SqlClient.SqlConnection Get If (Me._connection Is Nothing) Then @@ -5821,7 +5821,7 @@ Namespace DS_DD_ECMTableAdapters End Property _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Friend Property Transaction() As Global.System.Data.SqlClient.SqlTransaction Get Return Me._transaction @@ -5849,7 +5849,7 @@ Namespace DS_DD_ECMTableAdapters End Property _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Protected ReadOnly Property CommandCollection() As Global.System.Data.SqlClient.SqlCommand() Get If (Me._commandCollection Is Nothing) Then @@ -5860,7 +5860,7 @@ Namespace DS_DD_ECMTableAdapters End Property _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Property ClearBeforeFill() As Boolean Get Return Me._clearBeforeFill @@ -5871,7 +5871,7 @@ Namespace DS_DD_ECMTableAdapters End Property _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Private Sub InitAdapter() Me._adapter = New Global.System.Data.SqlClient.SqlDataAdapter() Dim tableMapping As Global.System.Data.Common.DataTableMapping = New Global.System.Data.Common.DataTableMapping() @@ -5910,14 +5910,14 @@ Namespace DS_DD_ECMTableAdapters End Sub _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Private Sub InitConnection() Me._connection = New Global.System.Data.SqlClient.SqlConnection() Me._connection.ConnectionString = Global.MultiTool.Form.My.MySettings.Default.DD_ECMConnectionString End Sub _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Private Sub InitCommandCollection() Me._commandCollection = New Global.System.Data.SqlClient.SqlCommand(0) {} Me._commandCollection(0) = New Global.System.Data.SqlClient.SqlCommand() @@ -5927,7 +5927,7 @@ Namespace DS_DD_ECMTableAdapters End Sub _ Public Overloads Overridable Function Fill(ByVal dataTable As DS_DD_ECM.TBMT_FUNCTIONSDataTable) As Integer @@ -5940,7 +5940,7 @@ Namespace DS_DD_ECMTableAdapters End Function _ Public Overloads Overridable Function GetData() As DS_DD_ECM.TBMT_FUNCTIONSDataTable @@ -5951,35 +5951,35 @@ Namespace DS_DD_ECMTableAdapters End Function _ Public Overloads Overridable Function Update(ByVal dataTable As DS_DD_ECM.TBMT_FUNCTIONSDataTable) As Integer Return Me.Adapter.Update(dataTable) End Function _ Public Overloads Overridable Function Update(ByVal dataSet As DS_DD_ECM) As Integer Return Me.Adapter.Update(dataSet, "TBMT_FUNCTIONS") End Function _ Public Overloads Overridable Function Update(ByVal dataRow As Global.System.Data.DataRow) As Integer Return Me.Adapter.Update(New Global.System.Data.DataRow() {dataRow}) End Function _ Public Overloads Overridable Function Update(ByVal dataRows() As Global.System.Data.DataRow) As Integer Return Me.Adapter.Update(dataRows) End Function _ Public Overloads Overridable Function Delete(ByVal Original_GUID As Integer) As Integer @@ -6000,7 +6000,7 @@ Namespace DS_DD_ECMTableAdapters End Function _ Public Overloads Overridable Function Insert(ByVal NAME As String, ByVal DESCRIPTION As String, ByVal PARAMETERS As String) As Integer @@ -6035,7 +6035,7 @@ Namespace DS_DD_ECMTableAdapters End Function _ Public Overloads Overridable Function Update(ByVal NAME As String, ByVal DESCRIPTION As String, ByVal PARAMETERS As String, ByVal Original_GUID As Integer, ByVal GUID As Integer) As Integer @@ -6072,7 +6072,7 @@ Namespace DS_DD_ECMTableAdapters End Function _ Public Overloads Overridable Function Update(ByVal NAME As String, ByVal DESCRIPTION As String, ByVal PARAMETERS As String, ByVal Original_GUID As Integer) As Integer @@ -6103,14 +6103,14 @@ Namespace DS_DD_ECMTableAdapters Private _clearBeforeFill As Boolean _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Sub New() MyBase.New Me.ClearBeforeFill = true End Sub _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Protected Friend ReadOnly Property Adapter() As Global.System.Data.SqlClient.SqlDataAdapter Get If (Me._adapter Is Nothing) Then @@ -6121,7 +6121,7 @@ Namespace DS_DD_ECMTableAdapters End Property _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Friend Property Connection() As Global.System.Data.SqlClient.SqlConnection Get If (Me._connection Is Nothing) Then @@ -6151,7 +6151,7 @@ Namespace DS_DD_ECMTableAdapters End Property _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Friend Property Transaction() As Global.System.Data.SqlClient.SqlTransaction Get Return Me._transaction @@ -6179,7 +6179,7 @@ Namespace DS_DD_ECMTableAdapters End Property _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Protected ReadOnly Property CommandCollection() As Global.System.Data.SqlClient.SqlCommand() Get If (Me._commandCollection Is Nothing) Then @@ -6190,7 +6190,7 @@ Namespace DS_DD_ECMTableAdapters End Property _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Property ClearBeforeFill() As Boolean Get Return Me._clearBeforeFill @@ -6201,7 +6201,7 @@ Namespace DS_DD_ECMTableAdapters End Property _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Private Sub InitAdapter() Me._adapter = New Global.System.Data.SqlClient.SqlDataAdapter() Dim tableMapping As Global.System.Data.Common.DataTableMapping = New Global.System.Data.Common.DataTableMapping() @@ -6259,14 +6259,14 @@ Namespace DS_DD_ECMTableAdapters End Sub _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Private Sub InitConnection() Me._connection = New Global.System.Data.SqlClient.SqlConnection() Me._connection.ConnectionString = Global.MultiTool.Form.My.MySettings.Default.DD_ECMConnectionString End Sub _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Private Sub InitCommandCollection() Me._commandCollection = New Global.System.Data.SqlClient.SqlCommand(1) {} Me._commandCollection(0) = New Global.System.Data.SqlClient.SqlCommand() @@ -6284,7 +6284,7 @@ Namespace DS_DD_ECMTableAdapters End Sub _ Public Overloads Overridable Function Fill(ByVal dataTable As DS_DD_ECM.TBMT_CONFIGDataTable) As Integer @@ -6297,7 +6297,7 @@ Namespace DS_DD_ECMTableAdapters End Function _ Public Overloads Overridable Function GetData() As DS_DD_ECM.TBMT_CONFIGDataTable @@ -6308,7 +6308,7 @@ Namespace DS_DD_ECMTableAdapters End Function _ Public Overloads Overridable Function FillGeneral(ByVal dataTable As DS_DD_ECM.TBMT_CONFIGDataTable) As Integer @@ -6321,7 +6321,7 @@ Namespace DS_DD_ECMTableAdapters End Function _ Public Overloads Overridable Function GetDataGeneral() As DS_DD_ECM.TBMT_CONFIGDataTable @@ -6332,35 +6332,35 @@ Namespace DS_DD_ECMTableAdapters End Function _ Public Overloads Overridable Function Update(ByVal dataTable As DS_DD_ECM.TBMT_CONFIGDataTable) As Integer Return Me.Adapter.Update(dataTable) End Function _ Public Overloads Overridable Function Update(ByVal dataSet As DS_DD_ECM) As Integer Return Me.Adapter.Update(dataSet, "TBMT_CONFIG") End Function _ Public Overloads Overridable Function Update(ByVal dataRow As Global.System.Data.DataRow) As Integer Return Me.Adapter.Update(New Global.System.Data.DataRow() {dataRow}) End Function _ Public Overloads Overridable Function Update(ByVal dataRows() As Global.System.Data.DataRow) As Integer Return Me.Adapter.Update(dataRows) End Function _ Public Overloads Overridable Function Delete(ByVal Original_GUID As Integer) As Integer @@ -6381,7 +6381,7 @@ Namespace DS_DD_ECMTableAdapters End Function _ Public Overloads Overridable Function Insert(ByVal KEY As String, ByVal VALUE 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 ACTIVE As Boolean, ByVal TEMPLATE_ID As Global.System.Nullable(Of Integer), ByVal COMMENT As String) As Integer @@ -6442,7 +6442,7 @@ Namespace DS_DD_ECMTableAdapters End Function _ Public Overloads Overridable Function Update(ByVal KEY As String, ByVal VALUE 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 ACTIVE As Boolean, ByVal TEMPLATE_ID As Global.System.Nullable(Of Integer), ByVal COMMENT As String, ByVal Original_GUID As Integer) As Integer @@ -6527,14 +6527,14 @@ Namespace DS_DD_ECMTableAdapters Private _clearBeforeFill As Boolean _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Sub New() MyBase.New Me.ClearBeforeFill = true End Sub _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Protected Friend ReadOnly Property Adapter() As Global.System.Data.SqlClient.SqlDataAdapter Get If (Me._adapter Is Nothing) Then @@ -6545,7 +6545,7 @@ Namespace DS_DD_ECMTableAdapters End Property _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Friend Property Connection() As Global.System.Data.SqlClient.SqlConnection Get If (Me._connection Is Nothing) Then @@ -6575,7 +6575,7 @@ Namespace DS_DD_ECMTableAdapters End Property _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Friend Property Transaction() As Global.System.Data.SqlClient.SqlTransaction Get Return Me._transaction @@ -6603,7 +6603,7 @@ Namespace DS_DD_ECMTableAdapters End Property _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Protected ReadOnly Property CommandCollection() As Global.System.Data.SqlClient.SqlCommand() Get If (Me._commandCollection Is Nothing) Then @@ -6614,7 +6614,7 @@ Namespace DS_DD_ECMTableAdapters End Property _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Property ClearBeforeFill() As Boolean Get Return Me._clearBeforeFill @@ -6625,7 +6625,7 @@ Namespace DS_DD_ECMTableAdapters End Property _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Private Sub InitAdapter() Me._adapter = New Global.System.Data.SqlClient.SqlDataAdapter() Dim tableMapping As Global.System.Data.Common.DataTableMapping = New Global.System.Data.Common.DataTableMapping() @@ -6726,14 +6726,14 @@ Namespace DS_DD_ECMTableAdapters End Sub _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Private Sub InitConnection() Me._connection = New Global.System.Data.SqlClient.SqlConnection() Me._connection.ConnectionString = Global.MultiTool.Form.My.MySettings.Default.DD_ECMConnectionString End Sub _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Private Sub InitCommandCollection() Me._commandCollection = New Global.System.Data.SqlClient.SqlCommand(0) {} Me._commandCollection(0) = New Global.System.Data.SqlClient.SqlCommand() @@ -6743,7 +6743,7 @@ Namespace DS_DD_ECMTableAdapters End Sub _ Public Overloads Overridable Function Fill(ByVal dataTable As DS_DD_ECM.TBMT_TABLESDataTable) As Integer @@ -6756,7 +6756,7 @@ Namespace DS_DD_ECMTableAdapters End Function _ Public Overloads Overridable Function GetData() As DS_DD_ECM.TBMT_TABLESDataTable @@ -6767,35 +6767,35 @@ Namespace DS_DD_ECMTableAdapters End Function _ Public Overloads Overridable Function Update(ByVal dataTable As DS_DD_ECM.TBMT_TABLESDataTable) As Integer Return Me.Adapter.Update(dataTable) End Function _ Public Overloads Overridable Function Update(ByVal dataSet As DS_DD_ECM) As Integer Return Me.Adapter.Update(dataSet, "TBMT_TABLES") End Function _ Public Overloads Overridable Function Update(ByVal dataRow As Global.System.Data.DataRow) As Integer Return Me.Adapter.Update(New Global.System.Data.DataRow() {dataRow}) End Function _ Public Overloads Overridable Function Update(ByVal dataRows() As Global.System.Data.DataRow) As Integer Return Me.Adapter.Update(dataRows) End Function _ Public Overloads Overridable Function Delete(ByVal Original_GUID As Integer, ByVal Original_TEMPLATE_ID As Integer, ByVal Original_IS_HEAD As Boolean, ByVal Original_ACTIVE As Boolean, ByVal Original_COMMENT As String, ByVal Original_ADDED_WHO As String, ByVal Original_ADDED_WHEN As Global.System.Nullable(Of Date), ByVal Original_CHANGED_WHO As String, ByVal Original_CHANGED_WHEN As Global.System.Nullable(Of Date)) As Integer @@ -6852,7 +6852,7 @@ Namespace DS_DD_ECMTableAdapters End Function _ Public Overloads Overridable Function Insert(ByVal NAME As String, ByVal TEMPLATE_ID As Integer, ByVal IS_HEAD As Boolean, ByVal ACTIVE As Boolean, ByVal COMMENT 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)) As Integer @@ -6905,7 +6905,7 @@ Namespace DS_DD_ECMTableAdapters End Function _ Public Overloads Overridable Function Update( _ @@ -7015,7 +7015,7 @@ Namespace DS_DD_ECMTableAdapters End Function _ Public Overloads Overridable Function Update( _ @@ -7073,7 +7073,7 @@ Namespace DS_DD_ECMTableAdapters Private _connection As Global.System.Data.IDbConnection _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Property UpdateOrder() As UpdateOrderOption Get Return Me._updateOrder @@ -7084,7 +7084,7 @@ Namespace DS_DD_ECMTableAdapters End Property _ @@ -7098,7 +7098,7 @@ Namespace DS_DD_ECMTableAdapters End Property _ @@ -7112,7 +7112,7 @@ Namespace DS_DD_ECMTableAdapters End Property _ @@ -7126,7 +7126,7 @@ Namespace DS_DD_ECMTableAdapters End Property _ @@ -7140,7 +7140,7 @@ Namespace DS_DD_ECMTableAdapters End Property _ @@ -7154,7 +7154,7 @@ Namespace DS_DD_ECMTableAdapters End Property _ @@ -7168,7 +7168,7 @@ Namespace DS_DD_ECMTableAdapters End Property _ @@ -7182,7 +7182,7 @@ Namespace DS_DD_ECMTableAdapters End Property _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Property BackupDataSetBeforeUpdate() As Boolean Get Return Me._backupDataSetBeforeUpdate @@ -7193,7 +7193,7 @@ Namespace DS_DD_ECMTableAdapters End Property _ Public Property Connection() As Global.System.Data.IDbConnection Get @@ -7236,7 +7236,7 @@ Namespace DS_DD_ECMTableAdapters End Property _ Public ReadOnly Property TableAdapterInstanceCount() As Integer Get @@ -7270,7 +7270,7 @@ Namespace DS_DD_ECMTableAdapters '''Update rows in top-down order. ''' _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Private Function UpdateUpdatedRows(ByVal dataSet As DS_DD_ECM, ByVal allChangedRows As Global.System.Collections.Generic.List(Of Global.System.Data.DataRow), ByVal allAddedRows As Global.System.Collections.Generic.List(Of Global.System.Data.DataRow)) As Integer Dim result As Integer = 0 If (Not (Me._tBMT_TEMPLATE_ITEMSTableAdapter) Is Nothing) Then @@ -7343,7 +7343,7 @@ Namespace DS_DD_ECMTableAdapters '''Insert rows in top-down order. ''' _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Private Function UpdateInsertedRows(ByVal dataSet As DS_DD_ECM, ByVal allAddedRows As Global.System.Collections.Generic.List(Of Global.System.Data.DataRow)) As Integer Dim result As Integer = 0 If (Not (Me._tBMT_TEMPLATE_ITEMSTableAdapter) Is Nothing) Then @@ -7409,7 +7409,7 @@ Namespace DS_DD_ECMTableAdapters '''Delete rows in bottom-up order. ''' _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.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._tBMT_TABLESTableAdapter) Is Nothing) Then @@ -7475,7 +7475,7 @@ Namespace DS_DD_ECMTableAdapters '''Remove inserted rows that become updated rows after calling TableAdapter.Update(inserted rows) first ''' _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Private Function GetRealUpdatedRows(ByVal updatedRows() As Global.System.Data.DataRow, ByVal allAddedRows As Global.System.Collections.Generic.List(Of Global.System.Data.DataRow)) As Global.System.Data.DataRow() If ((updatedRows Is Nothing) _ OrElse (updatedRows.Length < 1)) Then @@ -7501,7 +7501,7 @@ Namespace DS_DD_ECMTableAdapters '''Update all changes to the dataset. ''' _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Overridable Function UpdateAll(ByVal dataSet As DS_DD_ECM) As Integer If (dataSet Is Nothing) Then Throw New Global.System.ArgumentNullException("dataSet") @@ -7744,13 +7744,13 @@ Namespace DS_DD_ECMTableAdapters End Function _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Protected Overridable Sub SortSelfReferenceRows(ByVal rows() As Global.System.Data.DataRow, ByVal relation As Global.System.Data.DataRelation, ByVal childFirst As Boolean) Global.System.Array.Sort(Of Global.System.Data.DataRow)(rows, New SelfReferenceComparer(relation, childFirst)) End Sub _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Protected Overridable Function MatchTableAdapterConnection(ByVal inputConnection As Global.System.Data.IDbConnection) As Boolean If (Not (Me._connection) Is Nothing) Then Return true @@ -7768,7 +7768,7 @@ Namespace DS_DD_ECMTableAdapters ''' '''Update Order Option ''' - _ + _ Public Enum UpdateOrderOption InsertUpdateDelete = 0 @@ -7779,7 +7779,7 @@ Namespace DS_DD_ECMTableAdapters ''' '''Used to sort self-referenced table's rows ''' - _ + _ Private Class SelfReferenceComparer Inherits Object Implements Global.System.Collections.Generic.IComparer(Of Global.System.Data.DataRow) @@ -7789,7 +7789,7 @@ Namespace DS_DD_ECMTableAdapters Private _childFirst As Integer _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Friend Sub New(ByVal relation As Global.System.Data.DataRelation, ByVal childFirst As Boolean) MyBase.New Me._relation = relation @@ -7801,7 +7801,7 @@ Namespace DS_DD_ECMTableAdapters End Sub _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Private Function GetRoot(ByVal row As Global.System.Data.DataRow, ByRef distance As Integer) As Global.System.Data.DataRow Global.System.Diagnostics.Debug.Assert((Not (row) Is Nothing)) Dim root As Global.System.Data.DataRow = row @@ -7840,7 +7840,7 @@ Namespace DS_DD_ECMTableAdapters End Function _ + Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "17.0.0.0")> _ Public Function Compare(ByVal row1 As Global.System.Data.DataRow, ByVal row2 As Global.System.Data.DataRow) As Integer Implements Global.System.Collections.Generic.IComparer(Of Global.System.Data.DataRow).Compare If Object.ReferenceEquals(row1, row2) Then Return 0 diff --git a/MultiTool.Form/MultiTool.Form.vbproj b/MultiTool.Form/MultiTool.Form.vbproj index 8694df1..ad984e6 100644 --- a/MultiTool.Form/MultiTool.Form.vbproj +++ b/MultiTool.Form/MultiTool.Form.vbproj @@ -11,9 +11,10 @@ MultiTool.Form 512 WindowsForms - v4.6.1 + v4.6.2 true true + AnyCPU diff --git a/MultiTool.Form/My Project/AssemblyInfo.vb b/MultiTool.Form/My Project/AssemblyInfo.vb index 54e4156..80fa698 100644 --- a/MultiTool.Form/My Project/AssemblyInfo.vb +++ b/MultiTool.Form/My Project/AssemblyInfo.vb @@ -13,7 +13,7 @@ Imports System.Runtime.InteropServices - + @@ -31,5 +31,5 @@ Imports System.Runtime.InteropServices ' indem Sie "*" wie unten gezeigt eingeben: ' - + diff --git a/MultiTool.Form/My Project/Resources.Designer.vb b/MultiTool.Form/My Project/Resources.Designer.vb index 64be315..5f1320f 100644 --- a/MultiTool.Form/My Project/Resources.Designer.vb +++ b/MultiTool.Form/My Project/Resources.Designer.vb @@ -22,7 +22,7 @@ Namespace My.Resources ''' ''' Eine stark typisierte Ressourcenklasse zum Suchen von lokalisierten Zeichenfolgen usw. ''' - _ diff --git a/MultiTool.Form/My Project/Settings.Designer.vb b/MultiTool.Form/My Project/Settings.Designer.vb index d1b32b6..fba2679 100644 --- a/MultiTool.Form/My Project/Settings.Designer.vb +++ b/MultiTool.Form/My Project/Settings.Designer.vb @@ -15,7 +15,7 @@ Option Explicit On Namespace My _ Partial Friend NotInheritable Class MySettings Inherits Global.System.Configuration.ApplicationSettingsBase diff --git a/MultiTool.Form/Strings/frmImportMainExtra.Designer.vb b/MultiTool.Form/Strings/frmImportMainExtra.Designer.vb index c48b1e4..950ec89 100644 --- a/MultiTool.Form/Strings/frmImportMainExtra.Designer.vb +++ b/MultiTool.Form/Strings/frmImportMainExtra.Designer.vb @@ -22,7 +22,7 @@ Namespace My.Resources ''' ''' Eine stark typisierte Ressourcenklasse zum Suchen von lokalisierten Zeichenfolgen usw. ''' - _ Friend Class frmImportMainExtra diff --git a/MultiTool.Form/Strings/frmMainExtra.Designer.vb b/MultiTool.Form/Strings/frmMainExtra.Designer.vb index da8b66f..a0f1761 100644 --- a/MultiTool.Form/Strings/frmMainExtra.Designer.vb +++ b/MultiTool.Form/Strings/frmMainExtra.Designer.vb @@ -22,7 +22,7 @@ Namespace My.Resources ''' ''' Eine stark typisierte Ressourcenklasse zum Suchen von lokalisierten Zeichenfolgen usw. ''' - _ Friend Class frmMainExtra diff --git a/MultiTool.Form/Strings/frmRowEditorExtra.Designer.vb b/MultiTool.Form/Strings/frmRowEditorExtra.Designer.vb index 169b9f1..f262e7e 100644 --- a/MultiTool.Form/Strings/frmRowEditorExtra.Designer.vb +++ b/MultiTool.Form/Strings/frmRowEditorExtra.Designer.vb @@ -22,7 +22,7 @@ Namespace My.Resources ''' ''' Eine stark typisierte Ressourcenklasse zum Suchen von lokalisierten Zeichenfolgen usw. ''' - _ Friend Class frmRowEditorExtra diff --git a/MultiTool.Form/Strings/frmShared.Designer.vb b/MultiTool.Form/Strings/frmShared.Designer.vb index f311b99..17fc8dc 100644 --- a/MultiTool.Form/Strings/frmShared.Designer.vb +++ b/MultiTool.Form/Strings/frmShared.Designer.vb @@ -22,7 +22,7 @@ Namespace My.Resources ''' ''' Eine stark typisierte Ressourcenklasse zum Suchen von lokalisierten Zeichenfolgen usw. ''' - _ Friend Class frmShared diff --git a/MultiTool.Form/frmImportMain.resx b/MultiTool.Form/frmImportMain.resx index 9c1a8ba..19d96f8 100644 --- a/MultiTool.Form/frmImportMain.resx +++ b/MultiTool.Form/frmImportMain.resx @@ -376,6 +376,9 @@ Top, Left, Right + + False + 75, 6 diff --git a/MultiTool.Form/frmImportMain.vb b/MultiTool.Form/frmImportMain.vb index 508b349..454b639 100644 --- a/MultiTool.Form/frmImportMain.vb +++ b/MultiTool.Form/frmImportMain.vb @@ -39,7 +39,9 @@ Public Class frmImportMain Private CurrentGrid As GridControl = Nothing Private CurrentDocument As Document = Nothing Private CurrentDocumentReadOnly As Boolean = False + Private FilesLoading As Boolean = False + Private FilesLoaded As Boolean = False Public Sub New(pLogConfig As LogConfig, pConfigManager As ConfigManager(Of Config), pTemplate As Template) InitializeComponent() @@ -681,7 +683,11 @@ Public Class frmImportMain GridControlFiles.DataSource = Nothing GridControlFiles.DataSource = DocumentLoader.Files + FilesLoaded = DocumentLoader.Files.Count > 0 + txtFilesLoaded.Caption = String.Format(My.Resources.frmImportMainExtra._0__Dateien_geladen, DocumentLoader.Files.Count) + Else + FilesLoaded = False End If Catch ex As Exception @@ -876,7 +882,7 @@ Public Class frmImportMain RibbonPageGroupReport.Enabled = True RibbonPageGroupTransfer.Enabled = True - lookupMandator.Enabled = True + lookupMandator.Enabled = FilesLoaded SplitContainerGrids.Enabled = True GridControlFiles.Enabled = True SetDocumentButtonsEnabled(True)