add FileId to DocumentObject

Service.EDMIService/EDMIService.vb

@@ -303,7 +303,7 @@ Public Class EDMIService
         Dim oDocumentType As String = "DummyDocumentType"
         Dim oDirectoryPath = EDMIPath.GetActivePath(oDocumentType)
         Dim oFilePath = Path.Combine(oDirectoryPath, FileInfo.Name)
-        Dim oDocument = New DocumentResult2.DocumentObject() With {.FileName = FileInfo.Name}
+        Dim oDocument = New DocumentResult2.DocumentObject() With {.FileName = FileInfo.Name, .FileId = Guid.NewGuid.ToString}
 
         Try
             Directory.CreateDirectory(oDirectoryPath)

Service.EDMIService/Results/DocumentResult2.vb

@@ -24,5 +24,6 @@ Public Class DocumentResult2
 
     Public Class DocumentObject
         Public FileName As String
+        Public FileId As String
     End Class
 End Class