From 45079f71b746bf8b33da5d2c10b3a403a2bd86d9 Mon Sep 17 00:00:00 2001 From: ja Date: Fri, 26 Nov 2021 11:22:53 +0100 Subject: [PATCH] =?UTF-8?q?=C3=84nderungen=20Linkszuordungen=20bei=20Carou?= =?UTF-8?q?ssell-Modul?= MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit --- Customers/CustomsAviso.aspx.vb | 3 --- Customers/Invoices.aspx.vb | 3 ++- Customers/Welcome.aspx | 8 ++++---- 3 files changed, 6 insertions(+), 8 deletions(-) diff --git a/Customers/CustomsAviso.aspx.vb b/Customers/CustomsAviso.aspx.vb index 0800b94..a6e0c19 100644 --- a/Customers/CustomsAviso.aspx.vb +++ b/Customers/CustomsAviso.aspx.vb @@ -636,7 +636,6 @@ Partial Class CustomsAviso dt = VERAG_PROG_ALLGEMEIN.cAviso.GET_KDLIST_WEB(Art, Integer.Parse(Kdnrtext), {5}, Nothing, Nothing, Absender, Empfaenger, LKWNR, KDNAFNR) End If End If - addrows() Session.Item("mytable") = normaltable End Sub @@ -743,8 +742,6 @@ Partial Class CustomsAviso header.Cells.Add(tbl_HeaderCell_KundAuftNr) header.Cells.Add(tbl_HeaderCell_Info) - - normaltable.Rows.Add(header) If dt IsNot Nothing AndAlso Not dt.Rows.Count = 0 Then Dim i As Integer = 0 diff --git a/Customers/Invoices.aspx.vb b/Customers/Invoices.aspx.vb index aa13e8b..c2c98ae 100644 --- a/Customers/Invoices.aspx.vb +++ b/Customers/Invoices.aspx.vb @@ -508,7 +508,6 @@ Partial Class Customers_Default3 If String.IsNullOrEmpty(Kdnrtext) = False AndAlso String.IsNullOrEmpty(datevon.ToShortDateString) = False AndAlso String.IsNullOrEmpty(datebis.ToShortDateString) = False Then dt = VERAG_PROG_ALLGEMEIN.cRechnungsausgang.GET_LIST_WEB(Integer.Parse(Kdnrtext), datevon, datebis, Integer.Parse(reNr), Absender, Empfaenger, LKWNR, KDNAFNR) Session.Add("datatbl", dt) - addrows() Else valreq_pickdate1.Validate() valreq_pickdate2.Validate() @@ -530,6 +529,8 @@ Partial Class Customers_Default3 lbl_status.Text = VERAG_VARIABLES.geterrornumb + "The time chosen is newer then today or older than april 2001. Please correct" End If End If + addrows() + Session.Item("mytable") = normaltable 'MsgBox("Test") End Sub diff --git a/Customers/Welcome.aspx b/Customers/Welcome.aspx index 18cb698..200dc95 100644 --- a/Customers/Welcome.aspx +++ b/Customers/Welcome.aspx @@ -123,17 +123,17 @@