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

Jobs: ErrorCodePraefix

Browse Source
This commit is contained in:
PitzM
2024-04-24 13:38:53 +02:00
parent ed0fc3539d
commit c8d0cb184a
2 changed files with 7 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
Jobs/ZUGFeRD/EmailFunctions.vb
View File

@@ -47,7 +47,7 @@ Namespace ZUGFeRD
' ErrorCode valid?
If pErrorCode <> ErrorCode.Unknown Then
Dim intCode As Integer = DirectCast(pErrorCode, Integer)
oErrorCode = $"ZUGFERD_Rejection_{intCode}"
oErrorCode = $"{EmailStrings.ErrorCodePraefix}{intCode}"
Dim oSQL = $"SELECT COUNT(*) FROM TBDD_GUI_LANGUAGE_PHRASE WHERE TITLE = '{oErrorCode}'"
If _mssql.GetScalarValue(oSQL) > 0 Then