AppStd/TaskFlow
8
1
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

MS Bugfix

Browse Source
This commit is contained in:
SchreiberM
2020-03-26 14:17:48 +01:00
parent 42eef08dc5
commit 4250fa7cb6
12 changed files with 550 additions and 419 deletions
Download Patch File Download Diff File Expand all files Collapse all files

3
app/DD_PM_WINDREAM/frmValidator.vb
View File

@@ -2705,6 +2705,7 @@ Public Class frmValidator
Next
Else
If omytype = "System.String" Then
MsgBox($"IDB Fill Grid [{oControl.Name}] with String")
oColValuesfromSource = Split(oValueFromSource.ToString, PMDelimiter)
Select Case oColValuesfromSource.Length
Case 2
@@ -2716,9 +2717,11 @@ Public Class frmValidator
End Select
ElseIf omytype = "System.Data.DataTable" Then
Dim oMyDatatable As DataTable = oValueFromSource
MsgBox($"IDB Fill Grid [{oControl.Name}] with Datatable - Rows: " & oMyDatatable.Rows.Count)
For Each oRow As DataRow In oMyDatatable.Rows
LOGGER.Debug($"IDB ROW Vector {oRow.Item(0).ToString}...")
oColValuesfromSource = Split(oRow.Item(0).ToString, PMDelimiter)
MsgBox($"IDB ROW Vector {oRow.Item(0).ToString}...")
Select Case oColValuesfromSource.Length
Case 1