Jara ausblenden Bugfix
This commit is contained in:
@@ -79,7 +79,7 @@ Public Class usrCntlKartenDaten
|
||||
kdNr_WHERE = ""
|
||||
End If
|
||||
If kdNr_filter Then
|
||||
Dim dt As DataTable = SQL.loadDgvBySql("SELECT KundenSDL.SDLNr FROM KundenSDL INNER JOIN [Speditionsdienstleistungen] as S ON s.SDLNr=KundenSDL.sdlnr WHERE s.SDLTypNr IN (1,2) AND KundenSDL.KundenNr " & kdNr & " group by KundenSDL.SDLNr ")
|
||||
Dim dt As DataTable = SQL.loadDgvBySql("SELECT KundenSDL.SDLNr FROM KundenSDL INNER JOIN [Speditionsdienstleistungen] as S ON s.SDLNr=KundenSDL.sdlnr WHERE s.SDLTypNr IN (1,2) AND KundenSDL.KundenNr = '" & kdNr & "' group by KundenSDL.SDLNr ")
|
||||
If dt Is Nothing Then
|
||||
MsgBox("Es wurden noch keine Leistungen freigeschaltet.")
|
||||
Else
|
||||
|
||||
Reference in New Issue
Block a user