Index: vhUnitTest/AXimpl/Dynamics/InventoryOut/Converter/AxInventSyncCreator/Test.cls.xml
===================================================================
diff -u -r45820 -r45860
--- vhUnitTest/AXimpl/Dynamics/InventoryOut/Converter/AxInventSyncCreator/Test.cls.xml	(.../Test.cls.xml)	(revision 45820)
+++ vhUnitTest/AXimpl/Dynamics/InventoryOut/Converter/AxInventSyncCreator/Test.cls.xml	(.../Test.cls.xml)	(revision 45860)
@@ -57,7 +57,7 @@
 <Method name="Test: class is de default entity">
 <Implementation><![CDATA[
 	#dim Product As Prod.Product = ..GeefTeConverterenProduct()
-	#dim StockProduct As Prod.StockReservatie = ##class(Prod.StockReservatie).%New()
+	Set StockProduct = ##class(Prod.StockReservatie).%New()
 	Set StockProduct.Product = Product
 	
 	Set StockReservatieRepositoryStub = ##class(vhTest.Mock.Prod.StockReservatieRepository).%New()
@@ -80,7 +80,7 @@
 <Method name="Test: ConfigId moet voorlopig leeg blijven">
 <Implementation><![CDATA[
 	#dim Product As Prod.Product = ..GeefTeConverterenProduct()
-	#dim StockProduct As Prod.StockReservatie = ##class(Prod.StockReservatie).%New()
+	Set StockProduct = ##class(Prod.StockReservatie).%New()
 	Set StockProduct.Product = Product
 	
 	Set StockReservatieRepositoryStub = ##class(vhTest.Mock.Prod.StockReservatieRepository).%New()
@@ -105,7 +105,7 @@
 	#dim Product As Prod.Product = ..GeefTeConverterenProduct()
 	Set Product.IdentNummer = "0.123.456.7"
 	
-	#dim StockProduct As Prod.StockReservatie = ##class(Prod.StockReservatie).%New()
+	Set StockProduct = ##class(Prod.StockReservatie).%New()
 	Set StockProduct.Product = Product
 	
 	Set StockReservatieRepositoryStub = ##class(vhTest.Mock.Prod.StockReservatieRepository).%New()
@@ -130,7 +130,7 @@
 	#dim Product As Prod.Product = ..GeefTeConverterenProduct()
 	Set Product.IdentNummer = "0.123.456.7"
 	
-	#dim StockProduct As Prod.StockReservatie = ##class(Prod.StockReservatie).%New(9999)
+	Set StockProduct = ##class(Prod.StockReservatie).%New(9999)
 	
 	Set StockReservatieRepositoryStub = ##class(vhTest.Mock.Prod.StockReservatieRepository).%New()
 	Do StockReservatieRepositoryStub.IndienMethodCall("BestaatViaID","9999").DanReturn($$$True)
@@ -153,7 +153,7 @@
 <Implementation><![CDATA[
 	#dim Product As Prod.Product = ..GeefTeConverterenProduct()
 	
-	#dim StockProduct As Prod.StockReservatie = ##class(Prod.StockReservatie).%New()
+	Set StockProduct = ##class(Prod.StockReservatie).%New()
 	Set StockProduct.Product = Product
 	
 	Set StockReservatieRepositoryStub = ##class(vhTest.Mock.Prod.StockReservatieRepository).%New()
@@ -177,7 +177,7 @@
 <Implementation><![CDATA[
 	#dim Product As Prod.Product = ..GeefTeConverterenProduct()
 	
-	#dim StockProduct As Prod.StockReservatie = ##class(Prod.StockReservatie).%New()
+	Set StockProduct = ##class(Prod.StockReservatie).%New()
 	Set StockProduct.Product = Product
 	
 	Set StockReservatieRepositoryStub = ##class(vhTest.Mock.Prod.StockReservatieRepository).%New()
@@ -206,7 +206,7 @@
 <Implementation><![CDATA[
 	#dim Product As Prod.Product = ..GeefTeConverterenProduct()
 	
-	#dim StockProduct As Prod.StockReservatie = ##class(Prod.StockReservatie).%New(9999)
+	Set StockProduct = ##class(Prod.StockReservatie).%New(9999)
 	
 	Set StockReservatieRepositoryStub = ##class(vhTest.Mock.Prod.StockReservatieRepository).%New()
 	Do StockReservatieRepositoryStub.IndienMethodCall("BestaatViaID","9999").DanReturn($$$True)
@@ -233,7 +233,7 @@
 <Method name="Test: QtyHLX is de stock bij Halux zijnde werkvloerstock zijnde WVStock">
 <Implementation><![CDATA[
 	#dim Product As Prod.Product = ..GeefTeConverterenProduct()
-	#dim StockProduct As Prod.StockReservatie = ##class(Prod.StockReservatie).%New()
+	Set StockProduct = ##class(Prod.StockReservatie).%New()
 	Set StockProduct.Product = Product
 	Set StockProduct.WVStock = "55555"
 	
@@ -257,7 +257,7 @@
 <Method name="Test: QtyHLX is 0 als WVStock leeg is">
 <Implementation><![CDATA[
 	#dim Product As Prod.Product = ..GeefTeConverterenProduct()
-	#dim StockProduct As Prod.StockReservatie = ##class(Prod.StockReservatie).%New()
+	Set StockProduct = ##class(Prod.StockReservatie).%New()
 	Set StockProduct.Product = Product
 	Set StockProduct.WVStock = ""
 	
@@ -281,7 +281,7 @@
 <Method name="Test: QtyHLX is 0 als WVStock een negatief getal is">
 <Implementation><![CDATA[
 	#dim Product As Prod.Product = ..GeefTeConverterenProduct()
-	#dim StockProduct As Prod.StockReservatie = ##class(Prod.StockReservatie).%New()
+	Set StockProduct = ##class(Prod.StockReservatie).%New()
 	Set StockProduct.Product = Product
 	Set StockProduct.WVStock = "-5"
 	
@@ -302,10 +302,34 @@
 ]]></Implementation>
 </Method>
 
+<Method name="Test: QtyHLX is 0 als WVStock 0 is">
+<Implementation><![CDATA[
+	#dim Product As Prod.Product = ..GeefTeConverterenProduct()
+	Set StockProduct = ##class(Prod.StockReservatie).%New()
+	Set StockProduct.Product = Product
+	Set StockProduct.WVStock = "0"
+	
+	Set StockReservatieRepositoryStub = ##class(vhTest.Mock.Prod.StockReservatieRepository).%New()
+	Do StockReservatieRepositoryStub.IndienMethodCall("BestaatViaID",..#ProductId).DanReturn($$$True)
+	Do StockReservatieRepositoryStub.IndienMethodCall("GeefViaID",..#ProductId).DanReturn(StockProduct)
+	
+	Set ProductRepositoryStub = ##class(vhTest.Mock.Prod.ProductRepository).%New()
+	Do ProductRepositoryStub.IndienMethodCall("BestaatViaID","").DanReturn($$$False)
+	Do ProductRepositoryStub.IndienMethodCall("GeefViaID",..#ProductId).DanReturn(Product)
+	
+	Set ..StockReservatieRepository = StockReservatieRepositoryStub
+	Set ..ProductRepository = ProductRepositoryStub
+	
+	#dim InventSyncProduct As AXif.Dynamics.Inventory.MessageParts.AxdEntityInventSync = ..GeefAxInventSyncCreator().MaakInventSync(..#ProductId)
+	
+	Do $$$AssertEquals(InventSyncProduct.QtyHLX,"0")
+]]></Implementation>
+</Method>
+
 <Method name="Test: QtyHLX is 0 als er geen StockReservatie object bestaat">
 <Implementation><![CDATA[
 	#dim Product As Prod.Product = ..GeefTeConverterenProduct()
-	#dim StockProduct As Prod.StockReservatie = ##class(Prod.StockReservatie).%New()
+	Set StockProduct = ##class(Prod.StockReservatie).%New()
 	Set StockProduct.Product = Product
 	
 	Set StockReservatieRepositoryStub = ##class(vhTest.Mock.Prod.StockReservatieRepository).%New()
@@ -327,7 +351,7 @@
 <Method name="Test: QtyVH is de stock bij Van Hoecke zijnde fysieke stock zijnde FysStock">
 <Implementation><![CDATA[
 	#dim Product As Prod.Product = ..GeefTeConverterenProduct()
-	#dim StockProduct As Prod.StockReservatie = ##class(Prod.StockReservatie).%New()
+	Set StockProduct = ##class(Prod.StockReservatie).%New()
 	Set StockProduct.Product = Product
 	Set StockProduct.FysStock = "666666"
 	
@@ -351,7 +375,7 @@
 <Method name="Test: QtyVH is 0 als FysStock leeg is">
 <Implementation><![CDATA[
 	#dim Product As Prod.Product = ..GeefTeConverterenProduct()
-	#dim StockProduct As Prod.StockReservatie = ##class(Prod.StockReservatie).%New()
+	Set StockProduct = ##class(Prod.StockReservatie).%New()
 	Set StockProduct.Product = Product
 	Set StockProduct.FysStock = ""
 	
@@ -375,7 +399,7 @@
 <Method name="Test: QtyVH is 0 als FysStock een negatief getal is">
 <Implementation><![CDATA[
 	#dim Product As Prod.Product = ..GeefTeConverterenProduct()
-	#dim StockProduct As Prod.StockReservatie = ##class(Prod.StockReservatie).%New()
+	Set StockProduct = ##class(Prod.StockReservatie).%New()
 	Set StockProduct.Product = Product
 	Set StockProduct.FysStock = "-7"
 	
@@ -396,10 +420,34 @@
 ]]></Implementation>
 </Method>
 
+<Method name="Test: QtyVH is 0 als FysStock 0 is">
+<Implementation><![CDATA[
+	#dim Product As Prod.Product = ..GeefTeConverterenProduct()
+	Set StockProduct = ##class(Prod.StockReservatie).%New()
+	Set StockProduct.Product = Product
+	Set StockProduct.FysStock = "0"
+	
+	Set StockReservatieRepositoryStub = ##class(vhTest.Mock.Prod.StockReservatieRepository).%New()
+	Do StockReservatieRepositoryStub.IndienMethodCall("BestaatViaID",..#ProductId).DanReturn($$$True)
+	Do StockReservatieRepositoryStub.IndienMethodCall("GeefViaID",..#ProductId).DanReturn(StockProduct)
+	
+	Set ProductRepositoryStub = ##class(vhTest.Mock.Prod.ProductRepository).%New()
+	Do ProductRepositoryStub.IndienMethodCall("BestaatViaID","").DanReturn($$$False)
+	Do ProductRepositoryStub.IndienMethodCall("GeefViaID",..#ProductId).DanReturn(Product)
+	
+	Set ..StockReservatieRepository = StockReservatieRepositoryStub
+	Set ..ProductRepository = ProductRepositoryStub
+	
+	#dim InventSyncProduct As AXif.Dynamics.Inventory.MessageParts.AxdEntityInventSync = ..GeefAxInventSyncCreator().MaakInventSync(..#ProductId)
+	
+	Do $$$AssertEquals(InventSyncProduct.QtyVH,"0")
+]]></Implementation>
+</Method>
+
 <Method name="Test: QtyVH is 0 als er geen StockReservatie object bestaat">
 <Implementation><![CDATA[
 	#dim Product As Prod.Product = ..GeefTeConverterenProduct()
-	#dim StockProduct As Prod.StockReservatie = ##class(Prod.StockReservatie).%New()
+	Set StockProduct = ##class(Prod.StockReservatie).%New()
 	Set StockProduct.Product = Product
 	
 	Set StockReservatieRepositoryStub = ##class(vhTest.Mock.Prod.StockReservatieRepository).%New()
@@ -424,7 +472,7 @@
 	Do SequenceNrGeneratorStub.VerwachtMethodCall("GeefVolgendProductVoorraadSyncBerichtId").DanDoeNiks()
 	
 	#dim Product As Prod.Product = ..GeefTeConverterenProduct()
-	#dim StockProduct As Prod.StockReservatie = ##class(Prod.StockReservatie).%New()
+	Set StockProduct = ##class(Prod.StockReservatie).%New()
 	Set StockProduct.Product = Product
 	
 	Set StockReservatieRepositoryStub = ##class(vhTest.Mock.Prod.StockReservatieRepository).%New()
@@ -449,7 +497,7 @@
 <Implementation><![CDATA[
 	#dim SoprContractId As %String = "SoprContractId"
 	#dim Product As Prod.Product = ..GeefTeConverterenProduct()
-	#dim StockProduct As Prod.StockReservatie = ##class(Prod.StockReservatie).%New()
+	Set StockProduct = ##class(Prod.StockReservatie).%New()
 	Set StockProduct.Product = Product
 	
 	Set StockReservatieRepositoryStub = ##class(vhTest.Mock.Prod.StockReservatieRepository).%New()
@@ -472,7 +520,7 @@
 <Method name="Test: Als er GEEN SoprContractId meegegeven is moet SOPRContractId leeg zijn">
 <Implementation><![CDATA[
 	#dim Product As Prod.Product = ..GeefTeConverterenProduct()
-	#dim StockProduct As Prod.StockReservatie = ##class(Prod.StockReservatie).%New()
+	Set StockProduct = ##class(Prod.StockReservatie).%New()
 	Set StockProduct.Product = Product
 	
 	Set StockReservatieRepositoryStub = ##class(vhTest.Mock.Prod.StockReservatieRepository).%New()