edv/VERAG_Homepage
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Änderung

Browse Source
This commit is contained in:
ja
2022-02-07 11:45:11 +01:00
parent f010dfb68e
commit 842f72eb64
3 changed files with 4 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files

3
Customers/SDL/Formtemplate IDS Tankkarte.aspx.vb
View File

@@ -78,7 +78,7 @@ Partial Class Customers_Default3
Dim list2 As List(Of VERAG_PROG_ALLGEMEIN.cSDL) = VERAG_PROG_ALLGEMEIN.cSDL.GET_LIST_WEB_LKW(Integer.Parse(Kdnrtext), Kennzeichen)
Dim listdetails As New List(Of List(Of String))
For Each l2 In list2
If l2.KundenNr.ToString = KundenNr AndAlso l2.SDLNr = SDLNr And l2.KartenNr = Cardno Then
If l2.KundenNr.ToString = KundenNr AndAlso l2.SDLNr = SDLNr Then
Dim strtempbestelltam As String = String.Empty
Dim strtempLieferdatum As String = String.Empty
Dim strtempKartenNr As String = String.Empty
@@ -138,6 +138,7 @@ Partial Class Customers_Default3
list.Add(strtempGueltigBis)
list.Add(strtempErsatzKarte)
list.Add(l2.KfzKennzeichen)
list.Add(l2.SDLNr.ToString)
If String.Equals(strtempVerloren, "False") Or String.Equals(strtempGestohlen, "False") Or String.Equals(strtempGesperrt, "False") Or String.Equals(strtempDefekt, "False") Or String.Equals(strtempArchivt, "False") Then
listdetails.Add(list)
End If