This commit is contained in:
SchreiberM
2016-12-09 10:23:42 +01:00
parent 481e767a99
commit 30a6c6b9fb
35 changed files with 1449 additions and 3454 deletions

View File

@@ -151,7 +151,7 @@ Public Class frmWD_EntityImport
If Not dt Is Nothing Then
If dt.Rows.Count = 1 Then
Dim indexname = dt.Rows(0).Item("IDXNAME_ENTITYID").ToString
Dim idxvalue = CURRENT_FORM_ID
Dim idxvalue = CURRENT_ENTITY_ID
If LogErrorsOnly = False Then ClassLogger.Add(" >> Entity-ID: " & idxvalue.ToString, False)
indexierung_erfolgreich = ClassWindream.IndexFile(CURRENT_FILEIN_WD, indexname, idxvalue)
If indexierung_erfolgreich = False Then
@@ -264,7 +264,7 @@ Public Class frmWD_EntityImport
If DT.Rows.Count = 1 Then
ListView1.Items.Clear()
ListView1.Items.Add(DT.Rows(0).Item("IDXNAME_ENTITYID").ToString)
ListView1.Items(count).SubItems.Add(CURRENT_FORM_ID)
ListView1.Items(count).SubItems.Add(CURRENT_ENTITY_ID)
ListView1.Items.Add(DT.Rows(0).Item("IDXNAME_PARENTID").ToString)
ListView1.Items(count + 1).SubItems.Add(CURRENT_PARENT_ENTITY_ID)
End If