jj 06.03.17
This commit is contained in:
JenneJ
142
app/DD-Record-Organizer/DD_ECMAdmin.Designer.vb
generated
142
app/DD-Record-Organizer/DD_ECMAdmin.Designer.vb
generated
@@ -4146,6 +4146,8 @@ Partial Public Class DD_ECMAdmin
|
||||
|
||||
Private columnCONFIG_COLUMNS As Global.System.Data.DataColumn
|
||||
|
||||
Private columnSEQUENCE As Global.System.Data.DataColumn
|
||||
|
||||
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
|
||||
Public Sub New()
|
||||
@@ -4293,6 +4295,14 @@ Partial Public Class DD_ECMAdmin
|
||||
End Get
|
||||
End Property
|
||||
|
||||
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.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", "4.0.0.0"), _
|
||||
Global.System.ComponentModel.Browsable(false)> _
|
||||
@@ -4330,9 +4340,9 @@ Partial Public Class DD_ECMAdmin
|
||||
|
||||
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
|
||||
Public Overloads Function AddTBPMO_DOCSEARCH_RESULTLIST_CONFIGRow(ByVal ENTITY_ID As Integer, ByVal LANGUAGE As String, ByVal COLUMN_VIEW As String, ByVal HEADER_CAPTION As String, ByVal WIDTH As Integer, ByVal TYPE_ID As Byte, ByVal ADDED_WHO As String, ByVal ADDED_WHEN As Date, ByVal CHANGED_WHO As String, ByVal CHANGED_WHEN As Date, ByVal VISIBLE As Boolean, ByVal EDITABLE As Boolean, ByVal CONFIG_COLUMNS As Boolean) As TBPMO_DOCSEARCH_RESULTLIST_CONFIGRow
|
||||
Public Overloads Function AddTBPMO_DOCSEARCH_RESULTLIST_CONFIGRow(ByVal ENTITY_ID As Integer, ByVal LANGUAGE As String, ByVal COLUMN_VIEW As String, ByVal HEADER_CAPTION As String, ByVal WIDTH As Integer, ByVal TYPE_ID As Byte, ByVal ADDED_WHO As String, ByVal ADDED_WHEN As Date, ByVal CHANGED_WHO As String, ByVal CHANGED_WHEN As Date, ByVal VISIBLE As Boolean, ByVal EDITABLE As Boolean, ByVal CONFIG_COLUMNS As Boolean, ByVal SEQUENCE As Integer) As TBPMO_DOCSEARCH_RESULTLIST_CONFIGRow
|
||||
Dim rowTBPMO_DOCSEARCH_RESULTLIST_CONFIGRow As TBPMO_DOCSEARCH_RESULTLIST_CONFIGRow = CType(Me.NewRow,TBPMO_DOCSEARCH_RESULTLIST_CONFIGRow)
|
||||
Dim columnValuesArray() As Object = New Object() {Nothing, ENTITY_ID, LANGUAGE, COLUMN_VIEW, HEADER_CAPTION, WIDTH, TYPE_ID, ADDED_WHO, ADDED_WHEN, CHANGED_WHO, CHANGED_WHEN, VISIBLE, EDITABLE, CONFIG_COLUMNS}
|
||||
Dim columnValuesArray() As Object = New Object() {Nothing, ENTITY_ID, LANGUAGE, COLUMN_VIEW, HEADER_CAPTION, WIDTH, TYPE_ID, ADDED_WHO, ADDED_WHEN, CHANGED_WHO, CHANGED_WHEN, VISIBLE, EDITABLE, CONFIG_COLUMNS, SEQUENCE}
|
||||
rowTBPMO_DOCSEARCH_RESULTLIST_CONFIGRow.ItemArray = columnValuesArray
|
||||
Me.Rows.Add(rowTBPMO_DOCSEARCH_RESULTLIST_CONFIGRow)
|
||||
Return rowTBPMO_DOCSEARCH_RESULTLIST_CONFIGRow
|
||||
@@ -4375,6 +4385,7 @@ Partial Public Class DD_ECMAdmin
|
||||
Me.columnVISIBLE = MyBase.Columns("VISIBLE")
|
||||
Me.columnEDITABLE = MyBase.Columns("EDITABLE")
|
||||
Me.columnCONFIG_COLUMNS = MyBase.Columns("CONFIG_COLUMNS")
|
||||
Me.columnSEQUENCE = MyBase.Columns("SEQUENCE")
|
||||
End Sub
|
||||
|
||||
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
@@ -4408,6 +4419,8 @@ Partial Public Class DD_ECMAdmin
|
||||
MyBase.Columns.Add(Me.columnEDITABLE)
|
||||
Me.columnCONFIG_COLUMNS = New Global.System.Data.DataColumn("CONFIG_COLUMNS", GetType(Boolean), Nothing, Global.System.Data.MappingType.Element)
|
||||
MyBase.Columns.Add(Me.columnCONFIG_COLUMNS)
|
||||
Me.columnSEQUENCE = New Global.System.Data.DataColumn("SEQUENCE", GetType(Integer), Nothing, Global.System.Data.MappingType.Element)
|
||||
MyBase.Columns.Add(Me.columnSEQUENCE)
|
||||
Me.Constraints.Add(New Global.System.Data.UniqueConstraint("Constraint1", New Global.System.Data.DataColumn() {Me.columnGUID}, true))
|
||||
Me.columnGUID.AutoIncrement = true
|
||||
Me.columnGUID.AutoIncrementSeed = -1
|
||||
@@ -4430,6 +4443,7 @@ Partial Public Class DD_ECMAdmin
|
||||
Me.columnVISIBLE.AllowDBNull = false
|
||||
Me.columnEDITABLE.AllowDBNull = false
|
||||
Me.columnCONFIG_COLUMNS.AllowDBNull = false
|
||||
Me.columnSEQUENCE.AllowDBNull = false
|
||||
End Sub
|
||||
|
||||
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
@@ -8505,6 +8519,17 @@ Partial Public Class DD_ECMAdmin
|
||||
End Set
|
||||
End Property
|
||||
|
||||
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
|
||||
Public Property SEQUENCE() As Integer
|
||||
Get
|
||||
Return CType(Me(Me.tableTBPMO_DOCSEARCH_RESULTLIST_CONFIG.SEQUENCEColumn),Integer)
|
||||
End Get
|
||||
Set
|
||||
Me(Me.tableTBPMO_DOCSEARCH_RESULTLIST_CONFIG.SEQUENCEColumn) = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
|
||||
Public Function IsADDED_WHENNull() As Boolean
|
||||
@@ -12712,6 +12737,7 @@ Namespace DD_ECMAdminTableAdapters
|
||||
tableMapping.ColumnMappings.Add("VISIBLE", "VISIBLE")
|
||||
tableMapping.ColumnMappings.Add("EDITABLE", "EDITABLE")
|
||||
tableMapping.ColumnMappings.Add("CONFIG_COLUMNS", "CONFIG_COLUMNS")
|
||||
tableMapping.ColumnMappings.Add("SEQUENCE", "SEQUENCE")
|
||||
Me._adapter.TableMappings.Add(tableMapping)
|
||||
Me._adapter.DeleteCommand = New Global.System.Data.SqlClient.SqlCommand()
|
||||
Me._adapter.DeleteCommand.Connection = Me.Connection
|
||||
@@ -12724,7 +12750,8 @@ Namespace DD_ECMAdminTableAdapters
|
||||
"HO = 1 AND [CHANGED_WHO] IS NULL) OR ([CHANGED_WHO] = @Original_CHANGED_WHO)) AN"& _
|
||||
"D ((@IsNull_CHANGED_WHEN = 1 AND [CHANGED_WHEN] IS NULL) OR ([CHANGED_WHEN] = @O"& _
|
||||
"riginal_CHANGED_WHEN)) AND ([VISIBLE] = @Original_VISIBLE) AND ([EDITABLE] = @Or"& _
|
||||
"iginal_EDITABLE) AND ([CONFIG_COLUMNS] = @Original_CONFIG_COLUMNS))"
|
||||
"iginal_EDITABLE) AND ([CONFIG_COLUMNS] = @Original_CONFIG_COLUMNS) AND ([SEQUENC"& _
|
||||
"E] = @Original_SEQUENCE))"
|
||||
Me._adapter.DeleteCommand.CommandType = Global.System.Data.CommandType.Text
|
||||
Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_GUID", Global.System.Data.SqlDbType.Int, 0, 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_ENTITY_ID", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "ENTITY_ID", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
|
||||
@@ -12743,16 +12770,18 @@ Namespace DD_ECMAdminTableAdapters
|
||||
Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_VISIBLE", Global.System.Data.SqlDbType.Bit, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "VISIBLE", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
|
||||
Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_EDITABLE", Global.System.Data.SqlDbType.Bit, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "EDITABLE", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
|
||||
Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_CONFIG_COLUMNS", Global.System.Data.SqlDbType.Bit, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "CONFIG_COLUMNS", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
|
||||
Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_SEQUENCE", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "SEQUENCE", 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 [TBPMO_DOCSEARCH_RESULTLIST_CONFIG] ([ENTITY_ID], [LANGUAGE], [COLUMN"& _
|
||||
"_VIEW], [HEADER_CAPTION], [WIDTH], [TYPE_ID], [ADDED_WHO], [ADDED_WHEN], [CHANGE"& _
|
||||
"D_WHO], [CHANGED_WHEN], [VISIBLE], [EDITABLE], [CONFIG_COLUMNS]) VALUES (@ENTITY"& _
|
||||
"_ID, @LANGUAGE, @COLUMN_VIEW, @HEADER_CAPTION, @WIDTH, @TYPE_ID, @ADDED_WHO, @AD"& _
|
||||
"DED_WHEN, @CHANGED_WHO, @CHANGED_WHEN, @VISIBLE, @EDITABLE, @CONFIG_COLUMNS);"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"S"& _
|
||||
"ELECT GUID, ENTITY_ID, LANGUAGE, COLUMN_VIEW, HEADER_CAPTION, WIDTH, TYPE_ID, AD"& _
|
||||
"DED_WHO, ADDED_WHEN, CHANGED_WHO, CHANGED_WHEN, VISIBLE, EDITABLE, CONFIG_COLUMN"& _
|
||||
"S FROM TBPMO_DOCSEARCH_RESULTLIST_CONFIG WHERE (GUID = SCOPE_IDENTITY())"
|
||||
"D_WHO], [CHANGED_WHEN], [VISIBLE], [EDITABLE], [CONFIG_COLUMNS], [SEQUENCE]) VAL"& _
|
||||
"UES (@ENTITY_ID, @LANGUAGE, @COLUMN_VIEW, @HEADER_CAPTION, @WIDTH, @TYPE_ID, @AD"& _
|
||||
"DED_WHO, @ADDED_WHEN, @CHANGED_WHO, @CHANGED_WHEN, @VISIBLE, @EDITABLE, @CONFIG_"& _
|
||||
"COLUMNS, @SEQUENCE);"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"SELECT GUID, ENTITY_ID, LANGUAGE, COLUMN_VIEW, HEADER_CAPT"& _
|
||||
"ION, WIDTH, TYPE_ID, ADDED_WHO, ADDED_WHEN, CHANGED_WHO, CHANGED_WHEN, VISIBLE, "& _
|
||||
"EDITABLE, CONFIG_COLUMNS, SEQUENCE FROM TBPMO_DOCSEARCH_RESULTLIST_CONFIG WHERE "& _
|
||||
"(GUID = SCOPE_IDENTITY())"
|
||||
Me._adapter.InsertCommand.CommandType = Global.System.Data.CommandType.Text
|
||||
Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@ENTITY_ID", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "ENTITY_ID", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
|
||||
Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@LANGUAGE", Global.System.Data.SqlDbType.VarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "LANGUAGE", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
|
||||
@@ -12767,26 +12796,27 @@ Namespace DD_ECMAdminTableAdapters
|
||||
Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@VISIBLE", Global.System.Data.SqlDbType.Bit, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "VISIBLE", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
|
||||
Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@EDITABLE", Global.System.Data.SqlDbType.Bit, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "EDITABLE", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
|
||||
Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@CONFIG_COLUMNS", Global.System.Data.SqlDbType.Bit, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "CONFIG_COLUMNS", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
|
||||
Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@SEQUENCE", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "SEQUENCE", 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 [TBPMO_DOCSEARCH_RESULTLIST_CONFIG] SET [ENTITY_ID] = @ENTITY_ID, [LANGUAG"& _
|
||||
"E] = @LANGUAGE, [COLUMN_VIEW] = @COLUMN_VIEW, [HEADER_CAPTION] = @HEADER_CAPTION"& _
|
||||
", [WIDTH] = @WIDTH, [TYPE_ID] = @TYPE_ID, [ADDED_WHO] = @ADDED_WHO, [ADDED_WHEN]"& _
|
||||
" = @ADDED_WHEN, [CHANGED_WHO] = @CHANGED_WHO, [CHANGED_WHEN] = @CHANGED_WHEN, [V"& _
|
||||
"ISIBLE] = @VISIBLE, [EDITABLE] = @EDITABLE, [CONFIG_COLUMNS] = @CONFIG_COLUMNS W"& _
|
||||
"HERE (([GUID] = @Original_GUID) AND ([ENTITY_ID] = @Original_ENTITY_ID) AND ([LA"& _
|
||||
"NGUAGE] = @Original_LANGUAGE) AND ([COLUMN_VIEW] = @Original_COLUMN_VIEW) AND (["& _
|
||||
"HEADER_CAPTION] = @Original_HEADER_CAPTION) AND ([WIDTH] = @Original_WIDTH) AND "& _
|
||||
"([TYPE_ID] = @Original_TYPE_ID) AND ([ADDED_WHO] = @Original_ADDED_WHO) AND ((@I"& _
|
||||
"sNull_ADDED_WHEN = 1 AND [ADDED_WHEN] IS NULL) OR ([ADDED_WHEN] = @Original_ADDE"& _
|
||||
"D_WHEN)) AND ((@IsNull_CHANGED_WHO = 1 AND [CHANGED_WHO] IS NULL) OR ([CHANGED_W"& _
|
||||
"HO] = @Original_CHANGED_WHO)) AND ((@IsNull_CHANGED_WHEN = 1 AND [CHANGED_WHEN] "& _
|
||||
"IS NULL) OR ([CHANGED_WHEN] = @Original_CHANGED_WHEN)) AND ([VISIBLE] = @Origina"& _
|
||||
"l_VISIBLE) AND ([EDITABLE] = @Original_EDITABLE) AND ([CONFIG_COLUMNS] = @Origin"& _
|
||||
"al_CONFIG_COLUMNS));"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"SELECT GUID, ENTITY_ID, LANGUAGE, COLUMN_VIEW, HEADER_CAPT"& _
|
||||
"ION, WIDTH, TYPE_ID, ADDED_WHO, ADDED_WHEN, CHANGED_WHO, CHANGED_WHEN, VISIBLE, "& _
|
||||
"EDITABLE, CONFIG_COLUMNS FROM TBPMO_DOCSEARCH_RESULTLIST_CONFIG WHERE (GUID = @G"& _
|
||||
"UID)"
|
||||
"ISIBLE] = @VISIBLE, [EDITABLE] = @EDITABLE, [CONFIG_COLUMNS] = @CONFIG_COLUMNS, "& _
|
||||
"[SEQUENCE] = @SEQUENCE WHERE (([GUID] = @Original_GUID) AND ([ENTITY_ID] = @Orig"& _
|
||||
"inal_ENTITY_ID) AND ([LANGUAGE] = @Original_LANGUAGE) AND ([COLUMN_VIEW] = @Orig"& _
|
||||
"inal_COLUMN_VIEW) AND ([HEADER_CAPTION] = @Original_HEADER_CAPTION) AND ([WIDTH]"& _
|
||||
" = @Original_WIDTH) AND ([TYPE_ID] = @Original_TYPE_ID) AND ([ADDED_WHO] = @Orig"& _
|
||||
"inal_ADDED_WHO) AND ((@IsNull_ADDED_WHEN = 1 AND [ADDED_WHEN] IS NULL) OR ([ADDE"& _
|
||||
"D_WHEN] = @Original_ADDED_WHEN)) AND ((@IsNull_CHANGED_WHO = 1 AND [CHANGED_WHO]"& _
|
||||
" IS NULL) OR ([CHANGED_WHO] = @Original_CHANGED_WHO)) AND ((@IsNull_CHANGED_WHEN"& _
|
||||
" = 1 AND [CHANGED_WHEN] IS NULL) OR ([CHANGED_WHEN] = @Original_CHANGED_WHEN)) A"& _
|
||||
"ND ([VISIBLE] = @Original_VISIBLE) AND ([EDITABLE] = @Original_EDITABLE) AND ([C"& _
|
||||
"ONFIG_COLUMNS] = @Original_CONFIG_COLUMNS) AND ([SEQUENCE] = @Original_SEQUENCE)"& _
|
||||
");"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"SELECT GUID, ENTITY_ID, LANGUAGE, COLUMN_VIEW, HEADER_CAPTION, WIDTH, TYPE_I"& _
|
||||
"D, ADDED_WHO, ADDED_WHEN, CHANGED_WHO, CHANGED_WHEN, VISIBLE, EDITABLE, CONFIG_C"& _
|
||||
"OLUMNS, SEQUENCE FROM TBPMO_DOCSEARCH_RESULTLIST_CONFIG WHERE (GUID = @GUID)"
|
||||
Me._adapter.UpdateCommand.CommandType = Global.System.Data.CommandType.Text
|
||||
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@ENTITY_ID", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "ENTITY_ID", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
|
||||
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@LANGUAGE", Global.System.Data.SqlDbType.VarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "LANGUAGE", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
|
||||
@@ -12801,6 +12831,7 @@ Namespace DD_ECMAdminTableAdapters
|
||||
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@VISIBLE", Global.System.Data.SqlDbType.Bit, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "VISIBLE", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
|
||||
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@EDITABLE", Global.System.Data.SqlDbType.Bit, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "EDITABLE", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
|
||||
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@CONFIG_COLUMNS", Global.System.Data.SqlDbType.Bit, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "CONFIG_COLUMNS", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
|
||||
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@SEQUENCE", Global.System.Data.SqlDbType.Int, 0, 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("@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_ENTITY_ID", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "ENTITY_ID", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
|
||||
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_LANGUAGE", Global.System.Data.SqlDbType.VarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "LANGUAGE", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
|
||||
@@ -12818,6 +12849,7 @@ Namespace DD_ECMAdminTableAdapters
|
||||
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_VISIBLE", Global.System.Data.SqlDbType.Bit, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "VISIBLE", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
|
||||
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_EDITABLE", Global.System.Data.SqlDbType.Bit, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "EDITABLE", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
|
||||
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_CONFIG_COLUMNS", Global.System.Data.SqlDbType.Bit, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "CONFIG_COLUMNS", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
|
||||
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_SEQUENCE", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "SEQUENCE", 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, "", "", ""))
|
||||
End Sub
|
||||
|
||||
@@ -12895,7 +12927,7 @@ Namespace DD_ECMAdminTableAdapters
|
||||
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.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, ByVal Original_ENTITY_ID As Integer, ByVal Original_LANGUAGE As String, ByVal Original_COLUMN_VIEW As String, ByVal Original_HEADER_CAPTION As String, ByVal Original_WIDTH As Integer, ByVal Original_TYPE_ID As Byte, ByVal Original_ADDED_WHO As String, ByVal Original_ADDED_WHEN As Global.System.Nullable(Of Date), ByVal Original_CHANGED_WHO As String, ByVal Original_CHANGED_WHEN As Global.System.Nullable(Of Date), ByVal Original_VISIBLE As Boolean, ByVal Original_EDITABLE As Boolean, ByVal Original_CONFIG_COLUMNS As Boolean) As Integer
|
||||
Public Overloads Overridable Function Delete(ByVal Original_GUID As Integer, ByVal Original_ENTITY_ID As Integer, ByVal Original_LANGUAGE As String, ByVal Original_COLUMN_VIEW As String, ByVal Original_HEADER_CAPTION As String, ByVal Original_WIDTH As Integer, ByVal Original_TYPE_ID As Byte, ByVal Original_ADDED_WHO As String, ByVal Original_ADDED_WHEN As Global.System.Nullable(Of Date), ByVal Original_CHANGED_WHO As String, ByVal Original_CHANGED_WHEN As Global.System.Nullable(Of Date), ByVal Original_VISIBLE As Boolean, ByVal Original_EDITABLE As Boolean, ByVal Original_CONFIG_COLUMNS As Boolean, ByVal Original_SEQUENCE As Integer) As Integer
|
||||
Me.Adapter.DeleteCommand.Parameters(0).Value = CType(Original_GUID,Integer)
|
||||
Me.Adapter.DeleteCommand.Parameters(1).Value = CType(Original_ENTITY_ID,Integer)
|
||||
If (Original_LANGUAGE Is Nothing) Then
|
||||
@@ -12944,6 +12976,7 @@ Namespace DD_ECMAdminTableAdapters
|
||||
Me.Adapter.DeleteCommand.Parameters(14).Value = CType(Original_VISIBLE,Boolean)
|
||||
Me.Adapter.DeleteCommand.Parameters(15).Value = CType(Original_EDITABLE,Boolean)
|
||||
Me.Adapter.DeleteCommand.Parameters(16).Value = CType(Original_CONFIG_COLUMNS,Boolean)
|
||||
Me.Adapter.DeleteCommand.Parameters(17).Value = CType(Original_SEQUENCE,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
|
||||
@@ -12963,7 +12996,7 @@ Namespace DD_ECMAdminTableAdapters
|
||||
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.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 ENTITY_ID As Integer, ByVal LANGUAGE As String, ByVal COLUMN_VIEW As String, ByVal HEADER_CAPTION As String, ByVal WIDTH As Integer, ByVal TYPE_ID 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 VISIBLE As Boolean, ByVal EDITABLE As Boolean, ByVal CONFIG_COLUMNS As Boolean) As Integer
|
||||
Public Overloads Overridable Function Insert(ByVal ENTITY_ID As Integer, ByVal LANGUAGE As String, ByVal COLUMN_VIEW As String, ByVal HEADER_CAPTION As String, ByVal WIDTH As Integer, ByVal TYPE_ID 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 VISIBLE As Boolean, ByVal EDITABLE As Boolean, ByVal CONFIG_COLUMNS As Boolean, ByVal SEQUENCE As Integer) As Integer
|
||||
Me.Adapter.InsertCommand.Parameters(0).Value = CType(ENTITY_ID,Integer)
|
||||
If (LANGUAGE Is Nothing) Then
|
||||
Throw New Global.System.ArgumentNullException("LANGUAGE")
|
||||
@@ -13005,6 +13038,7 @@ Namespace DD_ECMAdminTableAdapters
|
||||
Me.Adapter.InsertCommand.Parameters(10).Value = CType(VISIBLE,Boolean)
|
||||
Me.Adapter.InsertCommand.Parameters(11).Value = CType(EDITABLE,Boolean)
|
||||
Me.Adapter.InsertCommand.Parameters(12).Value = CType(CONFIG_COLUMNS,Boolean)
|
||||
Me.Adapter.InsertCommand.Parameters(13).Value = CType(SEQUENCE,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
|
||||
@@ -13038,6 +13072,7 @@ Namespace DD_ECMAdminTableAdapters
|
||||
ByVal VISIBLE As Boolean, _
|
||||
ByVal EDITABLE As Boolean, _
|
||||
ByVal CONFIG_COLUMNS As Boolean, _
|
||||
ByVal SEQUENCE As Integer, _
|
||||
ByVal Original_GUID As Integer, _
|
||||
ByVal Original_ENTITY_ID As Integer, _
|
||||
ByVal Original_LANGUAGE As String, _
|
||||
@@ -13052,6 +13087,7 @@ Namespace DD_ECMAdminTableAdapters
|
||||
ByVal Original_VISIBLE As Boolean, _
|
||||
ByVal Original_EDITABLE As Boolean, _
|
||||
ByVal Original_CONFIG_COLUMNS As Boolean, _
|
||||
ByVal Original_SEQUENCE As Integer, _
|
||||
ByVal GUID As Integer) As Integer
|
||||
Me.Adapter.UpdateCommand.Parameters(0).Value = CType(ENTITY_ID,Integer)
|
||||
If (LANGUAGE Is Nothing) Then
|
||||
@@ -13094,55 +13130,57 @@ Namespace DD_ECMAdminTableAdapters
|
||||
Me.Adapter.UpdateCommand.Parameters(10).Value = CType(VISIBLE,Boolean)
|
||||
Me.Adapter.UpdateCommand.Parameters(11).Value = CType(EDITABLE,Boolean)
|
||||
Me.Adapter.UpdateCommand.Parameters(12).Value = CType(CONFIG_COLUMNS,Boolean)
|
||||
Me.Adapter.UpdateCommand.Parameters(13).Value = CType(Original_GUID,Integer)
|
||||
Me.Adapter.UpdateCommand.Parameters(14).Value = CType(Original_ENTITY_ID,Integer)
|
||||
Me.Adapter.UpdateCommand.Parameters(13).Value = CType(SEQUENCE,Integer)
|
||||
Me.Adapter.UpdateCommand.Parameters(14).Value = CType(Original_GUID,Integer)
|
||||
Me.Adapter.UpdateCommand.Parameters(15).Value = CType(Original_ENTITY_ID,Integer)
|
||||
If (Original_LANGUAGE Is Nothing) Then
|
||||
Throw New Global.System.ArgumentNullException("Original_LANGUAGE")
|
||||
Else
|
||||
Me.Adapter.UpdateCommand.Parameters(15).Value = CType(Original_LANGUAGE,String)
|
||||
Me.Adapter.UpdateCommand.Parameters(16).Value = CType(Original_LANGUAGE,String)
|
||||
End If
|
||||
If (Original_COLUMN_VIEW Is Nothing) Then
|
||||
Throw New Global.System.ArgumentNullException("Original_COLUMN_VIEW")
|
||||
Else
|
||||
Me.Adapter.UpdateCommand.Parameters(16).Value = CType(Original_COLUMN_VIEW,String)
|
||||
Me.Adapter.UpdateCommand.Parameters(17).Value = CType(Original_COLUMN_VIEW,String)
|
||||
End If
|
||||
If (Original_HEADER_CAPTION Is Nothing) Then
|
||||
Throw New Global.System.ArgumentNullException("Original_HEADER_CAPTION")
|
||||
Else
|
||||
Me.Adapter.UpdateCommand.Parameters(17).Value = CType(Original_HEADER_CAPTION,String)
|
||||
Me.Adapter.UpdateCommand.Parameters(18).Value = CType(Original_HEADER_CAPTION,String)
|
||||
End If
|
||||
Me.Adapter.UpdateCommand.Parameters(18).Value = CType(Original_WIDTH,Integer)
|
||||
Me.Adapter.UpdateCommand.Parameters(19).Value = CType(Original_TYPE_ID,Byte)
|
||||
Me.Adapter.UpdateCommand.Parameters(19).Value = CType(Original_WIDTH,Integer)
|
||||
Me.Adapter.UpdateCommand.Parameters(20).Value = CType(Original_TYPE_ID,Byte)
|
||||
If (Original_ADDED_WHO Is Nothing) Then
|
||||
Throw New Global.System.ArgumentNullException("Original_ADDED_WHO")
|
||||
Else
|
||||
Me.Adapter.UpdateCommand.Parameters(20).Value = CType(Original_ADDED_WHO,String)
|
||||
Me.Adapter.UpdateCommand.Parameters(21).Value = CType(Original_ADDED_WHO,String)
|
||||
End If
|
||||
If (Original_ADDED_WHEN.HasValue = true) Then
|
||||
Me.Adapter.UpdateCommand.Parameters(21).Value = CType(0,Object)
|
||||
Me.Adapter.UpdateCommand.Parameters(22).Value = CType(Original_ADDED_WHEN.Value,Date)
|
||||
Me.Adapter.UpdateCommand.Parameters(22).Value = CType(0,Object)
|
||||
Me.Adapter.UpdateCommand.Parameters(23).Value = CType(Original_ADDED_WHEN.Value,Date)
|
||||
Else
|
||||
Me.Adapter.UpdateCommand.Parameters(21).Value = CType(1,Object)
|
||||
Me.Adapter.UpdateCommand.Parameters(22).Value = Global.System.DBNull.Value
|
||||
Me.Adapter.UpdateCommand.Parameters(22).Value = CType(1,Object)
|
||||
Me.Adapter.UpdateCommand.Parameters(23).Value = Global.System.DBNull.Value
|
||||
End If
|
||||
If (Original_CHANGED_WHO Is Nothing) Then
|
||||
Me.Adapter.UpdateCommand.Parameters(23).Value = CType(1,Object)
|
||||
Me.Adapter.UpdateCommand.Parameters(24).Value = Global.System.DBNull.Value
|
||||
Me.Adapter.UpdateCommand.Parameters(24).Value = CType(1,Object)
|
||||
Me.Adapter.UpdateCommand.Parameters(25).Value = Global.System.DBNull.Value
|
||||
Else
|
||||
Me.Adapter.UpdateCommand.Parameters(23).Value = CType(0,Object)
|
||||
Me.Adapter.UpdateCommand.Parameters(24).Value = CType(Original_CHANGED_WHO,String)
|
||||
Me.Adapter.UpdateCommand.Parameters(24).Value = CType(0,Object)
|
||||
Me.Adapter.UpdateCommand.Parameters(25).Value = CType(Original_CHANGED_WHO,String)
|
||||
End If
|
||||
If (Original_CHANGED_WHEN.HasValue = true) Then
|
||||
Me.Adapter.UpdateCommand.Parameters(25).Value = CType(0,Object)
|
||||
Me.Adapter.UpdateCommand.Parameters(26).Value = CType(Original_CHANGED_WHEN.Value,Date)
|
||||
Me.Adapter.UpdateCommand.Parameters(26).Value = CType(0,Object)
|
||||
Me.Adapter.UpdateCommand.Parameters(27).Value = CType(Original_CHANGED_WHEN.Value,Date)
|
||||
Else
|
||||
Me.Adapter.UpdateCommand.Parameters(25).Value = CType(1,Object)
|
||||
Me.Adapter.UpdateCommand.Parameters(26).Value = Global.System.DBNull.Value
|
||||
Me.Adapter.UpdateCommand.Parameters(26).Value = CType(1,Object)
|
||||
Me.Adapter.UpdateCommand.Parameters(27).Value = Global.System.DBNull.Value
|
||||
End If
|
||||
Me.Adapter.UpdateCommand.Parameters(27).Value = CType(Original_VISIBLE,Boolean)
|
||||
Me.Adapter.UpdateCommand.Parameters(28).Value = CType(Original_EDITABLE,Boolean)
|
||||
Me.Adapter.UpdateCommand.Parameters(29).Value = CType(Original_CONFIG_COLUMNS,Boolean)
|
||||
Me.Adapter.UpdateCommand.Parameters(30).Value = CType(GUID,Integer)
|
||||
Me.Adapter.UpdateCommand.Parameters(28).Value = CType(Original_VISIBLE,Boolean)
|
||||
Me.Adapter.UpdateCommand.Parameters(29).Value = CType(Original_EDITABLE,Boolean)
|
||||
Me.Adapter.UpdateCommand.Parameters(30).Value = CType(Original_CONFIG_COLUMNS,Boolean)
|
||||
Me.Adapter.UpdateCommand.Parameters(31).Value = CType(Original_SEQUENCE,Integer)
|
||||
Me.Adapter.UpdateCommand.Parameters(32).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
|
||||
@@ -13176,6 +13214,7 @@ Namespace DD_ECMAdminTableAdapters
|
||||
ByVal VISIBLE As Boolean, _
|
||||
ByVal EDITABLE As Boolean, _
|
||||
ByVal CONFIG_COLUMNS As Boolean, _
|
||||
ByVal SEQUENCE As Integer, _
|
||||
ByVal Original_GUID As Integer, _
|
||||
ByVal Original_ENTITY_ID As Integer, _
|
||||
ByVal Original_LANGUAGE As String, _
|
||||
@@ -13189,8 +13228,9 @@ Namespace DD_ECMAdminTableAdapters
|
||||
ByVal Original_CHANGED_WHEN As Global.System.Nullable(Of Date), _
|
||||
ByVal Original_VISIBLE As Boolean, _
|
||||
ByVal Original_EDITABLE As Boolean, _
|
||||
ByVal Original_CONFIG_COLUMNS As Boolean) As Integer
|
||||
Return Me.Update(ENTITY_ID, LANGUAGE, COLUMN_VIEW, HEADER_CAPTION, WIDTH, TYPE_ID, ADDED_WHO, ADDED_WHEN, CHANGED_WHO, CHANGED_WHEN, VISIBLE, EDITABLE, CONFIG_COLUMNS, Original_GUID, Original_ENTITY_ID, Original_LANGUAGE, Original_COLUMN_VIEW, Original_HEADER_CAPTION, Original_WIDTH, Original_TYPE_ID, Original_ADDED_WHO, Original_ADDED_WHEN, Original_CHANGED_WHO, Original_CHANGED_WHEN, Original_VISIBLE, Original_EDITABLE, Original_CONFIG_COLUMNS, Original_GUID)
|
||||
ByVal Original_CONFIG_COLUMNS As Boolean, _
|
||||
ByVal Original_SEQUENCE As Integer) As Integer
|
||||
Return Me.Update(ENTITY_ID, LANGUAGE, COLUMN_VIEW, HEADER_CAPTION, WIDTH, TYPE_ID, ADDED_WHO, ADDED_WHEN, CHANGED_WHO, CHANGED_WHEN, VISIBLE, EDITABLE, CONFIG_COLUMNS, SEQUENCE, Original_GUID, Original_ENTITY_ID, Original_LANGUAGE, Original_COLUMN_VIEW, Original_HEADER_CAPTION, Original_WIDTH, Original_TYPE_ID, Original_ADDED_WHO, Original_ADDED_WHEN, Original_CHANGED_WHO, Original_CHANGED_WHEN, Original_VISIBLE, Original_EDITABLE, Original_CONFIG_COLUMNS, Original_SEQUENCE, Original_GUID)
|
||||
End Function
|
||||
End Class
|
||||
|
||||
|
||||
Reference in New Issue
Block a user