14.08.2019

2019-08-14 08:59:04 +02:00
parent d98d9950c3
commit 19cc980474
15 changed files with 1502 additions and 344 deletions
--- a/VERAG_PROG_ALLGEMEIN/Classes/cRechnungsausgang.vb
+++ b/VERAG_PROG_ALLGEMEIN/Classes/cRechnungsausgang.vb
@@ -286,6 +286,13 @@ Public Class cRechnungsausgang
        Return RK_ID > 0
    End Function

+    Public Function SAVE_DruckDatumZeit() As Boolean
+        Dim list As List(Of VERAG_PROG_ALLGEMEIN.SQLVariable) = getParameterList()
+        Dim sqlstr = " UPDATE Rechnungsausgang SET DruckDatumZeit=@DruckDatumZeit WHERE RK_ID=@RK_ID) "
+        Return SQL.doSQLVarList(sqlstr, "FMZOLL", , list)
+    End Function
+
+
    Public Sub doVorzeichen()
        Dim vz = If(Vorzeichen = "-", -1, 1)
        Me.SteuerfreierGesamtbetrag *= vz