Index: vhTestFiles/IntegratieTests/WSimpl.AX.CalculatedProduct/TestLosseComponentRug/1561083.xml
===================================================================
diff -u -r49573 -r49577
--- vhTestFiles/IntegratieTests/WSimpl.AX.CalculatedProduct/TestLosseComponentRug/1561083.xml	(.../1561083.xml)	(revision 49573)
+++ vhTestFiles/IntegratieTests/WSimpl.AX.CalculatedProduct/TestLosseComponentRug/1561083.xml	(.../1561083.xml)	(revision 49577)
@@ -67,7 +67,7 @@
       <Description>TA'OR BOX rug
 Hoogte: F
 Interne breedte: 1166mm
-Lengte rug: 1135mm</Description>
+Lengte rug: 1135mm, kleur:Natuur Notenhout</Description>
       <LanguageId>nl-be</LanguageId>
       <Name>TRF.1166 NNRUCKWNNV5   NN</Name>
     </VariantDescription>
@@ -76,7 +76,7 @@
       <Description>TA'OR BOX dos
 Hauteur: F
 Largeur intérieure: 1166mm
-Longueur dos: 1135mm</Description>
+Longueur dos: 1135mm, couleur:Noyer Naturel</Description>
       <LanguageId>fr</LanguageId>
       <Name>TRF.1166 NNRUCKWNNV5   NN</Name>
     </VariantDescription>
@@ -85,7 +85,7 @@
       <Description>TA'OR BOX back
 Height: F
 Internal width: 1166mm
-Length back: 1135mm</Description>
+Length back: 1135mm, colour:Natural Walnut</Description>
       <LanguageId>en-us</LanguageId>
       <Name>TRF.1166 NNRUCKWNNV5   NN</Name>
     </VariantDescription>
@@ -94,7 +94,7 @@
       <Description>TA'OR BOX Rückwand
 Höhe: F
 Lichte Weite: 1166mm
-Länge Rückwand: 1135mm</Description>
+Länge Rückwand: 1135mm, Farbe:Nussbaum Natur</Description>
       <LanguageId>de</LanguageId>
       <Name>TRF.1166 NNRUCKWNNV5   NN</Name>
     </VariantDescription>
