fix dataset for window assignments
This commit is contained in:
Jonathan Jenne
329
app/DD_Clipboard_Searcher/MyDataset.Designer.vb
generated
329
app/DD_Clipboard_Searcher/MyDataset.Designer.vb
generated
@@ -57,6 +57,10 @@ Partial Public Class MyDataset
|
||||
|
||||
Private relationFK_TBCW_PROF_DOC_SEARCH_PROF_IF As Global.System.Data.DataRelation
|
||||
|
||||
Private relationFK_WINDOW_ID As Global.System.Data.DataRelation
|
||||
|
||||
Private relationFK_PROCESS_ID As Global.System.Data.DataRelation
|
||||
|
||||
Private _schemaSerializationMode As Global.System.Data.SchemaSerializationMode = Global.System.Data.SchemaSerializationMode.IncludeSchema
|
||||
|
||||
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
@@ -512,6 +516,8 @@ Partial Public Class MyDataset
|
||||
End If
|
||||
Me.relationFK_TBCW_PROF_DATA_SEARCH_PROF_IF = Me.Relations("FK_TBCW_PROF_DATA_SEARCH_PROF_IF")
|
||||
Me.relationFK_TBCW_PROF_DOC_SEARCH_PROF_IF = Me.Relations("FK_TBCW_PROF_DOC_SEARCH_PROF_IF")
|
||||
Me.relationFK_WINDOW_ID = Me.Relations("FK_WINDOW_ID")
|
||||
Me.relationFK_PROCESS_ID = Me.Relations("FK_PROCESS_ID")
|
||||
End Sub
|
||||
|
||||
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
@@ -554,6 +560,10 @@ Partial Public Class MyDataset
|
||||
Me.Relations.Add(Me.relationFK_TBCW_PROF_DATA_SEARCH_PROF_IF)
|
||||
Me.relationFK_TBCW_PROF_DOC_SEARCH_PROF_IF = New Global.System.Data.DataRelation("FK_TBCW_PROF_DOC_SEARCH_PROF_IF", New Global.System.Data.DataColumn() {Me.tableTBCW_PROFILES.GUIDColumn}, New Global.System.Data.DataColumn() {Me.tableTBCW_PROF_DOC_SEARCH.PROFILE_IDColumn}, false)
|
||||
Me.Relations.Add(Me.relationFK_TBCW_PROF_DOC_SEARCH_PROF_IF)
|
||||
Me.relationFK_WINDOW_ID = New Global.System.Data.DataRelation("FK_WINDOW_ID", New Global.System.Data.DataColumn() {Me.tableTBCW_PROF_REL_WINDOW.GUIDColumn}, New Global.System.Data.DataColumn() {Me.tableTBCW_PROF_REL_CONTROL.WINDOW_IDColumn}, false)
|
||||
Me.Relations.Add(Me.relationFK_WINDOW_ID)
|
||||
Me.relationFK_PROCESS_ID = New Global.System.Data.DataRelation("FK_PROCESS_ID", New Global.System.Data.DataColumn() {Me.tableTBCW_PROFILE_PROCESS.GUIDColumn}, New Global.System.Data.DataColumn() {Me.tableTBCW_PROF_REL_WINDOW.PROCESS_IDColumn}, false)
|
||||
Me.Relations.Add(Me.relationFK_PROCESS_ID)
|
||||
End Sub
|
||||
|
||||
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
@@ -3709,9 +3719,12 @@ Partial Public Class MyDataset
|
||||
|
||||
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "15.0.0.0")> _
|
||||
Public Overloads Function AddTBCW_PROF_REL_WINDOWRow(ByVal DESCRIPTION As String, ByVal REGEX As String, ByVal SEQUENCE As Byte, ByVal ADDED_WHO As String, ByVal ADDED_WHEN As Date, ByVal CHANGED_WHO As String, ByVal CHANGED_WHEN As Date, ByVal PROCESS_ID As Integer) As TBCW_PROF_REL_WINDOWRow
|
||||
Public Overloads Function AddTBCW_PROF_REL_WINDOWRow(ByVal DESCRIPTION As String, ByVal REGEX As String, ByVal SEQUENCE As Byte, ByVal ADDED_WHO As String, ByVal ADDED_WHEN As Date, ByVal CHANGED_WHO As String, ByVal CHANGED_WHEN As Date, ByVal parentTBCW_PROFILE_PROCESSRowByFK_PROCESS_ID As TBCW_PROFILE_PROCESSRow) As TBCW_PROF_REL_WINDOWRow
|
||||
Dim rowTBCW_PROF_REL_WINDOWRow As TBCW_PROF_REL_WINDOWRow = CType(Me.NewRow,TBCW_PROF_REL_WINDOWRow)
|
||||
Dim columnValuesArray() As Object = New Object() {Nothing, DESCRIPTION, REGEX, SEQUENCE, ADDED_WHO, ADDED_WHEN, CHANGED_WHO, CHANGED_WHEN, PROCESS_ID}
|
||||
Dim columnValuesArray() As Object = New Object() {Nothing, DESCRIPTION, REGEX, SEQUENCE, ADDED_WHO, ADDED_WHEN, CHANGED_WHO, CHANGED_WHEN, Nothing}
|
||||
If (Not (parentTBCW_PROFILE_PROCESSRowByFK_PROCESS_ID) Is Nothing) Then
|
||||
columnValuesArray(8) = parentTBCW_PROFILE_PROCESSRowByFK_PROCESS_ID(0)
|
||||
End If
|
||||
rowTBCW_PROF_REL_WINDOWRow.ItemArray = columnValuesArray
|
||||
Me.Rows.Add(rowTBCW_PROF_REL_WINDOWRow)
|
||||
Return rowTBCW_PROF_REL_WINDOWRow
|
||||
@@ -4539,9 +4552,12 @@ Partial Public Class MyDataset
|
||||
|
||||
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "15.0.0.0")> _
|
||||
Public Overloads Function AddTBCW_PROF_REL_CONTROLRow(ByVal WINDOW_ID As Integer, ByVal DESCRIPTION As String, ByVal REGEX As String, ByVal SEQUENCE As Byte, ByVal ADDED_WHO As String, ByVal ADDED_WHEN As Date, ByVal CHANGED_WHO As String, ByVal CHANGED_WHEN As Date, ByVal AUTOMATION_ID As String, ByVal FRAMEWORK_ID As String) As TBCW_PROF_REL_CONTROLRow
|
||||
Public Overloads Function AddTBCW_PROF_REL_CONTROLRow(ByVal parentTBCW_PROF_REL_WINDOWRowByFK_WINDOW_ID As TBCW_PROF_REL_WINDOWRow, ByVal DESCRIPTION As String, ByVal REGEX As String, ByVal SEQUENCE As Byte, ByVal ADDED_WHO As String, ByVal ADDED_WHEN As Date, ByVal CHANGED_WHO As String, ByVal CHANGED_WHEN As Date, ByVal AUTOMATION_ID As String, ByVal FRAMEWORK_ID As String) As TBCW_PROF_REL_CONTROLRow
|
||||
Dim rowTBCW_PROF_REL_CONTROLRow As TBCW_PROF_REL_CONTROLRow = CType(Me.NewRow,TBCW_PROF_REL_CONTROLRow)
|
||||
Dim columnValuesArray() As Object = New Object() {Nothing, WINDOW_ID, DESCRIPTION, REGEX, SEQUENCE, ADDED_WHO, ADDED_WHEN, CHANGED_WHO, CHANGED_WHEN, AUTOMATION_ID, FRAMEWORK_ID}
|
||||
Dim columnValuesArray() As Object = New Object() {Nothing, Nothing, DESCRIPTION, REGEX, SEQUENCE, ADDED_WHO, ADDED_WHEN, CHANGED_WHO, CHANGED_WHEN, AUTOMATION_ID, FRAMEWORK_ID}
|
||||
If (Not (parentTBCW_PROF_REL_WINDOWRowByFK_WINDOW_ID) Is Nothing) Then
|
||||
columnValuesArray(1) = parentTBCW_PROF_REL_WINDOWRowByFK_WINDOW_ID(0)
|
||||
End If
|
||||
rowTBCW_PROF_REL_CONTROLRow.ItemArray = columnValuesArray
|
||||
Me.Rows.Add(rowTBCW_PROF_REL_CONTROLRow)
|
||||
Return rowTBCW_PROF_REL_CONTROLRow
|
||||
@@ -6078,6 +6094,16 @@ Partial Public Class MyDataset
|
||||
Public Sub SetADDED_WHENNull()
|
||||
Me(Me.tableTBCW_PROFILE_PROCESS.ADDED_WHENColumn) = Global.System.Convert.DBNull
|
||||
End Sub
|
||||
|
||||
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "15.0.0.0")> _
|
||||
Public Function GetTBCW_PROF_REL_WINDOWRows() As TBCW_PROF_REL_WINDOWRow()
|
||||
If (Me.Table.ChildRelations("FK_PROCESS_ID") Is Nothing) Then
|
||||
Return New TBCW_PROF_REL_WINDOWRow(-1) {}
|
||||
Else
|
||||
Return CType(MyBase.GetChildRows(Me.Table.ChildRelations("FK_PROCESS_ID")),TBCW_PROF_REL_WINDOWRow())
|
||||
End If
|
||||
End Function
|
||||
End Class
|
||||
|
||||
'''<summary>
|
||||
@@ -6777,6 +6803,17 @@ Partial Public Class MyDataset
|
||||
End Set
|
||||
End Property
|
||||
|
||||
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "15.0.0.0")> _
|
||||
Public Property TBCW_PROFILE_PROCESSRow() As TBCW_PROFILE_PROCESSRow
|
||||
Get
|
||||
Return CType(Me.GetParentRow(Me.Table.ParentRelations("FK_PROCESS_ID")),TBCW_PROFILE_PROCESSRow)
|
||||
End Get
|
||||
Set
|
||||
Me.SetParentRow(value, Me.Table.ParentRelations("FK_PROCESS_ID"))
|
||||
End Set
|
||||
End Property
|
||||
|
||||
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "15.0.0.0")> _
|
||||
Public Function IsADDED_WHENNull() As Boolean
|
||||
@@ -6812,6 +6849,16 @@ Partial Public Class MyDataset
|
||||
Public Sub SetCHANGED_WHENNull()
|
||||
Me(Me.tableTBCW_PROF_REL_WINDOW.CHANGED_WHENColumn) = Global.System.Convert.DBNull
|
||||
End Sub
|
||||
|
||||
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "15.0.0.0")> _
|
||||
Public Function GetTBCW_PROF_REL_CONTROLRows() As TBCW_PROF_REL_CONTROLRow()
|
||||
If (Me.Table.ChildRelations("FK_WINDOW_ID") Is Nothing) Then
|
||||
Return New TBCW_PROF_REL_CONTROLRow(-1) {}
|
||||
Else
|
||||
Return CType(MyBase.GetChildRows(Me.Table.ChildRelations("FK_WINDOW_ID")),TBCW_PROF_REL_CONTROLRow())
|
||||
End If
|
||||
End Function
|
||||
End Class
|
||||
|
||||
'''<summary>
|
||||
@@ -7281,6 +7328,17 @@ Partial Public Class MyDataset
|
||||
End Set
|
||||
End Property
|
||||
|
||||
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "15.0.0.0")> _
|
||||
Public Property TBCW_PROF_REL_WINDOWRow() As TBCW_PROF_REL_WINDOWRow
|
||||
Get
|
||||
Return CType(Me.GetParentRow(Me.Table.ParentRelations("FK_WINDOW_ID")),TBCW_PROF_REL_WINDOWRow)
|
||||
End Get
|
||||
Set
|
||||
Me.SetParentRow(value, Me.Table.ParentRelations("FK_WINDOW_ID"))
|
||||
End Set
|
||||
End Property
|
||||
|
||||
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "15.0.0.0")> _
|
||||
Public Function IsADDED_WHENNull() As Boolean
|
||||
@@ -10830,29 +10888,37 @@ Namespace MyDatasetTableAdapters
|
||||
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 TBCW_PROF_REL_WINDOW"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" (DESCRIPTION, REGEX, S"& _
|
||||
"EQUENCE, ADDED_WHO, PROCESS_ID)"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"VALUES (@DESCRIPTION,@REGEX,@SEQUENCE,@A"& _
|
||||
"DDED_WHO,@PROCESS_ID); "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"SELECT GUID, PROFILE_ID, PROCESS_NAME, DESCRIPTION, "& _
|
||||
"REGEX, SEQUENCE, REGEX_CLIPBOARD, ADDED_WHO, ADDED_WHEN, CHANGED_WHO, CHANGED_WH"& _
|
||||
"EN FROM TBCW_PROF_REL_WINDOW WHERE (GUID = SCOPE_IDENTITY())"
|
||||
Me._adapter.InsertCommand.CommandText = "INSERT INTO [TBCW_PROF_REL_WINDOW] ([DESCRIPTION], [REGEX], [SEQUENCE], [ADDED_WH"& _
|
||||
"O], [ADDED_WHEN], [CHANGED_WHO], [CHANGED_WHEN], [PROCESS_ID]) VALUES (@DESCRIPT"& _
|
||||
"ION, @REGEX, @SEQUENCE, @ADDED_WHO, @ADDED_WHEN, @CHANGED_WHO, @CHANGED_WHEN, @P"& _
|
||||
"ROCESS_ID);"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"SELECT GUID, DESCRIPTION, REGEX, SEQUENCE, ADDED_WHO, ADDED_WHEN, C"& _
|
||||
"HANGED_WHO, CHANGED_WHEN, PROCESS_ID FROM TBCW_PROF_REL_WINDOW WHERE (GUID = SCO"& _
|
||||
"PE_IDENTITY())"
|
||||
Me._adapter.InsertCommand.CommandType = Global.System.Data.CommandType.Text
|
||||
Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@DESCRIPTION", Global.System.Data.SqlDbType.VarChar, 250, Global.System.Data.ParameterDirection.Input, 0, 0, "DESCRIPTION", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
|
||||
Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@REGEX", Global.System.Data.SqlDbType.VarChar, 500, Global.System.Data.ParameterDirection.Input, 0, 0, "REGEX", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
|
||||
Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@SEQUENCE", Global.System.Data.SqlDbType.TinyInt, 1, Global.System.Data.ParameterDirection.Input, 0, 0, "SEQUENCE", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
|
||||
Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@ADDED_WHO", Global.System.Data.SqlDbType.VarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "ADDED_WHO", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
|
||||
Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@PROCESS_ID", Global.System.Data.SqlDbType.Int, 4, Global.System.Data.ParameterDirection.Input, 0, 0, "PROCESS_ID", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
|
||||
Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@DESCRIPTION", Global.System.Data.SqlDbType.VarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "DESCRIPTION", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
|
||||
Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@REGEX", Global.System.Data.SqlDbType.VarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "REGEX", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
|
||||
Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@SEQUENCE", Global.System.Data.SqlDbType.TinyInt, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "SEQUENCE", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
|
||||
Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@ADDED_WHO", Global.System.Data.SqlDbType.VarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "ADDED_WHO", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
|
||||
Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@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.InsertCommand.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.InsertCommand.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.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@PROCESS_ID", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "PROCESS_ID", 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 TBCW_PROF_REL_WINDOW"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"SET DESCRIPTION = @DESCRIPTION,"& _
|
||||
" REGEX = @REGEX, SEQUENCE = @SEQUENCE, CHANGED_WHO = @CHANGED_WHO, PROCESS_ID = "& _
|
||||
"@PROCESS_ID"&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, PROFILE_ID"& _
|
||||
", PROCESS_NAME, DESCRIPTION, REGEX, SEQUENCE, REGEX_CLIPBOARD, ADDED_WHO, ADDED_"& _
|
||||
"WHEN, CHANGED_WHO, CHANGED_WHEN FROM TBCW_PROF_REL_WINDOW WHERE (GUID = @GUID)"
|
||||
" REGEX = @REGEX, SEQUENCE = @SEQUENCE, ADDED_WHO = @ADDED_WHO, ADDED_WHEN = @ADD"& _
|
||||
"ED_WHEN, CHANGED_WHO = @CHANGED_WHO, "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" CHANGED_WHEN = @"& _
|
||||
"CHANGED_WHEN, PROCESS_ID = @PROCESS_ID"&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, DESCRIPTION, REGEX, SEQUENCE, ADDED_WHO, ADDED_WHEN, CHANGED_WHO, C"& _
|
||||
"HANGED_WHEN, PROCESS_ID FROM TBCW_PROF_REL_WINDOW WHERE (GUID = @GUID)"
|
||||
Me._adapter.UpdateCommand.CommandType = Global.System.Data.CommandType.Text
|
||||
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@DESCRIPTION", Global.System.Data.SqlDbType.VarChar, 250, Global.System.Data.ParameterDirection.Input, 0, 0, "DESCRIPTION", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
|
||||
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@REGEX", Global.System.Data.SqlDbType.VarChar, 500, Global.System.Data.ParameterDirection.Input, 0, 0, "REGEX", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
|
||||
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@SEQUENCE", Global.System.Data.SqlDbType.TinyInt, 1, 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("@ADDED_WHO", Global.System.Data.SqlDbType.VarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "ADDED_WHO", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
|
||||
Me._adapter.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, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "CHANGED_WHO", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
|
||||
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@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("@PROCESS_ID", Global.System.Data.SqlDbType.Int, 4, Global.System.Data.ParameterDirection.Input, 0, 0, "PROCESS_ID", 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, "", "", ""))
|
||||
@@ -10931,6 +10997,133 @@ Namespace MyDatasetTableAdapters
|
||||
Public Overloads Overridable Function Update(ByVal dataRows() As Global.System.Data.DataRow) As Integer
|
||||
Return Me.Adapter.Update(dataRows)
|
||||
End Function
|
||||
|
||||
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "15.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 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
|
||||
Me.Adapter.DeleteCommand.Connection.Open
|
||||
End If
|
||||
Try
|
||||
Dim returnValue As Integer = Me.Adapter.DeleteCommand.ExecuteNonQuery
|
||||
Return returnValue
|
||||
Finally
|
||||
If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
|
||||
Me.Adapter.DeleteCommand.Connection.Close
|
||||
End If
|
||||
End Try
|
||||
End Function
|
||||
|
||||
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "15.0.0.0"), _
|
||||
Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"), _
|
||||
Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Insert, true)> _
|
||||
Public Overloads Overridable Function Insert(ByVal DESCRIPTION As String, ByVal REGEX As String, ByVal SEQUENCE As Byte, 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 PROCESS_ID As Integer) As Integer
|
||||
If (DESCRIPTION Is Nothing) Then
|
||||
Throw New Global.System.ArgumentNullException("DESCRIPTION")
|
||||
Else
|
||||
Me.Adapter.InsertCommand.Parameters(0).Value = CType(DESCRIPTION,String)
|
||||
End If
|
||||
If (REGEX Is Nothing) Then
|
||||
Throw New Global.System.ArgumentNullException("REGEX")
|
||||
Else
|
||||
Me.Adapter.InsertCommand.Parameters(1).Value = CType(REGEX,String)
|
||||
End If
|
||||
Me.Adapter.InsertCommand.Parameters(2).Value = CType(SEQUENCE,Byte)
|
||||
If (ADDED_WHO Is Nothing) Then
|
||||
Throw New Global.System.ArgumentNullException("ADDED_WHO")
|
||||
Else
|
||||
Me.Adapter.InsertCommand.Parameters(3).Value = CType(ADDED_WHO,String)
|
||||
End If
|
||||
If (ADDED_WHEN.HasValue = true) Then
|
||||
Me.Adapter.InsertCommand.Parameters(4).Value = CType(ADDED_WHEN.Value,Date)
|
||||
Else
|
||||
Me.Adapter.InsertCommand.Parameters(4).Value = Global.System.DBNull.Value
|
||||
End If
|
||||
If (CHANGED_WHO Is Nothing) Then
|
||||
Me.Adapter.InsertCommand.Parameters(5).Value = Global.System.DBNull.Value
|
||||
Else
|
||||
Me.Adapter.InsertCommand.Parameters(5).Value = CType(CHANGED_WHO,String)
|
||||
End If
|
||||
If (CHANGED_WHEN.HasValue = true) Then
|
||||
Me.Adapter.InsertCommand.Parameters(6).Value = CType(CHANGED_WHEN.Value,Date)
|
||||
Else
|
||||
Me.Adapter.InsertCommand.Parameters(6).Value = Global.System.DBNull.Value
|
||||
End If
|
||||
Me.Adapter.InsertCommand.Parameters(7).Value = CType(PROCESS_ID,Integer)
|
||||
Dim previousConnectionState As Global.System.Data.ConnectionState = Me.Adapter.InsertCommand.Connection.State
|
||||
If ((Me.Adapter.InsertCommand.Connection.State And Global.System.Data.ConnectionState.Open) _
|
||||
<> Global.System.Data.ConnectionState.Open) Then
|
||||
Me.Adapter.InsertCommand.Connection.Open
|
||||
End If
|
||||
Try
|
||||
Dim returnValue As Integer = Me.Adapter.InsertCommand.ExecuteNonQuery
|
||||
Return returnValue
|
||||
Finally
|
||||
If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
|
||||
Me.Adapter.InsertCommand.Connection.Close
|
||||
End If
|
||||
End Try
|
||||
End Function
|
||||
|
||||
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "15.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 DESCRIPTION As String, ByVal REGEX As String, ByVal SEQUENCE As Byte, 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 PROCESS_ID As Integer, ByVal Original_GUID As Integer, ByVal GUID As Integer) As Integer
|
||||
If (DESCRIPTION Is Nothing) Then
|
||||
Throw New Global.System.ArgumentNullException("DESCRIPTION")
|
||||
Else
|
||||
Me.Adapter.UpdateCommand.Parameters(0).Value = CType(DESCRIPTION,String)
|
||||
End If
|
||||
If (REGEX Is Nothing) Then
|
||||
Throw New Global.System.ArgumentNullException("REGEX")
|
||||
Else
|
||||
Me.Adapter.UpdateCommand.Parameters(1).Value = CType(REGEX,String)
|
||||
End If
|
||||
Me.Adapter.UpdateCommand.Parameters(2).Value = CType(SEQUENCE,Byte)
|
||||
If (ADDED_WHO Is Nothing) Then
|
||||
Throw New Global.System.ArgumentNullException("ADDED_WHO")
|
||||
Else
|
||||
Me.Adapter.UpdateCommand.Parameters(3).Value = CType(ADDED_WHO,String)
|
||||
End If
|
||||
If (ADDED_WHEN.HasValue = true) Then
|
||||
Me.Adapter.UpdateCommand.Parameters(4).Value = CType(ADDED_WHEN.Value,Date)
|
||||
Else
|
||||
Me.Adapter.UpdateCommand.Parameters(4).Value = Global.System.DBNull.Value
|
||||
End If
|
||||
If (CHANGED_WHO Is Nothing) Then
|
||||
Me.Adapter.UpdateCommand.Parameters(5).Value = Global.System.DBNull.Value
|
||||
Else
|
||||
Me.Adapter.UpdateCommand.Parameters(5).Value = CType(CHANGED_WHO,String)
|
||||
End If
|
||||
If (CHANGED_WHEN.HasValue = true) Then
|
||||
Me.Adapter.UpdateCommand.Parameters(6).Value = CType(CHANGED_WHEN.Value,Date)
|
||||
Else
|
||||
Me.Adapter.UpdateCommand.Parameters(6).Value = Global.System.DBNull.Value
|
||||
End If
|
||||
Me.Adapter.UpdateCommand.Parameters(7).Value = CType(PROCESS_ID,Integer)
|
||||
Me.Adapter.UpdateCommand.Parameters(8).Value = CType(Original_GUID,Integer)
|
||||
Me.Adapter.UpdateCommand.Parameters(9).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
|
||||
Me.Adapter.UpdateCommand.Connection.Open
|
||||
End If
|
||||
Try
|
||||
Dim returnValue As Integer = Me.Adapter.UpdateCommand.ExecuteNonQuery
|
||||
Return returnValue
|
||||
Finally
|
||||
If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
|
||||
Me.Adapter.UpdateCommand.Connection.Close
|
||||
End If
|
||||
End Try
|
||||
End Function
|
||||
End Class
|
||||
|
||||
'''<summary>
|
||||
@@ -12187,6 +12380,15 @@ Namespace MyDatasetTableAdapters
|
||||
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "15.0.0.0")> _
|
||||
Private Function UpdateUpdatedRows(ByVal dataSet As MyDataset, 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._tBCW_PROFILE_PROCESSTableAdapter) Is Nothing) Then
|
||||
Dim updatedRows() As Global.System.Data.DataRow = dataSet.TBCW_PROFILE_PROCESS.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.ModifiedCurrent)
|
||||
updatedRows = Me.GetRealUpdatedRows(updatedRows, allAddedRows)
|
||||
If ((Not (updatedRows) Is Nothing) _
|
||||
AndAlso (0 < updatedRows.Length)) Then
|
||||
result = (result + Me._tBCW_PROFILE_PROCESSTableAdapter.Update(updatedRows))
|
||||
allChangedRows.AddRange(updatedRows)
|
||||
End If
|
||||
End If
|
||||
If (Not (Me._tBCW_PROFILESTableAdapter) Is Nothing) Then
|
||||
Dim updatedRows() As Global.System.Data.DataRow = dataSet.TBCW_PROFILES.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.ModifiedCurrent)
|
||||
updatedRows = Me.GetRealUpdatedRows(updatedRows, allAddedRows)
|
||||
@@ -12196,6 +12398,15 @@ Namespace MyDatasetTableAdapters
|
||||
allChangedRows.AddRange(updatedRows)
|
||||
End If
|
||||
End If
|
||||
If (Not (Me._tBCW_PROF_REL_WINDOWTableAdapter) Is Nothing) Then
|
||||
Dim updatedRows() As Global.System.Data.DataRow = dataSet.TBCW_PROF_REL_WINDOW.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.ModifiedCurrent)
|
||||
updatedRows = Me.GetRealUpdatedRows(updatedRows, allAddedRows)
|
||||
If ((Not (updatedRows) Is Nothing) _
|
||||
AndAlso (0 < updatedRows.Length)) Then
|
||||
result = (result + Me._tBCW_PROF_REL_WINDOWTableAdapter.Update(updatedRows))
|
||||
allChangedRows.AddRange(updatedRows)
|
||||
End If
|
||||
End If
|
||||
If (Not (Me._tBCW_USER_PROFILETableAdapter) Is Nothing) Then
|
||||
Dim updatedRows() As Global.System.Data.DataRow = dataSet.TBCW_USER_PROFILE.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.ModifiedCurrent)
|
||||
updatedRows = Me.GetRealUpdatedRows(updatedRows, allAddedRows)
|
||||
@@ -12205,15 +12416,6 @@ Namespace MyDatasetTableAdapters
|
||||
allChangedRows.AddRange(updatedRows)
|
||||
End If
|
||||
End If
|
||||
If (Not (Me._tBCW_PROFILE_PROCESSTableAdapter) Is Nothing) Then
|
||||
Dim updatedRows() As Global.System.Data.DataRow = dataSet.TBCW_PROFILE_PROCESS.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.ModifiedCurrent)
|
||||
updatedRows = Me.GetRealUpdatedRows(updatedRows, allAddedRows)
|
||||
If ((Not (updatedRows) Is Nothing) _
|
||||
AndAlso (0 < updatedRows.Length)) Then
|
||||
result = (result + Me._tBCW_PROFILE_PROCESSTableAdapter.Update(updatedRows))
|
||||
allChangedRows.AddRange(updatedRows)
|
||||
End If
|
||||
End If
|
||||
If (Not (Me._tBCW_PROF_DATA_SEARCHTableAdapter) Is Nothing) Then
|
||||
Dim updatedRows() As Global.System.Data.DataRow = dataSet.TBCW_PROF_DATA_SEARCH.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.ModifiedCurrent)
|
||||
updatedRows = Me.GetRealUpdatedRows(updatedRows, allAddedRows)
|
||||
@@ -12241,15 +12443,6 @@ Namespace MyDatasetTableAdapters
|
||||
allChangedRows.AddRange(updatedRows)
|
||||
End If
|
||||
End If
|
||||
If (Not (Me._tBCW_PROF_REL_WINDOWTableAdapter) Is Nothing) Then
|
||||
Dim updatedRows() As Global.System.Data.DataRow = dataSet.TBCW_PROF_REL_WINDOW.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.ModifiedCurrent)
|
||||
updatedRows = Me.GetRealUpdatedRows(updatedRows, allAddedRows)
|
||||
If ((Not (updatedRows) Is Nothing) _
|
||||
AndAlso (0 < updatedRows.Length)) Then
|
||||
result = (result + Me._tBCW_PROF_REL_WINDOWTableAdapter.Update(updatedRows))
|
||||
allChangedRows.AddRange(updatedRows)
|
||||
End If
|
||||
End If
|
||||
If (Not (Me._tBDD_CONNECTIONTableAdapter) Is Nothing) Then
|
||||
Dim updatedRows() As Global.System.Data.DataRow = dataSet.TBDD_CONNECTION.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.ModifiedCurrent)
|
||||
updatedRows = Me.GetRealUpdatedRows(updatedRows, allAddedRows)
|
||||
@@ -12278,6 +12471,14 @@ Namespace MyDatasetTableAdapters
|
||||
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "15.0.0.0")> _
|
||||
Private Function UpdateInsertedRows(ByVal dataSet As MyDataset, ByVal allAddedRows As Global.System.Collections.Generic.List(Of Global.System.Data.DataRow)) As Integer
|
||||
Dim result As Integer = 0
|
||||
If (Not (Me._tBCW_PROFILE_PROCESSTableAdapter) Is Nothing) Then
|
||||
Dim addedRows() As Global.System.Data.DataRow = dataSet.TBCW_PROFILE_PROCESS.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.Added)
|
||||
If ((Not (addedRows) Is Nothing) _
|
||||
AndAlso (0 < addedRows.Length)) Then
|
||||
result = (result + Me._tBCW_PROFILE_PROCESSTableAdapter.Update(addedRows))
|
||||
allAddedRows.AddRange(addedRows)
|
||||
End If
|
||||
End If
|
||||
If (Not (Me._tBCW_PROFILESTableAdapter) Is Nothing) Then
|
||||
Dim addedRows() As Global.System.Data.DataRow = dataSet.TBCW_PROFILES.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.Added)
|
||||
If ((Not (addedRows) Is Nothing) _
|
||||
@@ -12286,6 +12487,14 @@ Namespace MyDatasetTableAdapters
|
||||
allAddedRows.AddRange(addedRows)
|
||||
End If
|
||||
End If
|
||||
If (Not (Me._tBCW_PROF_REL_WINDOWTableAdapter) Is Nothing) Then
|
||||
Dim addedRows() As Global.System.Data.DataRow = dataSet.TBCW_PROF_REL_WINDOW.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.Added)
|
||||
If ((Not (addedRows) Is Nothing) _
|
||||
AndAlso (0 < addedRows.Length)) Then
|
||||
result = (result + Me._tBCW_PROF_REL_WINDOWTableAdapter.Update(addedRows))
|
||||
allAddedRows.AddRange(addedRows)
|
||||
End If
|
||||
End If
|
||||
If (Not (Me._tBCW_USER_PROFILETableAdapter) Is Nothing) Then
|
||||
Dim addedRows() As Global.System.Data.DataRow = dataSet.TBCW_USER_PROFILE.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.Added)
|
||||
If ((Not (addedRows) Is Nothing) _
|
||||
@@ -12294,14 +12503,6 @@ Namespace MyDatasetTableAdapters
|
||||
allAddedRows.AddRange(addedRows)
|
||||
End If
|
||||
End If
|
||||
If (Not (Me._tBCW_PROFILE_PROCESSTableAdapter) Is Nothing) Then
|
||||
Dim addedRows() As Global.System.Data.DataRow = dataSet.TBCW_PROFILE_PROCESS.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.Added)
|
||||
If ((Not (addedRows) Is Nothing) _
|
||||
AndAlso (0 < addedRows.Length)) Then
|
||||
result = (result + Me._tBCW_PROFILE_PROCESSTableAdapter.Update(addedRows))
|
||||
allAddedRows.AddRange(addedRows)
|
||||
End If
|
||||
End If
|
||||
If (Not (Me._tBCW_PROF_DATA_SEARCHTableAdapter) Is Nothing) Then
|
||||
Dim addedRows() As Global.System.Data.DataRow = dataSet.TBCW_PROF_DATA_SEARCH.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.Added)
|
||||
If ((Not (addedRows) Is Nothing) _
|
||||
@@ -12326,14 +12527,6 @@ Namespace MyDatasetTableAdapters
|
||||
allAddedRows.AddRange(addedRows)
|
||||
End If
|
||||
End If
|
||||
If (Not (Me._tBCW_PROF_REL_WINDOWTableAdapter) Is Nothing) Then
|
||||
Dim addedRows() As Global.System.Data.DataRow = dataSet.TBCW_PROF_REL_WINDOW.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.Added)
|
||||
If ((Not (addedRows) Is Nothing) _
|
||||
AndAlso (0 < addedRows.Length)) Then
|
||||
result = (result + Me._tBCW_PROF_REL_WINDOWTableAdapter.Update(addedRows))
|
||||
allAddedRows.AddRange(addedRows)
|
||||
End If
|
||||
End If
|
||||
If (Not (Me._tBDD_CONNECTIONTableAdapter) Is Nothing) Then
|
||||
Dim addedRows() As Global.System.Data.DataRow = dataSet.TBDD_CONNECTION.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.Added)
|
||||
If ((Not (addedRows) Is Nothing) _
|
||||
@@ -12376,14 +12569,6 @@ Namespace MyDatasetTableAdapters
|
||||
allChangedRows.AddRange(deletedRows)
|
||||
End If
|
||||
End If
|
||||
If (Not (Me._tBCW_PROF_REL_WINDOWTableAdapter) Is Nothing) Then
|
||||
Dim deletedRows() As Global.System.Data.DataRow = dataSet.TBCW_PROF_REL_WINDOW.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.Deleted)
|
||||
If ((Not (deletedRows) Is Nothing) _
|
||||
AndAlso (0 < deletedRows.Length)) Then
|
||||
result = (result + Me._tBCW_PROF_REL_WINDOWTableAdapter.Update(deletedRows))
|
||||
allChangedRows.AddRange(deletedRows)
|
||||
End If
|
||||
End If
|
||||
If (Not (Me._tBCW_GROUP_PROFILETableAdapter) Is Nothing) Then
|
||||
Dim deletedRows() As Global.System.Data.DataRow = dataSet.TBCW_GROUP_PROFILE.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.Deleted)
|
||||
If ((Not (deletedRows) Is Nothing) _
|
||||
@@ -12408,14 +12593,6 @@ Namespace MyDatasetTableAdapters
|
||||
allChangedRows.AddRange(deletedRows)
|
||||
End If
|
||||
End If
|
||||
If (Not (Me._tBCW_PROFILE_PROCESSTableAdapter) Is Nothing) Then
|
||||
Dim deletedRows() As Global.System.Data.DataRow = dataSet.TBCW_PROFILE_PROCESS.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.Deleted)
|
||||
If ((Not (deletedRows) Is Nothing) _
|
||||
AndAlso (0 < deletedRows.Length)) Then
|
||||
result = (result + Me._tBCW_PROFILE_PROCESSTableAdapter.Update(deletedRows))
|
||||
allChangedRows.AddRange(deletedRows)
|
||||
End If
|
||||
End If
|
||||
If (Not (Me._tBCW_USER_PROFILETableAdapter) Is Nothing) Then
|
||||
Dim deletedRows() As Global.System.Data.DataRow = dataSet.TBCW_USER_PROFILE.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.Deleted)
|
||||
If ((Not (deletedRows) Is Nothing) _
|
||||
@@ -12424,6 +12601,14 @@ Namespace MyDatasetTableAdapters
|
||||
allChangedRows.AddRange(deletedRows)
|
||||
End If
|
||||
End If
|
||||
If (Not (Me._tBCW_PROF_REL_WINDOWTableAdapter) Is Nothing) Then
|
||||
Dim deletedRows() As Global.System.Data.DataRow = dataSet.TBCW_PROF_REL_WINDOW.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.Deleted)
|
||||
If ((Not (deletedRows) Is Nothing) _
|
||||
AndAlso (0 < deletedRows.Length)) Then
|
||||
result = (result + Me._tBCW_PROF_REL_WINDOWTableAdapter.Update(deletedRows))
|
||||
allChangedRows.AddRange(deletedRows)
|
||||
End If
|
||||
End If
|
||||
If (Not (Me._tBCW_PROFILESTableAdapter) Is Nothing) Then
|
||||
Dim deletedRows() As Global.System.Data.DataRow = dataSet.TBCW_PROFILES.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.Deleted)
|
||||
If ((Not (deletedRows) Is Nothing) _
|
||||
@@ -12432,6 +12617,14 @@ Namespace MyDatasetTableAdapters
|
||||
allChangedRows.AddRange(deletedRows)
|
||||
End If
|
||||
End If
|
||||
If (Not (Me._tBCW_PROFILE_PROCESSTableAdapter) Is Nothing) Then
|
||||
Dim deletedRows() As Global.System.Data.DataRow = dataSet.TBCW_PROFILE_PROCESS.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.Deleted)
|
||||
If ((Not (deletedRows) Is Nothing) _
|
||||
AndAlso (0 < deletedRows.Length)) Then
|
||||
result = (result + Me._tBCW_PROFILE_PROCESSTableAdapter.Update(deletedRows))
|
||||
allChangedRows.AddRange(deletedRows)
|
||||
End If
|
||||
End If
|
||||
Return result
|
||||
End Function
|
||||
|
||||
|
||||
Reference in New Issue
Block a user