This commit is contained in:
2024-03-18 07:53:20 +01:00
3 changed files with 4 additions and 1 deletions

View File

@@ -10,6 +10,7 @@ Public Enum cAPI_ART
UNDEFINED = -1
AVISO_OUT_STATUSMAIL = 1
AVISO_OUT_BELEGMAIL = 2
AVISO_OUT_GESTELLUNGMAIL = 3
'Public Const AVISO_MAIL_OUT_AVM = 5
'Public Const AVISO_MAIL_OUT_ABD = 6

View File

@@ -17,6 +17,7 @@ Public Class cNCTSGestellungsadressen
Property nga_ATANr As Object = Nothing
Property nga_firma As Object = VERAG_PROG_ALLGEMEIN.cAllgemein.FIRMA
Property nga_Aenderungsdatum As Date = Now
Property nga_gestellungsMail As Object = Nothing
Dim SQL As New SQL
@@ -52,6 +53,7 @@ Public Class cNCTSGestellungsadressen
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("nga_SB", nga_SB))
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("nga_firma", nga_firma))
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("nga_Aenderungsdatum", nga_Aenderungsdatum))
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("nga_gestellungsMail", nga_gestellungsMail))
Return list
End Function