Plose date, etc.

MDM_Worker/cPLOSE_Inv_Data.vb

@@ -346,6 +346,24 @@ Public Class cPLOSE_Inv_Data
 
     End Function
 
+    Public Shared Function setBackToCustomer(SQL As SQL, backToCustomer As Boolean, ab As Date, customerNo As Integer) As Boolean
+
+
+        Return SQL.doSQL("update tblPLOSE_Inv_Data set plInv_InvToCustomer = " & IIf(backToCustomer, "1", "NULL") & "  where cast(plInv_SupplierRechnungsDatum as Date) >= '" & ab.ToShortDateString & "' AND  plInv_PLOSEKundennummer =  '" & customerNo & "'", "FMZOLL")
+
+    End Function
+
+    Public Shared Function setBackToCustomerCustomerID(SQL As SQL, backToCustomer As Boolean, customerNo As String) As Boolean
+
+        Return SQL.doSQL("update tblPLOSE_Inv_Data set plInv_InvToCustomer = " & IIf(backToCustomer, "1", "NULL") & "  where plInv_InvToCustomer Is null AND  plInv_PLOSEKundennummer =  '" & customerNo & "'", "FMZOLL")
+
+    End Function
+
+    Public Shared Function setBackToCustomerInvoiceID(SQL As SQL, backToCustomer As Boolean, Optional invoiceID As String = "") As Boolean
+
+        Return SQL.doSQL("update tblPLOSE_Inv_Data set plInv_InvToCustomer = " & IIf(backToCustomer, "1", "0") & "  where plInv_InvToCustomer Is null " & IIf(invoiceID <> "", "AND  plInv_Id = '" & invoiceID & "'", " ") & "", "FMZOLL")
+
+    End Function
 
     Public Shared Function setWahrunginIvoiceFromTransactions(jahr As Integer, Optional message As Boolean = False, Optional kdNr As Integer = -1) As Boolean