AVISO Ansicht, Sendung-Frachtksoten

This commit is contained in:
2022-10-10 10:33:38 +02:00
parent 8404604de3
commit b44f5efd69
22 changed files with 2320 additions and 1075 deletions

View File

@@ -157,11 +157,16 @@ Public Class rptSendungen
End If
Select Case VALUES.ABF_ART
Case 5, 6
Case 5, 6, 18, 32, 24, 33, 34, 37, 40, 42
txtNCTSVZAdr.Visible = True
lblNCTSVZAdr.Visible = True
txtNCTSVZAdr.Text = VALUES.NCTS_VZAdr
lblNCTSVZAdr.Text = "NCTS" & vbNewLine & "Gest.-Adr.:"
Case 7
txtNCTSVZAdr.Visible = True
lblNCTSVZAdr.Visible = True
txtNCTSVZAdr.Text = VALUES.NCTS_VZAdr
lblNCTSVZAdr.Text = "Amtsplatz/" & vbNewLine & "Zollstopp:"
Case 26, 28
txtNCTSVZAdr.Visible = True
lblNCTSVZAdr.Visible = True