Index: BL/Flow/Levering/Label.cls.xml
===================================================================
diff -u -r65848 -r70593
--- BL/Flow/Levering/Label.cls.xml	(.../Label.cls.xml)	(revision 65848)
+++ BL/Flow/Levering/Label.cls.xml	(.../Label.cls.xml)	(revision 70593)
@@ -175,6 +175,7 @@
     Set ..pxLabelKlant.Bonnr=..BONNr
     Set ..pxLabelKlant.PalID=..PalID
     Set ..pxLabelKlant.Verzendwijze=Verzw_$S($$ISORGAL^FLOW("L",..BONNr):"+",1:"")
+    Set ..pxLabelKlant.VerzendwijzeExtraInfo=""
     Set ..pxLabelKlant.KlantnaamBIG=KlantNaam
     Set ..pxLabelKlant.CommRef=..CommissieRef(KLNr,..BONNr)
     Set ..pxLabelKlant.UserIDPicker = UserIDPicker
@@ -196,7 +197,9 @@
     Set stPrint = blPrint.PrintLabels()
     If $$$ISERR(stPrint) Do  Quit stPrint
     . Do ..Logger.ErrorMail("PrintLabelKlantAdres - PrintLabels",$$ParseStatus^vhLib(stPrint))
-
+    Else  Do
+    . Do ..Logger.Info("PrintLabelKlantAdres - PrintLabels","PrintLabels succes voor Bon '"_..BONNr_"'")
+	
     Quit $$$OK
 ]]></Implementation>
 </Method>