diff --git a/SDL/mdm/Besuchsberichte/frmBesuchsberichte.Designer.vb b/SDL/mdm/Besuchsberichte/frmBesuchsberichte.Designer.vb
index f1251bf2..2c8a4b27 100644
--- a/SDL/mdm/Besuchsberichte/frmBesuchsberichte.Designer.vb
+++ b/SDL/mdm/Besuchsberichte/frmBesuchsberichte.Designer.vb
@@ -546,7 +546,7 @@ Partial Class frmBesuchsberichte
         'UsrcntlPDFScanList1
         '
         Me.UsrcntlPDFScanList1._DATENSERVER_KATEGORIE = "DOKUMENTE"
-        Me.UsrcntlPDFScanList1._DATENSERVER_ORDNER = "BESUCHSBERICHTE"
+        Me.UsrcntlPDFScanList1._DATENSERVER_ORDNER = "MDM"
         Me.UsrcntlPDFScanList1._DATENSERVER_UOrdner1 = ""
         Me.UsrcntlPDFScanList1._DATENSERVER_UOrdner2 = ""
         Me.UsrcntlPDFScanList1._DATENSERVER_UOrdner3 = ""
diff --git a/SDL/mdm/Besuchsberichte/frmBesuchsberichte.vb b/SDL/mdm/Besuchsberichte/frmBesuchsberichte.vb
index ec03bfbd..b69b6535 100644
--- a/SDL/mdm/Besuchsberichte/frmBesuchsberichte.vb
+++ b/SDL/mdm/Besuchsberichte/frmBesuchsberichte.vb
@@ -70,7 +70,7 @@ Public Class frmBesuchsberichte
 
             UsrcntlPDFScanList1.Enabled = True
             'UsrcntlPDFScanList1.INIT(-1, "BESUCHSBERICHTE", VERAG_PROG_ALLGEMEIN.cAllgemein.FIRMA, bb_id)
-            UsrcntlPDFScanList1.INIT(BB.bb_KundenNr, VERAG_PROG_ALLGEMEIN.cAllgemein.FIRMA, BB.bb_KundenNr & "_" & BB.bb_Id)
+            UsrcntlPDFScanList1.INIT(BB.bb_KundenNr, "BESUCHSBERICHTE")
 
         Else
             UsrcntlPDFScanList1.Enabled = False
@@ -174,7 +174,7 @@ Public Class frmBesuchsberichte
             UsrcntlPDFScanList1.Enabled = True
             btnPDFReport.Enabled = True
             'UsrcntlPDFScanList1.INIT(-1, "BESUCHSBERICHTE", VERAG_PROG_ALLGEMEIN.cAllgemein.FIRMA, bb_id)
-            UsrcntlPDFScanList1.INIT(BB.bb_KundenNr, VERAG_PROG_ALLGEMEIN.cAllgemein.FIRMA, BB.bb_KundenNr & "_" & BB.bb_Id)
+            UsrcntlPDFScanList1.INIT(BB.bb_KundenNr, "BESUCHSBERICHTE")
         End If
     End Sub
 
@@ -221,7 +221,9 @@ Public Class frmBesuchsberichte
 
         list.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("Ansprechpartner", BB.bb_Anpsprechpartner.ToString))
 
-        list.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("Firma", BB.bb_Firma.ToString))
+        'list.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("Firma", BB.bb_Firma.ToString))
+
+        list.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("Firma", txtFirma.Text))
 
         list.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("Umatz", BB.bb_Umsatz)) 'ACHTUNG -> im Formular wurde das Feld "Umatz" benannt, nicht korrigieren!