diff --git a/Aviso/My Project/AssemblyInfo.vb b/Aviso/My Project/AssemblyInfo.vb
index 786aabe..d5cfdb9 100644
--- a/Aviso/My Project/AssemblyInfo.vb	
+++ b/Aviso/My Project/AssemblyInfo.vb	
@@ -31,5 +31,5 @@ Imports System.Runtime.InteropServices
 ' übernehmen, indem Sie "*" eingeben:
 ' <Assembly: AssemblyVersion("1.0.*")> 
 
-<Assembly: AssemblyVersion("4.1.8.4")>
-<Assembly: AssemblyFileVersion("4.1.8.4")>
+<Assembly: AssemblyVersion("4.1.8.5")>
+<Assembly: AssemblyFileVersion("4.1.8.5")>
diff --git a/Aviso/frmSendungsdetailsNEU.vb b/Aviso/frmSendungsdetailsNEU.vb
index 2db229c..d4b950c 100644
--- a/Aviso/frmSendungsdetailsNEU.vb
+++ b/Aviso/frmSendungsdetailsNEU.vb
@@ -670,8 +670,11 @@ Public Class frmSendungsdetailsNEU
             txtAvisierer.initKdBox(Me, txtAvisiererKdNr)
             txtFrachtfuehrer.initKdBox(Me, txtFrachtfuehrerKdNr)
 
+
+
             AddHandler txtAvisierer.PropertyChanged, Sub()
                                                          lblErr_AvisiererKdNr.Visible = False
+                                                         cntlAvisierer_Abf.Visible = checkOfferteExistFromAbfArt(txtAvisierer.KdNr_value, cboAbfertigungsart._value)
 
                                                          btnAvisierer.BackgroundImage = IIf(txtAvisierer.KdNr > 0, My.Resources.person, My.Resources.personInaktiv)
                                                          SENDUNG_LIST(CURRENT_INDEX).tblSnd_Avisierer = txtAvisierer.Text
@@ -690,6 +693,7 @@ Public Class frmSendungsdetailsNEU
                                                      End Sub
 
             AddHandler txtFrachtfuehrer.PropertyChanged, Sub()
+                                                             cntlFrachtf_Abf.Visible = checkOfferteExistFromAbfArt(txtFrachtfuehrer.KdNr_value, cboAbfertigungsart._value)
                                                              lblErr_FraechterKdNr.Visible = False
 
                                                              btnFrachtfuehrer.BackgroundImage = IIf(txtFrachtfuehrer.KdNr > 0, My.Resources.person, My.Resources.personInaktiv)
@@ -711,6 +715,7 @@ Public Class frmSendungsdetailsNEU
             txtEmpfaenger.initKdBox(Me, txtEmpfaengerKdNr)
             AddHandler txtEmpfaenger.PropertyChanged, Sub()
                                                           lblErr_EmpfKdNr.Visible = False
+                                                          cntlEmpf_Abf.Visible = checkOfferteExistFromAbfArt(txtEmpfaenger.KdNr_value, cboAbfertigungsart._value)
 
                                                           FlatButton1.BackgroundImage = IIf(txtEmpfaenger.KdNr > 0, My.Resources.person, My.Resources.personInaktiv)
                                                           SENDUNG_LIST(CURRENT_INDEX).tblSnd_Empfaenger = txtEmpfaenger.Text
@@ -731,6 +736,7 @@ Public Class frmSendungsdetailsNEU
                                                           initWarnKd_AndKdInfo(txtEmpfaenger, picWarnEmpfaenger)
                                                       End Sub
             AddHandler txtAbsender.PropertyChanged, Sub()
+                                                        cntlAbsender_Abf.Visible = checkOfferteExistFromAbfArt(txtAbsender.KdNr_value, cboAbfertigungsart._value)
                                                         FlatButton4.BackgroundImage = IIf(txtAbsender.KdNr > 0, My.Resources.person, My.Resources.personInaktiv)
                                                         SENDUNG_LIST(CURRENT_INDEX).tblSnd_Absender = txtAbsender.Text
                                                         SENDUNG_LIST(CURRENT_INDEX).tblSnd_AbsenderKdNr = txtAbsender.KdNr
@@ -744,6 +750,7 @@ Public Class frmSendungsdetailsNEU
 
             AddHandler txtAuftraggeber.PropertyChanged, Sub()
                                                             Try
+                                                                cntlAuftr_Abf.Visible = checkOfferteExistFromAbfArt(txtAuftraggeber.KdNr_value, cboAbfertigungsart._value)
                                                                 SENDUNG_LIST(CURRENT_INDEX).tblSnd_Auftraggeber = txtAuftraggeber.Text
                                                                 SENDUNG_LIST(CURRENT_INDEX).tblSnd_AuftraggeberKdNr = txtAuftraggeber.KdNr
                                                                 FlatButton3.BackgroundImage = IIf(txtAuftraggeber.KdNr > 0, My.Resources.person, My.Resources.personInaktiv)