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

Implementierung der Funktionskörper

Browse Source
This commit is contained in:
ja
2021-12-20 08:42:52 +01:00
parent f3297ecdb5
commit b506a7acc1
2 changed files with 53 additions and 32 deletions
Download Patch File Download Diff File Expand all files Collapse all files

31
App_Code/WebService.vb
View File

@@ -151,19 +151,42 @@ Public Class WebService
myConn.Close() : Return lstCountries myConn.Close() : Return lstCountries
End Function End Function
<WebMethod()> <WebMethod()>
Private Function buildtablerow(page As Page, tbl As Table) As Table Private Function buildtablerow(tbl As Table, SDLNumber As String, Bezstr As String, Datgueltigbisstr As String, KartNr As String) As Table
Dim row As TableRow = New TableRow Dim row As TableRow = New TableRow
Dim c1 As TableCell = New TableCell Dim c1 As TableCell = New TableCell
Dim c2 As TableCell = New TableCell Dim c2 As TableCell = New TableCell
Dim c3 As TableCell = New TableCell Dim c3 As TableCell = New TableCell
Dim c4 As TableCell = New TableCell
c1.Text = "ID" c1.Text = SDLNumber
c2.Text = "Stadt" c2.Text = Bezstr
c3.Text = "Persona" c3.Text = Datgueltigbisstr
c4.Text = KartNr
row.Cells.Add(c1) row.Cells.Add(c1)
row.Cells.Add(c2) row.Cells.Add(c2)
row.Cells.Add(c3) row.Cells.Add(c3)
row.Cells.Add(c4)
tbl.Rows.Add(row)
Return tbl
End Function
<WebMethod()>
Private Function buildtablerow_M(tbl As Table, SDLNumber_M As String, Bezstr_M As String, Datgueltigbisstr_M As String, KartNr_M As String) As Table
Dim row As TableRow = New TableRow
Dim c1 As TableCell = New TableCell
Dim c2 As TableCell = New TableCell
Dim c3 As TableCell = New TableCell
Dim c4 As TableCell = New TableCell
c1.Text = SDLNumber_M
c2.Text = Bezstr_M
c3.Text = Datgueltigbisstr_M
c4.Text = KartNr_M
row.Cells.Add(c1)
row.Cells.Add(c2)
row.Cells.Add(c3)
row.Cells.Add(c4)
tbl.Rows.Add(row) tbl.Rows.Add(row)
Return tbl Return tbl
End Function End Function

52
Customers/LKWs.aspx
View File

@@ -143,11 +143,11 @@
<script type="text/javascript"> <script type="text/javascript">
function TableRow_Click(Nat, Kennzeichen) { function TableRow_Click(Nat, Kennzeichen) {
debugger
var arr = new Array(); var arr = new Array();
var convertarr; var convertarr;
arr.push(BuildAddress(SDL, Bez, gueltigBis, KartNr)); arr.push(buildtablerow(<%=tbl_mainpage%>,SDL, Bez, gueltigBis, KartNr));
convertarr = JSON.stringfy(arr); convertarr = JSON.stringfy(arr);
$.ajax({ $.ajax({
@@ -159,22 +159,23 @@
var resultarr = JSON.parse(arr); var resultarr = JSON.parse(arr);
// Do something with result, example: result[0].City // Do something with result, example: result[0].City
for (let i = 0; i < resultarr.length; i++) {
let Speditionslabel = document.getElementById("<%=lbl_sped_Placeholder.ClientID%>")
let natplaceholder = document.getElementById("<%=lbl_Placeholder.ClientID%>")
let table = document.getElementById("<%=tbl_mainpage.ClientID%>")
Speditionslabel.textContent = Kennzeichen;
natplaceholder.textContent = Nat;
var SDL = resultarr[i].SDLNumber<%'=VERAG_VARIABLES.RandomInteger(Math.Pow(2, 15), Math.Pow(2, 20)).ToString%>;
var Bez = resultarr[i].Bezstr;
var Datumgueltigbis = resultarr[i].Datgueltigbisstr;
var KartenNr = resultarr[i].KartNr;
var rowCount = table.rows.length;
let Speditionslabel = document.getElementById("<%=lbl_sped_Placeholder.ClientID%>") for (let i = rowCount - 1; i > 0; i--) {
let natplaceholder = document.getElementById("<%=lbl_Placeholder.ClientID%>") table.deleteRow(i);
let table = document.getElementById("<%=tbl_mainpage.ClientID%>") }
Speditionslabel.textContent = Kennzeichen; buildtable(resultarr.length,SDL, Bez, Datumgueltigbis, KartenNr)
natplaceholder.textContent = Nat; }
var SDL = <%=VERAG_VARIABLES.RandomInteger(Math.Pow(2, 15), Math.Pow(2, 20)).ToString%>;
var Bez = "Testbezeichnung Diesel 2l";
var Datumgueltigbis = "20.04.2025";
var KartenNr = "303102350351310351313";
var rowCount = table.rows.length;
for (var i = rowCount - 1; i > 0; i--) {
table.deleteRow(i);
}
buildtable(<%=VERAG_VARIABLES.RandomInteger(Math.Pow(2, 4), Math.Pow(2, 6))%>, SDL, Bez, Datumgueltigbis, KartenNr)
} }
}); });
} }
@@ -183,12 +184,12 @@
var arr_M = new Array(); var arr_M = new Array();
var convertArr_M; var convertArr_M;
address.push(BuildArr_M(SDL_M, Bez_M, gueltigBis, KartNr)); arr_M.push(buildtablerow(<%=tbl_mainpage_M%>, SDL, Bez, gueltigBis, KartNr));
convertedArr_M = JSON.stringfy(arr_M); convertedArr_M = JSON.stringfy(arr_M);
$.ajax({ $.ajax({
url: '<%= Page.ResolveUrl("~/Services/Location.aspx") %>', url: '<%= Page.ResolveUrl("~/Services/Location.aspx") %>',
data: { Address: convertedArr_M }, data: { Address: convertArr_M },
type: 'POST', type: 'POST',
success: function (arr_M) { success: function (arr_M) {
@@ -201,18 +202,15 @@
let table_M = document.getElementById("<%=tbl_mainpage_M.ClientID%>") let table_M = document.getElementById("<%=tbl_mainpage_M.ClientID%>")
Speditionslabel.textContent = Kennzeichen; Speditionslabel.textContent = Kennzeichen;
natplaceholder.textContent = Nat; natplaceholder.textContent = Nat;
var SDL_M = "7544514114"; var SDL_M = resultArr_M[i].SDLNumber_M;
var Bez_M = "Testbezeichnung Diesel 2l"; var Bez_M = resultArr_M[i].Bezstr_M;
var Datumgueltigbis_M = "20.04.2025"; var Datumgueltigbis_M = resultArr_M[i].Datgueltigbisstr_M;
var KartenNr_M = "303102350351310351313"; var KartenNr_M = resultArr_M[i].KartNr_M;
var rowCount_M = table_M.rows.length; var rowCount_M = table_M.rows.length;
for (var i = rowCount_M - 1; i > 0; i--) { for (var i = rowCount_M - 1; i > 0; i--) {
table_M.deleteRow(i); table_M.deleteRow(i);
} }
buildtable_M(resultArr_M.length,SDL_M, Bez_M, Datumgueltigbis_M, KartenNr_M)
buildtable_M(<%=VERAG_VARIABLES.RandomInteger(Math.Pow(2, 4), Math.Pow(2, 17))%>, SDL_M, Bez_M, Datumgueltigbis_M, KartenNr_M)
} }
}); });
} }