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

general clean up, add file contents to getdocumentbyx methods

Browse Source
This commit is contained in:
Jonathan Jenne
2019-04-10 16:15:00 +02:00
parent dee5d33bb9
commit 696a8ddbf6
12 changed files with 196 additions and 44 deletions
Download Patch File Download Diff File Expand all files Collapse all files

16
SERVICES/DDEDM_NetworkService/EDMService.vb
View File

@@ -254,7 +254,13 @@ Public Class EDMService
oRow.Item("ORIGINAL_FILENAME")
)
Return New DocumentResult(oDocument)
TestFileExists(oDocument.ContainerId)
Dim oContainerPath = GetContainerPath(oDocument.ContainerId)
Dim oContainer As FileContainer = FileContainer.Load(LogConfig, AppConfig.ContainerPassword, oContainerPath)
Dim oContents As Byte() = oContainer.GetFile().Contents
Return New DocumentResult(oDocument, oContents)
Catch ex As Exception
Return New DocumentResult(ex.Message)
End Try
@@ -276,7 +282,13 @@ Public Class EDMService
oRow.Item("ORIGINAL_FILENAME")
)
Return New DocumentResult(oDocument)
TestFileExists(oDocument.ContainerId)
Dim oContainerPath = GetContainerPath(oDocument.ContainerId)
Dim oContainer As FileContainer = FileContainer.Load(LogConfig, AppConfig.ContainerPassword, oContainerPath)
Dim oContents As Byte() = oContainer.GetFile().Contents
Return New DocumentResult(oDocument, oContents)
Catch ex As Exception
Return New DocumentResult(ex.Message)
End Try