Index: vhUnitTest/WSimpl/AX/CalculatedProduct/VariantDescriptionBepaler/Test.cls.xml
===================================================================
diff -u
--- vhUnitTest/WSimpl/AX/CalculatedProduct/VariantDescriptionBepaler/Test.cls.xml	(revision 0)
+++ vhUnitTest/WSimpl/AX/CalculatedProduct/VariantDescriptionBepaler/Test.cls.xml	(revision 43309)
@@ -0,0 +1,46 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="vhUnitTest.WSimpl.AX.CalculatedProduct.VariantDescriptionBepaler.Test">
+<Super>vhUnitTest.TestCase</Super>
+
+<Method name="Test: Langtekst wordt opgehaald voor 4 talen">
+<Implementation><![CDATA[
+	#dim RandomVertalingNederlands As %String = "RandomVertalingNederlands"
+	#dim RandomVertalingFrans As %String = "RandomVertalingFrans"
+	#dim RandomVertalingEngels As %String = "RandomVertalingEngels"
+	#dim RandomVertalingDuits As %String = "RandomVertalingDuits"
+	
+	#dim VariantDescriptionBepaler As WSimpl.AX.CalculatedProduct.VariantDescriptionBepaler = ##class(WSimpl.AX.CalculatedProduct.VariantDescriptionBepaler).%New()
+	#dim ProductMock As vhTest.Mock.DOM.PM.Product = ##class(vhTest.Mock.DOM.PM.Product).%New()
+	
+	Do ProductMock.VerwachtMethodCall("GeefLangtekst", ##class(DOM.enu.Taal).Nederlands(), 1).DanReturn(RandomVertalingNederlands)
+	Do ProductMock.VerwachtMethodCall("GeefLangtekst", ##class(DOM.enu.Taal).Frans(), 1).DanReturn(RandomVertalingFrans)
+	Do ProductMock.VerwachtMethodCall("GeefLangtekst", ##class(DOM.enu.Taal).Engels(), 1).DanReturn(RandomVertalingEngels)
+	Do ProductMock.VerwachtMethodCall("GeefLangtekst", ##class(DOM.enu.Taal).Duits(), 1).DanReturn(RandomVertalingDuits)
+	
+	#dim VariantDescriptionList As %ListOfObjects = VariantDescriptionBepaler.Bepaal(ProductMock)
+	
+	Do $$$AssertEquals(VariantDescriptionList.Count(), 4)
+	
+	Do ..AssertVariantDescription(VariantDescriptionList.GetAt(1), "nl-be", RandomVertalingNederlands)
+	Do ..AssertVariantDescription(VariantDescriptionList.GetAt(2), "fr", RandomVertalingFrans)
+	Do ..AssertVariantDescription(VariantDescriptionList.GetAt(3), "en-us", RandomVertalingEngels)
+	Do ..AssertVariantDescription(VariantDescriptionList.GetAt(4), "de", RandomVertalingDuits)
+	
+	Do ProductMock.Verifieer()
+]]></Implementation>
+</Method>
+
+<Method name="AssertVariantDescription">
+<FormalSpec>VariantDescription:AXif.Dynamics.CalculatedProductOut.MessageParts.AxdEntityVariantDescription,LanguageId:%String,Description:%String</FormalSpec>
+<Private>1</Private>
+<Implementation><![CDATA[
+	Do $$$AssertTrue(VariantDescription.%IsA("AXif.Dynamics.CalculatedProductOut.MessageParts.AxdEntityVariantDescription"))
+	Do $$$AssertEquals(VariantDescription.LanguageId, LanguageId)
+	Do $$$AssertEquals(VariantDescription.Description, Description)
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>
Index: vhUnitTest/WSimpl/AX/CalculatedProduct/RequestConverter/Test.cls.xml
===================================================================
diff -u -r43304 -r43309
--- vhUnitTest/WSimpl/AX/CalculatedProduct/RequestConverter/Test.cls.xml	(.../Test.cls.xml)	(revision 43304)
+++ vhUnitTest/WSimpl/AX/CalculatedProduct/RequestConverter/Test.cls.xml	(.../Test.cls.xml)	(revision 43309)
@@ -37,12 +37,16 @@
 	#dim InterneFirmaBepalerMock As vhTest.Mock.WSimpl.AX.CalculatedProduct.InterneFirmaBepaler = ##class(vhTest.Mock.WSimpl.AX.CalculatedProduct.InterneFirmaBepaler).%New()
 	Do InterneFirmaBepalerMock.VerwachtMethodCall("Bepaal", RandomItemId).DanReturn(DummyFirma)
 	
-	#dim RequestConverter As WSimpl.AX.CalculatedProduct.RequestConverter = ##class(WSimpl.AX.CalculatedProduct.RequestConverter).%New(ProductApiMock, InterneFirmaBepalerMock)
+	#dim VariantDescriptionBepalerMock As vhTest.Mock.WSimpl.AX.CalculatedProduct.VariantDescriptionBepaler = ##class(vhTest.Mock.WSimpl.AX.CalculatedProduct.VariantDescriptionBepaler).%New()
+	Do VariantDescriptionBepalerMock.VerwachtMethodCall("Bepaal", ProductStub).DanReturn(##class(%ListOfObjects).%New())
+	
+	#dim RequestConverter As WSimpl.AX.CalculatedProduct.RequestConverter = ##class(WSimpl.AX.CalculatedProduct.RequestConverter).%New(ProductApiMock, InterneFirmaBepalerMock, VariantDescriptionBepalerMock)
 	#dim ConfigVariant As AXif.Dynamics.CalculatedProductOut.MessageParts.AxdEntityConfigVariant = RequestConverter.Convert(..DummyRequest, "RandomMessageId")
 	
 	Do $$$AssertTrue(ConfigVariant.%IsA("AXif.Dynamics.CalculatedProductOut.MessageParts.AxdEntityConfigVariant"))
 	Do $$$AssertEquals(ConfigVariant.SourcingDataAreaId, DummyFirma)
 	
+	Do VariantDescriptionBepalerMock.Verifieer()
 	Do InterneFirmaBepalerMock.Verifieer()
 	Do ProductApiMock.Verifieer()
 ]]></Implementation>
Index: WSimpl/AX/CalculatedProduct/VariantDescriptionBepaler.cls.xml
===================================================================
diff -u
--- WSimpl/AX/CalculatedProduct/VariantDescriptionBepaler.cls.xml	(revision 0)
+++ WSimpl/AX/CalculatedProduct/VariantDescriptionBepaler.cls.xml	(revision 43309)
@@ -0,0 +1,55 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="WSimpl.AX.CalculatedProduct.VariantDescriptionBepaler">
+<Super>TECH.Mockable</Super>
+
+<Property name="Formatter">
+<Type>AXimpl.Formatter</Type>
+<Private>1</Private>
+</Property>
+
+<Method name="%OnNew">
+<FormalSpec>Formatter:AXimpl.Formatter=""</FormalSpec>
+<Private>1</Private>
+<ProcedureBlock>1</ProcedureBlock>
+<ReturnType>%Status</ReturnType>
+<ServerOnly>1</ServerOnly>
+<Implementation><![CDATA[
+	Set ..Formatter = $$$Inject(Formatter, ##class(AXimpl.Formatter).%New())
+	
+	Quit $$$OK
+]]></Implementation>
+</Method>
+
+<Method name="Bepaal">
+<FormalSpec>Product:DOM.PM.Product</FormalSpec>
+<ReturnType>%ListOfObjects</ReturnType>
+<Implementation><![CDATA[
+	#dim VariantDescriptionList As %ListOfObjects = ##class(%ListOfObjects).%New()
+	
+	Do VariantDescriptionList.Insert(..GeefVariantDescription(Product, ##class(DOM.enu.Taal).Nederlands()))
+	Do VariantDescriptionList.Insert(..GeefVariantDescription(Product, ##class(DOM.enu.Taal).Frans()))
+	Do VariantDescriptionList.Insert(..GeefVariantDescription(Product, ##class(DOM.enu.Taal).Engels()))
+	Do VariantDescriptionList.Insert(..GeefVariantDescription(Product, ##class(DOM.enu.Taal).Duits()))
+	
+	Quit VariantDescriptionList
+]]></Implementation>
+</Method>
+
+<Method name="GeefVariantDescription">
+<FormalSpec>Product:DOM.PM.Product,Taal:DOM.enu.Taal</FormalSpec>
+<Private>1</Private>
+<ReturnType>AXif.Dynamics.CalculatedProductOut.MessageParts.AxdEntityVariantDescription</ReturnType>
+<Implementation><![CDATA[
+	#dim VariantDescription As AXif.Dynamics.CalculatedProductOut.MessageParts.AxdEntityVariantDescription = ##class(AXif.Dynamics.CalculatedProductOut.MessageParts.AxdEntityVariantDescription).%New()
+	
+	Set VariantDescription.Description = Product.GeefLangtekst(Taal)
+	Set VariantDescription.LanguageId = ..Formatter.FormatLanguageId(Taal)
+	
+	Quit VariantDescription
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>
Index: WSimpl/AX/CalculatedProduct/RequestConverter.cls.xml
===================================================================
diff -u -r43304 -r43309
--- WSimpl/AX/CalculatedProduct/RequestConverter.cls.xml	(.../RequestConverter.cls.xml)	(revision 43304)
+++ WSimpl/AX/CalculatedProduct/RequestConverter.cls.xml	(.../RequestConverter.cls.xml)	(revision 43309)
@@ -13,15 +13,21 @@
 <Private>1</Private>
 </Property>
 
+<Property name="VariantDescriptionBepaler">
+<Type>WSimpl.AX.CalculatedProduct.VariantDescriptionBepaler</Type>
+<Private>1</Private>
+</Property>
+
 <Method name="%OnNew">
-<FormalSpec>ProductApi:DOM.PM.ProductAPI="",InterneFirmaBepaler:WSimpl.AX.CalculatedProduct.InterneFirmaBepaler</FormalSpec>
+<FormalSpec>ProductApi:DOM.PM.ProductAPI="",InterneFirmaBepaler:WSimpl.AX.CalculatedProduct.InterneFirmaBepaler="",VariantDescriptionBepaler:WSimpl.AX.CalculatedProduct.VariantDescriptionBepaler=""</FormalSpec>
 <Private>1</Private>
 <ProcedureBlock>1</ProcedureBlock>
 <ReturnType>%Status</ReturnType>
 <ServerOnly>1</ServerOnly>
 <Implementation><![CDATA[
 	Set ..ProductApi = $$$Inject(ProductApi, ##class(DOM.DomeinContext).Instance().GeefProductAPI())
 	Set ..InterneFirmaBepaler = $$$Inject(InterneFirmaBepaler, ##class(WSimpl.AX.CalculatedProduct.InterneFirmaBepaler).%New())
+	Set ..VariantDescriptionBepaler = $$$Inject(VariantDescriptionBepaler, ##class(WSimpl.AX.CalculatedProduct.VariantDescriptionBepaler).%New())
 	
 	Quit $$$OK
 ]]></Implementation>
@@ -46,6 +52,7 @@
 		Set ConfigVariant.SourcingDataAreaId = ..InterneFirmaBepaler.Bepaal(Product.GeefPRNr())
 		Set ConfigVariant.ProductName = Product.GeefKorttekst()
 		Set ConfigVariant.CostPrice = Product.GeefNettoAankoopPrijsInclCif()
+		Set ConfigVariant.VariantDescription = ..VariantDescriptionBepaler.Bepaal(Product)
 	} Else {
 		Set ConfigVariant.ErrorText = ##class(WSimpl.AX.CalculatedProduct.Converter.enu.ErrorText).NotFound()	
 	}
Index: vhUnitTest/WSimpl/AX/CalculatedProduct/RequestConverter/Test/ProductData.cls.xml
===================================================================
diff -u -r43304 -r43309
--- vhUnitTest/WSimpl/AX/CalculatedProduct/RequestConverter/Test/ProductData.cls.xml	(.../ProductData.cls.xml)	(revision 43304)
+++ vhUnitTest/WSimpl/AX/CalculatedProduct/RequestConverter/Test/ProductData.cls.xml	(.../ProductData.cls.xml)	(revision 43309)
@@ -51,7 +51,10 @@
 	#dim InterneFirmaBepalerStub As vhTest.Mock.WSimpl.AX.CalculatedProduct.InterneFirmaBepaler = ##class(vhTest.Mock.WSimpl.AX.CalculatedProduct.InterneFirmaBepaler).%New()
 	Do InterneFirmaBepalerStub.IndienMethodCall("Bepaal", ..RandomItemId).DanReturn(..DummyFirma)
 	
-	Set ..RequestConverter = ##class(WSimpl.AX.CalculatedProduct.RequestConverter).%New(ProductApiStub, InterneFirmaBepalerStub)
+	#dim VariantDescriptionBepalerStub As vhTest.Mock.WSimpl.AX.CalculatedProduct.VariantDescriptionBepaler = ##class(vhTest.Mock.WSimpl.AX.CalculatedProduct.VariantDescriptionBepaler).%New()
+	Do VariantDescriptionBepalerStub.IndienMethodCall("Bepaal", ..ProductStub).DanReturn(##class(%ListOfObjects).%New())
+	
+	Set ..RequestConverter = ##class(WSimpl.AX.CalculatedProduct.RequestConverter).%New(ProductApiStub, InterneFirmaBepalerStub, VariantDescriptionBepalerStub)
 ]]></Implementation>
 </Method>
 
Index: vhTest/Fake/WSimpl/AX/CalculatedProduct/VariantDescriptionBepaler.cls.xml
===================================================================
diff -u
--- vhTest/Fake/WSimpl/AX/CalculatedProduct/VariantDescriptionBepaler.cls.xml	(revision 0)
+++ vhTest/Fake/WSimpl/AX/CalculatedProduct/VariantDescriptionBepaler.cls.xml	(revision 43309)
@@ -0,0 +1,19 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="vhTest.Fake.WSimpl.AX.CalculatedProduct.VariantDescriptionBepaler">
+<Description>
+Deze klasse werd automatisch gegenereerd en onderhouden, nieuwe methodes worden automatisch bijgevoegd, bestaande blijven zoals ze zijn.
+Een hercompilatie van de basis interface - met een correct werkende studiohook ( v2.20 ++ ) - zorgt ervoor dat deze klasse aangepast wordt</Description>
+<ProcedureBlock>1</ProcedureBlock>
+<Super>WSimpl.AX.CalculatedProduct.VariantDescriptionBepaler</Super>
+
+<Method name="Bepaal">
+<FormalSpec>Product:DOM.PM.Product</FormalSpec>
+<ReturnType>%ListOfObjects</ReturnType>
+<Implementation><![CDATA[	Quit ""
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>
Index: vhTest/Mock/WSimpl/AX/CalculatedProduct/VariantDescriptionBepaler.cls.xml
===================================================================
diff -u
--- vhTest/Mock/WSimpl/AX/CalculatedProduct/VariantDescriptionBepaler.cls.xml	(revision 0)
+++ vhTest/Mock/WSimpl/AX/CalculatedProduct/VariantDescriptionBepaler.cls.xml	(revision 43309)
@@ -0,0 +1,20 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="vhTest.Mock.WSimpl.AX.CalculatedProduct.VariantDescriptionBepaler">
+<Description>
+Deze klasse werd automatisch gegenereerd en onderhouden - lokale aanpassingen zijn niet nodig.
+Een hercompilatie van de basis interface - met een correct werkende studiohook ( v2.20 ++ ) - zorgt ervoor dat deze klasse aangepast wordt</Description>
+<ProcedureBlock>1</ProcedureBlock>
+<Super>WSimpl.AX.CalculatedProduct.VariantDescriptionBepaler,Tools.Mock.MockClassBase</Super>
+<Inheritance>right</Inheritance>
+
+<Method name="Bepaal">
+<FormalSpec>Product:DOM.PM.Product</FormalSpec>
+<ReturnType>%ListOfObjects</ReturnType>
+<Implementation><![CDATA[	quit ..VerwerkMethodCall("Bepaal",Product)
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>