Änderungen Karten GUI Sowie Datentransfer

This commit is contained in:
ja
2022-02-15 14:14:35 +01:00
parent d4e1a16857
commit 245c31861a
26 changed files with 124 additions and 85 deletions

View File

@@ -56,7 +56,7 @@
</div>
</div>
<div class="card" style="width: 975px; height: 250px">
<div class="card-body">
<div class="card-body" style="width: 867px; height: 250px; margin-left: -12px;">
<div class="container">
<div class="row">
<div class="col">

View File

@@ -56,7 +56,7 @@
</div>
</div>
<div class="card" style="width: 855px; height: 250px">
<div class="card-body">
<div class="card-body" style="width: 867px; height: 250px; margin-left: -12px;">
<div class="container">
<div class="row">
<div class="col">

View File

@@ -56,7 +56,7 @@
</div>
</div>
<div class="card" style="width: 855px; height: 250px">
<div class="card-body">
<div class="card-body" style="width: 867px; height: 250px; margin-left: -12px;">
<div class="container">
<div class="row">
<div class="col">
@@ -123,12 +123,13 @@
var param5 = getParamValue('SDLNr');
var param6 = getParamValue('History');
var param7 = getParamValue('GueltigBis');
var param8 = getParamValue('Pin');
$('txt_ClientNr').val(param1);
detailtabelle(param1, param2, param3, param4, param5, param6, param7);
detailtabelle(param1, param2, param3, param4, param5, param6, param7,param8);
//alert(param1)
function detailtabelle(id,CustomerID,Cardnummer,CustomerNo,SDLNr,History,GueltigBis) {
function detailtabelle(id,CustomerID,Cardnummer,CustomerNo,SDLNr,History,GueltigBis,Pin) {
// alert("Testdata:" + id)
let data = {};
@@ -139,6 +140,7 @@
data['SDLNr'] = SDLNr;
data['History'] = History;
data['GueltigBis'] = GueltigBis;
data['Pin'] = Pin;
$.ajax({
type: "POST",

View File

@@ -73,7 +73,7 @@ Partial Class Customers_Default3
<WebMethod>
<ScriptMethod(ResponseFormat:=ResponseFormat.Json, UseHttpGet:=False)>
Public Shared Function filltabledetails(Kennzeichen As String, Kundennr As String, CardNo As String, SDLNr As String, History As String, GueltigBis As String) As FormattedList
Public Shared Function filltabledetails(Kennzeichen As String, Kundennr As String, CardNo As String, SDLNr As String, History As String, GueltigBis As String, Pin As String) As FormattedList
Dim list As List(Of String) = New List(Of String)
Dim list2 As List(Of VERAG_PROG_ALLGEMEIN.cSDL) = VERAG_PROG_ALLGEMEIN.cSDL.GET_LIST_WEB_LKW(Integer.Parse(Kundennr), Kennzeichen)
Dim listdetails As New List(Of List(Of String))
@@ -101,9 +101,10 @@ Partial Class Customers_Default3
strtempKartenNr = CardNo
If IsNothing(l2.PIN) = False Then
strtempPin = l2.PIN.ToString
End If
strtempPin = Pin
If IsNothing(l2.Vermerk) = False Then
strtempVermerk = l2.Vermerk.ToString
End If

View File

@@ -56,7 +56,7 @@
</div>
</div>
<div class="card" style="width: 975px; height: 250px">
<div class="card-body">
<div class="card-body" style="width: 867px; height: 250px; margin-left: -12px;">
<div class="container">
<div class="row">
<div class="col">

View File

@@ -50,7 +50,7 @@
</div>
</div>
<div class="card" style="width: 855px; height: 250px">
<div class="card-body">
<div class="card-body" style="width: 867px; height: 250px; margin-left: -12px;">
<div class="container">
<div class="row">
<div class="col">

View File

@@ -56,7 +56,7 @@
</div>
</div>
<div class="card" style="width: 855px; height: 250px">
<div class="card-body">
<div class="card-body" style="width: 867px; height: 250px; margin-left: -12px;">
<div class="container">
<div class="row">
<div class="col">

View File

@@ -57,7 +57,7 @@
</div>
</div>
<div class="card" style="width: 855px; height: 250px">
<div class="card-body">
<div class="card-body" style="width: 867px; height: 250px; margin-left: -12px;">
<div class="container">
<div class="row">
<div class="col">

View File

@@ -57,7 +57,7 @@
</div>
</div>
<div class="card" style="width: 855px; height: 250px">
<div class="card-body">
<div class="card-body" style="width: 867px; height: 250px; margin-left: -12px;">
<div class="container">
<div class="row">
<div class="col">

View File

@@ -56,7 +56,7 @@
</div>
</div>
<div class="card" style="width: 875px; height: 250px">
<div class="card-body">
<div class="card-body" style="width: 867px; height: 250px; margin-left: -12px;">
<div class="container">
<div class="row">
<div class="col">
@@ -142,6 +142,7 @@
var param4 = getParamValue('CustomerNo');
var param5 = getParamValue('SDLNr');
var param6 = getParamValue('History');
var param8 = getParamValue('PinOfCard');
$('txt_ClientNr').val(param1);

View File

@@ -73,7 +73,7 @@ Partial Class Customers_Default3
<WebMethod>
<ScriptMethod(ResponseFormat:=ResponseFormat.Json, UseHttpGet:=False)>
Public Shared Function filltabledetails(Kennzeichen As String, Kundennr As String, SDLNr As String, History As String) As FormattedList
Public Shared Function filltabledetails(Kennzeichen As String, Kundennr As String, CardNo As String, SDLNr As String, History As String, GueltigBis As String, Pin As String) As FormattedList
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))
Dim list As List(Of String) = New List(Of String)
@@ -95,12 +95,12 @@ Partial Class Customers_Default3
If IsNothing(l2.Bestelldatum) = False Then
strtempbestelltam = l2.Bestelldatum.ToString.Substring(0, 10)
End If
If IsNothing(l2.KartenNr) = False Then
strtempKartenNr = l2.KartenNr.ToString.Substring(0, 10)
End If
If IsNothing(l2.PIN) = False Then
strtempPIN = l2.PIN.ToString
End If
strtempKartenNr = CardNo
strtempPIN = Pin
If IsNothing(l2.OBUID) = False Then
strtempOBUID = l2.OBUID.ToString
End If

View File

@@ -56,6 +56,7 @@
</div>
</div>
<div class="card" style="width: 855px; height: 250px">
<div class="card-body" style="width: 867px; height: 250px; margin-left: -12px;">
<div class="container">
<div class="row">
<div class="col">

View File

@@ -74,7 +74,7 @@ Partial Class Customers_Default3
<WebMethod>
<ScriptMethod(ResponseFormat:=ResponseFormat.Json, UseHttpGet:=False)>
Public Shared Function filltabledetails(Kennzeichen As String, Kundennr As String, SDLNr As String, History As String) As FormattedList
Public Shared Function filltabledetails(Kennzeichen As String, Kundennr As String, CardNo As String, SDLNr As String, History As String) As FormattedList
Dim list As List(Of String) = New List(Of String)
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))
@@ -131,9 +131,9 @@ Partial Class Customers_Default3
If IsNothing(l2.Archiviert) = False Then
strtempArchivt = l2.Archiviert.ToString
End If
If IsNothing(l2.KartenNr) = False Then
strtempKartenNummer = l2.KartenNr.ToString
End If
strtempKartenNummer = CardNo
' list.Add(New Entry(l2.SDLNr.ToString, strtempKat, strtempGueltigBis, strtempKartenNr, strtempKaut, strtempArchivt, strtempBelegNr, strtempErsatzkarte, strtempDefektAm, strtempFahrer, strtempGesperrtAm, strtempHistory, strtempHasEntry, strtempFlottenPIN, strtempFREJUS_CARD_Nr, strtempGestohlenAm, strtempLKWAbgemeldet, strtempLKWAbgemeldetAM, strtempLieferdatum, strtempMasterPIN, strtempMOTORWAY_CARD_Nr, strtempMSE_Kd_Nr, strtempOBUID, strtempPAN_Nr, strtempPartner, strtempPIN, strtempRefKundenNr, strtempRetourniert, strtempRetourniertAm, strtempSachbearbeiter, strtempSERIE_Nr, strtempStatus, strtempTelepassErsatzkarte, strtempTelepassErsatzkarteAm, strtempTELEPASS_Kd_Nr, strtempTELEPASS_Nr, strtempUmstellungsdatum, strtempVerloren, strtempVertragsabschlussdatum, strtempVertragsNr, strtempVIACARD, strtempAenderungsdatum, strtempVermerk))
list.Add(strtempbestelltam)

