Index: vhUnitTest/AXimpl/Dynamics/InventoryOut/Converter/AxInventSyncCreator/SpaceTowerFysStockBepaler/Test.cls.xml
===================================================================
diff -u -r56059 -r56063
--- vhUnitTest/AXimpl/Dynamics/InventoryOut/Converter/AxInventSyncCreator/SpaceTowerFysStockBepaler/Test.cls.xml	(.../Test.cls.xml)	(revision 56059)
+++ vhUnitTest/AXimpl/Dynamics/InventoryOut/Converter/AxInventSyncCreator/SpaceTowerFysStockBepaler/Test.cls.xml	(.../Test.cls.xml)	(revision 56063)
@@ -3,6 +3,51 @@
 <Class name="vhUnitTest.AXimpl.Dynamics.InventoryOut.Converter.AxInventSyncCreator.SpaceTowerFysStockBepaler.Test">
 <Super>vhUnitTest.TestCase</Super>
 
+<Parameter name="SpaceTowerPRNr1">
+<Type>%String</Type>
+<Default>1001</Default>
+</Parameter>
+
+<Parameter name="SpaceTowerPRNr2">
+<Type>%String</Type>
+<Default>1002</Default>
+</Parameter>
+
+<Parameter name="SpaceTowerPRNr3">
+<Type>%String</Type>
+<Default>1003</Default>
+</Parameter>
+
+<Parameter name="SpaceTowerPRNr4">
+<Type>%String</Type>
+<Default>1004</Default>
+</Parameter>
+
+<Parameter name="Order1">
+<Type>%String</Type>
+<Default>100000</Default>
+</Parameter>
+
+<Parameter name="Order2">
+<Type>%String</Type>
+<Default>200000</Default>
+</Parameter>
+
+<Parameter name="Order3">
+<Type>%String</Type>
+<Default>300000</Default>
+</Parameter>
+
+<Parameter name="GeefOrderLijn1">
+<Type>%String</Type>
+<Default>100</Default>
+</Parameter>
+
+<Parameter name="GeefOrderLijn2">
+<Type>%String</Type>
+<Default>200</Default>
+</Parameter>
+
 <Property name="OrderApi">
 <Type>DOM.VKP.OrderAPI</Type>
 <Private>1</Private>
@@ -14,9 +59,27 @@
 	Do ##super(aTestName)
 	
 	Set ..OrderApi = ##class(vhTest.Mock.DOM.VKP.OrderAPI).%New()
+	Do ..ZetDataOp()
 ]]></Implementation>
 </Method>
 
+<Method name="OnAfterOneTest">
+<FormalSpec>aTestName:%String</FormalSpec>
+<Implementation><![CDATA[
+	Do ..KuisDataOp()
+	
+	Do ##super(aTestName)
+]]></Implementation>
+</Method>
+
+<Method name="OnAfterAllTests">
+<Implementation><![CDATA[
+ 	Do ..KuisDataOp()
+ 	
+ 	Do ##super()
+]]></Implementation>
+</Method>
+
 <Method name="Test: SpaceTowerPRNr is leeg">
 <Implementation><![CDATA[
 	#dim SpaceTowerPRNr As %String = ""
@@ -43,12 +106,107 @@
 ]]></Implementation>
 </Method>
 
