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

MS: Jobs release Rejected entry MSSQL

Browse Source
This commit is contained in:
SchreiberM
2021-11-26 10:17:29 +01:00
parent 2bd54ccad0
commit 089886b26a
9 changed files with 265 additions and 18 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
Modules.Jobs/EDMI/ZUGFeRD/ImportZUGFeRDFiles.vb
View File

@@ -696,6 +696,10 @@ Public Class ImportZUGFeRDFiles
' Close the connection
oConnection.Close()
If Message.Contains("REJECTED") Then
oSQL = $"UPDATE TBEMLP_HISTORY SET COMMENT = '{Message}' CUST_REJECTED = 1,CUST_REJECTED_WHEN = GETDATE() WHERE EMAIL_MSGID = '{MessageId}'"
_mssql.ExecuteNonQuery(oSQL)
End If
Return True
Catch ex As Exception

4
Modules.Jobs/My Project/AssemblyInfo.vb
View File

@@ -30,5 +30,5 @@ Imports System.Runtime.InteropServices
' Sie können alle Werte angeben oder die standardmäßigen Build- und Revisionsnummern
' übernehmen, indem Sie "*" eingeben:
<Assembly: AssemblyVersion("1.8.2.0")>
<Assembly: AssemblyFileVersion("1.8.2.0")>
<Assembly: AssemblyVersion("1.8.3.0")>
<Assembly: AssemblyFileVersion("1.8.3.0")>