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

Änderungen werden gültig nach Vorstellungen ausgeführt. Auch bei Leerlassen. Bei IWederauswählen Bug mit verschwindenden Labels und Pickdate-container2

Browse Source
This commit is contained in:
ja
2021-11-08 09:03:43 +01:00
parent 08d2cedf21
commit e49ea0a57e
2 changed files with 6 additions and 12 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
Customers/CustomsAviso.aspx
View File

@@ -333,7 +333,6 @@
} }
} }
</script> </script>
<script> <script>
$(function () { $(function () {
Sys.WebForms.PageRequestManager.getInstance().add_endRequest(PostBack); Sys.WebForms.PageRequestManager.getInstance().add_endRequest(PostBack);
@@ -345,7 +344,7 @@
var hidden = document.getElementById(<%=HIDf2.ClientID%>).value; var hidden = document.getElementById(<%=HIDf2.ClientID%>).value;
if (hidden == '1') { if (hidden == '1') {
setTimeout(function () { $('.a').hide(); document.getElementById('<%=HIDf2.ClientID%>').value = 0 }, 10); setTimeout(function () { $("#container2").hide(); document.getElementById('<%=HIDf2.ClientID%>').value = 0 }, 10);
} }
} }
</script> </script>
@@ -390,7 +389,4 @@
} }
}); });
</script> </script>
</asp:Content> </asp:Content>

8
Customers/CustomsAviso.aspx.vb
View File

@@ -46,8 +46,6 @@ Partial Class CustomsAviso
Page.MaintainScrollPositionOnPostBack = True Page.MaintainScrollPositionOnPostBack = True
normaltable.EnableViewState = True normaltable.EnableViewState = True
If rbt_Alle.Checked = True Then If rbt_Alle.Checked = True Then
lbl_von.Visible = True lbl_von.Visible = True
lbl_bis.Visible = True lbl_bis.Visible = True
@@ -461,7 +459,7 @@ Partial Class CustomsAviso
pickdate2.Text = Date.Parse(Now().Day.ToString + "." + Now().Month.ToString + "." + Now().Year.ToString).ToString pickdate2.Text = Date.Parse(Now().Day.ToString + "." + Now().Month.ToString + "." + Now().Year.ToString).ToString
dt = VERAG_PROG_ALLGEMEIN.cAviso.GET_KDLIST_WEB(Art, Kdnrtext, {0, 1, 2, 3, 4, 5}, datevon, datebis, Absender, Empfaenger, LKWNR, KDNAFNR) dt = VERAG_PROG_ALLGEMEIN.cAviso.GET_KDLIST_WEB(Art, Kdnrtext, {0, 1, 2, 3, 4, 5}, datevon, datebis, Absender, Empfaenger, LKWNR, KDNAFNR)
Catch ex As ValidationException When Date.ParseExact(pickdate1.Text, "dd.MM.yyyy", Nothing).Year < Date.ParseExact("2001", "yyyy", Nothing).Year And Date.ParseExact(pickdate2.Text, "dd.MM.yyyy", Nothing).Year > Date.ParseExact(Today, "dd.MM.yyyy", Nothing).Year Catch ex As ValidationException When Date.ParseExact(pickdate1.Text, "dd.MM.yyyy", Nothing).Year < Date.ParseExact("2001", "yyyy", Nothing).Year And Date.ParseExact(pickdate2.Text, "dd.MM.yyyy", Nothing).Year > Date.ParseExact(Today, "dd.MM.yyyy", Nothing).Year
MsgBox("Die Zeitzonen sind nicht gültig!", MsgBoxStyle.Exclamation) MsgBox("Time ranges are not valid!", MsgBoxStyle.Exclamation)
End Try End Try
Else Else
Try Try
@@ -469,7 +467,7 @@ Partial Class CustomsAviso
datebis = Date.Parse(pickdate2.Text) datebis = Date.Parse(pickdate2.Text)
dt = VERAG_PROG_ALLGEMEIN.cAviso.GET_KDLIST_WEB(Art, Kdnrtext, {0, 1, 2, 3, 4, 5}, datevon, datebis, Absender, Empfaenger, LKWNR, KDNAFNR) dt = VERAG_PROG_ALLGEMEIN.cAviso.GET_KDLIST_WEB(Art, Kdnrtext, {0, 1, 2, 3, 4, 5}, datevon, datebis, Absender, Empfaenger, LKWNR, KDNAFNR)
Catch ex As ValidationException When Date.ParseExact(pickdate1.Text, "dd.MM.yyyy", Nothing).Year < Date.ParseExact("2001", "yyyy", Nothing).Year And Date.ParseExact(pickdate2.Text, "dd.MM.yyyy", Nothing).Year > Date.ParseExact(Today, "dd.MM.yyyy", Nothing).Year Catch ex As ValidationException When Date.ParseExact(pickdate1.Text, "dd.MM.yyyy", Nothing).Year < Date.ParseExact("2001", "yyyy", Nothing).Year And Date.ParseExact(pickdate2.Text, "dd.MM.yyyy", Nothing).Year > Date.ParseExact(Today, "dd.MM.yyyy", Nothing).Year
MsgBox("Die Zeitzonen sind nicht gültig!", MsgBoxStyle.Exclamation) MsgBox("The time ranges given are not valid!", MsgBoxStyle.Exclamation)
End Try End Try
End If End If
ElseIf rbt_Erf_M.Checked = True Then ElseIf rbt_Erf_M.Checked = True Then
@@ -497,7 +495,7 @@ Partial Class CustomsAviso
' MsgBox(pickdate2.Text) ' MsgBox(pickdate2.Text)
dt = VERAG_PROG_ALLGEMEIN.cAviso.GET_KDLIST_WEB(Art, Kdnrtext, {1}, datevon, datebis, Absender, Empfaenger, LKWNR, KDNAFNR) dt = VERAG_PROG_ALLGEMEIN.cAviso.GET_KDLIST_WEB(Art, Kdnrtext, {1}, datevon, datebis, Absender, Empfaenger, LKWNR, KDNAFNR)
Catch ex As ValidationException When Date.ParseExact(pickdate1.Text, "dd.MM.yyyy", Nothing).Year < Date.ParseExact("2001", "yyyy", Nothing).Year And Date.ParseExact(pickdate2.Text, "dd.MM.yyyy", Nothing).Year > Date.ParseExact(Today, "dd.MM.yyyy", Nothing).Year Catch ex As ValidationException When Date.ParseExact(pickdate1.Text, "dd.MM.yyyy", Nothing).Year < Date.ParseExact("2001", "yyyy", Nothing).Year And Date.ParseExact(pickdate2.Text, "dd.MM.yyyy", Nothing).Year > Date.ParseExact(Today, "dd.MM.yyyy", Nothing).Year
MsgBox("Die Zeitzonen sind nicht gültig!", MsgBoxStyle.Exclamation) MsgBox("The time ranges given are not valid!", MsgBoxStyle.Exclamation)
End Try End Try
End If End If
ElseIf rbt_Ankunft_M.Checked = True Then ElseIf rbt_Ankunft_M.Checked = True Then