+<Method name="Test: SpaceTowerPRNr is niet leeg en komt niet voor in Global ORD">
+<Implementation><![CDATA[
+	#dim SpaceTowerPRNr As %String = ..#SpaceTowerPRNr4
+	#dim AxConfigId As %String = "AxConfigId"
+	
+	#dim SpaceTowerFysStockBepaler As AXimpl.Dynamics.InventoryOut.Converter.AxInventSyncCreator.SpaceTowerFysStockBepaler = ..GeefSpaceTowerFysStockBepaler()
+	
+	#dim SpaceTowerFysStock As %String = SpaceTowerFysStockBepaler.GeefSpaceTowerFysStock(SpaceTowerPRNr, AxConfigId)
+	
+	Do $$$AssertEquals(SpaceTowerFysStock, "0")
+]]></Implementation>
+</Method>
+
+<Method name="Test: SpaceTowerFysStock is som van GeefAantal van meerdere orderlijnen binnen zelfde order">
+<Implementation><![CDATA[
+	#dim SpaceTowerPRNr As %String = ..#SpaceTowerPRNr1
+	#dim AxConfigId As %String = "AxConfigId"
+	
+	#dim OrderLijn1 As DOM.VKP.Orderlijn = ##class(vhTest.Mock.DOM.VKP.ProductOrderlijn).%New()
+	Do OrderLijn1.IndienMethodCall("GeefAxConfigId").DanReturn(AxConfigId)
+	Do OrderLijn1.IndienMethodCall("GeefToeleveringLijnNr").DanReturn("KOM")
+	Do OrderLijn1.IndienMethodCall("GeefAantal").DanReturn(1)
+	
+	#dim OrderLijn2 As DOM.VKP.Orderlijn = ##class(vhTest.Mock.DOM.VKP.ProductOrderlijn).%New()
+	Do OrderLijn2.IndienMethodCall("GeefAxConfigId").DanReturn(AxConfigId)
+	Do OrderLijn2.IndienMethodCall("GeefToeleveringLijnNr").DanReturn("KOM")
+	Do OrderLijn2.IndienMethodCall("GeefAantal").DanReturn(2)
+	
+	#dim Order As DOM.VKP.Order = ##class(vhTest.Mock.DOM.VKP.Order).%New()
+	Do Order.IndienMethodCall("GeefStatus").DanReturn(##class(DOM.VKP.enu.OrderStatus).Gesloten())
+	Do Order.IndienMethodCall("GeefOrderLijn", ..#GeefOrderLijn1).DanReturn(OrderLijn1)
+	Do Order.IndienMethodCall("GeefOrderLijn", ..#GeefOrderLijn2).DanReturn(OrderLijn2)
+	
+	Do ..OrderApi.IndienMethodCall("GeefOrder", ..#Order1).DanReturn(Order)
+	
+	#dim SpaceTowerFysStockBepaler As AXimpl.Dynamics.InventoryOut.Converter.AxInventSyncCreator.SpaceTowerFysStockBepaler = ..GeefSpaceTowerFysStockBepaler()
+	
+	#dim SpaceTowerFysStock As %String = SpaceTowerFysStockBepaler.GeefSpaceTowerFysStock(SpaceTowerPRNr, AxConfigId)
+	
+	Do $$$AssertEquals(SpaceTowerFysStock, "3")
+]]></Implementation>
+</Method>
+
+<Method name="Test: SpaceTowerFysStock is som van GeefAantal van orderlijnen op meerdere orders">
+<Implementation><![CDATA[
+	#dim SpaceTowerPRNr As %String = ..#SpaceTowerPRNr2
+	#dim AxConfigId As %String = "AxConfigId"
+	
+	#dim OrderLijn1 As DOM.VKP.Orderlijn = ##class(vhTest.Mock.DOM.VKP.ProductOrderlijn).%New()
+	Do OrderLijn1.IndienMethodCall("GeefAxConfigId").DanReturn(AxConfigId)
+	Do OrderLijn1.IndienMethodCall("GeefToeleveringLijnNr").DanReturn("KOM")
+	Do OrderLijn1.IndienMethodCall("GeefAantal").DanReturn(3)
+	
+	#dim OrderLijn2 As DOM.VKP.Orderlijn = ##class(vhTest.Mock.DOM.VKP.ProductOrderlijn).%New()
+	Do OrderLijn2.IndienMethodCall("GeefAxConfigId").DanReturn(AxConfigId)
+	Do OrderLijn2.IndienMethodCall("GeefToeleveringLijnNr").DanReturn("KOM")
+	Do OrderLijn2.IndienMethodCall("GeefAantal").DanReturn(4)
+	
+	#dim Order2 As DOM.VKP.Order = ##class(vhTest.Mock.DOM.VKP.Order).%New()
+	Do Order2.IndienMethodCall("GeefStatus").DanReturn(##class(DOM.VKP.enu.OrderStatus).Gesloten())
+	Do Order2.IndienMethodCall("GeefOrderLijn", ..#GeefOrderLijn1).DanReturn(OrderLijn1)
+	
+	#dim Order3 As DOM.VKP.Order = ##class(vhTest.Mock.DOM.VKP.Order).%New()
+	Do Order3.IndienMethodCall("GeefStatus").DanReturn(##class(DOM.VKP.enu.OrderStatus).Gesloten())
+	Do Order3.IndienMethodCall("GeefOrderLijn", ..#GeefOrderLijn1).DanReturn(OrderLijn2)
+	
+	Do ..OrderApi.IndienMethodCall("GeefOrder", ..#Order2).DanReturn(Order2)
+	Do ..OrderApi.IndienMethodCall("GeefOrder", ..#Order3).DanReturn(Order3)
+	
+	#dim SpaceTowerFysStockBepaler As AXimpl.Dynamics.InventoryOut.Converter.AxInventSyncCreator.SpaceTowerFysStockBepaler = ..GeefSpaceTowerFysStockBepaler()
+	
+	#dim SpaceTowerFysStock As %String = SpaceTowerFysStockBepaler.GeefSpaceTowerFysStock(SpaceTowerPRNr, AxConfigId)
+	
+	Do $$$AssertEquals(SpaceTowerFysStock, "7")
+]]></Implementation>
+</Method>
+
 <Method name="GeefSpaceTowerFysStockBepaler">
 <Private>1</Private>
 <ReturnType>AXimpl.Dynamics.InventoryOut.Converter.AxInventSyncCreator.SpaceTowerFysStockBepaler</ReturnType>
 <Implementation><![CDATA[	Quit ##class(AXimpl.Dynamics.InventoryOut.Converter.AxInventSyncCreator.SpaceTowerFysStockBepaler).%New(..OrderApi)
 ]]></Implementation>
 </Method>
+
+<Method name="ZetDataOp">
+<Private>1</Private>
+<Implementation><![CDATA[
+	Set ^ORD("IP",1001,100000,100) = "101"
+	Set ^ORD("IP",1001,100000,200) = "102"
+	Set ^ORD("IP",1002,200000,100) = "101"
+	Set ^ORD("IP",1002,300000,100) = "101"
+]]></Implementation>
+</Method>
+
+<Method name="KuisDataOp">
+<Private>1</Private>
+<Implementation><![CDATA[
+	Kill ^ORD("IP",1001)
+	Kill ^ORD("IP",1002)
+]]></Implementation>
+</Method>
 </Class>