Add LookupGrid3 to Validator, Improve frmControl_Detail, Add Sequence, Validation
This commit is contained in:
Jonathan Jenne
381
app/DD_PM_WINDREAM/DD_DMSLiteDataSet.Designer.vb
generated
381
app/DD_PM_WINDREAM/DD_DMSLiteDataSet.Designer.vb
generated
@@ -5371,6 +5371,12 @@ Partial Public Class DD_DMSLiteDataSet
|
||||
|
||||
Private columnREGEX_MESSAGE_DE As Global.System.Data.DataColumn
|
||||
|
||||
Private columnSEQUENCE As Global.System.Data.DataColumn
|
||||
|
||||
Private columnDEFAULT_VALUE As Global.System.Data.DataColumn
|
||||
|
||||
Private columnADVANCED_LOOKUP As Global.System.Data.DataColumn
|
||||
|
||||
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
|
||||
Public Sub New()
|
||||
@@ -5550,6 +5556,30 @@ Partial Public Class DD_DMSLiteDataSet
|
||||
End Get
|
||||
End Property
|
||||
|
||||
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
|
||||
Public ReadOnly Property SEQUENCEColumn() As Global.System.Data.DataColumn
|
||||
Get
|
||||
Return Me.columnSEQUENCE
|
||||
End Get
|
||||
End Property
|
||||
|
||||
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
|
||||
Public ReadOnly Property DEFAULT_VALUEColumn() As Global.System.Data.DataColumn
|
||||
Get
|
||||
Return Me.columnDEFAULT_VALUE
|
||||
End Get
|
||||
End Property
|
||||
|
||||
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
|
||||
Public ReadOnly Property ADVANCED_LOOKUPColumn() As Global.System.Data.DataColumn
|
||||
Get
|
||||
Return Me.columnADVANCED_LOOKUP
|
||||
End Get
|
||||
End Property
|
||||
|
||||
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0"), _
|
||||
Global.System.ComponentModel.Browsable(false)> _
|
||||
@@ -5604,9 +5634,12 @@ Partial Public Class DD_DMSLiteDataSet
|
||||
ByVal CHANGED_WHEN As Date, _
|
||||
ByVal REGEX_MATCH As String, _
|
||||
ByVal REGEX_MESSAGE_EN As String, _
|
||||
ByVal REGEX_MESSAGE_DE As String) As TBPM_CONTROL_TABLERow
|
||||
ByVal REGEX_MESSAGE_DE As String, _
|
||||
ByVal SEQUENCE As Integer, _
|
||||
ByVal DEFAULT_VALUE As String, _
|
||||
ByVal ADVANCED_LOOKUP As Boolean) As TBPM_CONTROL_TABLERow
|
||||
Dim rowTBPM_CONTROL_TABLERow As TBPM_CONTROL_TABLERow = CType(Me.NewRow,TBPM_CONTROL_TABLERow)
|
||||
Dim columnValuesArray() As Object = New Object() {Nothing, Nothing, SPALTENNAME, SPALTEN_HEADER, SPALTENBREITE, VALIDATION, CHOICE_LIST, CONNECTION_ID, SQL_COMMAND, READ_ONLY, LOAD_IDX_VALUE, ADDED_WHO, ADDED_WHEN, CHANGED_WHO, CHANGED_WHEN, REGEX_MATCH, REGEX_MESSAGE_EN, REGEX_MESSAGE_DE}
|
||||
Dim columnValuesArray() As Object = New Object() {Nothing, Nothing, SPALTENNAME, SPALTEN_HEADER, SPALTENBREITE, VALIDATION, CHOICE_LIST, CONNECTION_ID, SQL_COMMAND, READ_ONLY, LOAD_IDX_VALUE, ADDED_WHO, ADDED_WHEN, CHANGED_WHO, CHANGED_WHEN, REGEX_MATCH, REGEX_MESSAGE_EN, REGEX_MESSAGE_DE, SEQUENCE, DEFAULT_VALUE, ADVANCED_LOOKUP}
|
||||
If (Not (parentTBPM_PROFILE_CONTROLSRowByFK_TBPM_CONTROL_TABLE_CONTROL1) Is Nothing) Then
|
||||
columnValuesArray(1) = parentTBPM_PROFILE_CONTROLSRowByFK_TBPM_CONTROL_TABLE_CONTROL1(0)
|
||||
End If
|
||||
@@ -5656,6 +5689,9 @@ Partial Public Class DD_DMSLiteDataSet
|
||||
Me.columnREGEX_MATCH = MyBase.Columns("REGEX_MATCH")
|
||||
Me.columnREGEX_MESSAGE_EN = MyBase.Columns("REGEX_MESSAGE_EN")
|
||||
Me.columnREGEX_MESSAGE_DE = MyBase.Columns("REGEX_MESSAGE_DE")
|
||||
Me.columnSEQUENCE = MyBase.Columns("SEQUENCE")
|
||||
Me.columnDEFAULT_VALUE = MyBase.Columns("DEFAULT_VALUE")
|
||||
Me.columnADVANCED_LOOKUP = MyBase.Columns("ADVANCED_LOOKUP")
|
||||
End Sub
|
||||
|
||||
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
@@ -5697,6 +5733,12 @@ Partial Public Class DD_DMSLiteDataSet
|
||||
MyBase.Columns.Add(Me.columnREGEX_MESSAGE_EN)
|
||||
Me.columnREGEX_MESSAGE_DE = New Global.System.Data.DataColumn("REGEX_MESSAGE_DE", GetType(String), Nothing, Global.System.Data.MappingType.Element)
|
||||
MyBase.Columns.Add(Me.columnREGEX_MESSAGE_DE)
|
||||
Me.columnSEQUENCE = New Global.System.Data.DataColumn("SEQUENCE", GetType(Integer), Nothing, Global.System.Data.MappingType.Element)
|
||||
MyBase.Columns.Add(Me.columnSEQUENCE)
|
||||
Me.columnDEFAULT_VALUE = New Global.System.Data.DataColumn("DEFAULT_VALUE", GetType(String), Nothing, Global.System.Data.MappingType.Element)
|
||||
MyBase.Columns.Add(Me.columnDEFAULT_VALUE)
|
||||
Me.columnADVANCED_LOOKUP = New Global.System.Data.DataColumn("ADVANCED_LOOKUP", GetType(Boolean), Nothing, Global.System.Data.MappingType.Element)
|
||||
MyBase.Columns.Add(Me.columnADVANCED_LOOKUP)
|
||||
Me.Constraints.Add(New Global.System.Data.UniqueConstraint("Constraint1", New Global.System.Data.DataColumn() {Me.columnGUID}, true))
|
||||
Me.columnGUID.AutoIncrement = true
|
||||
Me.columnGUID.AllowDBNull = false
|
||||
@@ -5726,6 +5768,9 @@ Partial Public Class DD_DMSLiteDataSet
|
||||
Me.columnREGEX_MESSAGE_EN.MaxLength = 1000
|
||||
Me.columnREGEX_MESSAGE_DE.AllowDBNull = false
|
||||
Me.columnREGEX_MESSAGE_DE.MaxLength = 1000
|
||||
Me.columnSEQUENCE.AllowDBNull = false
|
||||
Me.columnDEFAULT_VALUE.MaxLength = 2147483647
|
||||
Me.columnADVANCED_LOOKUP.AllowDBNull = false
|
||||
End Sub
|
||||
|
||||
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
@@ -12821,6 +12866,43 @@ Partial Public Class DD_DMSLiteDataSet
|
||||
End Set
|
||||
End Property
|
||||
|
||||
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
|
||||
Public Property SEQUENCE() As Integer
|
||||
Get
|
||||
Return CType(Me(Me.tableTBPM_CONTROL_TABLE.SEQUENCEColumn),Integer)
|
||||
End Get
|
||||
Set
|
||||
Me(Me.tableTBPM_CONTROL_TABLE.SEQUENCEColumn) = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
|
||||
Public Property DEFAULT_VALUE() As String
|
||||
Get
|
||||
Try
|
||||
Return CType(Me(Me.tableTBPM_CONTROL_TABLE.DEFAULT_VALUEColumn),String)
|
||||
Catch e As Global.System.InvalidCastException
|
||||
Throw New Global.System.Data.StrongTypingException("Der Wert für Spalte DEFAULT_VALUE in Tabelle TBPM_CONTROL_TABLE ist DBNull.", e)
|
||||
End Try
|
||||
End Get
|
||||
Set
|
||||
Me(Me.tableTBPM_CONTROL_TABLE.DEFAULT_VALUEColumn) = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
|
||||
Public Property ADVANCED_LOOKUP() As Boolean
|
||||
Get
|
||||
Return CType(Me(Me.tableTBPM_CONTROL_TABLE.ADVANCED_LOOKUPColumn),Boolean)
|
||||
End Get
|
||||
Set
|
||||
Me(Me.tableTBPM_CONTROL_TABLE.ADVANCED_LOOKUPColumn) = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
|
||||
Public Property TBPM_PROFILE_CONTROLSRow() As TBPM_PROFILE_CONTROLSRow
|
||||
@@ -12902,6 +12984,18 @@ Partial Public Class DD_DMSLiteDataSet
|
||||
Public Sub SetCHANGED_WHENNull()
|
||||
Me(Me.tableTBPM_CONTROL_TABLE.CHANGED_WHENColumn) = Global.System.Convert.DBNull
|
||||
End Sub
|
||||
|
||||
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
|
||||
Public Function IsDEFAULT_VALUENull() As Boolean
|
||||
Return Me.IsNull(Me.tableTBPM_CONTROL_TABLE.DEFAULT_VALUEColumn)
|
||||
End Function
|
||||
|
||||
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
|
||||
Public Sub SetDEFAULT_VALUENull()
|
||||
Me(Me.tableTBPM_CONTROL_TABLE.DEFAULT_VALUEColumn) = Global.System.Convert.DBNull
|
||||
End Sub
|
||||
End Class
|
||||
|
||||
'''<summary>
|
||||
@@ -21083,12 +21177,15 @@ Namespace DD_DMSLiteDataSetTableAdapters
|
||||
tableMapping.ColumnMappings.Add("REGEX_MATCH", "REGEX_MATCH")
|
||||
tableMapping.ColumnMappings.Add("REGEX_MESSAGE_EN", "REGEX_MESSAGE_EN")
|
||||
tableMapping.ColumnMappings.Add("REGEX_MESSAGE_DE", "REGEX_MESSAGE_DE")
|
||||
tableMapping.ColumnMappings.Add("SEQUENCE", "SEQUENCE")
|
||||
tableMapping.ColumnMappings.Add("DEFAULT_VALUE", "DEFAULT_VALUE")
|
||||
tableMapping.ColumnMappings.Add("ADVANCED_LOOKUP", "ADVANCED_LOOKUP")
|
||||
Me._adapter.TableMappings.Add(tableMapping)
|
||||
Me._adapter.DeleteCommand = New Global.System.Data.SqlClient.SqlCommand()
|
||||
Me._adapter.DeleteCommand.Connection = Me.Connection
|
||||
Me._adapter.DeleteCommand.CommandText = "DELETE FROM TBPM_CONTROL_TABLE"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"WHERE (GUID = @COLUMNID)"
|
||||
Me._adapter.DeleteCommand.CommandText = "DELETE FROM TBPM_CONTROL_TABLE"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"WHERE (GUID = @Original_GUID)"
|
||||
Me._adapter.DeleteCommand.CommandType = Global.System.Data.CommandType.Text
|
||||
Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@COLUMNID", Global.System.Data.SqlDbType.Int, 4, Global.System.Data.ParameterDirection.Input, 0, 0, "GUID", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
|
||||
Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_GUID", Global.System.Data.SqlDbType.Int, 4, Global.System.Data.ParameterDirection.Input, 0, 0, "GUID", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
|
||||
Me._adapter.InsertCommand = New Global.System.Data.SqlClient.SqlCommand()
|
||||
Me._adapter.InsertCommand.Connection = Me.Connection
|
||||
Me._adapter.InsertCommand.CommandText = "INSERT INTO TBPM_CONTROL_TABLE"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" (CONTROL_ID, SPALTENNAME"& _
|
||||
@@ -21096,7 +21193,8 @@ Namespace DD_DMSLiteDataSetTableAdapters
|
||||
"NAME,@SPALTEN_HEADER,@SPALTENBREITE,@ADDED_WHO); "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"SELECT GUID, CONTROL_ID, SPAL"& _
|
||||
"TENNAME, SPALTEN_HEADER, SPALTENBREITE, VALIDATION, CHOICE_LIST, CONNECTION_ID, "& _
|
||||
"SQL_COMMAND, READ_ONLY, LOAD_IDX_VALUE, ADDED_WHO, ADDED_WHEN, CHANGED_WHO, CHAN"& _
|
||||
"GED_WHEN FROM TBPM_CONTROL_TABLE WHERE (GUID = SCOPE_IDENTITY())"
|
||||
"GED_WHEN, REGEX_MATCH, REGEX_MESSAGE_EN, REGEX_MESSAGE_DE, SEQUENCE, DEFAULT_VAL"& _
|
||||
"UE, ADVANCED_LOOKUP FROM TBPM_CONTROL_TABLE WHERE (GUID = SCOPE_IDENTITY())"
|
||||
Me._adapter.InsertCommand.CommandType = Global.System.Data.CommandType.Text
|
||||
Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@CONTROL_ID", Global.System.Data.SqlDbType.Int, 4, Global.System.Data.ParameterDirection.Input, 0, 0, "CONTROL_ID", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
|
||||
Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@SPALTENNAME", Global.System.Data.SqlDbType.VarChar, 100, Global.System.Data.ParameterDirection.Input, 0, 0, "SPALTENNAME", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
|
||||
@@ -21105,63 +21203,43 @@ Namespace DD_DMSLiteDataSetTableAdapters
|
||||
Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@ADDED_WHO", Global.System.Data.SqlDbType.VarChar, 30, Global.System.Data.ParameterDirection.Input, 0, 0, "ADDED_WHO", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
|
||||
Me._adapter.UpdateCommand = New Global.System.Data.SqlClient.SqlCommand()
|
||||
Me._adapter.UpdateCommand.Connection = Me.Connection
|
||||
Me._adapter.UpdateCommand.CommandText = "UPDATE [TBPM_CONTROL_TABLE] SET [CONTROL_ID] = @CONTROL_ID, [SPALTENNAME] = @SPAL"& _
|
||||
"TENNAME, [SPALTEN_HEADER] = @SPALTEN_HEADER, [SPALTENBREITE] = @SPALTENBREITE, ["& _
|
||||
"VALIDATION] = @VALIDATION, [CHOICE_LIST] = @CHOICE_LIST, [CONNECTION_ID] = @CONN"& _
|
||||
"ECTION_ID, [SQL_COMMAND] = @SQL_COMMAND, [READ_ONLY] = @READ_ONLY, [LOAD_IDX_VAL"& _
|
||||
"UE] = @LOAD_IDX_VALUE, [ADDED_WHO] = @ADDED_WHO, [ADDED_WHEN] = @ADDED_WHEN, [CH"& _
|
||||
"ANGED_WHO] = @CHANGED_WHO, [CHANGED_WHEN] = @CHANGED_WHEN WHERE (([GUID] = @Orig"& _
|
||||
"inal_GUID) AND ([CONTROL_ID] = @Original_CONTROL_ID) AND ([SPALTENNAME] = @Origi"& _
|
||||
"nal_SPALTENNAME) AND ([SPALTEN_HEADER] = @Original_SPALTEN_HEADER) AND ([SPALTEN"& _
|
||||
"BREITE] = @Original_SPALTENBREITE) AND ([VALIDATION] = @Original_VALIDATION) AND"& _
|
||||
" ((@IsNull_CHOICE_LIST = 1 AND [CHOICE_LIST] IS NULL) OR ([CHOICE_LIST] = @Origi"& _
|
||||
"nal_CHOICE_LIST)) AND ((@IsNull_CONNECTION_ID = 1 AND [CONNECTION_ID] IS NULL) O"& _
|
||||
"R ([CONNECTION_ID] = @Original_CONNECTION_ID)) AND ((@IsNull_SQL_COMMAND = 1 AND"& _
|
||||
" [SQL_COMMAND] IS NULL) OR ([SQL_COMMAND] = @Original_SQL_COMMAND)) AND ([READ_O"& _
|
||||
"NLY] = @Original_READ_ONLY) AND ([LOAD_IDX_VALUE] = @Original_LOAD_IDX_VALUE) AN"& _
|
||||
"D ([ADDED_WHO] = @Original_ADDED_WHO) AND ([ADDED_WHEN] = @Original_ADDED_WHEN) "& _
|
||||
"AND ((@IsNull_CHANGED_WHO = 1 AND [CHANGED_WHO] IS NULL) OR ([CHANGED_WHO] = @Or"& _
|
||||
"iginal_CHANGED_WHO)) AND ((@IsNull_CHANGED_WHEN = 1 AND [CHANGED_WHEN] IS NULL) "& _
|
||||
"OR ([CHANGED_WHEN] = @Original_CHANGED_WHEN)));"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"SELECT GUID, CONTROL_ID, SPALTE"& _
|
||||
"NNAME, SPALTEN_HEADER, SPALTENBREITE, VALIDATION, CHOICE_LIST, CONNECTION_ID, SQ"& _
|
||||
"L_COMMAND, READ_ONLY, LOAD_IDX_VALUE, ADDED_WHO, ADDED_WHEN, CHANGED_WHO, CHANGE"& _
|
||||
"D_WHEN FROM TBPM_CONTROL_TABLE WHERE (GUID = @GUID)"
|
||||
Me._adapter.UpdateCommand.CommandText = "UPDATE TBPM_CONTROL_TABLE"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"SET CONTROL_ID = @CONTROL_ID, SPA"& _
|
||||
"LTENNAME = @SPALTENNAME, SPALTEN_HEADER = @SPALTEN_HEADER, SPALTENBREITE = @SPAL"& _
|
||||
"TENBREITE, VALIDATION = @VALIDATION, CHOICE_LIST = @CHOICE_LIST, "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" "& _
|
||||
" CONNECTION_ID = @CONNECTION_ID, SQL_COMMAND = @SQL_COMMAND, READ_ONL"& _
|
||||
"Y = @READ_ONLY, LOAD_IDX_VALUE = @LOAD_IDX_VALUE, ADDED_WHO = @ADDED_WHO, ADDED_"& _
|
||||
"WHEN = @ADDED_WHEN, "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" CHANGED_WHO = @CHANGED_WHO, CHANG"& _
|
||||
"ED_WHEN = @CHANGED_WHEN, REGEX_MATCH = @REGEX_MATCH, REGEX_MESSAGE_EN = @REGEX_M"& _
|
||||
"ESSAGE_EN, REGEX_MESSAGE_DE = @REGEX_MESSAGE_DE, "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" SEQU"& _
|
||||
"ENCE = @SEQUENCE, DEFAULT_VALUE = @DEFAULT_VALUE, ADVANCED_LOOKUP = @ADVANCED_LO"& _
|
||||
"OKUP"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"WHERE (GUID = @Original_GUID); "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"SELECT GUID, CONTROL_ID, SPALTENNA"& _
|
||||
"ME, SPALTEN_HEADER, SPALTENBREITE, VALIDATION, CHOICE_LIST, CONNECTION_ID, SQL_C"& _
|
||||
"OMMAND, READ_ONLY, LOAD_IDX_VALUE, ADDED_WHO, ADDED_WHEN, CHANGED_WHO, CHANGED_W"& _
|
||||
"HEN, REGEX_MATCH, REGEX_MESSAGE_EN, REGEX_MESSAGE_DE, SEQUENCE, DEFAULT_VALUE, A"& _
|
||||
"DVANCED_LOOKUP FROM TBPM_CONTROL_TABLE WHERE (GUID = @GUID)"
|
||||
Me._adapter.UpdateCommand.CommandType = Global.System.Data.CommandType.Text
|
||||
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@CONTROL_ID", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "CONTROL_ID", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
|
||||
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@SPALTENNAME", Global.System.Data.SqlDbType.VarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "SPALTENNAME", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
|
||||
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@SPALTEN_HEADER", Global.System.Data.SqlDbType.VarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "SPALTEN_HEADER", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
|
||||
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@SPALTENBREITE", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "SPALTENBREITE", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
|
||||
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@VALIDATION", Global.System.Data.SqlDbType.Bit, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "VALIDATION", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
|
||||
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@CHOICE_LIST", Global.System.Data.SqlDbType.VarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "CHOICE_LIST", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
|
||||
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@CONNECTION_ID", Global.System.Data.SqlDbType.SmallInt, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "CONNECTION_ID", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
|
||||
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@SQL_COMMAND", Global.System.Data.SqlDbType.VarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "SQL_COMMAND", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
|
||||
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@READ_ONLY", Global.System.Data.SqlDbType.Bit, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "READ_ONLY", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
|
||||
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@LOAD_IDX_VALUE", Global.System.Data.SqlDbType.Bit, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "LOAD_IDX_VALUE", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
|
||||
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@ADDED_WHO", Global.System.Data.SqlDbType.VarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "ADDED_WHO", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
|
||||
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@ADDED_WHEN", Global.System.Data.SqlDbType.DateTime, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "ADDED_WHEN", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
|
||||
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@CHANGED_WHO", Global.System.Data.SqlDbType.VarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "CHANGED_WHO", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
|
||||
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@CHANGED_WHEN", Global.System.Data.SqlDbType.DateTime, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "CHANGED_WHEN", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
|
||||
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_GUID", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "GUID", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
|
||||
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_CONTROL_ID", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "CONTROL_ID", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
|
||||
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_SPALTENNAME", Global.System.Data.SqlDbType.VarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "SPALTENNAME", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
|
||||
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_SPALTEN_HEADER", Global.System.Data.SqlDbType.VarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "SPALTEN_HEADER", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
|
||||
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_SPALTENBREITE", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "SPALTENBREITE", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
|
||||
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_VALIDATION", Global.System.Data.SqlDbType.Bit, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "VALIDATION", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
|
||||
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_CHOICE_LIST", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "CHOICE_LIST", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
|
||||
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_CHOICE_LIST", Global.System.Data.SqlDbType.VarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "CHOICE_LIST", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
|
||||
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_CONNECTION_ID", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "CONNECTION_ID", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
|
||||
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_CONNECTION_ID", Global.System.Data.SqlDbType.SmallInt, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "CONNECTION_ID", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
|
||||
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_SQL_COMMAND", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "SQL_COMMAND", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
|
||||
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_SQL_COMMAND", Global.System.Data.SqlDbType.VarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "SQL_COMMAND", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
|
||||
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_READ_ONLY", Global.System.Data.SqlDbType.Bit, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "READ_ONLY", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
|
||||
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_LOAD_IDX_VALUE", Global.System.Data.SqlDbType.Bit, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "LOAD_IDX_VALUE", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
|
||||
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_ADDED_WHO", Global.System.Data.SqlDbType.VarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "ADDED_WHO", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
|
||||
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_ADDED_WHEN", Global.System.Data.SqlDbType.DateTime, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "ADDED_WHEN", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
|
||||
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_CHANGED_WHO", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "CHANGED_WHO", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
|
||||
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_CHANGED_WHO", Global.System.Data.SqlDbType.VarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "CHANGED_WHO", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
|
||||
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_CHANGED_WHEN", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "CHANGED_WHEN", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
|
||||
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_CHANGED_WHEN", Global.System.Data.SqlDbType.DateTime, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "CHANGED_WHEN", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
|
||||
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@GUID", Global.System.Data.SqlDbType.Int, 4, Global.System.Data.ParameterDirection.Input, 0, 0, "GUID", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
|
||||
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@CONTROL_ID", Global.System.Data.SqlDbType.Int, 4, Global.System.Data.ParameterDirection.Input, 0, 0, "CONTROL_ID", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
|
||||
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@SPALTENNAME", Global.System.Data.SqlDbType.VarChar, 100, Global.System.Data.ParameterDirection.Input, 0, 0, "SPALTENNAME", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
|
||||
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@SPALTEN_HEADER", Global.System.Data.SqlDbType.VarChar, 100, Global.System.Data.ParameterDirection.Input, 0, 0, "SPALTEN_HEADER", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
|
||||
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@SPALTENBREITE", Global.System.Data.SqlDbType.Int, 4, Global.System.Data.ParameterDirection.Input, 0, 0, "SPALTENBREITE", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
|
||||
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@VALIDATION", Global.System.Data.SqlDbType.Bit, 1, Global.System.Data.ParameterDirection.Input, 0, 0, "VALIDATION", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
|
||||
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@CHOICE_LIST", Global.System.Data.SqlDbType.VarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "CHOICE_LIST", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
|
||||
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@CONNECTION_ID", Global.System.Data.SqlDbType.SmallInt, 2, Global.System.Data.ParameterDirection.Input, 0, 0, "CONNECTION_ID", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
|
||||
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@SQL_COMMAND", Global.System.Data.SqlDbType.VarChar, 2147483647, Global.System.Data.ParameterDirection.Input, 0, 0, "SQL_COMMAND", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
|
||||
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@READ_ONLY", Global.System.Data.SqlDbType.Bit, 1, Global.System.Data.ParameterDirection.Input, 0, 0, "READ_ONLY", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
|
||||
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@LOAD_IDX_VALUE", Global.System.Data.SqlDbType.Bit, 1, Global.System.Data.ParameterDirection.Input, 0, 0, "LOAD_IDX_VALUE", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
|
||||
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@ADDED_WHO", Global.System.Data.SqlDbType.VarChar, 30, Global.System.Data.ParameterDirection.Input, 0, 0, "ADDED_WHO", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
|
||||
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@ADDED_WHEN", Global.System.Data.SqlDbType.DateTime, 8, Global.System.Data.ParameterDirection.Input, 0, 0, "ADDED_WHEN", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
|
||||
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@CHANGED_WHO", Global.System.Data.SqlDbType.VarChar, 30, Global.System.Data.ParameterDirection.Input, 0, 0, "CHANGED_WHO", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
|
||||
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@CHANGED_WHEN", Global.System.Data.SqlDbType.DateTime, 8, Global.System.Data.ParameterDirection.Input, 0, 0, "CHANGED_WHEN", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
|
||||
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@REGEX_MATCH", Global.System.Data.SqlDbType.VarChar, 1000, Global.System.Data.ParameterDirection.Input, 0, 0, "REGEX_MATCH", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
|
||||
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@REGEX_MESSAGE_EN", Global.System.Data.SqlDbType.VarChar, 1000, Global.System.Data.ParameterDirection.Input, 0, 0, "REGEX_MESSAGE_EN", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
|
||||
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@REGEX_MESSAGE_DE", Global.System.Data.SqlDbType.VarChar, 1000, Global.System.Data.ParameterDirection.Input, 0, 0, "REGEX_MESSAGE_DE", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
|
||||
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@SEQUENCE", Global.System.Data.SqlDbType.Int, 4, Global.System.Data.ParameterDirection.Input, 0, 0, "SEQUENCE", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
|
||||
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@DEFAULT_VALUE", Global.System.Data.SqlDbType.VarChar, 2147483647, Global.System.Data.ParameterDirection.Input, 0, 0, "DEFAULT_VALUE", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
|
||||
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@ADVANCED_LOOKUP", Global.System.Data.SqlDbType.Bit, 1, Global.System.Data.ParameterDirection.Input, 0, 0, "ADVANCED_LOOKUP", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
|
||||
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_GUID", Global.System.Data.SqlDbType.Int, 4, Global.System.Data.ParameterDirection.Input, 0, 0, "GUID", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
|
||||
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@GUID", Global.System.Data.SqlDbType.Int, 4, Global.System.Data.ParameterDirection.Input, 0, 0, "GUID", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
|
||||
End Sub
|
||||
|
||||
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
@@ -21180,8 +21258,8 @@ Namespace DD_DMSLiteDataSetTableAdapters
|
||||
Me._commandCollection(0).CommandText = "SELECT GUID, CONTROL_ID, SPALTENNAME, SPALTEN_HEADER, SPALTENBREITE, VALID"& _
|
||||
"ATION, CHOICE_LIST, CONNECTION_ID, SQL_COMMAND, READ_ONLY, LOAD_IDX_VALUE, ADDED"& _
|
||||
"_WHO, ADDED_WHEN, CHANGED_WHO, "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" CHANGED_WHEN, REGEX_MA"& _
|
||||
"TCH, REGEX_MESSAGE_EN, REGEX_MESSAGE_DE"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"FROM TBPM_CONTROL_TABLE"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"WHE"& _
|
||||
"RE (CONTROL_ID = @CONTROL_ID)"
|
||||
"TCH, REGEX_MESSAGE_EN, REGEX_MESSAGE_DE, SEQUENCE, DEFAULT_VALUE, ADVANCED_LOOKU"& _
|
||||
"P"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"FROM TBPM_CONTROL_TABLE"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"WHERE (CONTROL_ID = @CONTROL_ID)"
|
||||
Me._commandCollection(0).CommandType = Global.System.Data.CommandType.Text
|
||||
Me._commandCollection(0).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@CONTROL_ID", Global.System.Data.SqlDbType.Int, 4, Global.System.Data.ParameterDirection.Input, 0, 0, "CONTROL_ID", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
|
||||
Me._commandCollection(1) = New Global.System.Data.SqlClient.SqlCommand()
|
||||
@@ -21190,8 +21268,9 @@ Namespace DD_DMSLiteDataSetTableAdapters
|
||||
"PALTEN_HEADER = @SPALTEN_HEADER, SPALTENBREITE = @SPALTENBREITE, VALIDATION = @V"& _
|
||||
"ALIDATION, READ_ONLY = @READ_ONLY, LOAD_IDX_VALUE = @LOAD_IDX_VALUE, "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" "& _
|
||||
" CHANGED_WHO = @CHANGED_WHO, REGEX_MATCH = @REGEX_MATCH, REGEX_ME"& _
|
||||
"SSAGE_EN = @REGEX_MESSAGE_EN, REGEX_MESSAGE_DE = @REGEX_MESSAGE_DE"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"WHERE "& _
|
||||
" (GUID = @Original_GUID)"
|
||||
"SSAGE_EN = @REGEX_MESSAGE_EN, REGEX_MESSAGE_DE = @REGEX_MESSAGE_DE, DEFAULT_VALU"& _
|
||||
"E = @DEFAULT_VALUE, SEQUENCE = @SEQUENCE, ADVANCED_LOOKUP = @ADVANCED_LOOKUP"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"WH"& _
|
||||
"ERE (GUID = @Original_GUID)"
|
||||
Me._commandCollection(1).CommandType = Global.System.Data.CommandType.Text
|
||||
Me._commandCollection(1).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@SPALTENNAME", Global.System.Data.SqlDbType.VarChar, 100, Global.System.Data.ParameterDirection.Input, 0, 0, "SPALTENNAME", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
|
||||
Me._commandCollection(1).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@SPALTEN_HEADER", Global.System.Data.SqlDbType.VarChar, 100, Global.System.Data.ParameterDirection.Input, 0, 0, "SPALTEN_HEADER", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
|
||||
@@ -21203,7 +21282,10 @@ Namespace DD_DMSLiteDataSetTableAdapters
|
||||
Me._commandCollection(1).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@REGEX_MATCH", Global.System.Data.SqlDbType.VarChar, 1000, Global.System.Data.ParameterDirection.Input, 0, 0, "REGEX_MATCH", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
|
||||
Me._commandCollection(1).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@REGEX_MESSAGE_EN", Global.System.Data.SqlDbType.VarChar, 1000, Global.System.Data.ParameterDirection.Input, 0, 0, "REGEX_MESSAGE_EN", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
|
||||
Me._commandCollection(1).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@REGEX_MESSAGE_DE", Global.System.Data.SqlDbType.VarChar, 1000, Global.System.Data.ParameterDirection.Input, 0, 0, "REGEX_MESSAGE_DE", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
|
||||
Me._commandCollection(1).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_GUID", Global.System.Data.SqlDbType.Int, 4, Global.System.Data.ParameterDirection.Input, 0, 0, "GUID", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
|
||||
Me._commandCollection(1).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@DEFAULT_VALUE", Global.System.Data.SqlDbType.VarChar, 2147483647, Global.System.Data.ParameterDirection.Input, 0, 0, "DEFAULT_VALUE", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
|
||||
Me._commandCollection(1).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@SEQUENCE", Global.System.Data.SqlDbType.Int, 4, Global.System.Data.ParameterDirection.Input, 0, 0, "SEQUENCE", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
|
||||
Me._commandCollection(1).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@ADVANCED_LOOKUP", Global.System.Data.SqlDbType.Bit, 1, Global.System.Data.ParameterDirection.Input, 0, 0, "ADVANCED_LOOKUP", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
|
||||
Me._commandCollection(1).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_GUID", Global.System.Data.SqlDbType.Int, 4, Global.System.Data.ParameterDirection.Input, 0, 0, "GUID", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
|
||||
Me._commandCollection(2) = New Global.System.Data.SqlClient.SqlCommand()
|
||||
Me._commandCollection(2).Connection = Me.Connection
|
||||
Me._commandCollection(2).CommandText = "DELETE FROM TBPM_CONTROL_TABLE"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"WHERE (CONTROL_ID = @CONTROL_ID)"
|
||||
@@ -21211,18 +21293,18 @@ Namespace DD_DMSLiteDataSetTableAdapters
|
||||
Me._commandCollection(2).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@CONTROL_ID", Global.System.Data.SqlDbType.Int, 4, Global.System.Data.ParameterDirection.Input, 0, 0, "CONTROL_ID", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
|
||||
Me._commandCollection(3) = New Global.System.Data.SqlClient.SqlCommand()
|
||||
Me._commandCollection(3).Connection = Me.Connection
|
||||
Me._commandCollection(3).CommandText = "SELECT GUID, CONTROL_ID, SPALTENNAME, SPALTEN_HEADER, SPALTENBREITE, VALID"& _
|
||||
"ATION, CHOICE_LIST, CONNECTION_ID, SQL_COMMAND, READ_ONLY, LOAD_IDX_VALUE, ADDED"& _
|
||||
"_WHO, ADDED_WHEN, CHANGED_WHO, "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" CHANGED_WHEN, REGEX_MA"& _
|
||||
"TCH, REGEX_MESSAGE_EN, REGEX_MESSAGE_DE"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"FROM TBPM_CONTROL_TABLE"
|
||||
Me._commandCollection(3).CommandText = "SELECT ADDED_WHEN, ADDED_WHO, ADVANCED_LOOKUP, CHANGED_WHEN, CHANGED_WHO, CHOICE_"& _
|
||||
"LIST, CONNECTION_ID, CONTROL_ID, DEFAULT_VALUE, GUID, LOAD_IDX_VALUE, READ_ONLY,"& _
|
||||
" REGEX_MATCH, REGEX_MESSAGE_DE, REGEX_MESSAGE_EN, SEQUENCE, SPALTENBREITE, SPALT"& _
|
||||
"ENNAME, SPALTEN_HEADER, SQL_COMMAND, VALIDATION FROM TBPM_CONTROL_TABLE"
|
||||
Me._commandCollection(3).CommandType = Global.System.Data.CommandType.Text
|
||||
Me._commandCollection(4) = New Global.System.Data.SqlClient.SqlCommand()
|
||||
Me._commandCollection(4).Connection = Me.Connection
|
||||
Me._commandCollection(4).CommandText = "SELECT GUID, CONTROL_ID, SPALTENNAME, SPALTEN_HEADER, SPALTENBREITE, VALID"& _
|
||||
"ATION, CHOICE_LIST, CONNECTION_ID, SQL_COMMAND, READ_ONLY, LOAD_IDX_VALUE, ADDED"& _
|
||||
"_WHO, ADDED_WHEN, CHANGED_WHO, "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" CHANGED_WHEN, REGEX_MA"& _
|
||||
"TCH, REGEX_MESSAGE_EN, REGEX_MESSAGE_DE"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"FROM TBPM_CONTROL_TABLE"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"WHE"& _
|
||||
"RE (GUID = @GUID)"
|
||||
Me._commandCollection(4).CommandText = "SELECT ADDED_WHEN, ADDED_WHO, ADVANCED_LOOKUP, CHANGED_WHEN, CHANGED_WHO, CHOICE_"& _
|
||||
"LIST, CONNECTION_ID, CONTROL_ID, DEFAULT_VALUE, GUID, LOAD_IDX_VALUE, READ_ONLY,"& _
|
||||
" REGEX_MATCH, REGEX_MESSAGE_DE, REGEX_MESSAGE_EN, SEQUENCE, SPALTENBREITE, SPALT"& _
|
||||
"ENNAME, SPALTEN_HEADER, SQL_COMMAND, VALIDATION FROM TBPM_CONTROL_TABLE WHERE (G"& _
|
||||
"UID = @GUID)"
|
||||
Me._commandCollection(4).CommandType = Global.System.Data.CommandType.Text
|
||||
Me._commandCollection(4).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@GUID", Global.System.Data.SqlDbType.Int, 4, Global.System.Data.ParameterDirection.Input, 0, 0, "GUID", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
|
||||
Me._commandCollection(5) = New Global.System.Data.SqlClient.SqlCommand()
|
||||
@@ -21342,8 +21424,8 @@ Namespace DD_DMSLiteDataSetTableAdapters
|
||||
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0"), _
|
||||
Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"), _
|
||||
Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Delete, true)> _
|
||||
Public Overloads Overridable Function Delete(ByVal COLUMNID As Integer) As Integer
|
||||
Me.Adapter.DeleteCommand.Parameters(0).Value = CType(COLUMNID,Integer)
|
||||
Public Overloads Overridable Function Delete(ByVal Original_GUID As Integer) As Integer
|
||||
Me.Adapter.DeleteCommand.Parameters(0).Value = CType(Original_GUID,Integer)
|
||||
Dim previousConnectionState As Global.System.Data.ConnectionState = Me.Adapter.DeleteCommand.Connection.State
|
||||
If ((Me.Adapter.DeleteCommand.Connection.State And Global.System.Data.ConnectionState.Open) _
|
||||
<> Global.System.Data.ConnectionState.Open) Then
|
||||
@@ -21415,21 +21497,13 @@ Namespace DD_DMSLiteDataSetTableAdapters
|
||||
ByVal ADDED_WHEN As Date, _
|
||||
ByVal CHANGED_WHO As String, _
|
||||
ByVal CHANGED_WHEN As Global.System.Nullable(Of Date), _
|
||||
ByVal REGEX_MATCH As String, _
|
||||
ByVal REGEX_MESSAGE_EN As String, _
|
||||
ByVal REGEX_MESSAGE_DE As String, _
|
||||
ByVal SEQUENCE As Integer, _
|
||||
ByVal DEFAULT_VALUE As String, _
|
||||
ByVal ADVANCED_LOOKUP As Boolean, _
|
||||
ByVal Original_GUID As Integer, _
|
||||
ByVal Original_CONTROL_ID As Integer, _
|
||||
ByVal Original_SPALTENNAME As String, _
|
||||
ByVal Original_SPALTEN_HEADER As String, _
|
||||
ByVal Original_SPALTENBREITE As Integer, _
|
||||
ByVal Original_VALIDATION As Boolean, _
|
||||
ByVal Original_CHOICE_LIST As String, _
|
||||
ByVal Original_CONNECTION_ID As Global.System.Nullable(Of Short), _
|
||||
ByVal Original_SQL_COMMAND As String, _
|
||||
ByVal Original_READ_ONLY As Boolean, _
|
||||
ByVal Original_LOAD_IDX_VALUE As Boolean, _
|
||||
ByVal Original_ADDED_WHO As String, _
|
||||
ByVal Original_ADDED_WHEN As Date, _
|
||||
ByVal Original_CHANGED_WHO As String, _
|
||||
ByVal Original_CHANGED_WHEN As Global.System.Nullable(Of Date), _
|
||||
ByVal GUID As Integer) As Integer
|
||||
Me.Adapter.UpdateCommand.Parameters(0).Value = CType(CONTROL_ID,Integer)
|
||||
If (SPALTENNAME Is Nothing) Then
|
||||
@@ -21477,64 +21551,30 @@ Namespace DD_DMSLiteDataSetTableAdapters
|
||||
Else
|
||||
Me.Adapter.UpdateCommand.Parameters(13).Value = Global.System.DBNull.Value
|
||||
End If
|
||||
Me.Adapter.UpdateCommand.Parameters(14).Value = CType(Original_GUID,Integer)
|
||||
Me.Adapter.UpdateCommand.Parameters(15).Value = CType(Original_CONTROL_ID,Integer)
|
||||
If (Original_SPALTENNAME Is Nothing) Then
|
||||
Throw New Global.System.ArgumentNullException("Original_SPALTENNAME")
|
||||
If (REGEX_MATCH Is Nothing) Then
|
||||
Throw New Global.System.ArgumentNullException("REGEX_MATCH")
|
||||
Else
|
||||
Me.Adapter.UpdateCommand.Parameters(16).Value = CType(Original_SPALTENNAME,String)
|
||||
Me.Adapter.UpdateCommand.Parameters(14).Value = CType(REGEX_MATCH,String)
|
||||
End If
|
||||
If (Original_SPALTEN_HEADER Is Nothing) Then
|
||||
Throw New Global.System.ArgumentNullException("Original_SPALTEN_HEADER")
|
||||
If (REGEX_MESSAGE_EN Is Nothing) Then
|
||||
Throw New Global.System.ArgumentNullException("REGEX_MESSAGE_EN")
|
||||
Else
|
||||
Me.Adapter.UpdateCommand.Parameters(17).Value = CType(Original_SPALTEN_HEADER,String)
|
||||
Me.Adapter.UpdateCommand.Parameters(15).Value = CType(REGEX_MESSAGE_EN,String)
|
||||
End If
|
||||
Me.Adapter.UpdateCommand.Parameters(18).Value = CType(Original_SPALTENBREITE,Integer)
|
||||
Me.Adapter.UpdateCommand.Parameters(19).Value = CType(Original_VALIDATION,Boolean)
|
||||
If (Original_CHOICE_LIST Is Nothing) Then
|
||||
Me.Adapter.UpdateCommand.Parameters(20).Value = CType(1,Object)
|
||||
Me.Adapter.UpdateCommand.Parameters(21).Value = Global.System.DBNull.Value
|
||||
If (REGEX_MESSAGE_DE Is Nothing) Then
|
||||
Throw New Global.System.ArgumentNullException("REGEX_MESSAGE_DE")
|
||||
Else
|
||||
Me.Adapter.UpdateCommand.Parameters(20).Value = CType(0,Object)
|
||||
Me.Adapter.UpdateCommand.Parameters(21).Value = CType(Original_CHOICE_LIST,String)
|
||||
Me.Adapter.UpdateCommand.Parameters(16).Value = CType(REGEX_MESSAGE_DE,String)
|
||||
End If
|
||||
If (Original_CONNECTION_ID.HasValue = true) Then
|
||||
Me.Adapter.UpdateCommand.Parameters(22).Value = CType(0,Object)
|
||||
Me.Adapter.UpdateCommand.Parameters(23).Value = CType(Original_CONNECTION_ID.Value,Short)
|
||||
Me.Adapter.UpdateCommand.Parameters(17).Value = CType(SEQUENCE,Integer)
|
||||
If (DEFAULT_VALUE Is Nothing) Then
|
||||
Me.Adapter.UpdateCommand.Parameters(18).Value = Global.System.DBNull.Value
|
||||
Else
|
||||
Me.Adapter.UpdateCommand.Parameters(22).Value = CType(1,Object)
|
||||
Me.Adapter.UpdateCommand.Parameters(23).Value = Global.System.DBNull.Value
|
||||
Me.Adapter.UpdateCommand.Parameters(18).Value = CType(DEFAULT_VALUE,String)
|
||||
End If
|
||||
If (Original_SQL_COMMAND Is Nothing) Then
|
||||
Me.Adapter.UpdateCommand.Parameters(24).Value = CType(1,Object)
|
||||
Me.Adapter.UpdateCommand.Parameters(25).Value = Global.System.DBNull.Value
|
||||
Else
|
||||
Me.Adapter.UpdateCommand.Parameters(24).Value = CType(0,Object)
|
||||
Me.Adapter.UpdateCommand.Parameters(25).Value = CType(Original_SQL_COMMAND,String)
|
||||
End If
|
||||
Me.Adapter.UpdateCommand.Parameters(26).Value = CType(Original_READ_ONLY,Boolean)
|
||||
Me.Adapter.UpdateCommand.Parameters(27).Value = CType(Original_LOAD_IDX_VALUE,Boolean)
|
||||
If (Original_ADDED_WHO Is Nothing) Then
|
||||
Throw New Global.System.ArgumentNullException("Original_ADDED_WHO")
|
||||
Else
|
||||
Me.Adapter.UpdateCommand.Parameters(28).Value = CType(Original_ADDED_WHO,String)
|
||||
End If
|
||||
Me.Adapter.UpdateCommand.Parameters(29).Value = CType(Original_ADDED_WHEN,Date)
|
||||
If (Original_CHANGED_WHO Is Nothing) Then
|
||||
Me.Adapter.UpdateCommand.Parameters(30).Value = CType(1,Object)
|
||||
Me.Adapter.UpdateCommand.Parameters(31).Value = Global.System.DBNull.Value
|
||||
Else
|
||||
Me.Adapter.UpdateCommand.Parameters(30).Value = CType(0,Object)
|
||||
Me.Adapter.UpdateCommand.Parameters(31).Value = CType(Original_CHANGED_WHO,String)
|
||||
End If
|
||||
If (Original_CHANGED_WHEN.HasValue = true) Then
|
||||
Me.Adapter.UpdateCommand.Parameters(32).Value = CType(0,Object)
|
||||
Me.Adapter.UpdateCommand.Parameters(33).Value = CType(Original_CHANGED_WHEN.Value,Date)
|
||||
Else
|
||||
Me.Adapter.UpdateCommand.Parameters(32).Value = CType(1,Object)
|
||||
Me.Adapter.UpdateCommand.Parameters(33).Value = Global.System.DBNull.Value
|
||||
End If
|
||||
Me.Adapter.UpdateCommand.Parameters(34).Value = CType(GUID,Integer)
|
||||
Me.Adapter.UpdateCommand.Parameters(19).Value = CType(ADVANCED_LOOKUP,Boolean)
|
||||
Me.Adapter.UpdateCommand.Parameters(20).Value = CType(Original_GUID,Integer)
|
||||
Me.Adapter.UpdateCommand.Parameters(21).Value = CType(GUID,Integer)
|
||||
Dim previousConnectionState As Global.System.Data.ConnectionState = Me.Adapter.UpdateCommand.Connection.State
|
||||
If ((Me.Adapter.UpdateCommand.Connection.State And Global.System.Data.ConnectionState.Open) _
|
||||
<> Global.System.Data.ConnectionState.Open) Then
|
||||
@@ -21550,47 +21590,10 @@ Namespace DD_DMSLiteDataSetTableAdapters
|
||||
End Try
|
||||
End Function
|
||||
|
||||
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0"), _
|
||||
Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"), _
|
||||
Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Update, true)> _
|
||||
Public Overloads Overridable Function Update( _
|
||||
ByVal CONTROL_ID As Integer, _
|
||||
ByVal SPALTENNAME As String, _
|
||||
ByVal SPALTEN_HEADER As String, _
|
||||
ByVal SPALTENBREITE As Integer, _
|
||||
ByVal VALIDATION As Boolean, _
|
||||
ByVal CHOICE_LIST As String, _
|
||||
ByVal CONNECTION_ID As Global.System.Nullable(Of Short), _
|
||||
ByVal SQL_COMMAND As String, _
|
||||
ByVal READ_ONLY As Boolean, _
|
||||
ByVal LOAD_IDX_VALUE As Boolean, _
|
||||
ByVal ADDED_WHO As String, _
|
||||
ByVal ADDED_WHEN As Date, _
|
||||
ByVal CHANGED_WHO As String, _
|
||||
ByVal CHANGED_WHEN As Global.System.Nullable(Of Date), _
|
||||
ByVal Original_GUID As Integer, _
|
||||
ByVal Original_CONTROL_ID As Integer, _
|
||||
ByVal Original_SPALTENNAME As String, _
|
||||
ByVal Original_SPALTEN_HEADER As String, _
|
||||
ByVal Original_SPALTENBREITE As Integer, _
|
||||
ByVal Original_VALIDATION As Boolean, _
|
||||
ByVal Original_CHOICE_LIST As String, _
|
||||
ByVal Original_CONNECTION_ID As Global.System.Nullable(Of Short), _
|
||||
ByVal Original_SQL_COMMAND As String, _
|
||||
ByVal Original_READ_ONLY As Boolean, _
|
||||
ByVal Original_LOAD_IDX_VALUE As Boolean, _
|
||||
ByVal Original_ADDED_WHO As String, _
|
||||
ByVal Original_ADDED_WHEN As Date, _
|
||||
ByVal Original_CHANGED_WHO As String, _
|
||||
ByVal Original_CHANGED_WHEN As Global.System.Nullable(Of Date)) As Integer
|
||||
Return Me.Update(CONTROL_ID, SPALTENNAME, SPALTEN_HEADER, SPALTENBREITE, VALIDATION, CHOICE_LIST, CONNECTION_ID, SQL_COMMAND, READ_ONLY, LOAD_IDX_VALUE, ADDED_WHO, ADDED_WHEN, CHANGED_WHO, CHANGED_WHEN, Original_GUID, Original_CONTROL_ID, Original_SPALTENNAME, Original_SPALTEN_HEADER, Original_SPALTENBREITE, Original_VALIDATION, Original_CHOICE_LIST, Original_CONNECTION_ID, Original_SQL_COMMAND, Original_READ_ONLY, Original_LOAD_IDX_VALUE, Original_ADDED_WHO, Original_ADDED_WHEN, Original_CHANGED_WHO, Original_CHANGED_WHEN, Original_GUID)
|
||||
End Function
|
||||
|
||||
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0"), _
|
||||
Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")> _
|
||||
Public Overloads Overridable Function cmdUpdate(ByVal SPALTENNAME As String, ByVal SPALTEN_HEADER As String, ByVal SPALTENBREITE As Integer, ByVal VALIDATION As Boolean, ByVal READ_ONLY As Boolean, ByVal LOAD_IDX_VALUE As Boolean, ByVal CHANGED_WHO As String, ByVal REGEX_MATCH As String, ByVal REGEX_MESSAGE_EN As String, ByVal REGEX_MESSAGE_DE As String, ByVal Original_GUID As Integer) As Integer
|
||||
Public Overloads Overridable Function cmdUpdate(ByVal SPALTENNAME As String, ByVal SPALTEN_HEADER As String, ByVal SPALTENBREITE As Integer, ByVal VALIDATION As Boolean, ByVal READ_ONLY As Boolean, ByVal LOAD_IDX_VALUE As Boolean, ByVal CHANGED_WHO As String, ByVal REGEX_MATCH As String, ByVal REGEX_MESSAGE_EN As String, ByVal REGEX_MESSAGE_DE As String, ByVal DEFAULT_VALUE As String, ByVal SEQUENCE As Integer, ByVal ADVANCED_LOOKUP As Boolean, ByVal Original_GUID As Integer) As Object
|
||||
Dim command As Global.System.Data.SqlClient.SqlCommand = Me.CommandCollection(1)
|
||||
If (SPALTENNAME Is Nothing) Then
|
||||
Throw New Global.System.ArgumentNullException("SPALTENNAME")
|
||||
@@ -21626,21 +21629,33 @@ Namespace DD_DMSLiteDataSetTableAdapters
|
||||
Else
|
||||
command.Parameters(9).Value = CType(REGEX_MESSAGE_DE,String)
|
||||
End If
|
||||
command.Parameters(10).Value = CType(Original_GUID,Integer)
|
||||
If (DEFAULT_VALUE Is Nothing) Then
|
||||
command.Parameters(10).Value = Global.System.DBNull.Value
|
||||
Else
|
||||
command.Parameters(10).Value = CType(DEFAULT_VALUE,String)
|
||||
End If
|
||||
command.Parameters(11).Value = CType(SEQUENCE,Integer)
|
||||
command.Parameters(12).Value = CType(ADVANCED_LOOKUP,Boolean)
|
||||
command.Parameters(13).Value = CType(Original_GUID,Integer)
|
||||
Dim previousConnectionState As Global.System.Data.ConnectionState = command.Connection.State
|
||||
If ((command.Connection.State And Global.System.Data.ConnectionState.Open) _
|
||||
<> Global.System.Data.ConnectionState.Open) Then
|
||||
command.Connection.Open
|
||||
End If
|
||||
Dim returnValue As Integer
|
||||
Dim returnValue As Object
|
||||
Try
|
||||
returnValue = command.ExecuteNonQuery
|
||||
returnValue = command.ExecuteScalar
|
||||
Finally
|
||||
If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
|
||||
command.Connection.Close
|
||||
End If
|
||||
End Try
|
||||
Return returnValue
|
||||
If ((returnValue Is Nothing) _
|
||||
OrElse (returnValue.GetType Is GetType(Global.System.DBNull))) Then
|
||||
Return Nothing
|
||||
Else
|
||||
Return CType(returnValue,Object)
|
||||
End If
|
||||
End Function
|
||||
|
||||
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
|
||||
Reference in New Issue
Block a user