Index: FLOWBON4.mac.rou
===================================================================
diff -u -r734 -r2523
--- FLOWBON4.mac.rou	(.../FLOWBON4.mac.rou)	(revision 734)
+++ FLOWBON4.mac.rou	(.../FLOWBON4.mac.rou)	(revision 2523)
@@ -191,15 +191,15 @@
  Set Magazijn = $G(Magazijn)
  If '$L(Magazijn) Set Printer = $$SelectPrinter    // indien geen magazijn opgegeven vragen naar printer
  If ($L(Magazijn))||('$L(Printer)) Set Printer = ##class(BL.Sys.LabelPrinter).DefaultDevice("KLANT_ADRES",Magazijn)  // indien magazijn of geen printer gekozen default printer ophalen 
- do PrintLabel(BONNr,Printer)
+ do PrintLabel(BONNr,Printer,1,MagazijnID)
  Quit
  
-PrintLabel(BONNR,Printer,Aantal)
+PrintLabel(BONNR,Printer,Aantal,MagazijnID)
  Set Aantal = $G(Aantal,1)
  new blLabel 
  Set blLabel=##class(BL.Flow.Levering.Label).Instantiate()
  Do blLabel.Init(BONNr)
- Do blLabel.PrintLabelKlantAdres(Printer,Aantal)
+ Do blLabel.PrintLabelKlantAdres(Printer,Aantal,.MagazijnID)
  Quit