Index: BL/PR/GA/TandemBox.cls.xml
===================================================================
diff -u -r59405 -r59424
--- BL/PR/GA/TandemBox.cls.xml	(.../TandemBox.cls.xml)	(revision 59405)
+++ BL/PR/GA/TandemBox.cls.xml	(.../TandemBox.cls.xml)	(revision 59424)
@@ -1577,7 +1577,7 @@
  Quit
 bwvCalcStaffel(Qty)
  ;Quit $S(Qty<10:1,Qty>50:Qty,1:Qty\10*10)   ;Qty tussen 1 en 50 in stappen van 10
- Quit Qty
+ Quit 1
 bwvAddToDataItem(PL,BTVal)
  Do:($L(PL)&&$L(BTVal)) Product.SetItemValByPL(PL,BTVal)
  Quit