neu

2020-09-23 07:24:25 +02:00
parent 89d8e0a3a8
commit ce31c2c398
84 changed files with 4953 additions and 554 deletions
--- a/VERAG_PROG_ALLGEMEIN/Classes/cRechnungsausgang.vb
+++ b/VERAG_PROG_ALLGEMEIN/Classes/cRechnungsausgang.vb
@@ -346,7 +346,8 @@ Public Class cRechnungsausgang
        Next
    End Sub

-    Public Function CHECK_Validation(ByRef errMsg) As Boolean
+    Public Function CHECK_Validation(ByRef errMsg As String) As Boolean
+        If Firma_ID <= 0 Then errMsg = "ERROR: Firma auswählen!" : Return False
        If Rechnung_an = 0 OrElse CStr(Rechnung_an) = "" Then errMsg = "ERROR: Rechnungsempfänger auswählen!" : Return False
        '   If Steuerschlüssel Then errMsg = "ERROR: Steuerschlüssel muss angegeben werden!" : Return False