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

14.08.2019

Browse Source
This commit is contained in:
Andreas Luxbauer
2019-08-14 08:59:04 +02:00
parent d98d9950c3
commit 19cc980474
15 changed files with 1502 additions and 344 deletions
Download Patch File Download Diff File Expand all files Collapse all files

7
SDL/Classes/cFiskal_Daten.vb
View File

@@ -9,6 +9,10 @@ Public Class cFiskal_Daten
Property fisk_schreibenCMR As Boolean = False
Property fisk_schreibenFA_Adr As Object = Nothing
Property fisk_schreibenSB_Adr As Object = Nothing
Property fisk_schreibenSB_Mail As Object = Nothing
Property fisk_schreibenFA_Mail As Object = Nothing
Dim SQL As New SQL
@@ -24,11 +28,12 @@ Public Class cFiskal_Daten
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("fisk_schreibenCMR", fisk_schreibenCMR))
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("fisk_schreibenFA_Adr", fisk_schreibenFA_Adr))
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("fisk_schreibenSB_Adr", fisk_schreibenSB_Adr))
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("fisk_schreibenSB_Mail", fisk_schreibenSB_Mail))
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("fisk_schreibenFA_Mail", fisk_schreibenFA_Mail))
Return list
End Function
Public Function SAVE() As Boolean
Dim list As List(Of VERAG_PROG_ALLGEMEIN.SQLVariable) = getParameterList()