edv/SDL
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

NCTS GEst.

Browse Source
This commit is contained in:
Andreas Luxbauer
2024-03-15 13:07:34 +01:00
parent 1e6760d380
commit 8cb697c915
3 changed files with 4 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

1
VERAG_PROG_ALLGEMEIN/Classes/cAPI.vb
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

2
VERAG_PROG_ALLGEMEIN/Classes/cNCTSGestellungsadressen.vb
View File

@@ -16,6 +16,7 @@ Public Class cNCTSGestellungsadressen
Property nga_SB 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
@@ -50,6 +51,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