add readonly, retentionperiod for EDMIAPI

Modules.EDMIAPI/Document.vb

@@ -73,14 +73,14 @@ Public Class Document
     ''' </summary>
     ''' <param name="FilePath">The filename to import</param>
     ''' <returns>A document object</returns>
-    Public Async Function ImportFile2(FilePath As String) As Task(Of DocumentResult2)
+    Public Async Function ImportFile2(FilePath As String, Optional [ReadOnly] As Boolean = False, Optional RetentionPeriod As Integer = -1) As Task(Of DocumentResult2)
         Try
             Dim oContents As Byte() = File.ReadAllBytes(FilePath)
             Dim oInfo As New FileInfo(FilePath)
             Dim oName As String = oInfo.Name
             Dim oExtension As String = oInfo.Extension.Substring(1)
 
-            Dim oResult = Await _channel.ImportFileAsync(oInfo, oContents)
+            Dim oResult = Await _channel.ImportFileAsync(oInfo, oContents, [ReadOnly], RetentionPeriod)
             Return oResult
         Catch ex As Exception
             _logger.Error(ex)