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

Änderungen LKWs

Browse Source
This commit is contained in:
ja
2022-01-12 16:29:38 +01:00
parent f9ecb1602a
commit 662f0acadb
3 changed files with 1469 additions and 1420 deletions
Download Patch File Download Diff File Expand all files Collapse all files

40
Customers/LKWs.aspx
View File

@@ -107,7 +107,7 @@
</thead> </thead>
<tbody> <tbody>
<tr> <tr>
<td colspan="5" class="dataTables_empty">Lade Daten mittels Klicken</td> <td colspan="5" class="dataTables_empty">Lade Daten mittels Klicken auf einen der beiden linken Knöpfe.</td>
</tr> </tr>
</tbody> </tbody>
</table> </table>
@@ -171,7 +171,7 @@
</thead> </thead>
<tbody> <tbody>
<tr> <tr>
<td colspan="12" class="dataTables_empty">Lade Daten mittels Klicken</td> <td colspan="12" class="dataTables_empty">Lade Daten mittels Klicken auf einen der beiden linken Knöpfe.</td>
</tr> </tr>
</tbody> </tbody>
</table> </table>
@@ -362,6 +362,42 @@
</script> </script>
<script type="text/javascript"> <script type="text/javascript">
$("<%=tablemain.ClientID%>").dataTable({
"bJQueryUI": true,
"sPaginationType": "full_numbers",
"bServerSide": true,
"sAjaxSource": "LKWs.aspx/filltable2",
"fnServerData": function (sSource, aoData, fnCallback) {
$.ajax({
"type": "POST",
"dataType": 'json',
"contentType": "application/json; charset=utf-8",
"url": sSource,
"data": "{'sEcho': '" + aoData[0].value + "'}",
"success": function (msg) {
fnCallback(msg.d);
}
});
}
});
$("<%=tablemain_m.ClientID%>").dataTable({
"bJQueryUI": true,
"sPaginationType": "full_numbers",
"bServerSide": true,
"sAjaxSource": "LKWs.aspx/filltable2_M",
"fnServerData": function (sSource, aoData, fnCallback) {
$.ajax({
"type": "POST",
"dataType": 'json',
"contentType": "application/json; charset=utf-8",
"url": sSource,
"data": "{'sEcho': '" + aoData[0].value + "'}",
"success": function (msg) {
fnCallback(msg.d);
}
});
}
});
function renderTable(result) { function renderTable(result) {
let dtData = []; let dtData = [];
// Data tables requires all data to be stuffed into a generic jagged array, so loop through our // Data tables requires all data to be stuffed into a generic jagged array, so loop through our

19
Customers/LKWs.aspx.vb
View File

@@ -412,8 +412,8 @@ Partial Class LKWS
Next Next
End Sub End Sub
<WebMethod(BufferResponse:=True, CacheDuration:=2400, Description:="Funktion zum zurückgeben einer Tabelle", EnableSession:=False, TransactionOption:=EnterpriseServices.TransactionOption.Supported)> <WebMethod(BufferResponse:=False, CacheDuration:=120, Description:="Funktion zum zurückgeben einer Tabelle", EnableSession:=False, TransactionOption:=EnterpriseServices.TransactionOption.NotSupported)>
<ScriptMethod(ResponseFormat:=ResponseFormat.Json)> <ScriptMethod(ResponseFormat:=ResponseFormat.Json, UseHttpGet:=False)>
Public Shared Function filltable2(Kennzeichen As String) As List(Of Entry) Public Shared Function filltable2(Kennzeichen As String) As List(Of Entry)
Dim strtemp2 As String = Kennzeichen.Remove(Kennzeichen.Length - 1, 1) Dim strtemp2 As String = Kennzeichen.Remove(Kennzeichen.Length - 1, 1)
Dim strtemp3 As String = strtemp2.Remove(0, 1) Dim strtemp3 As String = strtemp2.Remove(0, 1)
@@ -431,12 +431,13 @@ Partial Class LKWS
list.Add(Entrytemp) list.Add(Entrytemp)
Next Next
ElseIf list2.Count = 0 Then ElseIf list2.Count = 0 Then
Dim Entrytempempty As New Entry Dim Entrytemp As New Entry
Entrytempempty.SDL = "Keine"
Entrytempempty.Bez = "Daten" Entrytemp.SDL = "Keine"
Entrytempempty.Gueltigbis = "gefunden!" Entrytemp.Bez = "Daten"
Entrytempempty.KartNr = String.Empty Entrytemp.Gueltigbis = "gefunden!"
list.Add(Entrytempempty) Entrytemp.KartNr = String.Empty
list.Add(Entrytemp)
End If End If
Return list Return list
End Function End Function
@@ -448,7 +449,7 @@ Partial Class LKWS
Public KartNr As String = String.Empty Public KartNr As String = String.Empty
End Class End Class
<WebMethod(BufferResponse:=True, CacheDuration:=2400, Description:="Funktion zum zurückgeben einer Tabelle", EnableSession:=False, TransactionOption:=EnterpriseServices.TransactionOption.Supported)> <WebMethod(BufferResponse:=False, CacheDuration:=120, Description:="Funktion zum zurückgeben einer Tabelle", EnableSession:=False, TransactionOption:=EnterpriseServices.TransactionOption.NotSupported)>
<ScriptMethod(ResponseFormat:=ResponseFormat.Json, UseHttpGet:=False)> <ScriptMethod(ResponseFormat:=ResponseFormat.Json, UseHttpGet:=False)>
Public Shared Function filltable2_M(Kennzeichen As String) As List(Of Entry) Public Shared Function filltable2_M(Kennzeichen As String) As List(Of Entry)
Dim strtemp2 As String = Kennzeichen.Remove(Kennzeichen.Length - 1, 1) Dim strtemp2 As String = Kennzeichen.Remove(Kennzeichen.Length - 1, 1)

2828
VERAG_Homepage/{11EF0CDA-BC19-40FB-91C4-25C81F3A27AC}/CodeAnalysisLog.xml
View File

File diff suppressed because it is too large Load Diff