MS Changes layout Force etc
This commit is contained in:
373
app/DD_PM_WINDREAM/DD_DMSLiteDataSet.Designer.vb
generated
373
app/DD_PM_WINDREAM/DD_DMSLiteDataSet.Designer.vb
generated
@@ -890,6 +890,8 @@ Partial Public Class DD_DMSLiteDataSet
|
||||
|
||||
Private columnACTIVE As Global.System.Data.DataColumn
|
||||
|
||||
Private columnIF_VEKTOR_BEHAVIOUR As Global.System.Data.DataColumn
|
||||
|
||||
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "15.0.0.0")> _
|
||||
Public Sub New()
|
||||
@@ -1013,6 +1015,14 @@ Partial Public Class DD_DMSLiteDataSet
|
||||
End Get
|
||||
End Property
|
||||
|
||||
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "15.0.0.0")> _
|
||||
Public ReadOnly Property IF_VEKTOR_BEHAVIOURColumn() As Global.System.Data.DataColumn
|
||||
Get
|
||||
Return Me.columnIF_VEKTOR_BEHAVIOUR
|
||||
End Get
|
||||
End Property
|
||||
|
||||
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "15.0.0.0"), _
|
||||
Global.System.ComponentModel.Browsable(false)> _
|
||||
@@ -1050,9 +1060,9 @@ Partial Public Class DD_DMSLiteDataSet
|
||||
|
||||
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "15.0.0.0")> _
|
||||
Public Overloads Function AddTBPM_PROFILE_FINAL_INDEXINGRow(ByVal INDEXNAME As String, ByVal VALUE As String, ByVal ADDED_WHO As String, ByVal ADDED_WHEN As Date, ByVal CHANGED_WHO As String, ByVal CHANGED_WHEN As Date, ByVal CONNECTION_ID As Short, ByVal SQL_COMMAND As String, ByVal DESCRIPTION As String, ByVal ACTIVE As Boolean) As TBPM_PROFILE_FINAL_INDEXINGRow
|
||||
Public Overloads Function AddTBPM_PROFILE_FINAL_INDEXINGRow(ByVal INDEXNAME As String, ByVal VALUE As String, ByVal ADDED_WHO As String, ByVal ADDED_WHEN As Date, ByVal CHANGED_WHO As String, ByVal CHANGED_WHEN As Date, ByVal CONNECTION_ID As Short, ByVal SQL_COMMAND As String, ByVal DESCRIPTION As String, ByVal ACTIVE As Boolean, ByVal IF_VEKTOR_BEHAVIOUR As String) As TBPM_PROFILE_FINAL_INDEXINGRow
|
||||
Dim rowTBPM_PROFILE_FINAL_INDEXINGRow As TBPM_PROFILE_FINAL_INDEXINGRow = CType(Me.NewRow,TBPM_PROFILE_FINAL_INDEXINGRow)
|
||||
Dim columnValuesArray() As Object = New Object() {INDEXNAME, VALUE, ADDED_WHO, ADDED_WHEN, CHANGED_WHO, CHANGED_WHEN, Nothing, CONNECTION_ID, SQL_COMMAND, DESCRIPTION, ACTIVE}
|
||||
Dim columnValuesArray() As Object = New Object() {INDEXNAME, VALUE, ADDED_WHO, ADDED_WHEN, CHANGED_WHO, CHANGED_WHEN, Nothing, CONNECTION_ID, SQL_COMMAND, DESCRIPTION, ACTIVE, IF_VEKTOR_BEHAVIOUR}
|
||||
rowTBPM_PROFILE_FINAL_INDEXINGRow.ItemArray = columnValuesArray
|
||||
Me.Rows.Add(rowTBPM_PROFILE_FINAL_INDEXINGRow)
|
||||
Return rowTBPM_PROFILE_FINAL_INDEXINGRow
|
||||
@@ -1092,6 +1102,7 @@ Partial Public Class DD_DMSLiteDataSet
|
||||
Me.columnSQL_COMMAND = MyBase.Columns("SQL_COMMAND")
|
||||
Me.columnDESCRIPTION = MyBase.Columns("DESCRIPTION")
|
||||
Me.columnACTIVE = MyBase.Columns("ACTIVE")
|
||||
Me.columnIF_VEKTOR_BEHAVIOUR = MyBase.Columns("IF_VEKTOR_BEHAVIOUR")
|
||||
End Sub
|
||||
|
||||
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
@@ -1119,6 +1130,8 @@ Partial Public Class DD_DMSLiteDataSet
|
||||
MyBase.Columns.Add(Me.columnDESCRIPTION)
|
||||
Me.columnACTIVE = New Global.System.Data.DataColumn("ACTIVE", GetType(Boolean), Nothing, Global.System.Data.MappingType.Element)
|
||||
MyBase.Columns.Add(Me.columnACTIVE)
|
||||
Me.columnIF_VEKTOR_BEHAVIOUR = New Global.System.Data.DataColumn("IF_VEKTOR_BEHAVIOUR", GetType(String), Nothing, Global.System.Data.MappingType.Element)
|
||||
MyBase.Columns.Add(Me.columnIF_VEKTOR_BEHAVIOUR)
|
||||
Me.Constraints.Add(New Global.System.Data.UniqueConstraint("Constraint1", New Global.System.Data.DataColumn() {Me.columnGUID}, true))
|
||||
Me.columnINDEXNAME.AllowDBNull = false
|
||||
Me.columnINDEXNAME.MaxLength = 100
|
||||
@@ -1140,7 +1153,11 @@ Partial Public Class DD_DMSLiteDataSet
|
||||
Me.columnDESCRIPTION.AllowDBNull = false
|
||||
Me.columnDESCRIPTION.DefaultValue = CType("",String)
|
||||
Me.columnDESCRIPTION.MaxLength = 2147483647
|
||||
Me.columnACTIVE.AllowDBNull = false
|
||||
Me.columnACTIVE.DefaultValue = CType(true,Boolean)
|
||||
Me.columnIF_VEKTOR_BEHAVIOUR.AllowDBNull = false
|
||||
Me.columnIF_VEKTOR_BEHAVIOUR.DefaultValue = CType("",String)
|
||||
Me.columnIF_VEKTOR_BEHAVIOUR.MaxLength = 25
|
||||
End Sub
|
||||
|
||||
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
@@ -4638,6 +4655,8 @@ Partial Public Class DD_DMSLiteDataSet
|
||||
|
||||
Private columnWORK_HISTORY_ENTRY As Global.System.Data.DataColumn
|
||||
|
||||
Private columnDISPLAY_MODE As Global.System.Data.DataColumn
|
||||
|
||||
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "15.0.0.0")> _
|
||||
Public Sub New()
|
||||
@@ -4865,6 +4884,14 @@ Partial Public Class DD_DMSLiteDataSet
|
||||
End Get
|
||||
End Property
|
||||
|
||||
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "15.0.0.0")> _
|
||||
Public ReadOnly Property DISPLAY_MODEColumn() As Global.System.Data.DataColumn
|
||||
Get
|
||||
Return Me.columnDISPLAY_MODE
|
||||
End Get
|
||||
End Property
|
||||
|
||||
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "15.0.0.0"), _
|
||||
Global.System.ComponentModel.Browsable(false)> _
|
||||
@@ -4925,9 +4952,10 @@ Partial Public Class DD_DMSLiteDataSet
|
||||
ByVal SQL_VIEW As String, _
|
||||
ByVal ANNOTATE_ALL_WORK_HISTORY_ENTRIES As Boolean, _
|
||||
ByVal ANNOTATE_WORK_HISTORY_ENTRY As Boolean, _
|
||||
ByVal WORK_HISTORY_ENTRY As String) As TBPM_PROFILERow
|
||||
ByVal WORK_HISTORY_ENTRY As String, _
|
||||
ByVal DISPLAY_MODE As String) As TBPM_PROFILERow
|
||||
Dim rowTBPM_PROFILERow As TBPM_PROFILERow = CType(Me.NewRow,TBPM_PROFILERow)
|
||||
Dim columnValuesArray() As Object = New Object() {Nothing, NAME, TITLE, PRIORITY, DESCRIPTION, ACTIVE, WD_SEARCH, NO_OF_DOCUMENTS, ADDED_WHO, ADDED_WHEN, CHANGED_WHO, CHANGED_WHEN, FINAL_PROFILE, FINAL_TEXT, MOVE2FOLDER, Nothing, WD_OBJECTTYPE, SORT_BY_LATEST, PM_VEKTOR_INDEX, LOG_INDEX, SQL_VIEW, ANNOTATE_ALL_WORK_HISTORY_ENTRIES, ANNOTATE_WORK_HISTORY_ENTRY, WORK_HISTORY_ENTRY}
|
||||
Dim columnValuesArray() As Object = New Object() {Nothing, NAME, TITLE, PRIORITY, DESCRIPTION, ACTIVE, WD_SEARCH, NO_OF_DOCUMENTS, ADDED_WHO, ADDED_WHEN, CHANGED_WHO, CHANGED_WHEN, FINAL_PROFILE, FINAL_TEXT, MOVE2FOLDER, Nothing, WD_OBJECTTYPE, SORT_BY_LATEST, PM_VEKTOR_INDEX, LOG_INDEX, SQL_VIEW, ANNOTATE_ALL_WORK_HISTORY_ENTRIES, ANNOTATE_WORK_HISTORY_ENTRY, WORK_HISTORY_ENTRY, DISPLAY_MODE}
|
||||
If (Not (parentTBPM_TYPERowByFK_TBPM_PROFILE_TYPE1) Is Nothing) Then
|
||||
columnValuesArray(15) = parentTBPM_TYPERowByFK_TBPM_PROFILE_TYPE1(0)
|
||||
End If
|
||||
@@ -4983,6 +5011,7 @@ Partial Public Class DD_DMSLiteDataSet
|
||||
Me.columnANNOTATE_ALL_WORK_HISTORY_ENTRIES = MyBase.Columns("ANNOTATE_ALL_WORK_HISTORY_ENTRIES")
|
||||
Me.columnANNOTATE_WORK_HISTORY_ENTRY = MyBase.Columns("ANNOTATE_WORK_HISTORY_ENTRY")
|
||||
Me.columnWORK_HISTORY_ENTRY = MyBase.Columns("WORK_HISTORY_ENTRY")
|
||||
Me.columnDISPLAY_MODE = MyBase.Columns("DISPLAY_MODE")
|
||||
End Sub
|
||||
|
||||
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
@@ -5036,6 +5065,8 @@ Partial Public Class DD_DMSLiteDataSet
|
||||
MyBase.Columns.Add(Me.columnANNOTATE_WORK_HISTORY_ENTRY)
|
||||
Me.columnWORK_HISTORY_ENTRY = New Global.System.Data.DataColumn("WORK_HISTORY_ENTRY", GetType(String), Nothing, Global.System.Data.MappingType.Element)
|
||||
MyBase.Columns.Add(Me.columnWORK_HISTORY_ENTRY)
|
||||
Me.columnDISPLAY_MODE = New Global.System.Data.DataColumn("DISPLAY_MODE", GetType(String), Nothing, Global.System.Data.MappingType.Element)
|
||||
MyBase.Columns.Add(Me.columnDISPLAY_MODE)
|
||||
Me.Constraints.Add(New Global.System.Data.UniqueConstraint("Constraint1", New Global.System.Data.DataColumn() {Me.columnGUID}, true))
|
||||
Me.Constraints.Add(New Global.System.Data.UniqueConstraint("Constraint2", New Global.System.Data.DataColumn() {Me.columnNAME}, false))
|
||||
Me.Constraints.Add(New Global.System.Data.UniqueConstraint("Constraint3", New Global.System.Data.DataColumn() {Me.columnTITLE}, false))
|
||||
@@ -5061,6 +5092,7 @@ Partial Public Class DD_DMSLiteDataSet
|
||||
Me.columnNO_OF_DOCUMENTS.DefaultValue = CType(0,Integer)
|
||||
Me.columnADDED_WHO.AllowDBNull = false
|
||||
Me.columnADDED_WHO.MaxLength = 30
|
||||
Me.columnADDED_WHEN.AllowDBNull = false
|
||||
Me.columnCHANGED_WHO.MaxLength = 30
|
||||
Me.columnFINAL_PROFILE.AllowDBNull = false
|
||||
Me.columnFINAL_PROFILE.DefaultValue = CType(false,Boolean)
|
||||
@@ -5086,6 +5118,9 @@ Partial Public Class DD_DMSLiteDataSet
|
||||
Me.columnANNOTATE_WORK_HISTORY_ENTRY.AllowDBNull = false
|
||||
Me.columnANNOTATE_WORK_HISTORY_ENTRY.DefaultValue = CType(false,Boolean)
|
||||
Me.columnWORK_HISTORY_ENTRY.MaxLength = 500
|
||||
Me.columnDISPLAY_MODE.AllowDBNull = false
|
||||
Me.columnDISPLAY_MODE.DefaultValue = CType("Overview and Detail",String)
|
||||
Me.columnDISPLAY_MODE.MaxLength = 20
|
||||
End Sub
|
||||
|
||||
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
@@ -8557,17 +8592,24 @@ Partial Public Class DD_DMSLiteDataSet
|
||||
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "15.0.0.0")> _
|
||||
Public Property ACTIVE() As Boolean
|
||||
Get
|
||||
Try
|
||||
Return CType(Me(Me.tableTBPM_PROFILE_FINAL_INDEXING.ACTIVEColumn),Boolean)
|
||||
Catch e As Global.System.InvalidCastException
|
||||
Throw New Global.System.Data.StrongTypingException("Der Wert für Spalte ACTIVE in Tabelle TBPM_PROFILE_FINAL_INDEXING ist DBNull.", e)
|
||||
End Try
|
||||
Return CType(Me(Me.tableTBPM_PROFILE_FINAL_INDEXING.ACTIVEColumn),Boolean)
|
||||
End Get
|
||||
Set
|
||||
Me(Me.tableTBPM_PROFILE_FINAL_INDEXING.ACTIVEColumn) = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "15.0.0.0")> _
|
||||
Public Property IF_VEKTOR_BEHAVIOUR() As String
|
||||
Get
|
||||
Return CType(Me(Me.tableTBPM_PROFILE_FINAL_INDEXING.IF_VEKTOR_BEHAVIOURColumn),String)
|
||||
End Get
|
||||
Set
|
||||
Me(Me.tableTBPM_PROFILE_FINAL_INDEXING.IF_VEKTOR_BEHAVIOURColumn) = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "15.0.0.0")> _
|
||||
Public Function IsCHANGED_WHONull() As Boolean
|
||||
@@ -8591,18 +8633,6 @@ Partial Public Class DD_DMSLiteDataSet
|
||||
Public Sub SetCHANGED_WHENNull()
|
||||
Me(Me.tableTBPM_PROFILE_FINAL_INDEXING.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 IsACTIVENull() As Boolean
|
||||
Return Me.IsNull(Me.tableTBPM_PROFILE_FINAL_INDEXING.ACTIVEColumn)
|
||||
End Function
|
||||
|
||||
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "15.0.0.0")> _
|
||||
Public Sub SetACTIVENull()
|
||||
Me(Me.tableTBPM_PROFILE_FINAL_INDEXING.ACTIVEColumn) = Global.System.Convert.DBNull
|
||||
End Sub
|
||||
End Class
|
||||
|
||||
'''<summary>
|
||||
@@ -10620,11 +10650,7 @@ Partial Public Class DD_DMSLiteDataSet
|
||||
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "15.0.0.0")> _
|
||||
Public Property ADDED_WHEN() As Date
|
||||
Get
|
||||
Try
|
||||
Return CType(Me(Me.tableTBPM_PROFILE.ADDED_WHENColumn),Date)
|
||||
Catch e As Global.System.InvalidCastException
|
||||
Throw New Global.System.Data.StrongTypingException("Der Wert für Spalte ADDED_WHEN in Tabelle TBPM_PROFILE ist DBNull.", e)
|
||||
End Try
|
||||
Return CType(Me(Me.tableTBPM_PROFILE.ADDED_WHENColumn),Date)
|
||||
End Get
|
||||
Set
|
||||
Me(Me.tableTBPM_PROFILE.ADDED_WHENColumn) = value
|
||||
@@ -10805,6 +10831,17 @@ Partial Public Class DD_DMSLiteDataSet
|
||||
End Set
|
||||
End Property
|
||||
|
||||
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "15.0.0.0")> _
|
||||
Public Property DISPLAY_MODE() As String
|
||||
Get
|
||||
Return CType(Me(Me.tableTBPM_PROFILE.DISPLAY_MODEColumn),String)
|
||||
End Get
|
||||
Set
|
||||
Me(Me.tableTBPM_PROFILE.DISPLAY_MODEColumn) = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "15.0.0.0")> _
|
||||
Public Property TBPM_TYPERow() As TBPM_TYPERow
|
||||
@@ -10828,18 +10865,6 @@ Partial Public Class DD_DMSLiteDataSet
|
||||
Me(Me.tableTBPM_PROFILE.DESCRIPTIONColumn) = 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 IsADDED_WHENNull() As Boolean
|
||||
Return Me.IsNull(Me.tableTBPM_PROFILE.ADDED_WHENColumn)
|
||||
End Function
|
||||
|
||||
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "15.0.0.0")> _
|
||||
Public Sub SetADDED_WHENNull()
|
||||
Me(Me.tableTBPM_PROFILE.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 IsCHANGED_WHONull() As Boolean
|
||||
@@ -13784,6 +13809,7 @@ Namespace DD_DMSLiteDataSetTableAdapters
|
||||
tableMapping.ColumnMappings.Add("SQL_COMMAND", "SQL_COMMAND")
|
||||
tableMapping.ColumnMappings.Add("DESCRIPTION", "DESCRIPTION")
|
||||
tableMapping.ColumnMappings.Add("ACTIVE", "ACTIVE")
|
||||
tableMapping.ColumnMappings.Add("IF_VEKTOR_BEHAVIOUR", "IF_VEKTOR_BEHAVIOUR")
|
||||
Me._adapter.TableMappings.Add(tableMapping)
|
||||
Me._adapter.DeleteCommand = New Global.System.Data.SqlClient.SqlCommand()
|
||||
Me._adapter.DeleteCommand.Connection = Me.Connection
|
||||
@@ -13793,8 +13819,9 @@ Namespace DD_DMSLiteDataSetTableAdapters
|
||||
Me._adapter.InsertCommand = New Global.System.Data.SqlClient.SqlCommand()
|
||||
Me._adapter.InsertCommand.Connection = Me.Connection
|
||||
Me._adapter.InsertCommand.CommandText = "INSERT INTO TBPM_PROFILE_FINAL_INDEXING"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" (PROFIL_ID, IND"& _
|
||||
"EXNAME, VALUE, ADDED_WHO, CONNECTION_ID, SQL_COMMAND)"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"VALUES (@PROFIL_ID"& _
|
||||
",@INDEXNAME,@VALUE,@ADDED_WHO,@CONNECTION_ID,@SQL_COMMAND)"
|
||||
"EXNAME, VALUE, ADDED_WHO, CONNECTION_ID, SQL_COMMAND, IF_VEKTOR_BEHAVIOUR)"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"VALU"& _
|
||||
"ES (@PROFIL_ID,@INDEXNAME,@VALUE,@ADDED_WHO,@CONNECTION_ID,@SQL_COMMAND,@"& _
|
||||
"IF_VEKTOR_BEHAVIOUR)"
|
||||
Me._adapter.InsertCommand.CommandType = Global.System.Data.CommandType.Text
|
||||
Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@PROFIL_ID", Global.System.Data.SqlDbType.Int, 4, Global.System.Data.ParameterDirection.Input, 0, 0, "PROFIL_ID", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
|
||||
Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@INDEXNAME", Global.System.Data.SqlDbType.VarChar, 100, Global.System.Data.ParameterDirection.Input, 0, 0, "INDEXNAME", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
|
||||
@@ -13802,6 +13829,11 @@ 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.InsertCommand.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.InsertCommand.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.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IF_VEKTOR_BEHAVIOUR", Global.System.Data.SqlDbType.VarChar, 25, Global.System.Data.ParameterDirection.Input, 0, 0, "IF_VEKTOR_BEHAVIOUR", 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_PROFILE_FINAL_INDEXING"
|
||||
Me._adapter.UpdateCommand.CommandType = Global.System.Data.CommandType.Text
|
||||
End Sub
|
||||
|
||||
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
@@ -13823,9 +13855,10 @@ Namespace DD_DMSLiteDataSetTableAdapters
|
||||
"ROFILE_FINAL_INDEXING.CHANGED_WHEN, TBPM_PROFILE_FINAL_INDEXING.GUID, TBPM_PROFI"& _
|
||||
"LE_FINAL_INDEXING.CONNECTION_ID, "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" TBPM_PROFILE_FINAL_I"& _
|
||||
"NDEXING.SQL_COMMAND, TBPM_PROFILE_FINAL_INDEXING.DESCRIPTION, TBPM_PROFILE_FINAL"& _
|
||||
"_INDEXING.ACTIVE"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"FROM TBPM_PROFILE_FINAL_INDEXING INNER JOIN"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" "& _
|
||||
" TBPM_PROFILE ON TBPM_PROFILE_FINAL_INDEXING.PROFIL_ID = TBPM_"& _
|
||||
"PROFILE.GUID"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"WHERE (TBPM_PROFILE.NAME = @name)"
|
||||
"_INDEXING.ACTIVE, TBPM_PROFILE_FINAL_INDEXING.IF_VEKTOR_BEHAVIOUR"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"FROM "& _
|
||||
" TBPM_PROFILE_FINAL_INDEXING INNER JOIN"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" TBPM_PROFILE"& _
|
||||
" ON TBPM_PROFILE_FINAL_INDEXING.PROFIL_ID = TBPM_PROFILE.GUID"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"WHERE (TBP"& _
|
||||
"M_PROFILE.NAME = @name)"
|
||||
Me._commandCollection(0).CommandType = Global.System.Data.CommandType.Text
|
||||
Me._commandCollection(0).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@name", Global.System.Data.SqlDbType.VarChar, 100, Global.System.Data.ParameterDirection.Input, 0, 0, "NAME", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
|
||||
Me._commandCollection(1) = New Global.System.Data.SqlClient.SqlCommand()
|
||||
@@ -13841,8 +13874,9 @@ Namespace DD_DMSLiteDataSetTableAdapters
|
||||
Me._commandCollection(3) = New Global.System.Data.SqlClient.SqlCommand()
|
||||
Me._commandCollection(3).Connection = Me.Connection
|
||||
Me._commandCollection(3).CommandText = "INSERT INTO TBPM_PROFILE_FINAL_INDEXING"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" (PROFIL_ID, IND"& _
|
||||
"EXNAME, VALUE, ADDED_WHO, CONNECTION_ID, SQL_COMMAND)"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"VALUES (@PROFIL_ID"& _
|
||||
",@INDEXNAME,@VALUE,@ADDED_WHO,@CONNECTION_ID,@SQL_COMMAND)"
|
||||
"EXNAME, VALUE, ADDED_WHO, CONNECTION_ID, SQL_COMMAND, IF_VEKTOR_BEHAVIOUR)"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"VALU"& _
|
||||
"ES (@PROFIL_ID,@INDEXNAME,@VALUE,@ADDED_WHO,@CONNECTION_ID,@SQL_COMMAND,@"& _
|
||||
"IF_VEKTOR_BEHAVIOUR)"
|
||||
Me._commandCollection(3).CommandType = Global.System.Data.CommandType.Text
|
||||
Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@PROFIL_ID", Global.System.Data.SqlDbType.Int, 4, Global.System.Data.ParameterDirection.Input, 0, 0, "PROFIL_ID", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
|
||||
Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@INDEXNAME", Global.System.Data.SqlDbType.VarChar, 100, Global.System.Data.ParameterDirection.Input, 0, 0, "INDEXNAME", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
|
||||
@@ -13850,6 +13884,7 @@ Namespace DD_DMSLiteDataSetTableAdapters
|
||||
Me._commandCollection(3).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._commandCollection(3).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._commandCollection(3).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._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IF_VEKTOR_BEHAVIOUR", Global.System.Data.SqlDbType.VarChar, 25, Global.System.Data.ParameterDirection.Input, 0, 0, "IF_VEKTOR_BEHAVIOUR", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
|
||||
Me._commandCollection(4) = New Global.System.Data.SqlClient.SqlCommand()
|
||||
Me._commandCollection(4).Connection = Me.Connection
|
||||
Me._commandCollection(4).CommandText = "INSERT INTO TBPM_PROFILE_FINAL_INDEXING"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" (PROFIL_ID, IND"& _
|
||||
@@ -13864,11 +13899,13 @@ Namespace DD_DMSLiteDataSetTableAdapters
|
||||
Me._commandCollection(5) = New Global.System.Data.SqlClient.SqlCommand()
|
||||
Me._commandCollection(5).Connection = Me.Connection
|
||||
Me._commandCollection(5).CommandText = "UPDATE TBPM_PROFILE_FINAL_INDEXING"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"SET CONNECTION_ID = @CON"& _
|
||||
"_ID, SQL_COMMAND = @COMMAND, CHANGED_WHO = @WHO"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"WHERE (GUID = @GUID)"
|
||||
"_ID, SQL_COMMAND = @COMMAND, CHANGED_WHO = @WHO, IF_VEKTOR_BEHAVIOUR = @IF_VEKTO"& _
|
||||
"R_BEHAVIOUR"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"WHERE (GUID = @GUID)"
|
||||
Me._commandCollection(5).CommandType = Global.System.Data.CommandType.Text
|
||||
Me._commandCollection(5).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@CON_ID", Global.System.Data.SqlDbType.SmallInt, 2, Global.System.Data.ParameterDirection.Input, 0, 0, "CONNECTION_ID", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
|
||||
Me._commandCollection(5).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@COMMAND", Global.System.Data.SqlDbType.VarChar, 2147483647, Global.System.Data.ParameterDirection.Input, 0, 0, "SQL_COMMAND", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
|
||||
Me._commandCollection(5).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@WHO", Global.System.Data.SqlDbType.VarChar, 30, Global.System.Data.ParameterDirection.Input, 0, 0, "CHANGED_WHO", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
|
||||
Me._commandCollection(5).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IF_VEKTOR_BEHAVIOUR", Global.System.Data.SqlDbType.VarChar, 25, Global.System.Data.ParameterDirection.Input, 0, 0, "IF_VEKTOR_BEHAVIOUR", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
|
||||
Me._commandCollection(5).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, "", "", ""))
|
||||
Me._commandCollection(6) = New Global.System.Data.SqlClient.SqlCommand()
|
||||
Me._commandCollection(6).Connection = Me.Connection
|
||||
@@ -13877,9 +13914,10 @@ Namespace DD_DMSLiteDataSetTableAdapters
|
||||
"G.CHANGED_WHO, "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" TBPM_PROFILE_FINAL_INDEXING.GUID, TBPM"& _
|
||||
"_PROFILE_FINAL_INDEXING.INDEXNAME, TBPM_PROFILE_FINAL_INDEXING.VALUE, TBPM_PROFI"& _
|
||||
"LE_FINAL_INDEXING.SQL_COMMAND, "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" TBPM_PROFILE_FINAL_IND"& _
|
||||
"EXING.CONNECTION_ID"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"FROM TBPM_PROFILE_FINAL_INDEXING INNER JOIN"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" "& _
|
||||
" TBPM_PROFILE ON TBPM_PROFILE_FINAL_INDEXING.PROFIL_ID = TB"& _
|
||||
"PM_PROFILE.GUID"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"WHERE (TBPM_PROFILE.GUID = @ID)"
|
||||
"EXING.CONNECTION_ID, TBPM_PROFILE_FINAL_INDEXING.IF_VEKTOR_BEHAVIOUR"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"FROM "& _
|
||||
" TBPM_PROFILE_FINAL_INDEXING INNER JOIN"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" TBPM_PROF"& _
|
||||
"ILE ON TBPM_PROFILE_FINAL_INDEXING.PROFIL_ID = TBPM_PROFILE.GUID"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"WHERE ("& _
|
||||
"TBPM_PROFILE.GUID = @ID)"
|
||||
Me._commandCollection(6).CommandType = Global.System.Data.CommandType.Text
|
||||
Me._commandCollection(6).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
|
||||
@@ -14021,7 +14059,7 @@ Namespace DD_DMSLiteDataSetTableAdapters
|
||||
<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")> _
|
||||
Public Overloads Overridable Function CmdInsert(ByVal PROFIL_ID As Integer, ByVal INDEXNAME As String, ByVal VALUE As String, ByVal ADDED_WHO As String, ByVal CONNECTION_ID As Short, ByVal SQL_COMMAND As String) As Integer
|
||||
Public Overloads Overridable Function CmdInsert(ByVal PROFIL_ID As Integer, ByVal INDEXNAME As String, ByVal VALUE As String, ByVal ADDED_WHO As String, ByVal CONNECTION_ID As Short, ByVal SQL_COMMAND As String, ByVal IF_VEKTOR_BEHAVIOUR As String) As Integer
|
||||
Dim command As Global.System.Data.SqlClient.SqlCommand = Me.CommandCollection(3)
|
||||
command.Parameters(0).Value = CType(PROFIL_ID,Integer)
|
||||
If (INDEXNAME Is Nothing) Then
|
||||
@@ -14045,6 +14083,11 @@ Namespace DD_DMSLiteDataSetTableAdapters
|
||||
Else
|
||||
command.Parameters(5).Value = CType(SQL_COMMAND,String)
|
||||
End If
|
||||
If (IF_VEKTOR_BEHAVIOUR Is Nothing) Then
|
||||
Throw New Global.System.ArgumentNullException("IF_VEKTOR_BEHAVIOUR")
|
||||
Else
|
||||
command.Parameters(6).Value = CType(IF_VEKTOR_BEHAVIOUR,String)
|
||||
End If
|
||||
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
|
||||
@@ -14095,9 +14138,8 @@ Namespace DD_DMSLiteDataSetTableAdapters
|
||||
|
||||
<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, false)> _
|
||||
Public Overloads Overridable Function cmdUpdateSQL(ByVal CON_ID As Short, ByVal COMMAND1 As String, ByVal WHO As String, ByVal GUID As Integer) As Integer
|
||||
Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")> _
|
||||
Public Overloads Overridable Function cmdUpdateSQL(ByVal CON_ID As Short, ByVal COMMAND1 As String, ByVal WHO As String, ByVal IF_VEKTOR_BEHAVIOUR As String, ByVal GUID As Integer) As Integer
|
||||
Dim command As Global.System.Data.SqlClient.SqlCommand = Me.CommandCollection(5)
|
||||
command.Parameters(0).Value = CType(CON_ID,Short)
|
||||
If (COMMAND1 Is Nothing) Then
|
||||
@@ -14110,7 +14152,12 @@ Namespace DD_DMSLiteDataSetTableAdapters
|
||||
Else
|
||||
command.Parameters(2).Value = CType(WHO,String)
|
||||
End If
|
||||
command.Parameters(3).Value = CType(GUID,Integer)
|
||||
If (IF_VEKTOR_BEHAVIOUR Is Nothing) Then
|
||||
Throw New Global.System.ArgumentNullException("IF_VEKTOR_BEHAVIOUR")
|
||||
Else
|
||||
command.Parameters(3).Value = CType(IF_VEKTOR_BEHAVIOUR,String)
|
||||
End If
|
||||
command.Parameters(4).Value = CType(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
|
||||
@@ -17955,26 +18002,72 @@ Namespace DD_DMSLiteDataSetTableAdapters
|
||||
tableMapping.ColumnMappings.Add("ANNOTATE_ALL_WORK_HISTORY_ENTRIES", "ANNOTATE_ALL_WORK_HISTORY_ENTRIES")
|
||||
tableMapping.ColumnMappings.Add("ANNOTATE_WORK_HISTORY_ENTRY", "ANNOTATE_WORK_HISTORY_ENTRY")
|
||||
tableMapping.ColumnMappings.Add("WORK_HISTORY_ENTRY", "WORK_HISTORY_ENTRY")
|
||||
tableMapping.ColumnMappings.Add("DISPLAY_MODE", "DISPLAY_MODE")
|
||||
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_PROFILE"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"WHERE (GUID = @Original_GUID)"
|
||||
Me._adapter.DeleteCommand.CommandText = "DELETE FROM [TBPM_PROFILE] WHERE (([GUID] = @Original_GUID) AND ([NAME] = @Origin"& _
|
||||
"al_NAME) AND ([TITLE] = @Original_TITLE) AND ([PRIORITY] = @Original_PRIORITY) A"& _
|
||||
"ND ((@IsNull_DESCRIPTION = 1 AND [DESCRIPTION] IS NULL) OR ([DESCRIPTION] = @Ori"& _
|
||||
"ginal_DESCRIPTION)) AND ([ACTIVE] = @Original_ACTIVE) AND ([WD_SEARCH] = @Origin"& _
|
||||
"al_WD_SEARCH) AND ([NO_OF_DOCUMENTS] = @Original_NO_OF_DOCUMENTS) AND ([ADDED_WH"& _
|
||||
"O] = @Original_ADDED_WHO) AND ([ADDED_WHEN] = @Original_ADDED_WHEN) AND ((@IsNul"& _
|
||||
"l_CHANGED_WHO = 1 AND [CHANGED_WHO] IS NULL) OR ([CHANGED_WHO] = @Original_CHANG"& _
|
||||
"ED_WHO)) AND ((@IsNull_CHANGED_WHEN = 1 AND [CHANGED_WHEN] IS NULL) OR ([CHANGED"& _
|
||||
"_WHEN] = @Original_CHANGED_WHEN)) AND ([FINAL_PROFILE] = @Original_FINAL_PROFILE"& _
|
||||
") AND ((@IsNull_FINAL_TEXT = 1 AND [FINAL_TEXT] IS NULL) OR ([FINAL_TEXT] = @Ori"& _
|
||||
"ginal_FINAL_TEXT)) AND ((@IsNull_MOVE2FOLDER = 1 AND [MOVE2FOLDER] IS NULL) OR ("& _
|
||||
"[MOVE2FOLDER] = @Original_MOVE2FOLDER)) AND ([TYPE] = @Original_TYPE) AND ([WD_O"& _
|
||||
"BJECTTYPE] = @Original_WD_OBJECTTYPE) AND ([SORT_BY_LATEST] = @Original_SORT_BY_"& _
|
||||
"LATEST) AND ([PM_VEKTOR_INDEX] = @Original_PM_VEKTOR_INDEX) AND ([LOG_INDEX] = @"& _
|
||||
"Original_LOG_INDEX) AND ([ANNOTATE_ALL_WORK_HISTORY_ENTRIES] = @Original_ANNOTAT"& _
|
||||
"E_ALL_WORK_HISTORY_ENTRIES) AND ([ANNOTATE_WORK_HISTORY_ENTRY] = @Original_ANNOT"& _
|
||||
"ATE_WORK_HISTORY_ENTRY) AND ((@IsNull_WORK_HISTORY_ENTRY = 1 AND [WORK_HISTORY_E"& _
|
||||
"NTRY] IS NULL) OR ([WORK_HISTORY_ENTRY] = @Original_WORK_HISTORY_ENTRY)))"
|
||||
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, 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, 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_NAME", Global.System.Data.SqlDbType.VarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "NAME", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
|
||||
Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_TITLE", Global.System.Data.SqlDbType.VarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "TITLE", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
|
||||
Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_PRIORITY", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "PRIORITY", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
|
||||
Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_DESCRIPTION", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "DESCRIPTION", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
|
||||
Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_DESCRIPTION", Global.System.Data.SqlDbType.VarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "DESCRIPTION", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
|
||||
Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_ACTIVE", Global.System.Data.SqlDbType.Bit, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "ACTIVE", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
|
||||
Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_WD_SEARCH", Global.System.Data.SqlDbType.VarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "WD_SEARCH", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
|
||||
Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_NO_OF_DOCUMENTS", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "NO_OF_DOCUMENTS", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
|
||||
Me._adapter.DeleteCommand.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.DeleteCommand.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.DeleteCommand.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.DeleteCommand.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.DeleteCommand.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.DeleteCommand.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.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_FINAL_PROFILE", Global.System.Data.SqlDbType.Bit, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "FINAL_PROFILE", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
|
||||
Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_FINAL_TEXT", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "FINAL_TEXT", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
|
||||
Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_FINAL_TEXT", Global.System.Data.SqlDbType.VarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "FINAL_TEXT", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
|
||||
Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_MOVE2FOLDER", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "MOVE2FOLDER", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
|
||||
Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_MOVE2FOLDER", Global.System.Data.SqlDbType.VarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "MOVE2FOLDER", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
|
||||
Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_TYPE", Global.System.Data.SqlDbType.SmallInt, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "TYPE", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
|
||||
Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_WD_OBJECTTYPE", Global.System.Data.SqlDbType.VarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "WD_OBJECTTYPE", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
|
||||
Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_SORT_BY_LATEST", Global.System.Data.SqlDbType.Bit, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "SORT_BY_LATEST", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
|
||||
Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_PM_VEKTOR_INDEX", Global.System.Data.SqlDbType.VarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "PM_VEKTOR_INDEX", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
|
||||
Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_LOG_INDEX", Global.System.Data.SqlDbType.VarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "LOG_INDEX", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
|
||||
Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_ANNOTATE_ALL_WORK_HISTORY_ENTRIES", Global.System.Data.SqlDbType.Bit, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "ANNOTATE_ALL_WORK_HISTORY_ENTRIES", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
|
||||
Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_ANNOTATE_WORK_HISTORY_ENTRY", Global.System.Data.SqlDbType.Bit, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "ANNOTATE_WORK_HISTORY_ENTRY", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
|
||||
Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_WORK_HISTORY_ENTRY", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "WORK_HISTORY_ENTRY", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
|
||||
Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_WORK_HISTORY_ENTRY", Global.System.Data.SqlDbType.VarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "WORK_HISTORY_ENTRY", 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_PROFILE"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" (NAME, TITLE, PRIORITY, DESCRI"& _
|
||||
"PTION, ACTIVE, WD_SEARCH, NO_OF_DOCUMENTS, ADDED_WHO, FINAL_PROFILE, FINAL_TEXT,"& _
|
||||
" MOVE2FOLDER, TYPE, WD_OBJECTTYPE, SORT_BY_LATEST, PM_VEKTOR_INDEX, "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" "& _
|
||||
" WORK_HISTORY_ENTRY, SQL_VIEW, ANNOTATE_ALL_WORK_HISTORY_ENTRIES, "& _
|
||||
"ANNOTATE_WORK_HISTORY_ENTRY)"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"VALUES (@NAME,@TITLE,@PRIORITY,@DESCRIPTION"& _
|
||||
",@ACTIVE,@WD_SEARCH,@NO_OF_DOCUMENTS,@ADDED_WHO,@FINAL_PROFILE,@FINAL_TEXT,@MOVE"& _
|
||||
"2FOLDER,@TYPE,@WD_OBJECTTYPE,@SORT_BY_LATEST,@PM_VEKTOR_INDEX,@WORK_HISTORY_ENTR"& _
|
||||
"Y,@SQL_VIEW,@ANNOTATE_ALL_WORK_HISTORY_ENTRIES,@ANNOTATE_WORK_HISTORY_ENTRY); "& _
|
||||
" "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"SELECT GUID, NAME, TITLE, PRIORITY, DESCRIPTION, ACTIVE, WD_SEARCH, NO_OF_DO"& _
|
||||
"CUMENTS, ADDED_WHO, ADDED_WHEN, CHANGED_WHO, CHANGED_WHEN, FINAL_PROFILE, FINAL_"& _
|
||||
"TEXT, MOVE2FOLDER, TYPE, WD_OBJECTTYPE, SORT_BY_LATEST FROM TBPM_PROFILE WHERE ("& _
|
||||
"GUID = SCOPE_IDENTITY())"
|
||||
"ANNOTATE_WORK_HISTORY_ENTRY, DISPLAY_MODE)"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"VALUES (@NAME,@TITLE,@PRIORIT"& _
|
||||
"Y,@DESCRIPTION,@ACTIVE,@WD_SEARCH,@NO_OF_DOCUMENTS,@ADDED_WHO,@FINAL_PROFILE,@FI"& _
|
||||
"NAL_TEXT,@MOVE2FOLDER,@TYPE,@WD_OBJECTTYPE,@SORT_BY_LATEST,@PM_VEKTOR_INDEX,@WOR"& _
|
||||
"K_HISTORY_ENTRY,@SQL_VIEW,@ANNOTATE_ALL_WORK_HISTORY_ENTRIES,@ANNOTATE_WORK_HIST"& _
|
||||
"ORY_ENTRY,@DISPLAY_MODE); "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"SELECT GUID, NAME, TITLE, PRIORITY, DESCRIPTIO"& _
|
||||
"N, ACTIVE, WD_SEARCH, NO_OF_DOCUMENTS, ADDED_WHO, ADDED_WHEN, CHANGED_WHO, CHANG"& _
|
||||
"ED_WHEN, FINAL_PROFILE, FINAL_TEXT, MOVE2FOLDER, TYPE, WD_OBJECTTYPE, SORT_BY_LA"& _
|
||||
"TEST FROM TBPM_PROFILE WHERE (GUID = SCOPE_IDENTITY())"
|
||||
Me._adapter.InsertCommand.CommandType = Global.System.Data.CommandType.Text
|
||||
Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@NAME", Global.System.Data.SqlDbType.VarChar, 100, Global.System.Data.ParameterDirection.Input, 0, 0, "NAME", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
|
||||
Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@TITLE", Global.System.Data.SqlDbType.VarChar, 150, Global.System.Data.ParameterDirection.Input, 0, 0, "TITLE", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
|
||||
@@ -17995,6 +18088,7 @@ Namespace DD_DMSLiteDataSetTableAdapters
|
||||
Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@SQL_VIEW", Global.System.Data.SqlDbType.VarChar, 2147483647, Global.System.Data.ParameterDirection.Input, 0, 0, "SQL_VIEW", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
|
||||
Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@ANNOTATE_ALL_WORK_HISTORY_ENTRIES", Global.System.Data.SqlDbType.Bit, 1, Global.System.Data.ParameterDirection.Input, 0, 0, "ANNOTATE_ALL_WORK_HISTORY_ENTRIES", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
|
||||
Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@ANNOTATE_WORK_HISTORY_ENTRY", Global.System.Data.SqlDbType.Bit, 1, Global.System.Data.ParameterDirection.Input, 0, 0, "ANNOTATE_WORK_HISTORY_ENTRY", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
|
||||
Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@DISPLAY_MODE", Global.System.Data.SqlDbType.VarChar, 20, Global.System.Data.ParameterDirection.Input, 0, 0, "DISPLAY_MODE", 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_PROFILE"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"SET NAME = @NAME, TITLE = @TITLE, PRIOR"& _
|
||||
@@ -18006,10 +18100,11 @@ Namespace DD_DMSLiteDataSetTableAdapters
|
||||
"INDEX, LOG_INDEX = @LOG_INDEX, WORK_HISTORY_ENTRY = @WORK_HISTORY_ENTRY, SQL_VIE"& _
|
||||
"W = @SQL_VIEW, "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" ANNOTATE_ALL_WORK_HISTORY_ENTRIES = @A"& _
|
||||
"NNOTATE_ALL_WORK_HISTORY_ENTRIES, ANNOTATE_WORK_HISTORY_ENTRY = @ANNOTATE_WORK_H"& _
|
||||
"ISTORY_ENTRY"&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, NAME, TI"& _
|
||||
"TLE, PRIORITY, DESCRIPTION, ACTIVE, WD_SEARCH, NO_OF_DOCUMENTS, ADDED_WHO, ADDED"& _
|
||||
"_WHEN, CHANGED_WHO, CHANGED_WHEN, FINAL_PROFILE, FINAL_TEXT, MOVE2FOLDER, TYPE, "& _
|
||||
"WD_OBJECTTYPE, SORT_BY_LATEST FROM TBPM_PROFILE WHERE (GUID = @GUID)"
|
||||
"ISTORY_ENTRY, DISPLAY_MODE = @DISPLAY_MODE"&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, NAME, TITLE, PRIORITY, DESCRIPTION, ACTIVE, WD_SEARCH, N"& _
|
||||
"O_OF_DOCUMENTS, ADDED_WHO, ADDED_WHEN, CHANGED_WHO, CHANGED_WHEN, FINAL_PROFILE,"& _
|
||||
" FINAL_TEXT, MOVE2FOLDER, TYPE, WD_OBJECTTYPE, SORT_BY_LATEST FROM TBPM_PROFILE "& _
|
||||
"WHERE (GUID = @GUID)"
|
||||
Me._adapter.UpdateCommand.CommandType = Global.System.Data.CommandType.Text
|
||||
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@NAME", Global.System.Data.SqlDbType.VarChar, 100, Global.System.Data.ParameterDirection.Input, 0, 0, "NAME", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
|
||||
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@TITLE", Global.System.Data.SqlDbType.VarChar, 150, Global.System.Data.ParameterDirection.Input, 0, 0, "TITLE", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
|
||||
@@ -18031,6 +18126,7 @@ Namespace DD_DMSLiteDataSetTableAdapters
|
||||
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@SQL_VIEW", Global.System.Data.SqlDbType.VarChar, 2147483647, Global.System.Data.ParameterDirection.Input, 0, 0, "SQL_VIEW", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
|
||||
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@ANNOTATE_ALL_WORK_HISTORY_ENTRIES", Global.System.Data.SqlDbType.Bit, 1, Global.System.Data.ParameterDirection.Input, 0, 0, "ANNOTATE_ALL_WORK_HISTORY_ENTRIES", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
|
||||
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@ANNOTATE_WORK_HISTORY_ENTRY", Global.System.Data.SqlDbType.Bit, 1, Global.System.Data.ParameterDirection.Input, 0, 0, "ANNOTATE_WORK_HISTORY_ENTRY", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
|
||||
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@DISPLAY_MODE", Global.System.Data.SqlDbType.VarChar, 20, Global.System.Data.ParameterDirection.Input, 0, 0, "DISPLAY_MODE", 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
|
||||
@@ -18052,8 +18148,8 @@ Namespace DD_DMSLiteDataSetTableAdapters
|
||||
"DOCUMENTS, ADDED_WHO, ADDED_WHEN, CHANGED_WHO, CHANGED_WHEN, FINAL_PROFILE, FINA"& _
|
||||
"L_TEXT, MOVE2FOLDER, TYPE, "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" WD_OBJECTTYPE, SORT_BY_LAT"& _
|
||||
"EST, PM_VEKTOR_INDEX, LOG_INDEX, SQL_VIEW, ANNOTATE_ALL_WORK_HISTORY_ENTRIES, AN"& _
|
||||
"NOTATE_WORK_HISTORY_ENTRY, WORK_HISTORY_ENTRY"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"FROM TBPM_PROFILE"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"ORD"& _
|
||||
"ER BY NAME"
|
||||
"NOTATE_WORK_HISTORY_ENTRY, WORK_HISTORY_ENTRY, DISPLAY_MODE"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"FROM TBP"& _
|
||||
"M_PROFILE"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"ORDER BY NAME"
|
||||
Me._commandCollection(0).CommandType = Global.System.Data.CommandType.Text
|
||||
Me._commandCollection(1) = New Global.System.Data.SqlClient.SqlCommand()
|
||||
Me._commandCollection(1).Connection = Me.Connection
|
||||
@@ -18066,8 +18162,8 @@ Namespace DD_DMSLiteDataSetTableAdapters
|
||||
Me._commandCollection(2).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, "", "", ""))
|
||||
Me._commandCollection(3) = New Global.System.Data.SqlClient.SqlCommand()
|
||||
Me._commandCollection(3).Connection = Me.Connection
|
||||
Me._commandCollection(3).CommandText = "SELECT GUID"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"FROM TBPM_PROFILE"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"WHERE (FINAL_PROFILE = 1"& _
|
||||
") AND (UPPER(NAME) = UPPER(@name))"
|
||||
Me._commandCollection(3).CommandText = "SELECT GUID FROM TBPM_PROFILE WHERE (FINAL_PROFILE = 1) AND (UPPER(NAME) = UPPER("& _
|
||||
"@name))"
|
||||
Me._commandCollection(3).CommandType = Global.System.Data.CommandType.Text
|
||||
Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@name", Global.System.Data.SqlDbType.VarChar, 1024, Global.System.Data.ParameterDirection.Input, 0, 0, "", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
|
||||
Me._commandCollection(4) = New Global.System.Data.SqlClient.SqlCommand()
|
||||
@@ -18184,8 +18280,117 @@ Namespace DD_DMSLiteDataSetTableAdapters
|
||||
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
|
||||
Public Overloads Overridable Function Delete( _
|
||||
ByVal Original_GUID As Integer, _
|
||||
ByVal Original_NAME As String, _
|
||||
ByVal Original_TITLE As String, _
|
||||
ByVal Original_PRIORITY As Integer, _
|
||||
ByVal Original_DESCRIPTION As String, _
|
||||
ByVal Original_ACTIVE As Boolean, _
|
||||
ByVal Original_WD_SEARCH As String, _
|
||||
ByVal Original_NO_OF_DOCUMENTS As Integer, _
|
||||
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 Original_FINAL_PROFILE As Boolean, _
|
||||
ByVal Original_FINAL_TEXT As String, _
|
||||
ByVal Original_MOVE2FOLDER As String, _
|
||||
ByVal Original_TYPE As Short, _
|
||||
ByVal Original_WD_OBJECTTYPE As String, _
|
||||
ByVal Original_SORT_BY_LATEST As Boolean, _
|
||||
ByVal Original_PM_VEKTOR_INDEX As String, _
|
||||
ByVal Original_LOG_INDEX As String, _
|
||||
ByVal Original_ANNOTATE_ALL_WORK_HISTORY_ENTRIES As Boolean, _
|
||||
ByVal Original_ANNOTATE_WORK_HISTORY_ENTRY As Boolean, _
|
||||
ByVal Original_WORK_HISTORY_ENTRY As String) As Integer
|
||||
Me.Adapter.DeleteCommand.Parameters(0).Value = CType(Original_GUID,Integer)
|
||||
If (Original_NAME Is Nothing) Then
|
||||
Throw New Global.System.ArgumentNullException("Original_NAME")
|
||||
Else
|
||||
Me.Adapter.DeleteCommand.Parameters(1).Value = CType(Original_NAME,String)
|
||||
End If
|
||||
If (Original_TITLE Is Nothing) Then
|
||||
Throw New Global.System.ArgumentNullException("Original_TITLE")
|
||||
Else
|
||||
Me.Adapter.DeleteCommand.Parameters(2).Value = CType(Original_TITLE,String)
|
||||
End If
|
||||
Me.Adapter.DeleteCommand.Parameters(3).Value = CType(Original_PRIORITY,Integer)
|
||||
If (Original_DESCRIPTION Is Nothing) Then
|
||||
Me.Adapter.DeleteCommand.Parameters(4).Value = CType(1,Object)
|
||||
Me.Adapter.DeleteCommand.Parameters(5).Value = Global.System.DBNull.Value
|
||||
Else
|
||||
Me.Adapter.DeleteCommand.Parameters(4).Value = CType(0,Object)
|
||||
Me.Adapter.DeleteCommand.Parameters(5).Value = CType(Original_DESCRIPTION,String)
|
||||
End If
|
||||
Me.Adapter.DeleteCommand.Parameters(6).Value = CType(Original_ACTIVE,Boolean)
|
||||
If (Original_WD_SEARCH Is Nothing) Then
|
||||
Throw New Global.System.ArgumentNullException("Original_WD_SEARCH")
|
||||
Else
|
||||
Me.Adapter.DeleteCommand.Parameters(7).Value = CType(Original_WD_SEARCH,String)
|
||||
End If
|
||||
Me.Adapter.DeleteCommand.Parameters(8).Value = CType(Original_NO_OF_DOCUMENTS,Integer)
|
||||
If (Original_ADDED_WHO Is Nothing) Then
|
||||
Throw New Global.System.ArgumentNullException("Original_ADDED_WHO")
|
||||
Else
|
||||
Me.Adapter.DeleteCommand.Parameters(9).Value = CType(Original_ADDED_WHO,String)
|
||||
End If
|
||||
Me.Adapter.DeleteCommand.Parameters(10).Value = CType(Original_ADDED_WHEN,Date)
|
||||
If (Original_CHANGED_WHO Is Nothing) Then
|
||||
Me.Adapter.DeleteCommand.Parameters(11).Value = CType(1,Object)
|
||||
Me.Adapter.DeleteCommand.Parameters(12).Value = Global.System.DBNull.Value
|
||||
Else
|
||||
Me.Adapter.DeleteCommand.Parameters(11).Value = CType(0,Object)
|
||||
Me.Adapter.DeleteCommand.Parameters(12).Value = CType(Original_CHANGED_WHO,String)
|
||||
End If
|
||||
If (Original_CHANGED_WHEN.HasValue = true) Then
|
||||
Me.Adapter.DeleteCommand.Parameters(13).Value = CType(0,Object)
|
||||
Me.Adapter.DeleteCommand.Parameters(14).Value = CType(Original_CHANGED_WHEN.Value,Date)
|
||||
Else
|
||||
Me.Adapter.DeleteCommand.Parameters(13).Value = CType(1,Object)
|
||||
Me.Adapter.DeleteCommand.Parameters(14).Value = Global.System.DBNull.Value
|
||||
End If
|
||||
Me.Adapter.DeleteCommand.Parameters(15).Value = CType(Original_FINAL_PROFILE,Boolean)
|
||||
If (Original_FINAL_TEXT Is Nothing) Then
|
||||
Me.Adapter.DeleteCommand.Parameters(16).Value = CType(1,Object)
|
||||
Me.Adapter.DeleteCommand.Parameters(17).Value = Global.System.DBNull.Value
|
||||
Else
|
||||
Me.Adapter.DeleteCommand.Parameters(16).Value = CType(0,Object)
|
||||
Me.Adapter.DeleteCommand.Parameters(17).Value = CType(Original_FINAL_TEXT,String)
|
||||
End If
|
||||
If (Original_MOVE2FOLDER Is Nothing) Then
|
||||
Me.Adapter.DeleteCommand.Parameters(18).Value = CType(1,Object)
|
||||
Me.Adapter.DeleteCommand.Parameters(19).Value = Global.System.DBNull.Value
|
||||
Else
|
||||
Me.Adapter.DeleteCommand.Parameters(18).Value = CType(0,Object)
|
||||
Me.Adapter.DeleteCommand.Parameters(19).Value = CType(Original_MOVE2FOLDER,String)
|
||||
End If
|
||||
Me.Adapter.DeleteCommand.Parameters(20).Value = CType(Original_TYPE,Short)
|
||||
If (Original_WD_OBJECTTYPE Is Nothing) Then
|
||||
Throw New Global.System.ArgumentNullException("Original_WD_OBJECTTYPE")
|
||||
Else
|
||||
Me.Adapter.DeleteCommand.Parameters(21).Value = CType(Original_WD_OBJECTTYPE,String)
|
||||
End If
|
||||
Me.Adapter.DeleteCommand.Parameters(22).Value = CType(Original_SORT_BY_LATEST,Boolean)
|
||||
If (Original_PM_VEKTOR_INDEX Is Nothing) Then
|
||||
Throw New Global.System.ArgumentNullException("Original_PM_VEKTOR_INDEX")
|
||||
Else
|
||||
Me.Adapter.DeleteCommand.Parameters(23).Value = CType(Original_PM_VEKTOR_INDEX,String)
|
||||
End If
|
||||
If (Original_LOG_INDEX Is Nothing) Then
|
||||
Throw New Global.System.ArgumentNullException("Original_LOG_INDEX")
|
||||
Else
|
||||
Me.Adapter.DeleteCommand.Parameters(24).Value = CType(Original_LOG_INDEX,String)
|
||||
End If
|
||||
Me.Adapter.DeleteCommand.Parameters(25).Value = CType(Original_ANNOTATE_ALL_WORK_HISTORY_ENTRIES,Boolean)
|
||||
Me.Adapter.DeleteCommand.Parameters(26).Value = CType(Original_ANNOTATE_WORK_HISTORY_ENTRY,Boolean)
|
||||
If (Original_WORK_HISTORY_ENTRY Is Nothing) Then
|
||||
Me.Adapter.DeleteCommand.Parameters(27).Value = CType(1,Object)
|
||||
Me.Adapter.DeleteCommand.Parameters(28).Value = Global.System.DBNull.Value
|
||||
Else
|
||||
Me.Adapter.DeleteCommand.Parameters(27).Value = CType(0,Object)
|
||||
Me.Adapter.DeleteCommand.Parameters(28).Value = CType(Original_WORK_HISTORY_ENTRY,String)
|
||||
End If
|
||||
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
|
||||
@@ -18224,7 +18429,8 @@ Namespace DD_DMSLiteDataSetTableAdapters
|
||||
ByVal WORK_HISTORY_ENTRY As String, _
|
||||
ByVal SQL_VIEW As String, _
|
||||
ByVal ANNOTATE_ALL_WORK_HISTORY_ENTRIES As Boolean, _
|
||||
ByVal ANNOTATE_WORK_HISTORY_ENTRY As Boolean) As Integer
|
||||
ByVal ANNOTATE_WORK_HISTORY_ENTRY As Boolean, _
|
||||
ByVal DISPLAY_MODE As String) As Integer
|
||||
If (NAME Is Nothing) Then
|
||||
Throw New Global.System.ArgumentNullException("NAME")
|
||||
Else
|
||||
@@ -18282,12 +18488,17 @@ Namespace DD_DMSLiteDataSetTableAdapters
|
||||
Me.Adapter.InsertCommand.Parameters(15).Value = CType(WORK_HISTORY_ENTRY,String)
|
||||
End If
|
||||
If (SQL_VIEW Is Nothing) Then
|
||||
Me.Adapter.InsertCommand.Parameters(16).Value = Global.System.DBNull.Value
|
||||
Throw New Global.System.ArgumentNullException("SQL_VIEW")
|
||||
Else
|
||||
Me.Adapter.InsertCommand.Parameters(16).Value = CType(SQL_VIEW,String)
|
||||
End If
|
||||
Me.Adapter.InsertCommand.Parameters(17).Value = CType(ANNOTATE_ALL_WORK_HISTORY_ENTRIES,Boolean)
|
||||
Me.Adapter.InsertCommand.Parameters(18).Value = CType(ANNOTATE_WORK_HISTORY_ENTRY,Boolean)
|
||||
If (DISPLAY_MODE Is Nothing) Then
|
||||
Throw New Global.System.ArgumentNullException("DISPLAY_MODE")
|
||||
Else
|
||||
Me.Adapter.InsertCommand.Parameters(19).Value = CType(DISPLAY_MODE,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
|
||||
@@ -18328,6 +18539,7 @@ Namespace DD_DMSLiteDataSetTableAdapters
|
||||
ByVal SQL_VIEW As String, _
|
||||
ByVal ANNOTATE_ALL_WORK_HISTORY_ENTRIES As Boolean, _
|
||||
ByVal ANNOTATE_WORK_HISTORY_ENTRY As Boolean, _
|
||||
ByVal DISPLAY_MODE As String, _
|
||||
ByVal Original_GUID As Integer, _
|
||||
ByVal GUID As Integer) As Integer
|
||||
If (NAME Is Nothing) Then
|
||||
@@ -18392,14 +18604,19 @@ Namespace DD_DMSLiteDataSetTableAdapters
|
||||
Me.Adapter.UpdateCommand.Parameters(16).Value = CType(WORK_HISTORY_ENTRY,String)
|
||||
End If
|
||||
If (SQL_VIEW Is Nothing) Then
|
||||
Me.Adapter.UpdateCommand.Parameters(17).Value = Global.System.DBNull.Value
|
||||
Throw New Global.System.ArgumentNullException("SQL_VIEW")
|
||||
Else
|
||||
Me.Adapter.UpdateCommand.Parameters(17).Value = CType(SQL_VIEW,String)
|
||||
End If
|
||||
Me.Adapter.UpdateCommand.Parameters(18).Value = CType(ANNOTATE_ALL_WORK_HISTORY_ENTRIES,Boolean)
|
||||
Me.Adapter.UpdateCommand.Parameters(19).Value = CType(ANNOTATE_WORK_HISTORY_ENTRY,Boolean)
|
||||
Me.Adapter.UpdateCommand.Parameters(20).Value = CType(Original_GUID,Integer)
|
||||
Me.Adapter.UpdateCommand.Parameters(21).Value = CType(GUID,Integer)
|
||||
If (DISPLAY_MODE Is Nothing) Then
|
||||
Throw New Global.System.ArgumentNullException("DISPLAY_MODE")
|
||||
Else
|
||||
Me.Adapter.UpdateCommand.Parameters(20).Value = CType(DISPLAY_MODE,String)
|
||||
End If
|
||||
Me.Adapter.UpdateCommand.Parameters(21).Value = CType(Original_GUID,Integer)
|
||||
Me.Adapter.UpdateCommand.Parameters(22).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