View File

@@ -56,7 +56,7 @@
</div>
</div>
<div class="card" style="width: 855px; height: 250px">
<div class="card-body">
<div class="card-body" style="width: 867px; height: 250px; margin-left: -12px;">
<div class="container">
<div class="row">
<div class="col">

View File

@@ -56,6 +56,7 @@
</div>
</div>
<div class="card" style="width: 855px; height: 250px">
<div class="card-body" style="width: 867px; height: 250px; margin-left: -12px;">
<div class="container" >
<div class="row" style="margin-top:12px">
<div class="col">
@@ -113,6 +114,7 @@
</div>
</div>
</div>
</div>
<script src="//ajax.googleapis.com/ajax/libs/jquery/1.11.3/jquery.min.js"></script>
<script type="text/javascript">
function getParamValue(paramName) {

View File

@@ -56,7 +56,7 @@
</div>
</div>
<div class="card" style="width: 975px; height: 250px">
<div class="card-body">
<div class="card-body" style="width: 867px; height: 250px; margin-left: -12px;">
<div class="container">
<div class="row">
<div class="col">

View File

@@ -57,7 +57,7 @@
</div>
</div>
<div class="card" style="width: 855px; height: 250px">
<div class="card-body">
<div class="card-body" style="width: 867px; height: 250px; margin-left: -12px;">
<div class="container">
<div class="row">
<div class="col">
@@ -136,12 +136,14 @@
var param4 = getParamValue('CustomerNo');
var param5 = getParamValue('SDLNr');
var param6 = getParamValue('History');
var param7 = getParamValue('Pin');
$('txt_ClientNr').val(param1);
detailtabelle(param1,param2,param3,param4,param5,param6)
detailtabelle(param1,param2,param3,param4,param5,param6,param7)
//alert(param1)
function detailtabelle(id,CustomerID,Cardnummer,CustomerNo,SDLNr,History) {
function detailtabelle(id,CustomerID,Cardnummer,CustomerNo,SDLNr,History,Pin) {
// alert("Testdata:" + id)
let data = {};
@@ -151,6 +153,7 @@
data['CustomerNo'] = CustomerNo;
data['SDLNr'] = SDLNr;
data['History'] = History;
data['Pin'] = Pin;
$.ajax({
type: "POST",

View File

@@ -73,7 +73,7 @@ Partial Class Customers_Default3
<WebMethod>
<ScriptMethod(ResponseFormat:=ResponseFormat.Json, UseHttpGet:=False)>
Public Shared Function filltabledetails(Kennzeichen As String, Kundennr As String, CardNo As String, SDLNr As String, History As String) As FormattedList
Public Shared Function filltabledetails(Kennzeichen As String, Kundennr As String, CardNo As String, SDLNr As String, History As String, Pin As String) As FormattedList
Dim list As List(Of String) = New List(Of String)
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))
@@ -100,14 +100,14 @@ Partial Class Customers_Default3
strtempLieferdatum = l2.Lieferdatum.ToString.Substring(0, 10)
End If
strtempKartenNr = CardNo
strtempKartenNr = l2.KartenNr.ToString
If IsNothing(l2.CARD_Nr) = False Then
strtempcardnr = l2.CARD_Nr.ToString
End If
If IsNothing(l2.PIN) = False Then
strtempPIN = l2.PIN.ToString
End If
strtempPIN = Pin
If IsNothing(l2.Vermerk) = False Then
strtempVermerk = l2.Vermerk.ToString
End If
@@ -144,6 +144,7 @@ Partial Class Customers_Default3
list.Add(strtempRetourniert)
list.Add(l2.KfzKennzeichen)
list.Add(strtempGueltigbis)
list.Add(strtempPIN)
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

View File

@@ -75,7 +75,7 @@
</div>
</div>
<div class="card" style="width: 855px; height: 250px">
<div class="card-body">
<div class="card-body" style="width: 867px; height: 250px; margin-left: -12px;">
<div class="container">
<div class="row">
<div class="col">

View File

@@ -56,7 +56,7 @@
</div>
</div>
<div class="card" style="width: 975px; height: 250px">
<div class="card-body">
<div class="card-body" style="width: 867px; height: 250px; margin-left: -12px;">
<div class="container">
<div class="row">
<div class="col">

View File

@@ -56,7 +56,7 @@
</div>
</div>
<div class="card" style="width: 975px; height: 250px">
<div class="card-body">
<div class="card-body" style="width: 867px; height: 250px; margin-left: -12px;">
<div class="container">
<div class="row">
<div class="col">