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

Implementierung FOrmbefüllung mit JSON OBjekten und getrennten Datenströmen

Browse Source
This commit is contained in:
ja
2022-01-27 16:49:28 +01:00
parent 36d9a25f13
commit 2dd3556c5e
29 changed files with 3932 additions and 3122 deletions
Download Patch File Download Diff File Expand all files Collapse all files

23
Customers/SDL/MAUT/Formtemplate Maut_PL.aspx.vb
View File

@@ -99,7 +99,6 @@ Partial Class Customers_Default3
If IsNothing(l2.KartenNr) = False Then
strtempKartNr = l2.KartenNr.ToString
End If
If IsNothing(l2.Vermerk) = False Then
strtempVermerk = l2.Vermerk.ToString
End If
@@ -129,13 +128,9 @@ Partial Class Customers_Default3
list.Add(strtempKartNr)
list.Add(strtempVermerk)
list.Add(strtempRetourniert)
list.Add(strtempVerloren)
list.Add(strtempGestohlen)
list.Add(strtempGesperrt)
list.Add(strtempDefekt)
list.Add(strtempArchivt)
listdetails.Add(list)
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
Next
HttpContext.Current.Response.ContentType = "application/json"
@@ -171,7 +166,6 @@ Partial Class Customers_Default3
If IsNothing(l2.KartenNr) = False Then
strtempKartNr = l2.KartenNr.ToString
End If
If IsNothing(l2.Vermerk) = False Then
strtempVermerk = l2.Vermerk.ToString
End If
@@ -201,14 +195,9 @@ Partial Class Customers_Default3
list_M.Add(strtempKartNr)
list_M.Add(strtempVermerk)
list_M.Add(strtempRetourniert)
list_M.Add(strtempVerloren)
list_M.Add(strtempGestohlen)
list_M.Add(strtempGesperrt)
list_M.Add(strtempDefekt)
list_M.Add(strtempArchivt)
listdetails_M.Add(list_M)
listdetails_M.Add(list_M)
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_M.Add(list_M)
End If
Next
HttpContext.Current.Response.ContentType = "application/json"