Index: WSimpl/AX/CalculatedProduct/VariantDescriptionBepaler/KleurBepaler/GenerischeProducten.cls.xml
===================================================================
diff -u
--- WSimpl/AX/CalculatedProduct/VariantDescriptionBepaler/KleurBepaler/GenerischeProducten.cls.xml	(revision 0)
+++ WSimpl/AX/CalculatedProduct/VariantDescriptionBepaler/KleurBepaler/GenerischeProducten.cls.xml	(revision 48268)
@@ -0,0 +1,50 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="WSimpl.AX.CalculatedProduct.VariantDescriptionBepaler.KleurBepaler.GenerischeProducten">
+<Super>%ListOfDataTypes,TECH.Mockable</Super>
+
+<Method name="%OnNew">
+<Private>1</Private>
+<ProcedureBlock>1</ProcedureBlock>
+<ReturnType>%Status</ReturnType>
+<ServerOnly>1</ServerOnly>
+<Implementation><![CDATA[
+	Do ..VoegToeProducten()
+	
+	Quit $$$OK
+]]></Implementation>
+</Method>
+
+<Method name="BevatProduct">
+<FormalSpec>IdentNummer:%String</FormalSpec>
+<ReturnType>%Boolean</ReturnType>
+<Implementation><![CDATA[	Quit ##class(TECH.ListUtils).Contains($this, IdentNummer)
+]]></Implementation>
+</Method>
+
+<Method name="VoegToeProducten">
+<Private>1</Private>
+<Implementation><![CDATA[
+	Do ..Insert("9.680.648.13")
+	Do ..Insert("9.605.298.0")
+	Do ..Insert("9.384.704.6")
+	Do ..Insert("9.547.964.2")
+	Do ..Insert("8.577.910.0")
+	Do ..Insert("9.963.542.8")
+	Do ..Insert("9.683.175.8")
+	Do ..Insert("9.126.161.2")
+	Do ..Insert("9.959.022.0")
+	Do ..Insert("9.644.218.0")
+	Do ..Insert("9.557.889.3")
+	Do ..Insert("9.660.418.5")
+	Do ..Insert("9.048.771.18")
+]]></Implementation>
+</Method>
+
+<Storage name="Custom">
+<Type>%Library.CompleteCustomStorage</Type>
+</Storage>
+</Class>
+
+
+</Export>
Index: vhTest/Fake/WSimpl/AX/CalculatedProduct/VariantDescriptionBepaler/KleurBepaler/GenerischeProducten.cls.xml
===================================================================
diff -u
--- vhTest/Fake/WSimpl/AX/CalculatedProduct/VariantDescriptionBepaler/KleurBepaler/GenerischeProducten.cls.xml	(revision 0)
+++ vhTest/Fake/WSimpl/AX/CalculatedProduct/VariantDescriptionBepaler/KleurBepaler/GenerischeProducten.cls.xml	(revision 48268)
@@ -0,0 +1,19 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="vhTest.Fake.WSimpl.AX.CalculatedProduct.VariantDescriptionBepaler.KleurBepaler.GenerischeProducten">
+<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.KleurBepaler.GenerischeProducten</Super>
+
+<Method name="BevatProduct">
+<FormalSpec>IdentNummer:%String</FormalSpec>
+<ReturnType>%Boolean</ReturnType>
+<Implementation><![CDATA[	Quit ""
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>
Index: vhTest/Fake/WSimpl/AX/CalculatedProduct/VariantDescriptionBepaler/KleurBepaler.cls.xml
===================================================================
diff -u
--- vhTest/Fake/WSimpl/AX/CalculatedProduct/VariantDescriptionBepaler/KleurBepaler.cls.xml	(revision 0)
+++ vhTest/Fake/WSimpl/AX/CalculatedProduct/VariantDescriptionBepaler/KleurBepaler.cls.xml	(revision 48268)
@@ -0,0 +1,19 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="vhTest.Fake.WSimpl.AX.CalculatedProduct.VariantDescriptionBepaler.KleurBepaler">
+<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.KleurBepaler</Super>
+
+<Method name="GeefKleur">
+<FormalSpec>Product:DOM.PM.impl.ProductImpl,Taal:%String</FormalSpec>
+<ReturnType>%String</ReturnType>
+<Implementation><![CDATA[	Quit ""
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>
Index: DOM/PM/Product.cls.xml
===================================================================
diff -u -r48031 -r48268
--- DOM/PM/Product.cls.xml	(.../Product.cls.xml)	(revision 48031)
+++ DOM/PM/Product.cls.xml	(.../Product.cls.xml)	(revision 48268)
@@ -249,6 +249,7 @@
 
 <Method name="GeefKleurOmschrijving">
 <Abstract>1</Abstract>
+<FormalSpec>Taal:%String="N"</FormalSpec>
 <ReturnType>%String</ReturnType>
 </Method>
 
Index: vhUnitTest/WSimpl/AX/CalculatedProduct/VariantDescriptionBepaler/KleurBepaler/Test.cls.xml
===================================================================
diff -u
--- vhUnitTest/WSimpl/AX/CalculatedProduct/VariantDescriptionBepaler/KleurBepaler/Test.cls.xml	(revision 0)
+++ vhUnitTest/WSimpl/AX/CalculatedProduct/VariantDescriptionBepaler/KleurBepaler/Test.cls.xml	(revision 48268)
@@ -0,0 +1,50 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="vhUnitTest.WSimpl.AX.CalculatedProduct.VariantDescriptionBepaler.KleurBepaler.Test">
+<Super>vhUnitTest.TestCase</Super>
+
+<Method name="Test: Kleuromschrijving wordt opgehaald indien het product opgegeven is en afgeleid van een generisch product">
+<Implementation><![CDATA[
+	Do ..AssertKleur($$$True, $$$True, "RandomKleur")
+	Do ..AssertKleur($$$True, $$$False, "")
+	Do ..AssertKleur($$$False, $$$True, "")
+	Do ..AssertKleur($$$False, $$$False, "")
+]]></Implementation>
+</Method>
+
+<Method name="AssertKleur">
+<FormalSpec>IsGenerischAfgeleidProduct:%Boolean,IsProductOpgegeven:%Boolean,VerwachteKleur:%String</FormalSpec>
+<Private>1</Private>
+<Implementation><![CDATA[
+	#dim RandomProductId As %String = "RandomProductId"
+	#dim RandomGenerischProductId As %String = "RandomGenerischProductId"
+	#dim RandomTaal As %String = "RandomTaal"
+	#dim RandomIdentNummer As %String = "RandomIdentNummer"
+	
+	#dim ProductStub As vhTest.Mock.DOM.PM.Product = ##class(vhTest.Mock.DOM.PM.Product).%New()
+	Do ProductStub.IndienMethodCall("GeefID").DanReturn(RandomProductId)
+	Do ProductStub.IndienMethodCall("GeefGenerischProductID").DanReturn(RandomGenerischProductId)
+	Do ProductStub.IndienMethodCall("GeefKleurOmschrijving", RandomTaal).DanReturn(VerwachteKleur)
+	
+	#dim GenerischeProductStub As vhTest.Mock.DOM.PM.Product = ##class(vhTest.Mock.DOM.PM.Product).%New()
+	Do GenerischeProductStub.IndienMethodCall("GeefIdentNr").DanReturn(RandomIdentNummer)
+	
+	#dim ProductApiStub As vhTest.Mock.DOM.PM.ProductAPI = ##class(vhTest.Mock.DOM.PM.ProductAPI).%New()
+	Do ProductApiStub.IndienMethodCall("GeefProduct", RandomGenerischProductId).DanReturn(GenerischeProductStub)
+	
+	#dim ProductTypeApiStub As vhTest.Mock.DOM.PM.ProductTypeAPI = ##class(vhTest.Mock.DOM.PM.ProductTypeAPI).%New()
+	Do ProductTypeApiStub.IndienMethodCall("IsGenerischAfgeleidProduct", RandomProductId).DanReturn(IsGenerischAfgeleidProduct)
+	
+	#dim GenerischeProductenStub As vhTest.Mock.WSimpl.AX.CalculatedProduct.VariantDescriptionBepaler.KleurBepaler.GenerischeProducten = ##class(vhTest.Mock.WSimpl.AX.CalculatedProduct.VariantDescriptionBepaler.KleurBepaler.GenerischeProducten).%New()
+	Do GenerischeProductenStub.IndienMethodCall("BevatProduct", RandomIdentNummer).DanReturn(IsProductOpgegeven)
+	
+	#dim KleurBepaler As WSimpl.AX.CalculatedProduct.VariantDescriptionBepaler.KleurBepaler = ##class(WSimpl.AX.CalculatedProduct.VariantDescriptionBepaler.KleurBepaler).%New(ProductApiStub, ProductTypeApiStub, GenerischeProductenStub)
+	#dim Kleur As %String = KleurBepaler.GeefKleur(ProductStub, RandomTaal)
+	
+	Do $$$AssertEquals(Kleur, VerwachteKleur)
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>
Index: vhTest/Mock/WSimpl/AX/CalculatedProduct/VariantDescriptionBepaler/KleurBepaler/GenerischeProducten.cls.xml
===================================================================
diff -u
--- vhTest/Mock/WSimpl/AX/CalculatedProduct/VariantDescriptionBepaler/KleurBepaler/GenerischeProducten.cls.xml	(revision 0)
+++ vhTest/Mock/WSimpl/AX/CalculatedProduct/VariantDescriptionBepaler/KleurBepaler/GenerischeProducten.cls.xml	(revision 48268)
@@ -0,0 +1,20 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="vhTest.Mock.WSimpl.AX.CalculatedProduct.VariantDescriptionBepaler.KleurBepaler.GenerischeProducten">
+<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.KleurBepaler.GenerischeProducten,Tools.Mock.MockClassBase</Super>
+<Inheritance>right</Inheritance>
+
+<Method name="BevatProduct">
+<FormalSpec>IdentNummer:%String</FormalSpec>
+<ReturnType>%Boolean</ReturnType>
+<Implementation><![CDATA[	quit ..VerwerkMethodCall("BevatProduct",IdentNummer)
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>
Index: Prod/ProductTekst.cls.xml
===================================================================
diff -u -r48224 -r48268
--- Prod/ProductTekst.cls.xml	(.../ProductTekst.cls.xml)	(revision 48224)
+++ Prod/ProductTekst.cls.xml	(.../ProductTekst.cls.xml)	(revision 48268)
@@ -1193,7 +1193,7 @@
 <Implementation><![CDATA[
 	#dim Omschrijving As %String = ..GetOmschrijving(Taal,Sep)
 	#dim Product As DOM.PM.Product = ##class(DOM.DomeinContext).Instance().GeefProductAPI().GeefProduct(..ProductNr)
-	#dim Kleur As %String = Product.GeefKleurOmschrijving()
+	#dim Kleur As %String = Product.GeefKleurOmschrijving(Taal)
 	#dim OmschrijvingDeel As %String = $Piece(Omschrijving,Sep,1)
 	#dim LO As %Integer = $Length(OmschrijvingDeel)
 	#dim LK As %Integer = $Length(Kleur)
Index: vhUnitTest/WSimpl/AX/CalculatedProduct/VariantDescriptionBepaler/Test.cls.xml
===================================================================
diff -u -r45512 -r48268
--- vhUnitTest/WSimpl/AX/CalculatedProduct/VariantDescriptionBepaler/Test.cls.xml	(.../Test.cls.xml)	(revision 45512)
+++ vhUnitTest/WSimpl/AX/CalculatedProduct/VariantDescriptionBepaler/Test.cls.xml	(.../Test.cls.xml)	(revision 48268)
@@ -10,36 +10,44 @@
 	#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()
+	#dim RandomKleur As %String = "RandomKleur"
 	
+	#dim ProductMock As vhTest.Mock.DOM.PM.Product = ##class(vhTest.Mock.DOM.PM.Product).%New()
 	Do ProductMock.VerwachtMethodCall("GeefKorttekst").DanReturn(RandomKorttekst)
 	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 KleurBepalerMock As vhTest.Mock.WSimpl.AX.CalculatedProduct.VariantDescriptionBepaler.KleurBepaler = ##class(vhTest.Mock.WSimpl.AX.CalculatedProduct.VariantDescriptionBepaler.KleurBepaler).%New()
+	Do KleurBepalerMock.VerwachtMethodCall("GeefKleur", ProductMock, ##class(DOM.enu.Taal).Nederlands()).DanReturn(RandomKleur)
+	Do KleurBepalerMock.VerwachtMethodCall("GeefKleur", ProductMock, ##class(DOM.enu.Taal).Frans()).DanReturn(RandomKleur)
+	Do KleurBepalerMock.VerwachtMethodCall("GeefKleur", ProductMock, ##class(DOM.enu.Taal).Engels()).DanReturn(RandomKleur)
+	Do KleurBepalerMock.VerwachtMethodCall("GeefKleur", ProductMock, ##class(DOM.enu.Taal).Duits()).DanReturn(RandomKleur)
+
+	#dim VariantDescriptionBepaler As WSimpl.AX.CalculatedProduct.VariantDescriptionBepaler = ##class(WSimpl.AX.CalculatedProduct.VariantDescriptionBepaler).%New("", KleurBepalerMock)
+
 	#dim VariantDescriptionList As %ListOfObjects = VariantDescriptionBepaler.Bepaal(ProductMock, "RandomItemId")
 	
 	Do $$$AssertEquals(VariantDescriptionList.Count(), 4)
 	
-	Do ..AssertVariantDescription(VariantDescriptionList.GetAt(1), RandomKorttekst, "nl-be", RandomVertalingNederlands)
-	Do ..AssertVariantDescription(VariantDescriptionList.GetAt(2), RandomKorttekst, "fr", RandomVertalingFrans)
-	Do ..AssertVariantDescription(VariantDescriptionList.GetAt(3), RandomKorttekst, "en-us", RandomVertalingEngels)
-	Do ..AssertVariantDescription(VariantDescriptionList.GetAt(4), RandomKorttekst, "de", RandomVertalingDuits)
+	Do ..AssertVariantDescription(VariantDescriptionList.GetAt(1), RandomKorttekst, "nl-be", RandomVertalingNederlands, RandomKleur)
+	Do ..AssertVariantDescription(VariantDescriptionList.GetAt(2), RandomKorttekst, "fr", RandomVertalingFrans, RandomKleur)
+	Do ..AssertVariantDescription(VariantDescriptionList.GetAt(3), RandomKorttekst, "en-us", RandomVertalingEngels, RandomKleur)
+	Do ..AssertVariantDescription(VariantDescriptionList.GetAt(4), RandomKorttekst, "de", RandomVertalingDuits, RandomKleur)
 	
 	Do ProductMock.Verifieer()
+	Do KleurBepalerMock.Verifieer()
 ]]></Implementation>
 </Method>
 
 <Method name="AssertVariantDescription">
-<FormalSpec>VariantDescription:AXif.Dynamics.CalculatedProductOut.MessageParts.AxdEntityVariantDescription,VerwachteName:%String,VerwachteLanguageId:%String,VerwachteDescription:%String</FormalSpec>
+<FormalSpec>VariantDescription:AXif.Dynamics.CalculatedProductOut.MessageParts.AxdEntityVariantDescription,VerwachteName:%String,VerwachteLanguageId:%String,VerwachteDescription:%String,VerwachteKleur:%String</FormalSpec>
 <Private>1</Private>
 <Implementation><![CDATA[
 	Do $$$AssertTrue(VariantDescription.%IsA("AXif.Dynamics.CalculatedProductOut.MessageParts.AxdEntityVariantDescription"))
 	Do $$$AssertEquals(VariantDescription.LanguageId, VerwachteLanguageId)
-	Do $$$AssertEquals(VariantDescription.Description, VerwachteDescription)
+	Do $$$AssertEquals(VariantDescription.Description, VerwachteDescription _ ", " _ VerwachteKleur)
 	Do $$$AssertEquals(VariantDescription.Name, VerwachteName)
 	Do $$$AssertEquals(VariantDescription.class, "entity")
 ]]></Implementation>
Index: vhTest/Mock/DOM/PM/Product.cls.xml
===================================================================
diff -u -r48031 -r48268
--- vhTest/Mock/DOM/PM/Product.cls.xml	(.../Product.cls.xml)	(revision 48031)
+++ vhTest/Mock/DOM/PM/Product.cls.xml	(.../Product.cls.xml)	(revision 48268)
@@ -207,8 +207,9 @@
 </Method>
 
 <Method name="GeefKleurOmschrijving">
+<FormalSpec>Taal:%String="N"</FormalSpec>
 <ReturnType>%String</ReturnType>
-<Implementation><![CDATA[	quit ..VerwerkMethodCall("GeefKleurOmschrijving")
+<Implementation><![CDATA[	quit ..VerwerkMethodCall("GeefKleurOmschrijving",Taal)
 ]]></Implementation>
 </Method>
 
Index: vhUnitTest/WSimpl/AX/CalculatedProduct/RequestConverter/Test.cls.xml
===================================================================
diff -u -r47720 -r48268
--- vhUnitTest/WSimpl/AX/CalculatedProduct/RequestConverter/Test.cls.xml	(.../Test.cls.xml)	(revision 47720)
+++ vhUnitTest/WSimpl/AX/CalculatedProduct/RequestConverter/Test.cls.xml	(.../Test.cls.xml)	(revision 48268)
@@ -123,14 +123,20 @@
 
 <Method name="Test: RequestConverter laat velden leeg">
 <Implementation><![CDATA[
+	#dim ProductDummy As vhTest.Dummy.DOM.PM.Product = ##class(vhTest.Dummy.DOM.PM.Product).%New()
+	
 	#dim ProductServiceStub As vhTest.Mock.WSimpl.AX.CalculatedProduct.ProductService = ##class(vhTest.Mock.WSimpl.AX.CalculatedProduct.ProductService).%New()
-	Do ProductServiceStub.IndienMethodCall("GeefProduct", $$$ElkeWaarde, $$$ElkeWaarde).DanReturn(##class(vhTest.Dummy.DOM.PM.Product).%New())
+	Do ProductServiceStub.IndienMethodCall("GeefProduct", $$$ElkeWaarde, $$$ElkeWaarde).DanReturn(ProductDummy)
 	
+	#dim RandomVariantDescription As %ListOfDataTypes = ##class(TECH.ListUtils).CreateListOfDataTypes("RandomLangtekst1", "RandomLangtekst2")
+	#dim VariantDescriptionBepalerStub As vhTest.Mock.WSimpl.AX.CalculatedProduct.VariantDescriptionBepaler = ##class(vhTest.Mock.WSimpl.AX.CalculatedProduct.VariantDescriptionBepaler).%New()
+	Do VariantDescriptionBepalerStub.IndienMethodCall("Bepaal", ProductDummy, $$$ElkeWaarde).DanReturn(RandomVariantDescription)
+	
 	#dim SourcingDataAreaIdBepalerStub As vhTest.Mock.WSimpl.AX.CalculatedProduct.SourcingDataAreaIdBepaler = ##class(vhTest.Mock.WSimpl.AX.CalculatedProduct.SourcingDataAreaIdBepaler).%New()
 	Do SourcingDataAreaIdBepalerStub.IndienMethodCall("Bepaal", $$$ElkeWaarde).DanReturn("RandomSourcingDataAreaId")		
 	
 	#dim Request As AXif.Dynamics.CalculatedProductIn.MessageParts.AxdEntityRequest = ..MaakRequest("RandomProductId")
-	#dim RequestConverter As WSimpl.AX.CalculatedProduct.RequestConverter = ##class(WSimpl.AX.CalculatedProduct.RequestConverter).%New(ProductServiceStub, "", "", SourcingDataAreaIdBepalerStub)
+	#dim RequestConverter As WSimpl.AX.CalculatedProduct.RequestConverter = ##class(WSimpl.AX.CalculatedProduct.RequestConverter).%New(ProductServiceStub, VariantDescriptionBepalerStub, "", SourcingDataAreaIdBepalerStub)
 	#dim ConfigVariant As AXif.Dynamics.CalculatedProductOut.MessageParts.AxdEntityConfigVariant = RequestConverter.Convert(Request, "RandomMessageId")
 	
 	Do $$$AssertEquals(ConfigVariant.SourcingRouteId, "")
Index: WSimpl/AX/CalculatedProduct/VariantDescriptionBepaler.cls.xml
===================================================================
diff -u -r45512 -r48268
--- WSimpl/AX/CalculatedProduct/VariantDescriptionBepaler.cls.xml	(.../VariantDescriptionBepaler.cls.xml)	(revision 45512)
+++ WSimpl/AX/CalculatedProduct/VariantDescriptionBepaler.cls.xml	(.../VariantDescriptionBepaler.cls.xml)	(revision 48268)
@@ -8,14 +8,20 @@
 <Private>1</Private>
 </Property>
 
+<Property name="KleurBepaler">
+<Type>WSimpl.AX.CalculatedProduct.VariantDescriptionBepaler.KleurBepaler</Type>
+<Private>1</Private>
+</Property>
+
 <Method name="%OnNew">
-<FormalSpec>Formatter:AXimpl.Formatter=""</FormalSpec>
+<FormalSpec>Formatter:AXimpl.Formatter="",KleurBepaler:WSimpl.AX.CalculatedProduct.VariantDescriptionBepaler.KleurBepaler=""</FormalSpec>
 <Private>1</Private>
 <ProcedureBlock>1</ProcedureBlock>
 <ReturnType>%Status</ReturnType>
 <ServerOnly>1</ServerOnly>
 <Implementation><![CDATA[
 	Set ..Formatter = $$$Inject(Formatter, ##class(AXimpl.Formatter).%New())
+	Set ..KleurBepaler = $$$Inject(KleurBepaler, ##class(WSimpl.AX.CalculatedProduct.VariantDescriptionBepaler.KleurBepaler).%New())
 	
 	Quit $$$OK
 ]]></Implementation>
@@ -42,10 +48,17 @@
 <ReturnType>AXif.Dynamics.CalculatedProductOut.MessageParts.AxdEntityVariantDescription</ReturnType>
 <Implementation><![CDATA[
 	#dim VariantDescription As AXif.Dynamics.CalculatedProductOut.MessageParts.AxdEntityVariantDescription = ##class(AXif.Dynamics.CalculatedProductOut.MessageParts.AxdEntityVariantDescription).%New()
+	#dim LanguageId As %String = ..Formatter.FormatLanguageId(Taal)
+	#dim Kleur As %String = ..KleurBepaler.GeefKleur(Product, Taal)
+	#dim Description As %String = Product.GeefLangtekst(Taal)
 	
-	Set VariantDescription.Description = Product.GeefLangtekst(Taal)
+	If $$$Not(Kleur = "") {
+		Set Description = Description _ ", " _ Kleur
+	}
+	
+	Set VariantDescription.Description = Description
 	Set VariantDescription.Name = Product.GeefKorttekst()
-	Set VariantDescription.LanguageId = ..Formatter.FormatLanguageId(Taal)
+	Set VariantDescription.LanguageId = LanguageId
 	Set VariantDescription.ConfigVariantId = ConfigVariantId
 	Set VariantDescription.class = "entity"
 	
Index: WSimpl/AX/CalculatedProduct/VariantDescriptionBepaler/KleurBepaler.cls.xml
===================================================================
diff -u
--- WSimpl/AX/CalculatedProduct/VariantDescriptionBepaler/KleurBepaler.cls.xml	(revision 0)
+++ WSimpl/AX/CalculatedProduct/VariantDescriptionBepaler/KleurBepaler.cls.xml	(revision 48268)
@@ -0,0 +1,56 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="WSimpl.AX.CalculatedProduct.VariantDescriptionBepaler.KleurBepaler">
+<Super>TECH.Mockable</Super>
+
+<Property name="ProductApi">
+<Type>DOM.PM.ProductAPI</Type>
+<Private>1</Private>
+</Property>
+
+<Property name="ProductTypeApi">
+<Type>DOM.PM.ProductTypeAPI</Type>
+<Private>1</Private>
+</Property>
+
+<Property name="GenerischeProducten">
+<Type>WSimpl.AX.CalculatedProduct.VariantDescriptionBepaler.KleurBepaler.GenerischeProducten</Type>
+<Private>1</Private>
+</Property>
+
+<Method name="%OnNew">
+<FormalSpec>ProductApi:DOM.PM.ProductAPI="",ProductTypeApi:DOM.PM.ProductTypeAPI="",GenerischeProducten:WSimpl.AX.CalculatedProduct.VariantDescriptionBepaler.KleurBepaler.GenerischeProducten</FormalSpec>
+<Private>1</Private>
+<ProcedureBlock>1</ProcedureBlock>
+<ReturnType>%Status</ReturnType>
+<ServerOnly>1</ServerOnly>
+<Implementation><![CDATA[
+	Set ..ProductApi = $$$Inject(ProductApi, ##class(DOM.PM.impl.ProductAPI).%New())
+	Set ..ProductTypeApi = $$$Inject(ProductTypeApi, ##class(DOM.PM.impl.ProductTypeAPIimpl).%New())
+	Set ..GenerischeProducten = $$$Inject(GenerischeProducten, ##class(WSimpl.AX.CalculatedProduct.VariantDescriptionBepaler.KleurBepaler.GenerischeProducten).%New())
+	
+	Quit $$$OK
+]]></Implementation>
+</Method>
+
+<Method name="GeefKleur">
+<FormalSpec>Product:DOM.PM.impl.ProductImpl,Taal:%String</FormalSpec>
+<ReturnType>%String</ReturnType>
+<Implementation><![CDATA[
+	#dim Kleur As %String = ""
+
+	If (..ProductTypeApi.IsGenerischAfgeleidProduct(Product.GeefID())) {
+		#dim GenerischProduct As DOM.PM.Product = ..ProductApi.GeefProduct(Product.GeefGenerischProductID())
+	
+		If (..GenerischeProducten.BevatProduct(GenerischProduct.GeefIdentNr())) {
+			Set Kleur = Product.GeefKleurOmschrijving(Taal)
+		}
+	}
+	
+	Quit Kleur
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>
Index: vhTest/Mock/WSimpl/AX/CalculatedProduct/VariantDescriptionBepaler/KleurBepaler.cls.xml
===================================================================
diff -u
--- vhTest/Mock/WSimpl/AX/CalculatedProduct/VariantDescriptionBepaler/KleurBepaler.cls.xml	(revision 0)
+++ vhTest/Mock/WSimpl/AX/CalculatedProduct/VariantDescriptionBepaler/KleurBepaler.cls.xml	(revision 48268)
@@ -0,0 +1,20 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="vhTest.Mock.WSimpl.AX.CalculatedProduct.VariantDescriptionBepaler.KleurBepaler">
+<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.KleurBepaler,Tools.Mock.MockClassBase</Super>
+<Inheritance>right</Inheritance>
+
+<Method name="GeefKleur">
+<FormalSpec>Product:DOM.PM.impl.ProductImpl,Taal:%String</FormalSpec>
+<ReturnType>%String</ReturnType>
+<Implementation><![CDATA[	quit ..VerwerkMethodCall("GeefKleur",Product,Taal)
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>