20200108

2020-01-08 14:52:43 +01:00
parent bea8632eb5
commit f4c1a74870
136 changed files with 11561 additions and 1072 deletions
--- a/VERAG_PROG_ALLGEMEIN/Classes/cAdressen.vb
+++ b/VERAG_PROG_ALLGEMEIN/Classes/cAdressen.vb
@@ -58,6 +58,9 @@ Public Class cAdressen
        End If
    End Sub

+    Public Function FullName() As String
+        Return (If(Name_1, "") & " " & If(Name_2, "")).ToString.Replace("  ", " ")
+    End Function

    Public Shared Function getHoechsteKdNr(NrKr_von As Integer, NrKr_bis As Integer) As Integer
        Try