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

ustva-Antraege, Email Fakturierung, FIskaluebersicht, Benachrichtigungen, Essensbestellungen für Unisped

Browse Source
This commit is contained in:
d.breimaier
2024-03-12 14:32:03 +01:00
parent d7d6d6fd02
commit 3433caa2e8
26 changed files with 940 additions and 115 deletions
Download Patch File Download Diff File Expand all files Collapse all files

12
VERAG_PROG_ALLGEMEIN/DATENSERVER/cDATENSERVER.vb
View File

@@ -61,12 +61,12 @@ Public Class cDATENSERVER
Me.rootDir = DATENVERVER_OPTIONS.initRootDir()
Me.da_KundenNr = da_KundenNr
Me.da_vorlage = 0 '(da_KundenNr <= 0)
Me.da_kategorie = da_kategorie
Me.da_ordner = da_ordner
Me.da_uOrdner1 = replaceInvalidCahr(If(da_uOrdner1, ""))
Me.da_uOrdner2 = replaceInvalidCahr(If(da_uOrdner2, ""))
Me.da_uOrdner3 = replaceInvalidCahr(If(da_uOrdner3, ""))
Me.da_name = da_name
Me.da_kategorie = IIf(Not IsDBNull(da_kategorie), da_kategorie, "")
Me.da_ordner = IIf(Not IsDBNull(da_ordner), da_ordner, "")
Me.da_uOrdner1 = replaceInvalidCahr(IIf(Not IsDBNull(da_uOrdner1), da_uOrdner1, ""))
Me.da_uOrdner2 = replaceInvalidCahr(IIf(Not IsDBNull(da_uOrdner2), da_uOrdner2, ""))
Me.da_uOrdner3 = replaceInvalidCahr(IIf(Not IsDBNull(da_uOrdner3), da_uOrdner3, ""))
Me.da_name = IIf(Not IsDBNull(da_name), da_name, "")
LOAD()
End Sub