Index: vhUnitTest/WSimpl/AX/CalculatedProduct/Converter/Test.cls.xml
===================================================================
diff -u -r42981 -r43008
--- vhUnitTest/WSimpl/AX/CalculatedProduct/Converter/Test.cls.xml	(.../Test.cls.xml)	(revision 42981)
+++ vhUnitTest/WSimpl/AX/CalculatedProduct/Converter/Test.cls.xml	(.../Test.cls.xml)	(revision 43008)
@@ -17,9 +17,28 @@
 </Method>
 
 <Method name="Test: Converter geeft een CalculatedProductOut terug">
-<Implementation><![CDATA[	Do $$$AssertTrue(..Converter.Convert().%IsA("AXif.Dynamics.CalculatedProductOut.Envelope"))
+<Implementation><![CDATA[
+	#dim DummyCalculatedProductIn As AXif.Dynamics.CalculatedProductIn.Envelope = ##class(AXif.Dynamics.CalculatedProductIn.Envelope).%New()
+	#dim CalculatedProductOut As AXif.Dynamics.CalculatedProductOut.Envelope = ..Converter.Convert(DummyCalculatedProductIn)
+	
+	Do $$$AssertTrue(CalculatedProductOut.%IsA("AXif.Dynamics.CalculatedProductOut.Envelope"))
 ]]></Implementation>
 </Method>
+
+<Method name="Test: Converter maakt een ConfigVariant voor elke Request">
+<Implementation><![CDATA[
+	#dim DummyCalculatedProductIn As AXif.Dynamics.CalculatedProductIn.Envelope = ##class(AXif.Dynamics.CalculatedProductIn.Envelope).%New()
+	#dim DummyRequest As AXif.Dynamics.CalculatedProductIn.MessageParts.AxdEntityRequest = ##class(AXif.Dynamics.CalculatedProductIn.MessageParts.AxdEntityRequest).%New()
+	
+	Do DummyCalculatedProductIn.Body.MessagePart.MessagePart.Request.Insert(DummyRequest)
+	Do DummyCalculatedProductIn.Body.MessagePart.MessagePart.Request.Insert(DummyRequest)
+	Do DummyCalculatedProductIn.Body.MessagePart.MessagePart.Request.Insert(DummyRequest)
+	
+	#dim CalculatedProductOut As AXif.Dynamics.CalculatedProductOut.Envelope = ..Converter.Convert(DummyCalculatedProductIn)
+	
+	Do $$$AssertEquals(DummyCalculatedProductIn.Body.MessagePart.MessagePart.Request.Count(), CalculatedProductOut.Body.MessagePart.MessagePart.ConfigVariant.Count())
+]]></Implementation>
+</Method>
 </Class>
 
 
Index: WSimpl/AX/CalculatedProduct/Converter.cls.xml
===================================================================
diff -u -r42981 -r43008
--- WSimpl/AX/CalculatedProduct/Converter.cls.xml	(.../Converter.cls.xml)	(revision 42981)
+++ WSimpl/AX/CalculatedProduct/Converter.cls.xml	(.../Converter.cls.xml)	(revision 43008)
@@ -9,6 +9,18 @@
 <Implementation><![CDATA[
 	#dim CalculatedProductOut As AXif.Dynamics.CalculatedProductOut.Envelope = ##class(AXif.Dynamics.CalculatedProductOut.Envelope).%New()
 	
+	Set CalculatedProductOut.Body.MessagePart.MessagePart = ##class(AXif.Dynamics.CalculatedProductOut.MessageParts.AxdADUMsgBOMBOLInQuery).%New()
+	Set CalculatedProductOut.Body.MessagePart.MessagePart.ConfigVariant = ##class(%ListOfObjects).%New()
+	
+	#dim RequestIterator As TECH.Iterator = ##class(TECH.ListIterator).%New(CalculatedProductIn.Body.MessagePart.MessagePart.Request)
+	
+	While (RequestIterator.HasNext()) {
+		#dim Request As AXif.Dynamics.CalculatedProductIn.MessageParts.AxdEntityRequest = RequestIterator.Next()
+		#dim ConfigVariant As AXif.Dynamics.CalculatedProductOut.MessageParts.AxdEntityConfigVariant = ##class(AXif.Dynamics.CalculatedProductOut.MessageParts.AxdEntityConfigVariant).%New()
+		
+		Do CalculatedProductOut.Body.MessagePart.MessagePart.ConfigVariant.Insert(ConfigVariant)
+	}
+	
 	Quit CalculatedProductOut
 ]]></Implementation>
 </Method>