Index: vhUnitTest/WSimpl/AX/CalculatedProduct/VariantDescriptionBepaler/Test.cls.xml
===================================================================
diff -u -r49575 -r49577
--- vhUnitTest/WSimpl/AX/CalculatedProduct/VariantDescriptionBepaler/Test.cls.xml	(.../Test.cls.xml)	(revision 49575)
+++ vhUnitTest/WSimpl/AX/CalculatedProduct/VariantDescriptionBepaler/Test.cls.xml	(.../Test.cls.xml)	(revision 49577)
@@ -11,53 +11,39 @@
 <Method name="Test: Korttekst en Langtekst voor 4 talen worden opgehaald ">
 <Implementation><![CDATA[
 	#dim RandomKorttekst As %String = "RandomKorttekst"
-	#dim RandomVertalingNederlands As %String = "RandomVertalingNederlands"
-	#dim RandomVertalingFrans As %String = "RandomVertalingFrans"
-	#dim RandomVertalingEngels As %String = "RandomVertalingEngels"
-	#dim RandomVertalingDuits As %String = "RandomVertalingDuits"
-	#dim RandomKleur As %String = "RandomKleur"
-	#dim RandomKleurLabel As %String = "RandomKleurLabel"
+	#dim RandomDescription As %String = "RandomDescription"
 	
 	#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", ..TaalEnum.Nederlands, $$$False).DanReturn(RandomVertalingNederlands)
-	Do ProductMock.VerwachtMethodCall("GeefLangtekst", ..TaalEnum.Frans, $$$False).DanReturn(RandomVertalingFrans)
-	Do ProductMock.VerwachtMethodCall("GeefLangtekst", ..TaalEnum.Engels, $$$False).DanReturn(RandomVertalingEngels)
-	Do ProductMock.VerwachtMethodCall("GeefLangtekst", ..TaalEnum.Duits, $$$False).DanReturn(RandomVertalingDuits)
-	Do ProductMock.VerwachtMethodCall("GeefKleurOmschrijving", ..TaalEnum.Nederlands).DanReturn(RandomKleur)
-	Do ProductMock.VerwachtMethodCall("GeefKleurOmschrijving", ..TaalEnum.Frans).DanReturn(RandomKleur)
-	Do ProductMock.VerwachtMethodCall("GeefKleurOmschrijving", ..TaalEnum.Engels).DanReturn(RandomKleur)
-	Do ProductMock.VerwachtMethodCall("GeefKleurOmschrijving", ..TaalEnum.Duits).DanReturn(RandomKleur)
 	
-	#dim VertalerMock As vhTest.Mock.DOM.common.Transl.Vertaler = ##class(vhTest.Mock.DOM.common.Transl.Vertaler).%New()
-	Do VertalerMock.VerwachtMethodCall("GeefVertaling", "Kleur", ..TaalEnum.Nederlands, $$$False).DanReturn(RandomKleurLabel)
-	Do VertalerMock.VerwachtMethodCall("GeefVertaling", "Kleur", ..TaalEnum.Frans, $$$False).DanReturn(RandomKleurLabel)
-	Do VertalerMock.VerwachtMethodCall("GeefVertaling", "Kleur", ..TaalEnum.Engels, $$$False).DanReturn(RandomKleurLabel)
-	Do VertalerMock.VerwachtMethodCall("GeefVertaling", "Kleur", ..TaalEnum.Duits, $$$False).DanReturn(RandomKleurLabel)
+	#dim DescriptionBepalerMock As vhTest.Mock.WSimpl.AX.CalculatedProduct.VariantDescriptionBepaler.DescriptionBepaler = ##class(vhTest.Mock.WSimpl.AX.CalculatedProduct.VariantDescriptionBepaler.DescriptionBepaler).%New()
+	Do DescriptionBepalerMock.VerwachtMethodCall("GeefDescription", ProductMock, ..TaalEnum.Nederlands).DanReturn(RandomDescription _ ..TaalEnum.Nederlands)
+	Do DescriptionBepalerMock.VerwachtMethodCall("GeefDescription", ProductMock, ..TaalEnum.Frans).DanReturn(RandomDescription _ ..TaalEnum.Frans)
+	Do DescriptionBepalerMock.VerwachtMethodCall("GeefDescription", ProductMock, ..TaalEnum.Engels).DanReturn(RandomDescription _ ..TaalEnum.Engels)
+	Do DescriptionBepalerMock.VerwachtMethodCall("GeefDescription", ProductMock, ..TaalEnum.Duits).DanReturn(RandomDescription _ ..TaalEnum.Duits)
 
-	#dim VariantDescriptionBepaler As WSimpl.AX.CalculatedProduct.VariantDescriptionBepaler = ##class(WSimpl.AX.CalculatedProduct.VariantDescriptionBepaler).%New("", VertalerMock)
+	#dim VariantDescriptionBepaler As WSimpl.AX.CalculatedProduct.VariantDescriptionBepaler = ##class(WSimpl.AX.CalculatedProduct.VariantDescriptionBepaler).%New("", DescriptionBepalerMock)
 	#dim VariantDescriptionList As %ListOfObjects = VariantDescriptionBepaler.Bepaal(ProductMock, "RandomItemId")
 	
 	Do $$$AssertEquals(VariantDescriptionList.Count(), 4)
 	
-	#dim VerwachteKleur As %String = RandomKleurLabel _ ":" _ RandomKleur
-	Do ..AssertVariantDescription(VariantDescriptionList.GetAt(1), RandomKorttekst, "nl-be", RandomVertalingNederlands, VerwachteKleur)
-	Do ..AssertVariantDescription(VariantDescriptionList.GetAt(2), RandomKorttekst, "fr", RandomVertalingFrans, VerwachteKleur)
-	Do ..AssertVariantDescription(VariantDescriptionList.GetAt(3), RandomKorttekst, "en-us", RandomVertalingEngels, VerwachteKleur)
-	Do ..AssertVariantDescription(VariantDescriptionList.GetAt(4), RandomKorttekst, "de", RandomVertalingDuits, VerwachteKleur)
+	Do ..AssertVariantDescription(VariantDescriptionList.GetAt(1), RandomKorttekst, "nl-be", RandomDescription _ ..TaalEnum.Nederlands)
+	Do ..AssertVariantDescription(VariantDescriptionList.GetAt(2), RandomKorttekst, "fr", RandomDescription _ ..TaalEnum.Frans)
+	Do ..AssertVariantDescription(VariantDescriptionList.GetAt(3), RandomKorttekst, "en-us", RandomDescription _ ..TaalEnum.Engels)
+	Do ..AssertVariantDescription(VariantDescriptionList.GetAt(4), RandomKorttekst, "de", RandomDescription _ ..TaalEnum.Duits)
 	
 	Do ProductMock.Verifieer()
-	Do VertalerMock.Verifieer()
+	Do DescriptionBepalerMock.Verifieer()
 ]]></Implementation>
 </Method>
 
 <Method name="AssertVariantDescription">
