Änderungen

This commit is contained in:
ja
2021-11-08 09:45:04 +01:00
parent e49ea0a57e
commit 085a880457
2 changed files with 17 additions and 15 deletions

View File

@@ -542,7 +542,7 @@ Partial Class CustomsAviso
tr.Cells.Add(tbl_CellStatus)
Case 2
tbl_CellStatus.Text = "Nicht eingetroffen"
tr.Cells.Add(Cell)
tr.Cells.Add(tbl_CellStatus)
Case 3
tbl_CellStatus.Text = "Ankunft"
tr.Cells.Add(tbl_CellStatus)
@@ -553,7 +553,7 @@ Partial Class CustomsAviso
tbl_CellStatus.Text = "Vorgeschrieben"
tr.Cells.Add(tbl_CellStatus)
Case Nothing
tbl_CellStatus.Text = "Undefiniert"
tbl_CellStatus.Text = "Undefiniened"
tr.Cells.Add(tbl_CellStatus)
End Select
initcells(tr, tbl_CellIndex, tbl_CellStatus, tbl_Cell_Auftragsdatum, tbl_CellAbsender, tbl_CellEmpfaenger, tbl_CellLKWs, tbl_CellKundAuftNr, tbl_CellInfo, tbl_HeaderCellIndexNr, tbl_HeaderCell_Status, tbl_HeaderCell_Auftragsdatum, tbl_HeaderCell_Absender, tbl_HeaderCell_Empfaenger, tbl_HeaderCell_LKWs, tbl_HeaderCell_KundAuftNr, tbl_HeaderCell_Info)
@@ -612,8 +612,8 @@ Partial Class CustomsAviso
End Sub
Protected Sub btn_resetForm_Click(sender As Object, e As EventArgs)
'Mobil
If String.IsNullOrEmpty(txt_Absender_M.Text) = False Or String.IsNullOrEmpty(txt_Empfaenger_M.Text) = False Or String.IsNullOrEmpty(txt_KdNrAuftrag_M.Text) = False Or String.IsNullOrEmpty(txt_LKWNr_M.Text) = False Or rbt_Alle_M.Checked = True Or rbt_Ankunft_M.Checked = True Or rbt_Erf_M.Checked = True Or rbt_Freig_M.Checked = True Or rbt_Vorb_M.Checked = True Or rbt_Vorg_M.Checked = True Then
'Mobil
rbt_Alle_M.Checked = True
rbt_Alle_M.Disabled = False
rbt_Ankunft_M.Checked = False