Index: vhUnitTest/APPS/common/impl/StockNiveauService/Test.cls.xml
===================================================================
diff -u -r33153 -r33159
--- vhUnitTest/APPS/common/impl/StockNiveauService/Test.cls.xml	(.../Test.cls.xml)	(revision 33153)
+++ vhUnitTest/APPS/common/impl/StockNiveauService/Test.cls.xml	(.../Test.cls.xml)	(revision 33159)
@@ -103,6 +103,22 @@
 	Do $$$AssertEquals(..StockNiveauService.GeefAantalInReservatie(), 5)
 ]]></Implementation>
 </Method>
+
+<Method name="Test: aantal in transfer">
+<Implementation><![CDATA[
+	#dim EnumOrderType As DOM.VKP.enu.OrderType.AutoComplete = ##class(DOM.VKP.enu.OrderType.AutoComplete).%New()
+	#dim WinkelOrder As zTryout.MVI.KPR.Product.WinkelOrder = ##class(zTryout.MVI.KPR.Product.WinkelOrder).MaakWinkelOrder(..#ProductNummer, ..Datum, ..#OrderNummer, ..#OrderLijnNummer)
+	
+	Do WinkelOrder.ZetLeverweek($zDateH("01/03/16", 4))
+	Do WinkelOrder.ZetAantal(5)
+
+	#dim Order As zTryout.MVI.KOD.Order = ##class(zTryout.MVI.KOD.Order).%New(..#OrderNummer, ..#KlantNummer)
+	
+	Do Order.ZetOrderType(EnumOrderType.Transfer)
+
+	Do $$$AssertEquals(..StockNiveauService.GeefAantalInTransfert(), 5)
+]]></Implementation>
+</Method>
 </Class>