-<FormalSpec>VariantDescription:AXif.Dynamics.CalculatedProductOut.MessageParts.AxdEntityVariantDescription,VerwachteName:%String,VerwachteLanguageId:%String,VerwachteDescription:%String,VerwachteKleur:%String</FormalSpec>
+<FormalSpec>VariantDescription:AXif.Dynamics.CalculatedProductOut.MessageParts.AxdEntityVariantDescription,VerwachteName:%String,VerwachteLanguageId:%String,VerwachteDescription:%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 _ ", " _ VerwachteKleur)
+	Do $$$AssertEquals(VariantDescription.Description, VerwachteDescription)
 	Do $$$AssertEquals(VariantDescription.Name, VerwachteName)
 	Do $$$AssertEquals(VariantDescription.class, "entity")
 ]]></Implementation>
Index: vhUnitTest/WSimpl/AX/CalculatedProduct/VariantDescriptionBepaler/DescriptionBepaler/Test.cls.xml
===================================================================
diff -u
--- vhUnitTest/WSimpl/AX/CalculatedProduct/VariantDescriptionBepaler/DescriptionBepaler/Test.cls.xml	(revision 0)
+++ vhUnitTest/WSimpl/AX/CalculatedProduct/VariantDescriptionBepaler/DescriptionBepaler/Test.cls.xml	(revision 49577)
@@ -0,0 +1,47 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="vhUnitTest.WSimpl.AX.CalculatedProduct.VariantDescriptionBepaler.DescriptionBepaler.Test">
+<Super>vhUnitTest.TestCase</Super>
+
+<Property name="TaalEnum">
+<Type>DOM.enu.Taal.AutoComplete</Type>
+<Private>1</Private>
+</Property>
+
+<Method name="Test: Langtekst wordt opgehaald en kleur wordt toegevoegd indien vertaling aanwezig per taal">
+<Implementation><![CDATA[
+	#dim RandomVertaling As %String = "RandomVertaling"
+	#dim RandomKleur As %String = "RandomKleur"
+	#dim RandomKleurLabel As %String = "RandomKleurLabel"
+
+	Do ..AssertDescription(RandomKleur, RandomKleurLabel, RandomVertaling, RandomVertaling _ ", " _ RandomKleurLabel _ ":" _ RandomKleur)
+	Do ..AssertDescription("", RandomKleurLabel, RandomVertaling, RandomVertaling)
+]]></Implementation>
+</Method>
+
+<Method name="AssertDescription">
+<FormalSpec>Kleur:%String,KleurLabel:%String,Vertaling:%String,VerwachteDescription:%String</FormalSpec>
+<Private>1</Private>
+<Implementation><![CDATA[
+	#dim RandomTaal As %String = "RandomTaal"
+	
+	#dim ProductMock As vhTest.Mock.DOM.PM.Product = ##class(vhTest.Mock.DOM.PM.Product).%New()
+	Do ProductMock.VerwachtMethodCall("GeefLangtekst", RandomTaal, $$$False).DanReturn(Vertaling)
+	Do ProductMock.VerwachtMethodCall("GeefKleurOmschrijving", RandomTaal).DanReturn(Kleur)
+	
+	#dim VertalerMock As vhTest.Mock.DOM.common.Transl.Vertaler = ##class(vhTest.Mock.DOM.common.Transl.Vertaler).%New()
+	Do VertalerMock.VerwachtMethodCall("GeefVertaling", "Kleur", RandomTaal, $$$False).DanReturn(KleurLabel)
+	
+	#dim DescriptionBepaler As WSimpl.AX.CalculatedProduct.VariantDescriptionBepaler.DescriptionBepaler = ##class(WSimpl.AX.CalculatedProduct.VariantDescriptionBepaler.DescriptionBepaler).%New(VertalerMock)
+	#dim Description As %String = DescriptionBepaler.GeefDescription(ProductMock, RandomTaal)
+	
+	Do $$$AssertEquals(Description, VerwachteDescription)
+	
+	Do ProductMock.Verifieer()
+	Do VertalerMock.Verifieer()
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>
Index: WSimpl/AX/CalculatedProduct/VariantDescriptionBepaler.cls.xml
===================================================================
diff -u -r49575 -r49577
--- WSimpl/AX/CalculatedProduct/VariantDescriptionBepaler.cls.xml	(.../VariantDescriptionBepaler.cls.xml)	(revision 49575)
+++ WSimpl/AX/CalculatedProduct/VariantDescriptionBepaler.cls.xml	(.../VariantDescriptionBepaler.cls.xml)	(revision 49577)
@@ -8,22 +8,20 @@
 <Private>1</Private>
 </Property>
 
-<Property name="Vertaler">
-<Type>DOM.common.Transl.Vertaler</Type>
+<Property name="DescriptionBepaler">
+<Type>WSimpl.AX.CalculatedProduct.VariantDescriptionBepaler.DescriptionBepaler</Type>
 <Private>1</Private>
 </Property>
 
 <Method name="%OnNew">
-<FormalSpec>Formatter:AXimpl.Formatter="",Vertaler:DOM.common.Transl.Vertaler=""</FormalSpec>
+<FormalSpec>Formatter:AXimpl.Formatter="",DescriptionBepaler:WSimpl.AX.CalculatedProduct.VariantDescriptionBepaler.DescriptionBepaler=""</FormalSpec>
 <Private>1</Private>
 <ProcedureBlock>1</ProcedureBlock>
 <ReturnType>%Status</ReturnType>
 <ServerOnly>1</ServerOnly>
 <Implementation><![CDATA[
-	#dim VertaalGroepen As %ListOfDataTypes = ##class(TECH.ListUtils).CreateListOfDataTypes(##class(DOM.common.Transl.enu.VertaalGroep).TechnischeTermen())
-	
 	Set ..Formatter = $$$Inject(Formatter, ##class(AXimpl.Formatter).%New())
-	Set ..Vertaler = $$$Inject(Vertaler, ##class(DOM.common.Transl.impl.Vertaler).%New(VertaalGroepen))
+	Set ..DescriptionBepaler = $$$Inject(DescriptionBepaler, ##class(WSimpl.AX.CalculatedProduct.VariantDescriptionBepaler.DescriptionBepaler).%New())
 	
 	Quit $$$OK
 ]]></Implementation>
@@ -50,18 +48,10 @@
 <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 KleurLabel As %String = ..Vertaler.GeefVertaling("Kleur", Taal)
-	#dim Kleur As %String = Product.GeefKleurOmschrijving(Taal)
-	#dim Description As %String = Product.GeefLangtekst(Taal, $$$False)
-	
-	If $$$Not(Kleur = "") {
-		Set Description = Description _ ", " _ KleurLabel _ ":" _ Kleur
-	}
-	
-	Set VariantDescription.Description = Description
+
+	Set VariantDescription.Description = ..DescriptionBepaler.GeefDescription(Product, Taal)
 	Set VariantDescription.Name = Product.GeefKorttekst()
-	Set VariantDescription.LanguageId = LanguageId
+	Set VariantDescription.LanguageId = ..Formatter.FormatLanguageId(Taal)
 	Set VariantDescription.ConfigVariantId = ConfigVariantId
 	Set VariantDescription.class = "entity"
 	
Index: vhTestFiles/IntegratieTests/WSimpl.AX.CalculatedProduct/TestAantalNul/794542.xml
===================================================================
diff -u -r48978 -r49577
--- vhTestFiles/IntegratieTests/WSimpl.AX.CalculatedProduct/TestAantalNul/794542.xml	(.../794542.xml)	(revision 48978)
+++ vhTestFiles/IntegratieTests/WSimpl.AX.CalculatedProduct/TestAantalNul/794542.xml	(.../794542.xml)	(revision 49577)
@@ -52,15 +52,15 @@
       <ConfigVariantId>DummyRequestMessageId</ConfigVariantId>
       <Description>TANDEMBOX plus
 Verdeelstuk hoog
-voor voorraadlades, corpus 90, grijs</Description>
+voor voorraadlades, corpus 90, grijs, kleur:Grijs Metallic</Description>
       <LanguageId>nl-be</LanguageId>
       <Name>OL.VLIV90GRVOORR PL  WA/G</Name>
     </VariantDescription>
     <VariantDescription class="entity">
       <ConfigVariantId>DummyRequestMessageId</ConfigVariantId>
       <Description>TANDEMBOX plus
 Pièce de séparation
-pour tiroir à provisions, C = 90, gris</Description>
+pour tiroir à provisions, C = 90, gris, couleur:Gris Métallisé</Description>
       <LanguageId>fr</LanguageId>
       <Name>OL.VLIV90GRVOORR PL  WA/G</Name>
     </VariantDescription>
Index: vhTest/Mock/WSimpl/AX/CalculatedProduct/VariantDescriptionBepaler/DescriptionBepaler.cls.xml
===================================================================
diff -u
--- vhTest/Mock/WSimpl/AX/CalculatedProduct/VariantDescriptionBepaler/DescriptionBepaler.cls.xml	(revision 0)
+++ vhTest/Mock/WSimpl/AX/CalculatedProduct/VariantDescriptionBepaler/DescriptionBepaler.cls.xml	(revision 49577)
@@ -0,0 +1,20 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="vhTest.Mock.WSimpl.AX.CalculatedProduct.VariantDescriptionBepaler.DescriptionBepaler">
+<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.DescriptionBepaler,Tools.Mock.MockClassBase</Super>
+<Inheritance>right</Inheritance>
+
+<Method name="GeefDescription">
+<FormalSpec>Product:DOM.PM.Product,Taal:DOM.enu.Taal</FormalSpec>
+<ReturnType>%String</ReturnType>
+<Implementation><![CDATA[	quit ..VerwerkMethodCall("GeefDescription",Product,Taal)
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>
Index: vhTestFiles/IntegratieTests/WSimpl.AX.CalculatedProduct/TestMoederVanSopr/500816.xml
===================================================================
diff -u -r49429 -r49577
--- vhTestFiles/IntegratieTests/WSimpl.AX.CalculatedProduct/TestMoederVanSopr/500816.xml	(.../500816.xml)	(revision 49429)
+++ vhTestFiles/IntegratieTests/WSimpl.AX.CalculatedProduct/TestMoederVanSopr/500816.xml	(.../500816.xml)	(revision 49577)
@@ -23,14 +23,14 @@
     <VariantDescription class="entity">
       <ConfigVariantId>DummyRequestMessageId</ConfigVariantId>
       <Description>Set AVENTOS HS,HK en HL
-frontbevestigingen</Description>
+frontbevestigingen, kleur:Vernikkeld</Description>
       <LanguageId>nl-be</LanguageId>
       <Name> 20S4200   FRO-B   S2  NI</Name>
     </VariantDescription>
     <VariantDescription class="entity">
       <ConfigVariantId>DummyRequestMessageId</ConfigVariantId>
       <Description>Set AVENTOS HS,HK et HL 
-attaches-façade</Description>
+attaches-façade, couleur:Nickelé</Description>
       <LanguageId>fr</LanguageId>
       <Name> 20S4200   FRO-B   S2  NI</Name>
     </VariantDescription>
@@ -41,6 +41,7 @@
     </VariantDescription>
     <VariantDescription class="entity">
       <ConfigVariantId>DummyRequestMessageId</ConfigVariantId>
+      <Description>, Farbe:Vernickelt</Description>
       <LanguageId>de</LanguageId>
       <Name> 20S4200   FRO-B   S2  NI</Name>
     </VariantDescription>
Index: vhTestFiles/IntegratieTests/WSimpl.AX.CalculatedProduct/TestCubic/823131.xml
===================================================================
diff -u -r49573 -r49577
--- vhTestFiles/IntegratieTests/WSimpl.AX.CalculatedProduct/TestCubic/823131.xml	(.../823131.xml)	(revision 49573)
+++ vhTestFiles/IntegratieTests/WSimpl.AX.CalculatedProduct/TestCubic/823131.xml	(.../823131.xml)	(revision 49577)
@@ -36,28 +36,28 @@
     <VariantDescription class="entity">
       <ConfigVariantId>DummyRequestMessageId</ConfigVariantId>
       <Description>CubiFer
-Aluminium 62 x  72 x 150mm</Description>
+Aluminium 62 x  72 x 150mm, kleur:Aluminium look</Description>
       <LanguageId>nl-be</LanguageId>
       <Name>TA.AMAL072 CUBIFER     AL</Name>
     </VariantDescription>
     <VariantDescription class="entity">
       <ConfigVariantId>DummyRequestMessageId</ConfigVariantId>
       <Description>CubiFer
-Aluminium 62 x  72 x 150mm</Description>
+Aluminium 62 x  72 x 150mm, couleur:Finition Alu</Description>
       <LanguageId>fr</LanguageId>
       <Name>TA.AMAL072 CUBIFER     AL</Name>
     </VariantDescription>
     <VariantDescription class="entity">
       <ConfigVariantId>DummyRequestMessageId</ConfigVariantId>
       <Description>CubiFer                   
-Aluminium 62 x  72 x 150mm</Description>
+Aluminium 62 x  72 x 150mm, colour:Aluminium look</Description>
       <LanguageId>en-us</LanguageId>
       <Name>TA.AMAL072 CUBIFER     AL</Name>
     </VariantDescription>
     <VariantDescription class="entity">
       <ConfigVariantId>DummyRequestMessageId</ConfigVariantId>
       <Description>CubiFer
-Aluminium 62 x  72 x 150mm</Description>
+Aluminium 62 x  72 x 150mm, Farbe:Alu look</Description>
       <LanguageId>de</LanguageId>
       <Name>TA.AMAL072 CUBIFER     AL</Name>
     </VariantDescription>
Index: WSimpl/AX/CalculatedProduct/VariantDescriptionBepaler/DescriptionBepaler.cls.xml
===================================================================
diff -u
--- WSimpl/AX/CalculatedProduct/VariantDescriptionBepaler/DescriptionBepaler.cls.xml	(revision 0)
+++ WSimpl/AX/CalculatedProduct/VariantDescriptionBepaler/DescriptionBepaler.cls.xml	(revision 49577)
@@ -0,0 +1,44 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="WSimpl.AX.CalculatedProduct.VariantDescriptionBepaler.DescriptionBepaler">
+<Super>TECH.Mockable</Super>
+
+<Property name="Vertaler">
+<Type>DOM.common.Transl.Vertaler</Type>
+<Private>1</Private>
+</Property>
+
+<Method name="%OnNew">
+<FormalSpec>Vertaler:DOM.common.Transl.Vertaler=""</FormalSpec>
+<Private>1</Private>
+<ProcedureBlock>1</ProcedureBlock>
+<ReturnType>%Status</ReturnType>
+<ServerOnly>1</ServerOnly>
+<Implementation><![CDATA[
+	#dim VertaalGroepen As %ListOfDataTypes = ##class(TECH.ListUtils).CreateListOfDataTypes(##class(DOM.common.Transl.enu.VertaalGroep).TechnischeTermen())
+	
+	Set ..Vertaler = $$$Inject(Vertaler, ##class(DOM.common.Transl.impl.Vertaler).%New(VertaalGroepen))
+	
+	Quit $$$OK
+]]></Implementation>
+</Method>
+
+<Method name="GeefDescription">
+<FormalSpec>Product:DOM.PM.Product,Taal:DOM.enu.Taal</FormalSpec>
+<ReturnType>%String</ReturnType>
+<Implementation><![CDATA[
+	#dim Description As %String = Product.GeefLangtekst(Taal, $$$False)
+	#dim KleurLabel As %String = ..Vertaler.GeefVertaling("Kleur", Taal)
+	#dim Kleur As %String = Product.GeefKleurOmschrijving(Taal)
+	
+	If $$$Not(Kleur = "") {
+		Set Description = Description _ ", " _ KleurLabel _ ":" _ Kleur
+	}
+	
+	Quit Description
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>
Index: vhTest/Fake/WSimpl/AX/CalculatedProduct/VariantDescriptionBepaler/DescriptionBepaler.cls.xml
===================================================================
diff -u
--- vhTest/Fake/WSimpl/AX/CalculatedProduct/VariantDescriptionBepaler/DescriptionBepaler.cls.xml	(revision 0)
+++ vhTest/Fake/WSimpl/AX/CalculatedProduct/VariantDescriptionBepaler/DescriptionBepaler.cls.xml	(revision 49577)
@@ -0,0 +1,19 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="vhTest.Fake.WSimpl.AX.CalculatedProduct.VariantDescriptionBepaler.DescriptionBepaler">
+<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.DescriptionBepaler</Super>
+
+<Method name="GeefDescription">
+<FormalSpec>Product:DOM.PM.Product,Taal:DOM.enu.Taal</FormalSpec>
+<ReturnType>%String</ReturnType>
+<Implementation><![CDATA[	Quit ""
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>