jj 07.03.17 fix relation bug & add unique constraint to DT_RESULT
This commit is contained in:
@@ -164,12 +164,21 @@ Public Class ClassWindreamDocGrid
|
|||||||
ds.Tables.Add(DT_RESULT)
|
ds.Tables.Add(DT_RESULT)
|
||||||
ds.Tables.Add(DT_DETAILS)
|
ds.Tables.Add(DT_DETAILS)
|
||||||
|
|
||||||
|
Dim resultTable As DataTable = ds.Tables(0)
|
||||||
|
Dim detailsTable As DataTable = ds.Tables(1)
|
||||||
|
|
||||||
' Relation `docIdDetails` erstellen
|
' Relation `docIdDetails` erstellen
|
||||||
Dim parentColumn As DataColumn = ds.Tables(0).Columns("docId")
|
Dim parentColumn As DataColumn = resultTable.Columns("docId")
|
||||||
Dim childColumn As DataColumn = ds.Tables(1).Columns("docId")
|
Dim childColumn As DataColumn = detailsTable.Columns("docId")
|
||||||
|
|
||||||
|
' Unique Constraint für DT_RESULT auf Spalte `docId` erstellen
|
||||||
|
Dim uniqueConstraint As UniqueConstraint = New UniqueConstraint(parentColumn)
|
||||||
|
resultTable.Constraints.Add(uniqueConstraint)
|
||||||
|
|
||||||
Try
|
Try
|
||||||
ds.Relations.Add("docIdDetails", parentColumn, childColumn)
|
' Parameter `createConstraints` auf false setzen, um erstellung eines unsinnigen
|
||||||
|
' `foreignKeyConstraints` zu verhindern
|
||||||
|
ds.Relations.Add("docIdDetails", parentColumn, childColumn, False)
|
||||||
Catch ex As Exception
|
Catch ex As Exception
|
||||||
ClassLogger.Add(">> Could not set master-detail Relation DocSearch: " & ex.Message, False)
|
ClassLogger.Add(">> Could not set master-detail Relation DocSearch: " & ex.Message, False)
|
||||||
End Try
|
End Try
|
||||||
|
|||||||
Reference in New Issue
Block a user