MS1
This commit is contained in:
SchreiberM
79
app/DD-Record-Organiser/DD_ECMAdmin.Designer.vb
generated
79
app/DD-Record-Organiser/DD_ECMAdmin.Designer.vb
generated
@@ -1038,6 +1038,8 @@ Partial Public Class DD_ECMAdmin
|
||||
|
||||
Private columnSQL_RIGHT_READ_AND_VIEW_ONLY As Global.System.Data.DataColumn
|
||||
|
||||
Private columnSQL_RIGHT_WINDREAM_VIEW 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()
|
||||
@@ -1265,6 +1267,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 SQL_RIGHT_WINDREAM_VIEWColumn() As Global.System.Data.DataColumn
|
||||
Get
|
||||
Return Me.columnSQL_RIGHT_WINDREAM_VIEW
|
||||
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)> _
|
||||
@@ -1325,9 +1335,10 @@ Partial Public Class DD_ECMAdmin
|
||||
ByVal LOAD_DIRECT As Boolean, _
|
||||
ByVal SQL_QUICK_VIEW As String, _
|
||||
ByVal CONTROL_DOCTYPE_MATCH As Integer, _
|
||||
ByVal SQL_RIGHT_READ_AND_VIEW_ONLY As String) As TBPMO_FORM_CONSTRUCTOR_DETAILRow
|
||||
ByVal SQL_RIGHT_READ_AND_VIEW_ONLY As String, _
|
||||
ByVal SQL_RIGHT_WINDREAM_VIEW As String) As TBPMO_FORM_CONSTRUCTOR_DETAILRow
|
||||
Dim rowTBPMO_FORM_CONSTRUCTOR_DETAILRow As TBPMO_FORM_CONSTRUCTOR_DETAILRow = CType(Me.NewRow, TBPMO_FORM_CONSTRUCTOR_DETAILRow)
|
||||
Dim columnValuesArray() As Object = New Object() {Nothing, Nothing, FORM_ID, PARENT_ID, LEVEL1_SELECT, SEQUENCE, SQL_SELECT_EBENE1, SQL_SELECT_EBENE2, ADDED_WHO, ADDED_WHEN, CHANGED_WHO, CHANGED_WHEN, COLUMN_NAME1, COLUMN_NAME2, WINDREAM_SEARCH, SEARCH_PATTERN1, SEARCH_PATTERN2, SEARCH_PATTERN3, SEARCH_PATTERN4, SEARCH_PATTERN5, LOAD_DIRECT, SQL_QUICK_VIEW, CONTROL_DOCTYPE_MATCH, SQL_RIGHT_READ_AND_VIEW_ONLY}
|
||||
Dim columnValuesArray() As Object = New Object() {Nothing, Nothing, FORM_ID, PARENT_ID, LEVEL1_SELECT, SEQUENCE, SQL_SELECT_EBENE1, SQL_SELECT_EBENE2, ADDED_WHO, ADDED_WHEN, CHANGED_WHO, CHANGED_WHEN, COLUMN_NAME1, COLUMN_NAME2, WINDREAM_SEARCH, SEARCH_PATTERN1, SEARCH_PATTERN2, SEARCH_PATTERN3, SEARCH_PATTERN4, SEARCH_PATTERN5, LOAD_DIRECT, SQL_QUICK_VIEW, CONTROL_DOCTYPE_MATCH, SQL_RIGHT_READ_AND_VIEW_ONLY, SQL_RIGHT_WINDREAM_VIEW}
|
||||
If (Not (parentTBPMO_FORM_CONSTRUCTORRowByFK_TBPMO_FORM_CONSTRUCTOR_DETAIL_CONSTRUCT_ID) Is Nothing) Then
|
||||
columnValuesArray(1) = parentTBPMO_FORM_CONSTRUCTORRowByFK_TBPMO_FORM_CONSTRUCTOR_DETAIL_CONSTRUCT_ID(0)
|
||||
End If
|
||||
@@ -1383,6 +1394,7 @@ Partial Public Class DD_ECMAdmin
|
||||
Me.columnSQL_QUICK_VIEW = MyBase.Columns("SQL_QUICK_VIEW")
|
||||
Me.columnCONTROL_DOCTYPE_MATCH = MyBase.Columns("CONTROL_DOCTYPE_MATCH")
|
||||
Me.columnSQL_RIGHT_READ_AND_VIEW_ONLY = MyBase.Columns("SQL_RIGHT_READ_AND_VIEW_ONLY")
|
||||
Me.columnSQL_RIGHT_WINDREAM_VIEW = MyBase.Columns("SQL_RIGHT_WINDREAM_VIEW")
|
||||
End Sub
|
||||
|
||||
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
@@ -1436,6 +1448,8 @@ Partial Public Class DD_ECMAdmin
|
||||
MyBase.Columns.Add(Me.columnCONTROL_DOCTYPE_MATCH)
|
||||
Me.columnSQL_RIGHT_READ_AND_VIEW_ONLY = New Global.System.Data.DataColumn("SQL_RIGHT_READ_AND_VIEW_ONLY", GetType(String), Nothing, Global.System.Data.MappingType.Element)
|
||||
MyBase.Columns.Add(Me.columnSQL_RIGHT_READ_AND_VIEW_ONLY)
|
||||
Me.columnSQL_RIGHT_WINDREAM_VIEW = New Global.System.Data.DataColumn("SQL_RIGHT_WINDREAM_VIEW", GetType(String), Nothing, Global.System.Data.MappingType.Element)
|
||||
MyBase.Columns.Add(Me.columnSQL_RIGHT_WINDREAM_VIEW)
|
||||
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
|
||||
@@ -1468,6 +1482,8 @@ Partial Public Class DD_ECMAdmin
|
||||
Me.columnCONTROL_DOCTYPE_MATCH.DefaultValue = CType(0, Integer)
|
||||
Me.columnSQL_RIGHT_READ_AND_VIEW_ONLY.AllowDBNull = False
|
||||
Me.columnSQL_RIGHT_READ_AND_VIEW_ONLY.MaxLength = 5000
|
||||
Me.columnSQL_RIGHT_WINDREAM_VIEW.AllowDBNull = False
|
||||
Me.columnSQL_RIGHT_WINDREAM_VIEW.MaxLength = 5000
|
||||
End Sub
|
||||
|
||||
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
@@ -4723,6 +4739,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 SQL_RIGHT_WINDREAM_VIEW() As String
|
||||
Get
|
||||
Return CType(Me(Me.tableTBPMO_FORM_CONSTRUCTOR_DETAIL.SQL_RIGHT_WINDREAM_VIEWColumn), String)
|
||||
End Get
|
||||
Set(value As String)
|
||||
Me(Me.tableTBPMO_FORM_CONSTRUCTOR_DETAIL.SQL_RIGHT_WINDREAM_VIEWColumn) = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "4.0.0.0")> _
|
||||
Public Property TBPMO_FORM_CONSTRUCTORRow() As TBPMO_FORM_CONSTRUCTORRow
|
||||
@@ -6911,6 +6938,7 @@ Namespace DD_ECMAdminTableAdapters
|
||||
tableMapping.ColumnMappings.Add("SQL_QUICK_VIEW", "SQL_QUICK_VIEW")
|
||||
tableMapping.ColumnMappings.Add("CONTROL_DOCTYPE_MATCH", "CONTROL_DOCTYPE_MATCH")
|
||||
tableMapping.ColumnMappings.Add("SQL_RIGHT_READ_AND_VIEW_ONLY", "SQL_RIGHT_READ_AND_VIEW_ONLY")
|
||||
tableMapping.ColumnMappings.Add("SQL_RIGHT_WINDREAM_VIEW", "SQL_RIGHT_WINDREAM_VIEW")
|
||||
Me._adapter.TableMappings.Add(tableMapping)
|
||||
Me._adapter.DeleteCommand = New Global.System.Data.SqlClient.SqlCommand()
|
||||
Me._adapter.DeleteCommand.Connection = Me.Connection
|
||||
@@ -6923,16 +6951,16 @@ Namespace DD_ECMAdminTableAdapters
|
||||
", FORM_ID, PARENT_ID, LEVEL1_SELECT, SEQUENCE, SQL_SELECT_EBENE1, SQL_SELECT_EBE" & _
|
||||
"NE2, ADDED_WHO, COLUMN_NAME1, COLUMN_NAME2, WINDREAM_SEARCH, " & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & " " & _
|
||||
" SEARCH_PATTERN1, SEARCH_PATTERN2, SEARCH_PATTERN3, SEARCH_PATTERN4, SEAR" & _
|
||||
"CH_PATTERN5, CONTROL_DOCTYPE_MATCH, SQL_RIGHT_READ_AND_VIEW_ONLY)" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "VALUES " & _
|
||||
" (@CONSTRUCT_ID,@FORM_ID,@PARENT_ID,@LEVEL1_SELECT,@SEQUENCE,@SQL_SELECT_EBENE1," & _
|
||||
"@SQL_SELECT_EBENE2,@ADDED_WHO,@COLUMN_NAME1,@COLUMN_NAME2,@WINDREAM_SEARCH,@SEAR" & _
|
||||
"CH_PATTERN1,@SEARCH_PATTERN2,@SEARCH_PATTERN3,@SEARCH_PATTERN4,@SEARCH_PATTERN5," & _
|
||||
"@CONTROL_DOCTYPE_MATCH,@SQL_RIGHT_READ_AND_VIEW_ONLY); " & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "SELECT GUID, CONSTRUC" & _
|
||||
"T_ID, FORM_ID, PARENT_ID, LEVEL1_SELECT, SEQUENCE, SQL_SELECT_EBENE1, SQL_SELECT" & _
|
||||
"_EBENE2, ADDED_WHO, ADDED_WHEN, CHANGED_WHO, CHANGED_WHEN, COLUMN_NAME1, COLUMN_" & _
|
||||
"NAME2, WINDREAM_SEARCH, SEARCH_PATTERN1, SEARCH_PATTERN2, SEARCH_PATTERN3, SEARC" & _
|
||||
"H_PATTERN4, SEARCH_PATTERN5 FROM TBPMO_FORM_CONSTRUCTOR_DETAIL WHERE (GUID = SCO" & _
|
||||
"PE_IDENTITY())"
|
||||
"CH_PATTERN5, CONTROL_DOCTYPE_MATCH, SQL_RIGHT_READ_AND_VIEW_ONLY, SQL_RIGHT_WIND" & _
|
||||
"REAM_VIEW)" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "VALUES (@CONSTRUCT_ID,@FORM_ID,@PARENT_ID,@LEVEL1_SELECT,@SEQ" & _
|
||||
"UENCE,@SQL_SELECT_EBENE1,@SQL_SELECT_EBENE2,@ADDED_WHO,@COLUMN_NAME1,@COLUMN_NAM" & _
|
||||
"E2,@WINDREAM_SEARCH,@SEARCH_PATTERN1,@SEARCH_PATTERN2,@SEARCH_PATTERN3,@SEARCH_P" & _
|
||||
"ATTERN4,@SEARCH_PATTERN5,@CONTROL_DOCTYPE_MATCH,@SQL_RIGHT_READ_AND_VIEW_ONLY,@S" & _
|
||||
"QL_RIGHT_WINDREAM_VIEW); " & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "SELECT GUID, CONSTRUCT_ID, FORM_ID, PARENT_ID, LEV" & _
|
||||
"EL1_SELECT, SEQUENCE, SQL_SELECT_EBENE1, SQL_SELECT_EBENE2, ADDED_WHO, ADDED_WHE" & _
|
||||
"N, CHANGED_WHO, CHANGED_WHEN, COLUMN_NAME1, COLUMN_NAME2, WINDREAM_SEARCH, SEARC" & _
|
||||
"H_PATTERN1, SEARCH_PATTERN2, SEARCH_PATTERN3, SEARCH_PATTERN4, SEARCH_PATTERN5 F" & _
|
||||
"ROM TBPMO_FORM_CONSTRUCTOR_DETAIL WHERE (GUID = SCOPE_IDENTITY())"
|
||||
Me._adapter.InsertCommand.CommandType = Global.System.Data.CommandType.Text
|
||||
Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@CONSTRUCT_ID", Global.System.Data.SqlDbType.Int, 4, Global.System.Data.ParameterDirection.Input, 0, 0, "CONSTRUCT_ID", Global.System.Data.DataRowVersion.Current, False, Nothing, "", "", ""))
|
||||
Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@FORM_ID", Global.System.Data.SqlDbType.Int, 4, Global.System.Data.ParameterDirection.Input, 0, 0, "FORM_ID", Global.System.Data.DataRowVersion.Current, False, Nothing, "", "", ""))
|
||||
@@ -6952,6 +6980,7 @@ Namespace DD_ECMAdminTableAdapters
|
||||
Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@SEARCH_PATTERN5", Global.System.Data.SqlDbType.VarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "SEARCH_PATTERN5", Global.System.Data.DataRowVersion.Current, False, Nothing, "", "", ""))
|
||||
Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@CONTROL_DOCTYPE_MATCH", Global.System.Data.SqlDbType.Int, 4, Global.System.Data.ParameterDirection.Input, 0, 0, "CONTROL_DOCTYPE_MATCH", Global.System.Data.DataRowVersion.Current, False, Nothing, "", "", ""))
|
||||
Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@SQL_RIGHT_READ_AND_VIEW_ONLY", Global.System.Data.SqlDbType.VarChar, 5000, Global.System.Data.ParameterDirection.Input, 0, 0, "SQL_RIGHT_READ_AND_VIEW_ONLY", Global.System.Data.DataRowVersion.Current, False, Nothing, "", "", ""))
|
||||
Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@SQL_RIGHT_WINDREAM_VIEW", Global.System.Data.SqlDbType.VarChar, 5000, Global.System.Data.ParameterDirection.Input, 0, 0, "SQL_RIGHT_WINDREAM_VIEW", 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_FORM_CONSTRUCTOR_DETAIL" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "SET CONSTRUCT_ID = @CO" & _
|
||||
@@ -6964,7 +6993,8 @@ Namespace DD_ECMAdminTableAdapters
|
||||
"N3 = @SEARCH_PATTERN3, SEARCH_PATTERN4 = @SEARCH_PATTERN4, SEARCH_PATTERN5 = @SE" & _
|
||||
"ARCH_PATTERN5, LOAD_DIRECT = @LOAD_DIRECT, " & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & " CONTROL_DO" & _
|
||||
"CTYPE_MATCH = @CONTROL_DOCTYPE_MATCH, SQL_RIGHT_READ_AND_VIEW_ONLY = @SQL_RIGHT_" & _
|
||||
"READ_AND_VIEW_ONLY" & 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, CONS" & _
|
||||
"READ_AND_VIEW_ONLY, " & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & " SQL_RIGHT_WINDREAM_VIEW = @SQL_RI" & _
|
||||
"GHT_WINDREAM_VIEW" & 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, CONS" & _
|
||||
"TRUCT_ID, FORM_ID, PARENT_ID, LEVEL1_SELECT, SEQUENCE, SQL_SELECT_EBENE1, SQL_SE" & _
|
||||
"LECT_EBENE2, ADDED_WHO, ADDED_WHEN, CHANGED_WHO, CHANGED_WHEN, COLUMN_NAME1, COL" & _
|
||||
"UMN_NAME2, WINDREAM_SEARCH, SEARCH_PATTERN1, SEARCH_PATTERN2, SEARCH_PATTERN3, S" & _
|
||||
@@ -6990,6 +7020,7 @@ Namespace DD_ECMAdminTableAdapters
|
||||
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@LOAD_DIRECT", Global.System.Data.SqlDbType.Bit, 1, Global.System.Data.ParameterDirection.Input, 0, 0, "LOAD_DIRECT", Global.System.Data.DataRowVersion.Current, False, Nothing, "", "", ""))
|
||||
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@CONTROL_DOCTYPE_MATCH", Global.System.Data.SqlDbType.Int, 4, Global.System.Data.ParameterDirection.Input, 0, 0, "CONTROL_DOCTYPE_MATCH", Global.System.Data.DataRowVersion.Current, False, Nothing, "", "", ""))
|
||||
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@SQL_RIGHT_READ_AND_VIEW_ONLY", Global.System.Data.SqlDbType.VarChar, 5000, Global.System.Data.ParameterDirection.Input, 0, 0, "SQL_RIGHT_READ_AND_VIEW_ONLY", Global.System.Data.DataRowVersion.Current, False, Nothing, "", "", ""))
|
||||
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@SQL_RIGHT_WINDREAM_VIEW", Global.System.Data.SqlDbType.VarChar, 5000, Global.System.Data.ParameterDirection.Input, 0, 0, "SQL_RIGHT_WINDREAM_VIEW", 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
|
||||
@@ -7012,8 +7043,8 @@ Namespace DD_ECMAdminTableAdapters
|
||||
"WHEN, " & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & " COLUMN_NAME1, COLUMN_NAME2, WINDREAM_SEARCH, SE" & _
|
||||
"ARCH_PATTERN1, SEARCH_PATTERN2, SEARCH_PATTERN3, SEARCH_PATTERN4, SEARCH_PATTERN" & _
|
||||
"5, LOAD_DIRECT, SQL_QUICK_VIEW, " & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & " CONTROL_DOCTYPE_MATCH" & _
|
||||
", SQL_RIGHT_READ_AND_VIEW_ONLY" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "FROM TBPMO_FORM_CONSTRUCTOR_DETAIL" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "W" & _
|
||||
"HERE (GUID = @ID)"
|
||||
", SQL_RIGHT_READ_AND_VIEW_ONLY, SQL_RIGHT_WINDREAM_VIEW" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "FROM TBPMO_F" & _
|
||||
"ORM_CONSTRUCTOR_DETAIL" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "WHERE (GUID = @ID)"
|
||||
Me._commandCollection(0).CommandType = Global.System.Data.CommandType.Text
|
||||
Me._commandCollection(0).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@ID", Global.System.Data.SqlDbType.Int, 4, Global.System.Data.ParameterDirection.Input, 0, 0, "GUID", Global.System.Data.DataRowVersion.Current, False, Nothing, "", "", ""))
|
||||
End Sub
|
||||
@@ -7115,7 +7146,8 @@ Namespace DD_ECMAdminTableAdapters
|
||||
ByVal SEARCH_PATTERN4 As String, _
|
||||
ByVal SEARCH_PATTERN5 As String, _
|
||||
ByVal CONTROL_DOCTYPE_MATCH As Integer, _
|
||||
ByVal SQL_RIGHT_READ_AND_VIEW_ONLY As String) As Integer
|
||||
ByVal SQL_RIGHT_READ_AND_VIEW_ONLY As String, _
|
||||
ByVal SQL_RIGHT_WINDREAM_VIEW As String) As Integer
|
||||
Me.Adapter.InsertCommand.Parameters(0).Value = CType(CONSTRUCT_ID, Integer)
|
||||
Me.Adapter.InsertCommand.Parameters(1).Value = CType(FORM_ID, Integer)
|
||||
Me.Adapter.InsertCommand.Parameters(2).Value = CType(PARENT_ID, Integer)
|
||||
@@ -7182,6 +7214,11 @@ Namespace DD_ECMAdminTableAdapters
|
||||
Else
|
||||
Me.Adapter.InsertCommand.Parameters(17).Value = CType(SQL_RIGHT_READ_AND_VIEW_ONLY, String)
|
||||
End If
|
||||
If (SQL_RIGHT_WINDREAM_VIEW Is Nothing) Then
|
||||
Throw New Global.System.ArgumentNullException("SQL_RIGHT_WINDREAM_VIEW")
|
||||
Else
|
||||
Me.Adapter.InsertCommand.Parameters(18).Value = CType(SQL_RIGHT_WINDREAM_VIEW, String)
|
||||
End If
|
||||
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
|
||||
@@ -7221,6 +7258,7 @@ Namespace DD_ECMAdminTableAdapters
|
||||
ByVal LOAD_DIRECT As Boolean, _
|
||||
ByVal CONTROL_DOCTYPE_MATCH As Integer, _
|
||||
ByVal SQL_RIGHT_READ_AND_VIEW_ONLY As String, _
|
||||
ByVal SQL_RIGHT_WINDREAM_VIEW As String, _
|
||||
ByVal Original_GUID As Integer, _
|
||||
ByVal GUID As Integer) As Integer
|
||||
Me.Adapter.UpdateCommand.Parameters(0).Value = CType(CONSTRUCT_ID, Integer)
|
||||
@@ -7290,8 +7328,13 @@ Namespace DD_ECMAdminTableAdapters
|
||||
Else
|
||||
Me.Adapter.UpdateCommand.Parameters(18).Value = CType(SQL_RIGHT_READ_AND_VIEW_ONLY, String)
|
||||
End If
|
||||
Me.Adapter.UpdateCommand.Parameters(19).Value = CType(Original_GUID, Integer)
|
||||
Me.Adapter.UpdateCommand.Parameters(20).Value = CType(GUID, Integer)
|
||||
If (SQL_RIGHT_WINDREAM_VIEW Is Nothing) Then
|
||||
Throw New Global.System.ArgumentNullException("SQL_RIGHT_WINDREAM_VIEW")
|
||||
Else
|
||||
Me.Adapter.UpdateCommand.Parameters(19).Value = CType(SQL_RIGHT_WINDREAM_VIEW, String)
|
||||
End If
|
||||
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
|
||||
|
||||
Reference in New Issue
Block a user