RO übersetzungen MDM Abholinfos, NCTS_TR ATEZ Anpassungen

SDL/My Project/AssemblyInfo.vb

@@ -31,5 +31,5 @@ Imports System.Runtime.InteropServices
 ' übernehmen, indem Sie "*" eingeben:
 ' <Assembly: AssemblyVersion("1.0.*")> 
 
-<Assembly: AssemblyVersion("1.2.3.6")>
-<Assembly: AssemblyFileVersion("1.2.3.6")>
+<Assembly: AssemblyVersion("1.2.3.7")>
+<Assembly: AssemblyFileVersion("1.2.3.7")>

SDL/kunden/Vorauskasse/frmVorauskasse.vb

@@ -666,14 +666,14 @@ Public Class cVorauskasseOptions
             'Wenn Benutzer der Vorauskasse nicht online, dann Benutzer der Sendung...
             If vk_QS_SachbearbeiterId IsNot Nothing Then
                 sendToID = vk_QS_SachbearbeiterId
-                If sendToID < 0 OrElse (Not VERAG_PROG_ALLGEMEIN.cSession.IS_ONLINE(sendToID)) Then
+                If sendToID <= 0 OrElse (Not VERAG_PROG_ALLGEMEIN.cSession.IS_ONLINE(sendToID)) Then
                     sendToID = SQL.DLookup("LetzterMitarbeiterId", "Aviso", "AvisoId='" & AvisoId & "'", "AVISO")
                     art = "B"
                 End If
             End If
 
             'Wenn Benutzer der Sendung nicht online, dann Benutzer der Sendung ..
-            If sendToID < 0 OrElse (Not VERAG_PROG_ALLGEMEIN.cSession.IS_ONLINE(sendToID)) Then
+            If sendToID <= 0 OrElse (Not VERAG_PROG_ALLGEMEIN.cSession.IS_ONLINE(sendToID)) Then
                 sendToID = SQL.DLookup("LetzterMitarbeiterId", "Aviso", "AvisoId='" & AvisoId & "'", "AVISO")
                 art = "B"
             End If
@@ -682,7 +682,7 @@ Public Class cVorauskasseOptions
             Select Case VERAG_PROG_ALLGEMEIN.cAllgemein.FIRMA ' --> Bezieht sich auf BU MA
                 Case "IMEX" ' Bie IMEX kommen die MA durhc verschobene Dienstzeiten oft später
                 Case Else
-                    If sendToID < 0 OrElse (Not VERAG_PROG_ALLGEMEIN.cSession.IS_ONLINE(sendToID)) Then
+                    If sendToID <= 0 OrElse (Not VERAG_PROG_ALLGEMEIN.cSession.IS_ONLINE(sendToID)) Then
                         sendToID = SQL.DLookup("tblSnd_TeamId", "tblSendungen", "tblSnd_SendungID='" & SendungID & "'", "AVISO")
                         art = "T"
                     End If

SDL/zoll/usrCntlBrgBuchungenFremd.vb

@@ -82,7 +82,7 @@ Public Class usrCntlBrgBuchungenFremd
             sqlatr &= "  AND    (SELECT COUNT(*) FROM [tblDakosy_Statusmeldungen] WHERE [dySt_dyId]=ncts_dyaAnmID AND  [dySt_status] = 50  AND	CONVERT(date, [dySt_ergZeitpunkt] ,104 ) BETWEEN '" & datVon.Value.ToShortDateString & "' AND '" & datBis.Value.ToShortDateString & "')>0 "
             Dim dt As DataTable = SQL.loadDgvBySql(sqlatr, "FMZOLL", 120)
 
-
+            MsgBox(sqlatr)
             'Bei IMEX kein E-ZOLL
             If MyComboBox1._value = "VERAG/ATILLA" Then
                 If cbxEZollDaten.Checked Then