From adf094fd19d76fc512a3835cfd411c97cc4a7f12 Mon Sep 17 00:00:00 2001 From: Digital Data - Marlon Schreiber Date: Mon, 27 May 2019 13:01:13 +0200 Subject: [PATCH] MassValidator --- app/DD_PM_WINDREAM/frmMassValidator.vb | 7 +++++-- 1 file changed, 5 insertions(+), 2 deletions(-) diff --git a/app/DD_PM_WINDREAM/frmMassValidator.vb b/app/DD_PM_WINDREAM/frmMassValidator.vb index 82f12d5..0a1201f 100644 --- a/app/DD_PM_WINDREAM/frmMassValidator.vb +++ b/app/DD_PM_WINDREAM/frmMassValidator.vb @@ -1409,7 +1409,7 @@ Public Class frmMassValidator If oMyControlInput = "Unexp. error in GetWM_Value_Multiple_Docs" Then Continue For End If - If oMyControlInput = "(Untersch. Werte)" Then + If oMyControlInput = "(Untersch. Werte)" Or oMyControlInput = "(Different values)" Then Continue For End If If oIndexname.StartsWith("[%VKT") Then @@ -1421,7 +1421,7 @@ Public Class frmMassValidator Exit For End If Else - If oMyControlInput = "(Untersch. Werte)" Then + If oMyControlInput = "(Untersch. Werte)" Or oMyControlInput = "(Different values)" Then Continue For End If Dim result() As String @@ -1455,6 +1455,9 @@ Public Class frmMassValidator Exit For Else oMyControlInput = oControl.Text + If oMyControlInput = "(Untersch. Werte)" Or oMyControlInput = "(Different values)" Then + Continue For + End If 'Wenn der Wert in ein Vektorfeld geschrieben wird If oIndexname.StartsWith("[%VKT") Then oMyControlInput = Return_PM_VEKTOR(oMyControlInput, oIndexname)