MS ZF Adminconsole
This commit is contained in:
249
GUIs.ZooFlow/Globix/GlobixDataset.Designer.vb
generated
249
GUIs.ZooFlow/Globix/GlobixDataset.Designer.vb
generated
@@ -434,7 +434,7 @@ Partial Public Class GlobixDataset
|
||||
|
||||
Private columnGEAENDERTWANN As Global.System.Data.DataColumn
|
||||
|
||||
Private columnIDB_FILESTORE_ID As Global.System.Data.DataColumn
|
||||
Private columnIDB_OBJECT_STORE_ID As Global.System.Data.DataColumn
|
||||
|
||||
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
|
||||
@@ -617,9 +617,9 @@ Partial Public Class GlobixDataset
|
||||
|
||||
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
|
||||
Public ReadOnly Property IDB_FILESTORE_IDColumn() As Global.System.Data.DataColumn
|
||||
Public ReadOnly Property IDB_OBJECT_STORE_IDColumn() As Global.System.Data.DataColumn
|
||||
Get
|
||||
Return Me.columnIDB_FILESTORE_ID
|
||||
Return Me.columnIDB_OBJECT_STORE_ID
|
||||
End Get
|
||||
End Property
|
||||
|
||||
@@ -678,9 +678,9 @@ Partial Public Class GlobixDataset
|
||||
ByVal ERSTELLTWANN As Date, _
|
||||
ByVal GEANDERTWER As String, _
|
||||
ByVal GEAENDERTWANN As Date, _
|
||||
ByVal IDB_FILESTORE_ID As Integer) As TBDD_DOKUMENTARTRow
|
||||
ByVal IDB_OBJECT_STORE_ID As Integer) As TBDD_DOKUMENTARTRow
|
||||
Dim rowTBDD_DOKUMENTARTRow As TBDD_DOKUMENTARTRow = CType(Me.NewRow,TBDD_DOKUMENTARTRow)
|
||||
Dim columnValuesArray() As Object = New Object() {Nothing, BEZEICHNUNG, OBJEKTTYP, EINGANGSART_ID, KURZNAME, ZIEL_PFAD, BESCHREIBUNG, WINDREAM_DIRECT, FOLDER_FOR_INDEX, DUPLICATE_HANDLING, AKTIV, LANGUAGE, SEQUENCE, NAMENKONVENTION, ERSTELLTWER, ERSTELLTWANN, GEANDERTWER, GEAENDERTWANN, IDB_FILESTORE_ID}
|
||||
Dim columnValuesArray() As Object = New Object() {Nothing, BEZEICHNUNG, OBJEKTTYP, EINGANGSART_ID, KURZNAME, ZIEL_PFAD, BESCHREIBUNG, WINDREAM_DIRECT, FOLDER_FOR_INDEX, DUPLICATE_HANDLING, AKTIV, LANGUAGE, SEQUENCE, NAMENKONVENTION, ERSTELLTWER, ERSTELLTWANN, GEANDERTWER, GEAENDERTWANN, IDB_OBJECT_STORE_ID}
|
||||
rowTBDD_DOKUMENTARTRow.ItemArray = columnValuesArray
|
||||
Me.Rows.Add(rowTBDD_DOKUMENTARTRow)
|
||||
Return rowTBDD_DOKUMENTARTRow
|
||||
@@ -727,7 +727,7 @@ Partial Public Class GlobixDataset
|
||||
Me.columnERSTELLTWANN = MyBase.Columns("ERSTELLTWANN")
|
||||
Me.columnGEANDERTWER = MyBase.Columns("GEANDERTWER")
|
||||
Me.columnGEAENDERTWANN = MyBase.Columns("GEAENDERTWANN")
|
||||
Me.columnIDB_FILESTORE_ID = MyBase.Columns("IDB_FILESTORE_ID")
|
||||
Me.columnIDB_OBJECT_STORE_ID = MyBase.Columns("IDB_OBJECT_STORE_ID")
|
||||
End Sub
|
||||
|
||||
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
@@ -769,11 +769,11 @@ Partial Public Class GlobixDataset
|
||||
MyBase.Columns.Add(Me.columnGEANDERTWER)
|
||||
Me.columnGEAENDERTWANN = New Global.System.Data.DataColumn("GEAENDERTWANN", GetType(Date), Nothing, Global.System.Data.MappingType.Element)
|
||||
MyBase.Columns.Add(Me.columnGEAENDERTWANN)
|
||||
Me.columnIDB_FILESTORE_ID = New Global.System.Data.DataColumn("IDB_FILESTORE_ID", GetType(Integer), Nothing, Global.System.Data.MappingType.Element)
|
||||
MyBase.Columns.Add(Me.columnIDB_FILESTORE_ID)
|
||||
Me.columnIDB_OBJECT_STORE_ID = New Global.System.Data.DataColumn("IDB_OBJECT_STORE_ID", GetType(Integer), Nothing, Global.System.Data.MappingType.Element)
|
||||
MyBase.Columns.Add(Me.columnIDB_OBJECT_STORE_ID)
|
||||
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
|
||||
Me.columnGUID.AutoIncrementSeed = 1
|
||||
Me.columnGUID.AllowDBNull = false
|
||||
Me.columnGUID.ReadOnly = true
|
||||
Me.columnGUID.Unique = true
|
||||
@@ -784,13 +784,14 @@ Partial Public Class GlobixDataset
|
||||
Me.columnOBJEKTTYP.MaxLength = 50
|
||||
Me.columnEINGANGSART_ID.AllowDBNull = false
|
||||
Me.columnKURZNAME.AllowDBNull = false
|
||||
Me.columnKURZNAME.DefaultValue = CType("",String)
|
||||
Me.columnKURZNAME.MaxLength = 50
|
||||
Me.columnZIEL_PFAD.AllowDBNull = false
|
||||
Me.columnZIEL_PFAD.DefaultValue = CType("IDB_STORE",String)
|
||||
Me.columnZIEL_PFAD.MaxLength = 250
|
||||
Me.columnBESCHREIBUNG.MaxLength = 250
|
||||
Me.columnWINDREAM_DIRECT.AllowDBNull = false
|
||||
Me.columnWINDREAM_DIRECT.DefaultValue = CType(true,Boolean)
|
||||
Me.columnWINDREAM_DIRECT.DefaultValue = CType(false,Boolean)
|
||||
Me.columnFOLDER_FOR_INDEX.AllowDBNull = false
|
||||
Me.columnFOLDER_FOR_INDEX.MaxLength = 500
|
||||
Me.columnDUPLICATE_HANDLING.AllowDBNull = false
|
||||
@@ -806,8 +807,6 @@ Partial Public Class GlobixDataset
|
||||
Me.columnERSTELLTWER.AllowDBNull = false
|
||||
Me.columnERSTELLTWER.MaxLength = 50
|
||||
Me.columnGEANDERTWER.MaxLength = 50
|
||||
Me.columnIDB_FILESTORE_ID.AllowDBNull = false
|
||||
Me.columnIDB_FILESTORE_ID.DefaultValue = CType(0,Integer)
|
||||
End Sub
|
||||
|
||||
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
@@ -1376,23 +1375,33 @@ Partial Public Class GlobixDataset
|
||||
Me.columnNAME.MaxLength = 50
|
||||
Me.columnWD_INDEX.MaxLength = 50
|
||||
Me.columnCOMMENT.MaxLength = 150
|
||||
Me.columnDATATYPE.DefaultValue = CType("VARCHAR",String)
|
||||
Me.columnDATATYPE.MaxLength = 50
|
||||
Me.columnSUGGESTION.AllowDBNull = false
|
||||
Me.columnSUGGESTION.DefaultValue = CType(false,Boolean)
|
||||
Me.columnDEFAULT_VALUE.AllowDBNull = false
|
||||
Me.columnDEFAULT_VALUE.DefaultValue = CType("",String)
|
||||
Me.columnDEFAULT_VALUE.MaxLength = 50
|
||||
Me.columnCONNECTION_ID.DefaultValue = CType(1,Short)
|
||||
Me.columnSEQUENCE.AllowDBNull = false
|
||||
Me.columnSEQUENCE.DefaultValue = CType(1,Integer)
|
||||
Me.columnSQL_RESULT.AllowDBNull = false
|
||||
Me.columnSQL_RESULT.DefaultValue = CType("",String)
|
||||
Me.columnSQL_RESULT.MaxLength = 2000
|
||||
Me.columnSQL_CHECK.AllowDBNull = false
|
||||
Me.columnSQL_CHECK.DefaultValue = CType("",String)
|
||||
Me.columnSQL_CHECK.MaxLength = 2000
|
||||
Me.columnOPTIONAL.AllowDBNull = false
|
||||
Me.columnOPTIONAL.DefaultValue = CType(false,Boolean)
|
||||
Me.columnSAVE_VALUE.AllowDBNull = false
|
||||
Me.columnSAVE_VALUE.DefaultValue = CType(true,Boolean)
|
||||
Me.columnACTIVE.AllowDBNull = false
|
||||
Me.columnACTIVE.DefaultValue = CType(false,Boolean)
|
||||
Me.columnADDED_WHO.AllowDBNull = false
|
||||
Me.columnADDED_WHO.MaxLength = 50
|
||||
Me.columnCHANGED_WHO.MaxLength = 50
|
||||
Me.columnMULTISELECT.AllowDBNull = false
|
||||
Me.columnMULTISELECT.DefaultValue = CType(false,Boolean)
|
||||
Me.columnVKT_ADD_ITEM.AllowDBNull = false
|
||||
Me.columnVKT_ADD_ITEM.DefaultValue = CType(false,Boolean)
|
||||
Me.columnVKT_PREVENT_MULTIPLE_VALUES.AllowDBNull = false
|
||||
@@ -1847,13 +1856,17 @@ Partial Public Class GlobixDataset
|
||||
Me.columnGUID.Unique = true
|
||||
Me.columnDOCTYPE_ID.AllowDBNull = false
|
||||
Me.columnENTITY_ID.AllowDBNull = false
|
||||
Me.columnENTITY_ID.DefaultValue = CType(0,Integer)
|
||||
Me.columnINDEXNAME.AllowDBNull = false
|
||||
Me.columnINDEXNAME.MaxLength = 50
|
||||
Me.columnVALUE.MaxLength = 2000
|
||||
Me.columnCONNECTION_ID.AllowDBNull = false
|
||||
Me.columnCONNECTION_ID.DefaultValue = CType(1,Short)
|
||||
Me.columnSQL_RESULT.AllowDBNull = false
|
||||
Me.columnSQL_RESULT.DefaultValue = CType("",String)
|
||||
Me.columnSQL_RESULT.MaxLength = 2000
|
||||
Me.columnSQL_ACTIVE.AllowDBNull = false
|
||||
Me.columnSQL_ACTIVE.DefaultValue = CType(false,Boolean)
|
||||
Me.columnCOMMENT.MaxLength = 400
|
||||
Me.columnACTIVE.AllowDBNull = false
|
||||
Me.columnACTIVE.DefaultValue = CType(true,Boolean)
|
||||
@@ -2500,12 +2513,16 @@ Partial Public Class GlobixDataset
|
||||
|
||||
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
|
||||
Public Property IDB_FILESTORE_ID() As Integer
|
||||
Public Property IDB_OBJECT_STORE_ID() As Integer
|
||||
Get
|
||||
Return CType(Me(Me.tableTBDD_DOKUMENTART.IDB_FILESTORE_IDColumn),Integer)
|
||||
Try
|
||||
Return CType(Me(Me.tableTBDD_DOKUMENTART.IDB_OBJECT_STORE_IDColumn),Integer)
|
||||
Catch e As Global.System.InvalidCastException
|
||||
Throw New Global.System.Data.StrongTypingException("Der Wert für Spalte IDB_OBJECT_STORE_ID in Tabelle TBDD_DOKUMENTART ist DBNull.", e)
|
||||
End Try
|
||||
End Get
|
||||
Set
|
||||
Me(Me.tableTBDD_DOKUMENTART.IDB_FILESTORE_IDColumn) = value
|
||||
Me(Me.tableTBDD_DOKUMENTART.IDB_OBJECT_STORE_IDColumn) = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
@@ -2557,6 +2574,18 @@ Partial Public Class GlobixDataset
|
||||
Me(Me.tableTBDD_DOKUMENTART.GEAENDERTWANNColumn) = Global.System.Convert.DBNull
|
||||
End Sub
|
||||
|
||||
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
|
||||
Public Function IsIDB_OBJECT_STORE_IDNull() As Boolean
|
||||
Return Me.IsNull(Me.tableTBDD_DOKUMENTART.IDB_OBJECT_STORE_IDColumn)
|
||||
End Function
|
||||
|
||||
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
|
||||
Public Sub SetIDB_OBJECT_STORE_IDNull()
|
||||
Me(Me.tableTBDD_DOKUMENTART.IDB_OBJECT_STORE_IDColumn) = Global.System.Convert.DBNull
|
||||
End Sub
|
||||
|
||||
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
|
||||
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0")> _
|
||||
Public Function GetTBDD_INDEX_MANRows() As TBDD_INDEX_MANRow()
|
||||
@@ -3620,7 +3649,7 @@ Namespace GlobixDatasetTableAdapters
|
||||
tableMapping.ColumnMappings.Add("ERSTELLTWANN", "ERSTELLTWANN")
|
||||
tableMapping.ColumnMappings.Add("GEANDERTWER", "GEANDERTWER")
|
||||
tableMapping.ColumnMappings.Add("GEAENDERTWANN", "GEAENDERTWANN")
|
||||
tableMapping.ColumnMappings.Add("IDB_FILESTORE_ID", "IDB_FILESTORE_ID")
|
||||
tableMapping.ColumnMappings.Add("IDB_OBJECT_STORE_ID", "IDB_OBJECT_STORE_ID")
|
||||
Me._adapter.TableMappings.Add(tableMapping)
|
||||
Me._adapter.DeleteCommand = New Global.System.Data.SqlClient.SqlCommand()
|
||||
Me._adapter.DeleteCommand.Connection = Me.Connection
|
||||
@@ -3631,14 +3660,14 @@ Namespace GlobixDatasetTableAdapters
|
||||
Me._adapter.InsertCommand.Connection = Me.Connection
|
||||
Me._adapter.InsertCommand.CommandText = "INSERT INTO TBDD_DOKUMENTART"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" (BEZEICHNUNG, EINGANGSART_"& _
|
||||
"ID, KURZNAME, ZIEL_PFAD, BESCHREIBUNG, AKTIV, NAMENKONVENTION, ERSTELLTWER, OBJE"& _
|
||||
"KTTYP, WINDREAM_DIRECT, FOLDER_FOR_INDEX, SEQUENCE, DUPLICATE_HANDLING, "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" "& _
|
||||
" IDB_FILESTORE_ID)"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"VALUES (@BEZEICHNUNG,@EINGANGSART_I"& _
|
||||
"D,@KURZNAME,@ZIEL_PFAD,@BESCHREIBUNG,@AKTIV,@NAMENKONVENTION,@ERSTELLTWER,@OBJEK"& _
|
||||
"TTYP,@WINDREAM_DIRECT,@FOLDER_FOR_INDEX,@SEQUENCE,@DUPLICATE_HANDLING,@IDB_FILES"& _
|
||||
"TORE_ID); "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"SELECT GUID, BEZEICHNUNG, OBJEKTTYP, EINGANGSART_ID, KURZNAME, ZIEL"& _
|
||||
"_PFAD, BESCHREIBUNG, WINDREAM_DIRECT, FOLDER_FOR_INDEX, DUPLICATE_HANDLING, AKTI"& _
|
||||
"V, LANGUAGE, SEQUENCE, NAMENKONVENTION, ERSTELLTWER, ERSTELLTWANN, GEANDERTWER, "& _
|
||||
"GEAENDERTWANN FROM TBDD_DOKUMENTART WHERE (GUID = SCOPE_IDENTITY())"
|
||||
"KTTYP, WINDREAM_DIRECT, FOLDER_FOR_INDEX, SEQUENCE, DUPLICATE_HANDLING)"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"VALUES "& _
|
||||
" (@BEZEICHNUNG,@EINGANGSART_ID,@KURZNAME,@ZIEL_PFAD,@BESCHREIBUNG,@AKTIV,@"& _
|
||||
"NAMENKONVENTION,@ERSTELLTWER,@OBJEKTTYP,@WINDREAM_DIRECT,@FOLDER_FOR_INDEX,@SEQU"& _
|
||||
"ENCE,@DUPLICATE_HANDLING); "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"SELECT GUID, BEZEICHNUNG, OBJEKTTYP, EINGANGSART_"& _
|
||||
"ID, KURZNAME, ZIEL_PFAD, BESCHREIBUNG, WINDREAM_DIRECT, FOLDER_FOR_INDEX, DUPLIC"& _
|
||||
"ATE_HANDLING, AKTIV, LANGUAGE, SEQUENCE, NAMENKONVENTION, ERSTELLTWER, ERSTELLTW"& _
|
||||
"ANN, GEANDERTWER, GEAENDERTWANN FROM TBDD_DOKUMENTART WHERE (GUID = SCOPE_IDENTI"& _
|
||||
"TY())"
|
||||
Me._adapter.InsertCommand.CommandType = Global.System.Data.CommandType.Text
|
||||
Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@BEZEICHNUNG", Global.System.Data.SqlDbType.VarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "BEZEICHNUNG", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
|
||||
Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@EINGANGSART_ID", Global.System.Data.SqlDbType.TinyInt, 1, Global.System.Data.ParameterDirection.Input, 0, 0, "EINGANGSART_ID", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
|
||||
@@ -3653,7 +3682,6 @@ Namespace GlobixDatasetTableAdapters
|
||||
Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@FOLDER_FOR_INDEX", Global.System.Data.SqlDbType.VarChar, 500, Global.System.Data.ParameterDirection.Input, 0, 0, "FOLDER_FOR_INDEX", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
|
||||
Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@SEQUENCE", Global.System.Data.SqlDbType.Int, 4, Global.System.Data.ParameterDirection.Input, 0, 0, "SEQUENCE", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
|
||||
Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@DUPLICATE_HANDLING", Global.System.Data.SqlDbType.VarChar, 30, Global.System.Data.ParameterDirection.Input, 0, 0, "DUPLICATE_HANDLING", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
|
||||
Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IDB_FILESTORE_ID", Global.System.Data.SqlDbType.Int, 4, Global.System.Data.ParameterDirection.Input, 0, 0, "IDB_FILESTORE_ID", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
|
||||
Me._adapter.UpdateCommand = New Global.System.Data.SqlClient.SqlCommand()
|
||||
Me._adapter.UpdateCommand.Connection = Me.Connection
|
||||
Me._adapter.UpdateCommand.CommandText = "UPDATE TBDD_DOKUMENTART"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"SET BEZEICHNUNG = @BEZEICHNUNG, EIN"& _
|
||||
@@ -3662,11 +3690,11 @@ Namespace GlobixDatasetTableAdapters
|
||||
"NTION = @NAMENKONVENTION, GEANDERTWER = @GEANDERTWER, OBJEKTTYP = @OBJEKTTYP, WI"& _
|
||||
"NDREAM_DIRECT = @WINDREAM_DIRECT, FOLDER_FOR_INDEX = @FOLDER_FOR_INDEX, "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" "& _
|
||||
" SEQUENCE = @SEQUENCE, DUPLICATE_HANDLING = @DUPLICATE_HANDLIN"& _
|
||||
"G, IDB_FILESTORE_ID = @IDB_FILESTORE_ID"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"WHERE (GUID = @Original_GUID); "& _
|
||||
""&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"SELECT GUID, BEZEICHNUNG, OBJEKTTYP, EINGANGSART_ID, KURZNAME, ZIEL_PFAD, BESC"& _
|
||||
"HREIBUNG, WINDREAM_DIRECT, FOLDER_FOR_INDEX, DUPLICATE_HANDLING, AKTIV, LANGUAGE"& _
|
||||
", SEQUENCE, NAMENKONVENTION, ERSTELLTWER, ERSTELLTWANN, GEANDERTWER, GEAENDERTWA"& _
|
||||
"NN FROM TBDD_DOKUMENTART WHERE (GUID = @GUID)"
|
||||
"G"&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, BEZEICHNUNG, OBJEKTTYP"& _
|
||||
", EINGANGSART_ID, KURZNAME, ZIEL_PFAD, BESCHREIBUNG, WINDREAM_DIRECT, FOLDER_FOR"& _
|
||||
"_INDEX, DUPLICATE_HANDLING, AKTIV, LANGUAGE, SEQUENCE, NAMENKONVENTION, ERSTELLT"& _
|
||||
"WER, ERSTELLTWANN, GEANDERTWER, GEAENDERTWANN FROM TBDD_DOKUMENTART WHERE (GUID "& _
|
||||
"= @GUID)"
|
||||
Me._adapter.UpdateCommand.CommandType = Global.System.Data.CommandType.Text
|
||||
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@BEZEICHNUNG", Global.System.Data.SqlDbType.VarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "BEZEICHNUNG", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
|
||||
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@EINGANGSART_ID", Global.System.Data.SqlDbType.TinyInt, 1, Global.System.Data.ParameterDirection.Input, 0, 0, "EINGANGSART_ID", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
|
||||
@@ -3681,7 +3709,6 @@ Namespace GlobixDatasetTableAdapters
|
||||
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@FOLDER_FOR_INDEX", Global.System.Data.SqlDbType.VarChar, 500, Global.System.Data.ParameterDirection.Input, 0, 0, "FOLDER_FOR_INDEX", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
|
||||
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@SEQUENCE", Global.System.Data.SqlDbType.Int, 4, Global.System.Data.ParameterDirection.Input, 0, 0, "SEQUENCE", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
|
||||
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@DUPLICATE_HANDLING", Global.System.Data.SqlDbType.VarChar, 30, Global.System.Data.ParameterDirection.Input, 0, 0, "DUPLICATE_HANDLING", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
|
||||
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IDB_FILESTORE_ID", Global.System.Data.SqlDbType.Int, 4, Global.System.Data.ParameterDirection.Input, 0, 0, "IDB_FILESTORE_ID", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
|
||||
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_GUID", Global.System.Data.SqlDbType.Int, 4, Global.System.Data.ParameterDirection.Input, 0, 0, "GUID", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
|
||||
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@GUID", Global.System.Data.SqlDbType.Int, 4, Global.System.Data.ParameterDirection.Input, 0, 0, "GUID", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
|
||||
End Sub
|
||||
@@ -3702,8 +3729,8 @@ Namespace GlobixDatasetTableAdapters
|
||||
Me._commandCollection(0).CommandText = "SELECT GUID, BEZEICHNUNG, OBJEKTTYP, EINGANGSART_ID, KURZNAME, ZIEL_PFAD, "& _
|
||||
"BESCHREIBUNG, WINDREAM_DIRECT, FOLDER_FOR_INDEX, DUPLICATE_HANDLING, AKTIV, LANG"& _
|
||||
"UAGE, SEQUENCE, NAMENKONVENTION, "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" ERSTELLTWER, ERSTELL"& _
|
||||
"TWANN, GEANDERTWER, GEAENDERTWANN, IDB_FILESTORE_ID"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"FROM TBDD_DOKUME"& _
|
||||
"NTART"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"WHERE (GUID = @GUID)"
|
||||
"TWANN, GEANDERTWER, GEAENDERTWANN, IDB_OBJECT_STORE_ID"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"FROM TBDD_DOK"& _
|
||||
"UMENTART"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"WHERE (GUID = @GUID)"
|
||||
Me._commandCollection(0).CommandType = Global.System.Data.CommandType.Text
|
||||
Me._commandCollection(0).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@GUID", Global.System.Data.SqlDbType.Int, 4, Global.System.Data.ParameterDirection.Input, 0, 0, "GUID", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
|
||||
Me._commandCollection(1) = New Global.System.Data.SqlClient.SqlCommand()
|
||||
@@ -3716,11 +3743,11 @@ Namespace GlobixDatasetTableAdapters
|
||||
"D_DOKUMENTART.LANGUAGE, TBDD_DOKUMENTART.SEQUENCE, TBDD_DOKUMENTART.NAMENKONVENT"& _
|
||||
"ION, TBDD_DOKUMENTART.ERSTELLTWER, TBDD_DOKUMENTART.ERSTELLTWANN, "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" "& _
|
||||
" TBDD_DOKUMENTART.GEANDERTWER, TBDD_DOKUMENTART.GEAENDERTWANN, TBDD_"& _
|
||||
"DOKUMENTART.IDB_FILESTORE_ID"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"FROM TBDD_DOKUMENTART INNER JOIN"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" "& _
|
||||
" TBDD_DOKUMENTART_MODULE ON TBDD_DOKUMENTART.GUID = TBDD_DOKU"& _
|
||||
"MENTART_MODULE.DOKART_ID INNER JOIN"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" TBDD_MODULES ON TB"& _
|
||||
"DD_DOKUMENTART_MODULE.MODULE_ID = TBDD_MODULES.GUID"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"WHERE (TBDD_MODULES."& _
|
||||
"SHORT_NAME = 'GLOBIX')"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"ORDER BY TBDD_DOKUMENTART.BEZEICHNUNG"
|
||||
"DOKUMENTART.IDB_OBJECT_STORE_ID"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"FROM TBDD_DOKUMENTART INNER JOIN"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" "& _
|
||||
" TBDD_DOKUMENTART_MODULE ON TBDD_DOKUMENTART.GUID = TBDD_D"& _
|
||||
"OKUMENTART_MODULE.DOKART_ID INNER JOIN"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" TBDD_MODULES ON"& _
|
||||
" TBDD_DOKUMENTART_MODULE.MODULE_ID = TBDD_MODULES.GUID"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"WHERE (TBDD_MODUL"& _
|
||||
"ES.SHORT_NAME = 'GLOBIX')"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"ORDER BY TBDD_DOKUMENTART.BEZEICHNUNG"
|
||||
Me._commandCollection(1).CommandType = Global.System.Data.CommandType.Text
|
||||
End Sub
|
||||
|
||||
@@ -3827,20 +3854,24 @@ Namespace GlobixDatasetTableAdapters
|
||||
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0"), _
|
||||
Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"), _
|
||||
Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Insert, true)> _
|
||||
Public Overloads Overridable Function Insert(ByVal BEZEICHNUNG As String, ByVal EINGANGSART_ID As Byte, ByVal KURZNAME As String, ByVal ZIEL_PFAD As String, ByVal BESCHREIBUNG As String, ByVal AKTIV As Boolean, ByVal NAMENKONVENTION As String, ByVal ERSTELLTWER As String, ByVal OBJEKTTYP As String, ByVal WINDREAM_DIRECT As Boolean, ByVal FOLDER_FOR_INDEX As String, ByVal SEQUENCE As Integer, ByVal DUPLICATE_HANDLING As String, ByVal IDB_FILESTORE_ID As Integer) As Integer
|
||||
Public Overloads Overridable Function Insert(ByVal BEZEICHNUNG As String, ByVal EINGANGSART_ID As Global.System.Nullable(Of Byte), ByVal KURZNAME As String, ByVal ZIEL_PFAD As String, ByVal BESCHREIBUNG As String, ByVal AKTIV As Boolean, ByVal NAMENKONVENTION As String, ByVal ERSTELLTWER As String, ByVal OBJEKTTYP As String, ByVal WINDREAM_DIRECT As Boolean, ByVal FOLDER_FOR_INDEX As String, ByVal SEQUENCE As Integer, ByVal DUPLICATE_HANDLING As String) As Integer
|
||||
If (BEZEICHNUNG Is Nothing) Then
|
||||
Throw New Global.System.ArgumentNullException("BEZEICHNUNG")
|
||||
Else
|
||||
Me.Adapter.InsertCommand.Parameters(0).Value = CType(BEZEICHNUNG,String)
|
||||
End If
|
||||
Me.Adapter.InsertCommand.Parameters(1).Value = CType(EINGANGSART_ID,Byte)
|
||||
If (EINGANGSART_ID.HasValue = true) Then
|
||||
Me.Adapter.InsertCommand.Parameters(1).Value = CType(EINGANGSART_ID.Value,Byte)
|
||||
Else
|
||||
Me.Adapter.InsertCommand.Parameters(1).Value = Global.System.DBNull.Value
|
||||
End If
|
||||
If (KURZNAME Is Nothing) Then
|
||||
Throw New Global.System.ArgumentNullException("KURZNAME")
|
||||
Else
|
||||
Me.Adapter.InsertCommand.Parameters(2).Value = CType(KURZNAME,String)
|
||||
End If
|
||||
If (ZIEL_PFAD Is Nothing) Then
|
||||
Throw New Global.System.ArgumentNullException("ZIEL_PFAD")
|
||||
Me.Adapter.InsertCommand.Parameters(3).Value = Global.System.DBNull.Value
|
||||
Else
|
||||
Me.Adapter.InsertCommand.Parameters(3).Value = CType(ZIEL_PFAD,String)
|
||||
End If
|
||||
@@ -3861,7 +3892,7 @@ Namespace GlobixDatasetTableAdapters
|
||||
Me.Adapter.InsertCommand.Parameters(7).Value = CType(ERSTELLTWER,String)
|
||||
End If
|
||||
If (OBJEKTTYP Is Nothing) Then
|
||||
Throw New Global.System.ArgumentNullException("OBJEKTTYP")
|
||||
Me.Adapter.InsertCommand.Parameters(8).Value = Global.System.DBNull.Value
|
||||
Else
|
||||
Me.Adapter.InsertCommand.Parameters(8).Value = CType(OBJEKTTYP,String)
|
||||
End If
|
||||
@@ -3877,7 +3908,6 @@ Namespace GlobixDatasetTableAdapters
|
||||
Else
|
||||
Me.Adapter.InsertCommand.Parameters(12).Value = CType(DUPLICATE_HANDLING,String)
|
||||
End If
|
||||
Me.Adapter.InsertCommand.Parameters(13).Value = CType(IDB_FILESTORE_ID,Integer)
|
||||
Dim previousConnectionState As Global.System.Data.ConnectionState = Me.Adapter.InsertCommand.Connection.State
|
||||
If ((Me.Adapter.InsertCommand.Connection.State And Global.System.Data.ConnectionState.Open) _
|
||||
<> Global.System.Data.ConnectionState.Open) Then
|
||||
@@ -3897,36 +3927,24 @@ Namespace GlobixDatasetTableAdapters
|
||||
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "16.0.0.0"), _
|
||||
Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"), _
|
||||
Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Update, true)> _
|
||||
Public Overloads Overridable Function Update( _
|
||||
ByVal BEZEICHNUNG As String, _
|
||||
ByVal EINGANGSART_ID As Byte, _
|
||||
ByVal KURZNAME As String, _
|
||||
ByVal ZIEL_PFAD As String, _
|
||||
ByVal BESCHREIBUNG As String, _
|
||||
ByVal AKTIV As Boolean, _
|
||||
ByVal NAMENKONVENTION As String, _
|
||||
ByVal GEANDERTWER As String, _
|
||||
ByVal OBJEKTTYP As String, _
|
||||
ByVal WINDREAM_DIRECT As Boolean, _
|
||||
ByVal FOLDER_FOR_INDEX As String, _
|
||||
ByVal SEQUENCE As Integer, _
|
||||
ByVal DUPLICATE_HANDLING As String, _
|
||||
ByVal IDB_FILESTORE_ID As Integer, _
|
||||
ByVal Original_GUID As Integer, _
|
||||
ByVal GUID As Integer) As Integer
|
||||
Public Overloads Overridable Function Update(ByVal BEZEICHNUNG As String, ByVal EINGANGSART_ID As Global.System.Nullable(Of Byte), ByVal KURZNAME As String, ByVal ZIEL_PFAD As String, ByVal BESCHREIBUNG As String, ByVal AKTIV As Boolean, ByVal NAMENKONVENTION As String, ByVal GEANDERTWER As String, ByVal OBJEKTTYP As String, ByVal WINDREAM_DIRECT As Boolean, ByVal FOLDER_FOR_INDEX As String, ByVal SEQUENCE As Integer, ByVal DUPLICATE_HANDLING As String, ByVal Original_GUID As Integer, ByVal GUID As Integer) As Integer
|
||||
If (BEZEICHNUNG Is Nothing) Then
|
||||
Throw New Global.System.ArgumentNullException("BEZEICHNUNG")
|
||||
Else
|
||||
Me.Adapter.UpdateCommand.Parameters(0).Value = CType(BEZEICHNUNG,String)
|
||||
End If
|
||||
Me.Adapter.UpdateCommand.Parameters(1).Value = CType(EINGANGSART_ID,Byte)
|
||||
If (EINGANGSART_ID.HasValue = true) Then
|
||||
Me.Adapter.UpdateCommand.Parameters(1).Value = CType(EINGANGSART_ID.Value,Byte)
|
||||
Else
|
||||
Me.Adapter.UpdateCommand.Parameters(1).Value = Global.System.DBNull.Value
|
||||
End If
|
||||
If (KURZNAME Is Nothing) Then
|
||||
Throw New Global.System.ArgumentNullException("KURZNAME")
|
||||
Else
|
||||
Me.Adapter.UpdateCommand.Parameters(2).Value = CType(KURZNAME,String)
|
||||
End If
|
||||
If (ZIEL_PFAD Is Nothing) Then
|
||||
Throw New Global.System.ArgumentNullException("ZIEL_PFAD")
|
||||
Me.Adapter.UpdateCommand.Parameters(3).Value = Global.System.DBNull.Value
|
||||
Else
|
||||
Me.Adapter.UpdateCommand.Parameters(3).Value = CType(ZIEL_PFAD,String)
|
||||
End If
|
||||
@@ -3947,7 +3965,7 @@ Namespace GlobixDatasetTableAdapters
|
||||
Me.Adapter.UpdateCommand.Parameters(7).Value = CType(GEANDERTWER,String)
|
||||
End If
|
||||
If (OBJEKTTYP Is Nothing) Then
|
||||
Throw New Global.System.ArgumentNullException("OBJEKTTYP")
|
||||
Me.Adapter.UpdateCommand.Parameters(8).Value = Global.System.DBNull.Value
|
||||
Else
|
||||
Me.Adapter.UpdateCommand.Parameters(8).Value = CType(OBJEKTTYP,String)
|
||||
End If
|
||||
@@ -3963,9 +3981,8 @@ Namespace GlobixDatasetTableAdapters
|
||||
Else
|
||||
Me.Adapter.UpdateCommand.Parameters(12).Value = CType(DUPLICATE_HANDLING,String)
|
||||
End If
|
||||
Me.Adapter.UpdateCommand.Parameters(13).Value = CType(IDB_FILESTORE_ID,Integer)
|
||||
Me.Adapter.UpdateCommand.Parameters(14).Value = CType(Original_GUID,Integer)
|
||||
Me.Adapter.UpdateCommand.Parameters(15).Value = CType(GUID,Integer)
|
||||
Me.Adapter.UpdateCommand.Parameters(13).Value = CType(Original_GUID,Integer)
|
||||
Me.Adapter.UpdateCommand.Parameters(14).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
|
||||
@@ -4143,20 +4160,20 @@ Namespace GlobixDatasetTableAdapters
|
||||
"MENT, DATATYPE, SUGGESTION, DEFAULT_VALUE, CONNECTION_ID, SEQUENCE, SQL_RESULT, "& _
|
||||
"SQL_CHECK, OPTIONAL, SAVE_VALUE, ACTIVE, ADDED_WHO, MULTISELECT, "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" "& _
|
||||
" VKT_ADD_ITEM, VKT_PREVENT_MULTIPLE_VALUES)"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"VALUES (@DOK_ID,@"& _
|
||||
"NAME,@WD_INDEX,@COMMENT,@DATATYPE,@SUGGESTION,@DEFAULT_VALUE,@CONNECTION_ID,@SEQ"& _
|
||||
"UENCE,@SQL_RESULT,@SQL_CHECK,@OPTIONAL,@SAVE_VALUE,@ACTIVE,@ADDED_WHO,@MULTISELE"& _
|
||||
"CT,@VKT_ADD_ITEM,@VKT_PREVENT_MULTIPLE_VALUES); "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"SELECT GUID, DOK_ID, NAME, WD_"& _
|
||||
"INDEX, COMMENT, DATATYPE, SUGGESTION, DEFAULT_VALUE, CONNECTION_ID, SEQUENCE, SQ"& _
|
||||
"L_RESULT, SQL_CHECK, OPTIONAL, SAVE_VALUE, ACTIVE, ADDED_WHO, ADDED_WHEN, CHANGE"& _
|
||||
"D_WHO, CHANGED_WHEN, MULTISELECT, VKT_ADD_ITEM, VKT_PREVENT_MULTIPLE_VALUES FROM"& _
|
||||
" TBDD_INDEX_MAN WHERE (GUID = SCOPE_IDENTITY()) ORDER BY SEQUENCE"
|
||||
"NAME,@WD_INDEX,@COMMENT,@DATATYPE, "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" 1,@DEFAULT_VALUE,@"& _
|
||||
"CONNECTION_ID,@SEQUENCE,@SQL_RESULT,@SQL_CHECK,@OPTIONAL,@SAVE_VALUE,@ACTIVE,@AD"& _
|
||||
"DED_WHO,@MULTISELECT,@VKT_ADD_ITEM,@VKT_PREVENT_MULTIPLE_VALUES); "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"SELECT GUID"& _
|
||||
", DOK_ID, NAME, WD_INDEX, COMMENT, DATATYPE, SUGGESTION, DEFAULT_VALUE, CONNECTI"& _
|
||||
"ON_ID, SEQUENCE, SQL_RESULT, SQL_CHECK, OPTIONAL, SAVE_VALUE, ACTIVE, ADDED_WHO,"& _
|
||||
" ADDED_WHEN, CHANGED_WHO, CHANGED_WHEN, MULTISELECT, VKT_ADD_ITEM, VKT_PREVENT_M"& _
|
||||
"ULTIPLE_VALUES FROM TBDD_INDEX_MAN WHERE (GUID = SCOPE_IDENTITY()) ORDER BY SEQU"& _
|
||||
"ENCE"
|
||||
Me._adapter.InsertCommand.CommandType = Global.System.Data.CommandType.Text
|
||||
Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@DOK_ID", Global.System.Data.SqlDbType.Int, 4, Global.System.Data.ParameterDirection.Input, 0, 0, "DOK_ID", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
|
||||
Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@NAME", Global.System.Data.SqlDbType.VarChar, 50, 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("@WD_INDEX", Global.System.Data.SqlDbType.VarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "WD_INDEX", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
|
||||
Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@COMMENT", Global.System.Data.SqlDbType.VarChar, 150, Global.System.Data.ParameterDirection.Input, 0, 0, "COMMENT", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
|
||||
Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@DATATYPE", Global.System.Data.SqlDbType.VarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "DATATYPE", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
|
||||
Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@SUGGESTION", Global.System.Data.SqlDbType.Bit, 1, Global.System.Data.ParameterDirection.Input, 0, 0, "SUGGESTION", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
|
||||
Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@DEFAULT_VALUE", Global.System.Data.SqlDbType.VarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "DEFAULT_VALUE", 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("@SEQUENCE", Global.System.Data.SqlDbType.Int, 4, Global.System.Data.ParameterDirection.Input, 0, 0, "SEQUENCE", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
|
||||
@@ -4172,24 +4189,22 @@ Namespace GlobixDatasetTableAdapters
|
||||
Me._adapter.UpdateCommand = New Global.System.Data.SqlClient.SqlCommand()
|
||||
Me._adapter.UpdateCommand.Connection = Me.Connection
|
||||
Me._adapter.UpdateCommand.CommandText = "UPDATE TBDD_INDEX_MAN"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"SET DOK_ID = @DOK_ID, NAME = @NAME, W"& _
|
||||
"D_INDEX = @WD_INDEX, COMMENT = @COMMENT, DATATYPE = @DATATYPE, SUGGESTION = @SUG"& _
|
||||
"GESTION, DEFAULT_VALUE = @DEFAULT_VALUE, "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" CONNECTION_I"& _
|
||||
"D = @CONNECTION_ID, SEQUENCE = @SEQUENCE, SQL_RESULT = @SQL_RESULT, SQL_CHECK = "& _
|
||||
"@SQL_CHECK, OPTIONAL = @OPTIONAL, SAVE_VALUE = @SAVE_VALUE, ACTIVE = @ACTIVE, "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)& _
|
||||
" CHANGED_WHO = @CHANGED_WHO, MULTISELECT = @MULTISELECT,"& _
|
||||
" VKT_ADD_ITEM = @VKT_ADD_ITEM, VKT_PREVENT_MULTIPLE_VALUES = @VKT_PREVENT_MULTIP"& _
|
||||
"LE_VALUES"&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, DOK_ID, NAME, WD"& _
|
||||
"_INDEX, COMMENT, DATATYPE, SUGGESTION, DEFAULT_VALUE, CONNECTION_ID, SEQUENCE, S"& _
|
||||
"QL_RESULT, SQL_CHECK, OPTIONAL, SAVE_VALUE, ACTIVE, ADDED_WHO, ADDED_WHEN, CHANG"& _
|
||||
"ED_WHO, CHANGED_WHEN, MULTISELECT, VKT_ADD_ITEM, VKT_PREVENT_MULTIPLE_VALUES FRO"& _
|
||||
"M TBDD_INDEX_MAN WHERE (GUID = @GUID) ORDER BY SEQUENCE"
|
||||
"D_INDEX = @WD_INDEX, COMMENT = @COMMENT, DATATYPE = @DATATYPE, SUGGESTION = 1, D"& _
|
||||
"EFAULT_VALUE = @DEFAULT_VALUE, CONNECTION_ID = @CONNECTION_ID, "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" "& _
|
||||
" SEQUENCE = @SEQUENCE, SQL_RESULT = @SQL_RESULT, SQL_CHECK = @SQL_CHECK"& _
|
||||
", OPTIONAL = @OPTIONAL, SAVE_VALUE = @SAVE_VALUE, ACTIVE = @ACTIVE, CHANGED_WHO "& _
|
||||
"= @CHANGED_WHO, "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" MULTISELECT = @MULTISELECT, VKT_ADD_I"& _
|
||||
"TEM = @VKT_ADD_ITEM, VKT_PREVENT_MULTIPLE_VALUES = @VKT_PREVENT_MULTIPLE_VALUES"&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, DOK_ID, NAME, WD_INDEX, C"& _
|
||||
"OMMENT, DATATYPE, SUGGESTION, DEFAULT_VALUE, CONNECTION_ID, SEQUENCE, SQL_RESULT"& _
|
||||
", SQL_CHECK, OPTIONAL, SAVE_VALUE, ACTIVE, ADDED_WHO, ADDED_WHEN, CHANGED_WHO, C"& _
|
||||
"HANGED_WHEN, MULTISELECT, VKT_ADD_ITEM, VKT_PREVENT_MULTIPLE_VALUES FROM TBDD_IN"& _
|
||||
"DEX_MAN WHERE (GUID = @GUID) ORDER BY SEQUENCE"
|
||||
Me._adapter.UpdateCommand.CommandType = Global.System.Data.CommandType.Text
|
||||
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@DOK_ID", Global.System.Data.SqlDbType.Int, 4, Global.System.Data.ParameterDirection.Input, 0, 0, "DOK_ID", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
|
||||
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@NAME", Global.System.Data.SqlDbType.VarChar, 50, 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("@WD_INDEX", Global.System.Data.SqlDbType.VarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "WD_INDEX", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
|
||||
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@COMMENT", Global.System.Data.SqlDbType.VarChar, 150, Global.System.Data.ParameterDirection.Input, 0, 0, "COMMENT", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
|
||||
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@DATATYPE", Global.System.Data.SqlDbType.VarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "DATATYPE", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
|
||||
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@SUGGESTION", Global.System.Data.SqlDbType.Bit, 1, Global.System.Data.ParameterDirection.Input, 0, 0, "SUGGESTION", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
|
||||
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@DEFAULT_VALUE", Global.System.Data.SqlDbType.VarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "DEFAULT_VALUE", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
|
||||
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@CONNECTION_ID", Global.System.Data.SqlDbType.SmallInt, 2, Global.System.Data.ParameterDirection.Input, 0, 0, "CONNECTION_ID", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
|
||||
Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@SEQUENCE", Global.System.Data.SqlDbType.Int, 4, Global.System.Data.ParameterDirection.Input, 0, 0, "SEQUENCE", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
|
||||
@@ -4313,7 +4328,6 @@ Namespace GlobixDatasetTableAdapters
|
||||
ByVal WD_INDEX As String, _
|
||||
ByVal COMMENT As String, _
|
||||
ByVal DATATYPE As String, _
|
||||
ByVal SUGGESTION As Boolean, _
|
||||
ByVal DEFAULT_VALUE As String, _
|
||||
ByVal CONNECTION_ID As Global.System.Nullable(Of Short), _
|
||||
ByVal SEQUENCE As Integer, _
|
||||
@@ -4347,39 +4361,38 @@ Namespace GlobixDatasetTableAdapters
|
||||
Else
|
||||
Me.Adapter.InsertCommand.Parameters(4).Value = CType(DATATYPE,String)
|
||||
End If
|
||||
Me.Adapter.InsertCommand.Parameters(5).Value = CType(SUGGESTION,Boolean)
|
||||
If (DEFAULT_VALUE Is Nothing) Then
|
||||
Throw New Global.System.ArgumentNullException("DEFAULT_VALUE")
|
||||
Else
|
||||
Me.Adapter.InsertCommand.Parameters(6).Value = CType(DEFAULT_VALUE,String)
|
||||
Me.Adapter.InsertCommand.Parameters(5).Value = CType(DEFAULT_VALUE,String)
|
||||
End If
|
||||
If (CONNECTION_ID.HasValue = true) Then
|
||||
Me.Adapter.InsertCommand.Parameters(7).Value = CType(CONNECTION_ID.Value,Short)
|
||||
Me.Adapter.InsertCommand.Parameters(6).Value = CType(CONNECTION_ID.Value,Short)
|
||||
Else
|
||||
Me.Adapter.InsertCommand.Parameters(7).Value = Global.System.DBNull.Value
|
||||
Me.Adapter.InsertCommand.Parameters(6).Value = Global.System.DBNull.Value
|
||||
End If
|
||||
Me.Adapter.InsertCommand.Parameters(8).Value = CType(SEQUENCE,Integer)
|
||||
Me.Adapter.InsertCommand.Parameters(7).Value = CType(SEQUENCE,Integer)
|
||||
If (SQL_RESULT Is Nothing) Then
|
||||
Throw New Global.System.ArgumentNullException("SQL_RESULT")
|
||||
Else
|
||||
Me.Adapter.InsertCommand.Parameters(9).Value = CType(SQL_RESULT,String)
|
||||
Me.Adapter.InsertCommand.Parameters(8).Value = CType(SQL_RESULT,String)
|
||||
End If
|
||||
If (SQL_CHECK Is Nothing) Then
|
||||
Throw New Global.System.ArgumentNullException("SQL_CHECK")
|
||||
Else
|
||||
Me.Adapter.InsertCommand.Parameters(10).Value = CType(SQL_CHECK,String)
|
||||
Me.Adapter.InsertCommand.Parameters(9).Value = CType(SQL_CHECK,String)
|
||||
End If
|
||||
Me.Adapter.InsertCommand.Parameters(11).Value = CType(_OPTIONAL,Boolean)
|
||||
Me.Adapter.InsertCommand.Parameters(12).Value = CType(SAVE_VALUE,Boolean)
|
||||
Me.Adapter.InsertCommand.Parameters(13).Value = CType(ACTIVE,Boolean)
|
||||
Me.Adapter.InsertCommand.Parameters(10).Value = CType(_OPTIONAL,Boolean)
|
||||
Me.Adapter.InsertCommand.Parameters(11).Value = CType(SAVE_VALUE,Boolean)
|
||||
Me.Adapter.InsertCommand.Parameters(12).Value = CType(ACTIVE,Boolean)
|
||||
If (ADDED_WHO Is Nothing) Then
|
||||
Throw New Global.System.ArgumentNullException("ADDED_WHO")
|
||||
Else
|
||||
Me.Adapter.InsertCommand.Parameters(14).Value = CType(ADDED_WHO,String)
|
||||
Me.Adapter.InsertCommand.Parameters(13).Value = CType(ADDED_WHO,String)
|
||||
End If
|
||||
Me.Adapter.InsertCommand.Parameters(15).Value = CType(MULTISELECT,Boolean)
|
||||
Me.Adapter.InsertCommand.Parameters(16).Value = CType(VKT_ADD_ITEM,Boolean)
|
||||
Me.Adapter.InsertCommand.Parameters(17).Value = CType(VKT_PREVENT_MULTIPLE_VALUES,Boolean)
|
||||
Me.Adapter.InsertCommand.Parameters(14).Value = CType(MULTISELECT,Boolean)
|
||||
Me.Adapter.InsertCommand.Parameters(15).Value = CType(VKT_ADD_ITEM,Boolean)
|
||||
Me.Adapter.InsertCommand.Parameters(16).Value = CType(VKT_PREVENT_MULTIPLE_VALUES,Boolean)
|
||||
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
|
||||
@@ -4405,7 +4418,6 @@ Namespace GlobixDatasetTableAdapters
|
||||
ByVal WD_INDEX As String, _
|
||||
ByVal COMMENT As String, _
|
||||
ByVal DATATYPE As String, _
|
||||
ByVal SUGGESTION As Boolean, _
|
||||
ByVal DEFAULT_VALUE As String, _
|
||||
ByVal CONNECTION_ID As Global.System.Nullable(Of Short), _
|
||||
ByVal SEQUENCE As Integer, _
|
||||
@@ -4441,41 +4453,40 @@ Namespace GlobixDatasetTableAdapters
|
||||
Else
|
||||
Me.Adapter.UpdateCommand.Parameters(4).Value = CType(DATATYPE,String)
|
||||
End If
|
||||
Me.Adapter.UpdateCommand.Parameters(5).Value = CType(SUGGESTION,Boolean)
|
||||
If (DEFAULT_VALUE Is Nothing) Then
|
||||
Throw New Global.System.ArgumentNullException("DEFAULT_VALUE")
|
||||
Else
|
||||
Me.Adapter.UpdateCommand.Parameters(6).Value = CType(DEFAULT_VALUE,String)
|
||||
Me.Adapter.UpdateCommand.Parameters(5).Value = CType(DEFAULT_VALUE,String)
|
||||
End If
|
||||
If (CONNECTION_ID.HasValue = true) Then
|
||||
Me.Adapter.UpdateCommand.Parameters(7).Value = CType(CONNECTION_ID.Value,Short)
|
||||
Me.Adapter.UpdateCommand.Parameters(6).Value = CType(CONNECTION_ID.Value,Short)
|
||||
Else
|
||||
Me.Adapter.UpdateCommand.Parameters(7).Value = Global.System.DBNull.Value
|
||||
Me.Adapter.UpdateCommand.Parameters(6).Value = Global.System.DBNull.Value
|
||||
End If
|
||||
Me.Adapter.UpdateCommand.Parameters(8).Value = CType(SEQUENCE,Integer)
|
||||
Me.Adapter.UpdateCommand.Parameters(7).Value = CType(SEQUENCE,Integer)
|
||||
If (SQL_RESULT Is Nothing) Then
|
||||
Throw New Global.System.ArgumentNullException("SQL_RESULT")
|
||||
Else
|
||||
Me.Adapter.UpdateCommand.Parameters(9).Value = CType(SQL_RESULT,String)
|
||||
Me.Adapter.UpdateCommand.Parameters(8).Value = CType(SQL_RESULT,String)
|
||||
End If
|
||||
If (SQL_CHECK Is Nothing) Then
|
||||
Throw New Global.System.ArgumentNullException("SQL_CHECK")
|
||||
Else
|
||||
Me.Adapter.UpdateCommand.Parameters(10).Value = CType(SQL_CHECK,String)
|
||||
Me.Adapter.UpdateCommand.Parameters(9).Value = CType(SQL_CHECK,String)
|
||||
End If
|
||||
Me.Adapter.UpdateCommand.Parameters(11).Value = CType(_OPTIONAL,Boolean)
|
||||
Me.Adapter.UpdateCommand.Parameters(12).Value = CType(SAVE_VALUE,Boolean)
|
||||
Me.Adapter.UpdateCommand.Parameters(13).Value = CType(ACTIVE,Boolean)
|
||||
Me.Adapter.UpdateCommand.Parameters(10).Value = CType(_OPTIONAL,Boolean)
|
||||
Me.Adapter.UpdateCommand.Parameters(11).Value = CType(SAVE_VALUE,Boolean)
|
||||
Me.Adapter.UpdateCommand.Parameters(12).Value = CType(ACTIVE,Boolean)
|
||||
If (CHANGED_WHO Is Nothing) Then
|
||||
Me.Adapter.UpdateCommand.Parameters(14).Value = Global.System.DBNull.Value
|
||||
Me.Adapter.UpdateCommand.Parameters(13).Value = Global.System.DBNull.Value
|
||||
Else
|
||||
Me.Adapter.UpdateCommand.Parameters(14).Value = CType(CHANGED_WHO,String)
|
||||
Me.Adapter.UpdateCommand.Parameters(13).Value = CType(CHANGED_WHO,String)
|
||||
End If
|
||||
Me.Adapter.UpdateCommand.Parameters(15).Value = CType(MULTISELECT,Boolean)
|
||||
Me.Adapter.UpdateCommand.Parameters(16).Value = CType(VKT_ADD_ITEM,Boolean)
|
||||
Me.Adapter.UpdateCommand.Parameters(17).Value = CType(VKT_PREVENT_MULTIPLE_VALUES,Boolean)
|
||||
Me.Adapter.UpdateCommand.Parameters(18).Value = CType(Original_GUID,Integer)
|
||||
Me.Adapter.UpdateCommand.Parameters(19).Value = CType(GUID,Integer)
|
||||
Me.Adapter.UpdateCommand.Parameters(14).Value = CType(MULTISELECT,Boolean)
|
||||
Me.Adapter.UpdateCommand.Parameters(15).Value = CType(VKT_ADD_ITEM,Boolean)
|
||||
Me.Adapter.UpdateCommand.Parameters(16).Value = CType(VKT_PREVENT_MULTIPLE_VALUES,Boolean)
|
||||
Me.Adapter.UpdateCommand.Parameters(17).Value = CType(Original_GUID,Integer)
|
||||
Me.Adapter.UpdateCommand.Parameters(18).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