Report, Dynamic SQL

MultiTool.Shared/Winline/WebServiceData.vb

@@ -162,11 +162,6 @@ Namespace Winline
         End Function
 
         Private Function GetBytesFromDocument(pDocument As Document) As Byte()
-            ' TODO: should "Lief_Name" be included here?
-            Dim oFilteredFields As New List(Of String) From {
-                "Fakt_Name"
-            }
-
             Using oStream As New IO.MemoryStream()
                 Dim w = XmlWriter.Create(oStream)
 
@@ -187,7 +182,7 @@ Namespace Winline
                             Continue For
                         End If
 
-                        If oFilteredFields.Contains(oField.Key) Then
+                        If oField.Value.IsVirtual Then
                             Continue For
                         End If