diff --git a/Customers/CustomsAviso.aspx b/Customers/CustomsAviso.aspx
index b59cf00..423ceff 100644
--- a/Customers/CustomsAviso.aspx
+++ b/Customers/CustomsAviso.aspx
@@ -62,7 +62,43 @@
If True Then 'AVISO.Status <> 1 And AVISO.Status <> 2 Then 'SENDUNGSTABELLE'%>
<%=STANDORT %>
+ Bitte eine Auswahl treffen:
+
+
+
+
+
+
+
+
+
+
+
+ <%If RadioButtonFreig.Checked = False Then %>
+
+ <%Else If RadioButtonFreig.Checked = True Then %>
+
+ <%End If %>
+
+
<% End If
+ End If
End If
- End If
Catch ex As Exception
Response.Write(ex.Message & ex.StackTrace)
End Try %>
@@ -101,4 +133,5 @@
--%>
+
\ No newline at end of file
diff --git a/Customers/CustomsAviso.aspx.vb b/Customers/CustomsAviso.aspx.vb
index cb1a8e9..6325d30 100644
--- a/Customers/CustomsAviso.aspx.vb
+++ b/Customers/CustomsAviso.aspx.vb
@@ -13,4 +13,47 @@ Partial Class Kundenbereich_Default
Session.Abandon()
Response.Redirect("../newpageJulius_Sidebar.aspx", True)
End Sub
+
+
+
+ Protected Sub Button1_Click(sender As Object, e As EventArgs)
+ Dim Kdnrtext = TB_KdNr.Text
+ Dim truefalse(5) As Boolean
+ Dim numarr(5) As Integer
+
+ Dim dt
+
+ If RadioButtonErf.Checked = True Then
+
+ dt = VERAG_PROG_ALLGEMEIN.cAviso.GET_KDLIST_WEB("", Integer.Parse(TB_KdNr.Text), {0}, DateTime.Now, DateTime.Now)
+ ElseIf RadioButtonFreig.Checked = True Then
+
+ dt = VERAG_PROG_ALLGEMEIN.cAviso.GET_KDLIST_WEB("", Integer.Parse(TB_KdNr.Text), {1}, DateTime.Now, DateTime.Now)
+ ElseIf RadioButtonAnkunft.Checked = True Then
+
+ dt = VERAG_PROG_ALLGEMEIN.cAviso.GET_KDLIST_WEB("", Integer.Parse(TB_KdNr.Text), {3})
+ ElseIf RadioButtonVorb.Checked = True Then
+
+ dt = VERAG_PROG_ALLGEMEIN.cAviso.GET_KDLIST_WEB("", Integer.Parse(TB_KdNr.Text), {4})
+ End If
+
+ For Each num In numarr
+ If truefalse.GetValue(num) = True Then
+ dt = VERAG_PROG_ALLGEMEIN.cAviso.GET_KDLIST_WEB("", Integer.Parse(TB_KdNr.Text), {num})
+ Else
+ dt = VERAG_PROG_ALLGEMEIN.cAviso.GET_KDLIST_WEB("", Integer.Parse(TB_KdNr.Text), {0})
+ End If
+ Next
+
+ End Sub
+
+ Protected Sub Button2_Click(sender As Object, e As EventArgs)
+ RadioButtonAnkunft.Checked = False
+ RadioButtonErf.Checked = False
+ RadioButtonFreig.Checked = False
+ RadioButtonVorb.Checked = False
+ RadioButtonVorg.Checked = False
+ TB_KdNr.Text = ""
+ TB_KdNr.Focus()
+ End Sub
End Class
diff --git a/package-lock.json b/package-lock.json
new file mode 100644
index 0000000..429fc54
--- /dev/null
+++ b/package-lock.json
@@ -0,0 +1,25 @@
+{
+ "requires": true,
+ "lockfileVersion": 1,
+ "dependencies": {
+ "bootstrap": {
+ "version": "5.1.1",
+ "resolved": "https://registry.npmjs.org/bootstrap/-/bootstrap-5.1.1.tgz",
+ "integrity": "sha512-/jUa4sSuDZWlDLQ1gwQQR8uoYSvLJzDd8m5o6bPKh3asLAMYVZKdRCjb1joUd5WXf0WwCNzd2EjwQQhupou0dA=="
+ },
+ "bootstrap-year-calendar": {
+ "version": "1.1.1",
+ "resolved": "https://registry.npmjs.org/bootstrap-year-calendar/-/bootstrap-year-calendar-1.1.1.tgz",
+ "integrity": "sha1-OmMrENn5fTCFDF4UGpT1lnNotjM=",
+ "requires": {
+ "bootstrap": ">=3.1.1",
+ "jquery": ">=1.8.2"
+ }
+ },
+ "jquery": {
+ "version": "3.6.0",
+ "resolved": "https://registry.npmjs.org/jquery/-/jquery-3.6.0.tgz",
+ "integrity": "sha512-JVzAR/AjBvVt2BmYhxRCSYysDsPcssdmTFnzyLEts9qNwmjmu4JTAMYubEfwVOSwpQ1I1sKKFcxhZCI2buerfw=="
+ }
+ }
+}