AppStd/Modules
8
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

MS ZUGFERDService/Jobs - configurable PortalName

Browse Source
This commit is contained in:
SchreiberM
2021-11-30 12:20:26 +01:00
parent 089886b26a
commit 4e0ff8768e
27 changed files with 3429 additions and 339 deletions
Download Patch File Download Diff File Expand all files Collapse all files

5
Services.ZUGFeRDService/ThreadRunner.vb
View File

@@ -52,7 +52,8 @@ Public Class ThreadRunner
Dim oArgs As New WorkerArgs With {
.ExceptionEmailAddress = _config.Config.ExceptionEmailAddress,
.IgnoreRejectionStatus = _config.Config.Custom.IgnoreRejectionStatus,
.MaxAttachmentSizeInMegaBytes = _config.Config.Custom.MaxAttachmentSizeInMegaBytes
.MaxAttachmentSizeInMegaBytes = _config.Config.Custom.MaxAttachmentSizeInMegaBytes,
.NamePortal = _config.Config.PORTAL_NAME
}
oArgs = LoadFolderConfig(oArgs)
oArgs = LoadPropertyMapFor(oArgs, "DEFAULT")
@@ -160,7 +161,7 @@ Public Class ThreadRunner
Dim args As WorkerArgs = e.Argument
_logger.Debug("Background worker running..")
Dim job As New ImportZUGFeRDFiles(_logConfig, _firebird, _config.Config.MSSQLEmailOutAccountID, _mssql)
Dim job As New ImportZUGFeRDFiles(_logConfig, _firebird, _config.Config.MSSQLEmailOutAccountID, _config.Config.PORTAL_NAME, _mssql)
job.Start(args)
Catch ex As Exception
_logger.Warn("Background worker failed!")