Index: BL/Flow/Levering/Label.cls.xml
===================================================================
diff -u -r72900 -r73880
--- BL/Flow/Levering/Label.cls.xml	(.../Label.cls.xml)	(revision 72900)
+++ BL/Flow/Levering/Label.cls.xml	(.../Label.cls.xml)	(revision 73880)
@@ -214,6 +214,8 @@
     Set ..pxLabelKlant.Aantal=Aantal
     Set ..pxLabelKlant.Layout = ..blLabelPrinter.LayoutTemplate(Printer,"KLANT_ADRES")
     
+    Set ..pxLabelKlant.MaatwerkOfSingleOrderPick = $$ExtraMagInfoViaBon^TRANSPStatusKlantVandaag(..BONNr)
+    
    	If Printer["\\" Set ..pxLabelKlant.Device=Printer  ;als het UNC-pad van de printer wordt doorgegeven vul je het rechstreeks in
    	Else  Set ..pxLabelKlant.Device=##class(BL.Sys.LabelPrinter).FullDevicePad(Printer)
 	Try {