Add ReportGenerator class

MultiTool.Shared/Winline/WebServiceData.vb

@@ -13,18 +13,20 @@ Namespace Winline
         Private ReadOnly Config As WebServiceConfig
         Private ReadOnly Serializer As Serializer
         Private ReadOnly OutputDirectory As String
-        Private ReadOnly Helpers As Helpers
 
         Public Event WebServiceProgress As EventHandler(Of String)
 
         Public Sub New(pLogConfig As LogConfig, pWebserviceConfig As WebServiceConfig, pOutputDirectoryPath As String)
             MyBase.New(pLogConfig)
-            Helpers = New Helpers(pLogConfig)
             Serializer = New Serializer(pLogConfig)
             Config = pWebserviceConfig
             OutputDirectory = pOutputDirectoryPath
         End Sub
 
+        Public Sub RaiseWebServiceProgress(pMessage As String)
+            RaiseEvent WebServiceProgress(Me, pMessage)
+        End Sub
+
         Public Async Function TransferDocumentToWinline(pDocument As Document, pMandator As Mandator, Optional pIsTest As Boolean = False) As Task(Of Boolean)
             Dim oBytes As Byte() = GetBytesFromDocument(pDocument)
             Dim oWS = Config