Index: vhTest/Mock/WSimpl/AX/CalculatedProduct/VariantDescriptionBepaler.cls.xml
===================================================================
diff -u -r49661 -r60018
--- vhTest/Mock/WSimpl/AX/CalculatedProduct/VariantDescriptionBepaler.cls.xml	(.../VariantDescriptionBepaler.cls.xml)	(revision 49661)
+++ vhTest/Mock/WSimpl/AX/CalculatedProduct/VariantDescriptionBepaler.cls.xml	(.../VariantDescriptionBepaler.cls.xml)	(revision 60018)
@@ -8,6 +8,13 @@
 <Super>WSimpl.AX.CalculatedProduct.VariantDescriptionBepaler,Tools.Mock.MockClassBase</Super>
 <Inheritance>right</Inheritance>
 
+<Method name="%OnNew">
+<FormalSpec>Formatter:AXimpl.Formatter="",DescriptionBepaler:WSimpl.AX.CalculatedProduct.VariantDescriptionBepaler.DescriptionBepaler=""</FormalSpec>
+<ReturnType>%Status</ReturnType>
+<Implementation><![CDATA[	Quit $$$OK
+]]></Implementation>
+</Method>
+
 <Method name="Bepaal">
 <FormalSpec>Product:DOM.PM.Product,ConfigVariantId:AXif.Dynamics.CalculatedProductOut.MessageParts.AxdExtTypeADUConfigVariantId</FormalSpec>
 <ReturnType>%ListOfObjects</ReturnType>
Index: WSimpl/AX/CalculatedProduct/VariantDescriptionBepaler/DescriptionBepaler.cls.xml
===================================================================
diff -u -r59937 -r60018
--- WSimpl/AX/CalculatedProduct/VariantDescriptionBepaler/DescriptionBepaler.cls.xml	(.../DescriptionBepaler.cls.xml)	(revision 59937)
+++ WSimpl/AX/CalculatedProduct/VariantDescriptionBepaler/DescriptionBepaler.cls.xml	(.../DescriptionBepaler.cls.xml)	(revision 60018)
@@ -49,15 +49,15 @@
 	
 	Set DescriptionLangtekst = Product.GeefLangtekst(Taal, $$$False)
 	
-	If DescriptionLangtekst = ""{
-		Quit ..GeefDescription(Product, "N")
+	If DescriptionLangtekst = "" {
+		Quit ""
 	} Else {
 		Set Description = Description _ DescriptionLangtekst
 	}
 	
 	#dim KleurLabel As %String = ..Vertaler.GeefVertaling("Kleur", Taal)
 
-	#dim Kleuren as %String = Product.GeefKleurVanKorttekst( )	
+	#dim Kleuren as %String = Product.GeefKleurVanKorttekst()	
 	If (..ProductTypeApi.IsTaxLosseComponentenProduct(Product.GeefID())) && (##class(TECH.StringUtils).Trim($Piece(Kleuren,"/",1)) = "") {
 		;ingewikkelde manier om af te leiden dat het een rug of bodem is (alleen de 2de piece is dan ingevuld).
 		;en dan moeten we de kleur van TAX plaat materiaal nog toevoegen
@@ -68,8 +68,7 @@
 	If $$$Not(Kleur = "") {
 		Set Description = Description _ $$$CRLF _ KleurLabel _ ":" _ Kleur
 	}
-	
-	
+
 	Quit Description
 ]]></Implementation>
 </Method>
Index: vhUnitTest/WSimpl/AX/CalculatedProduct/VariantDescriptionBepaler/DescriptionBepaler/Test.cls.xml
===================================================================
diff -u -r59937 -r60018
--- vhUnitTest/WSimpl/AX/CalculatedProduct/VariantDescriptionBepaler/DescriptionBepaler/Test.cls.xml	(.../Test.cls.xml)	(revision 59937)
+++ vhUnitTest/WSimpl/AX/CalculatedProduct/VariantDescriptionBepaler/DescriptionBepaler/Test.cls.xml	(.../Test.cls.xml)	(revision 60018)
@@ -47,11 +47,10 @@
 ]]></Implementation>
 </Method>
 
-<Method name="Test: Geef Nederlandse omschrijving terug indien omschrijving in andere taal ontbreekt indien geen LosseComponent">
+<Method name="Test: Geef lege omschrijving terug indien omschrijving in taal ontbreekt indien geen LosseComponent">
 <Implementation><![CDATA[
 	#dim NederlandseOmschrijving As %String = "Omschrijving in het Nederlands"
 	#dim RandomProductId As %String = "RandomProductId"
-	#dim VerwachteUitkomst As %String = "Omschrijving in het Nederlands" _$$$CRLF_ "Kleur:VertalingKleur"
 	#dim RandomTaal As %String = "RandomTaal"
 	
 	#dim VertalerMock As vhTest.Mock.DOM.common.Transl.Vertaler = ##class(vhTest.Mock.DOM.common.Transl.Vertaler).%New()
@@ -67,26 +66,20 @@
 	Do VertalerMock.VerwachtMethodCall("GeefVertaling","Kleur",RandomTaal,0).Nooit()
 	Do ProductMock.VerwachtMethodCall("GeefKleurOmschrijving",RandomTaal).Nooit()
 	
-	Do ProductMock.VerwachtMethodCall("GeefLangtekst","N",$$$False).DanReturn(NederlandseOmschrijving)
-	Do VertalerMock.IndienMethodCall("GeefVertaling","Kleur","N",0).DanReturn("Kleur")
-	Do ProductMock.VerwachtMethodCall("GeefKleurVanKorttekst").DanReturn("")
-	Do ProductMock.VerwachtMethodCall("GeefKleurOmschrijving","N").DanReturn("VertalingKleur")
-	
-	#dim DescriptionBepaler As WSimpl.AX.CalculatedProduct.VariantDescriptionBepaler.DescriptionBepaler = ##class(WSimpl.AX.CalculatedProduct.VariantDescriptionBepaler.DescriptionBepaler).%New(ProductTypeAPIStub, VertalerMock, PlaatMateriaalKleurVertalerStub)
+	Set DescriptionBepaler = ##class(WSimpl.AX.CalculatedProduct.VariantDescriptionBepaler.DescriptionBepaler).%New(ProductTypeAPIStub, VertalerMock, PlaatMateriaalKleurVertalerStub)
 	#dim ResultaatOmschrijving As %String = DescriptionBepaler.GeefDescription(ProductMock,RandomTaal)
 	
 	Do ProductMock.Verifieer()
 	Do VertalerMock.Verifieer()
-	Do $$$AssertEquals(VerwachteUitkomst,ResultaatOmschrijving)
+	Do $$$AssertEquals("",ResultaatOmschrijving)
 ]]></Implementation>
 </Method>
 
-<Method name="Test: Geef Nederlandse omschrijving terug indien omschrijving in andere taal ontbreekt indien LosseComponent">
+<Method name="Test: Geef RandomIdentNR terug indien omschrijving in taal ontbreekt indien LosseComponent">
 <Implementation><![CDATA[
 	#dim NederlandseOmschrijving As %String = "Omschrijving in het Nederlands"
 	#dim RandomProductId As %String = "RandomProductId"
 	#dim RandomIdentNummer As %String = "RandomIdentNummer"
-	#dim VerwachteUitkomst As %String = "RandomIdentNummer" _$$$CRLF_ NederlandseOmschrijving
 	#dim RandomTaal As %String = "RandomTaal"
 	
 	#dim VertalerMock As vhTest.Mock.DOM.common.Transl.Vertaler = ##class(vhTest.Mock.DOM.common.Transl.Vertaler).%New()
@@ -98,23 +91,20 @@
 	Do ProductTypeAPIStub.IndienMethodCall("IsTaxLosseComponentenProduct",RandomProductId).DanReturn($$$True)
 	Do ProductMock.VerwachtMethodCall("GeefID").DanReturn(RandomProductId)
 	Do ProductMock.VerwachtMethodCall("GeefIdentNr").DanReturn(RandomIdentNummer)	
-	Do ProductMock.VerwachtMethodCall("GeefLangtekst",RandomTaal,$$$False).DanReturn("")	
+	Do ProductMock.VerwachtMethodCall("GeefLangtekst",RandomTaal,$$$False).DanReturn("Langtekst Losse component")	
 	
-	Do VertalerMock.VerwachtMethodCall("GeefVertaling","Kleur",RandomTaal,0).Nooit()
+	Do VertalerMock.VerwachtMethodCall("GeefVertaling","Kleur",RandomTaal,0).DanReturn("Kleur in random taal")
 	Do ProductMock.VerwachtMethodCall("GeefKleurOmschrijving",RandomTaal).Nooit()
 	
-	Do ProductMock.VerwachtMethodCall("GeefLangtekst","N",$$$False).DanReturn(NederlandseOmschrijving)
-	Do VertalerMock.IndienMethodCall("GeefVertaling","Kleur","N",0).DanReturn("Kleur")
 	Do ProductMock.VerwachtMethodCall("GeefKleurVanKorttekst").DanReturn("")
 	Do ProductMock.VerwachtMethodCall("GeefKleurOmschrijving","N").Nooit()
 		
-	#dim DescriptionBepaler As WSimpl.AX.CalculatedProduct.VariantDescriptionBepaler.DescriptionBepaler = ##class(WSimpl.AX.CalculatedProduct.VariantDescriptionBepaler.DescriptionBepaler).%New(ProductTypeAPIStub, VertalerMock, PlaatMateriaalKleurVertalerStub)
+	Set DescriptionBepaler = ##class(WSimpl.AX.CalculatedProduct.VariantDescriptionBepaler.DescriptionBepaler).%New(ProductTypeAPIStub, VertalerMock, PlaatMateriaalKleurVertalerStub)
 	#dim ResultaatOmschrijving As %String = DescriptionBepaler.GeefDescription(ProductMock,RandomTaal)
-	Do ##class(Tools.Wlip).%New(110).String(ResultaatOmschrijving)
 	
 	Do ProductMock.Verifieer()
 	Do VertalerMock.Verifieer()
-	Do $$$AssertEquals(VerwachteUitkomst,ResultaatOmschrijving)
+	Do $$$AssertEquals("RandomIdentNummer" _$$$CRLF _ "Langtekst Losse component", ResultaatOmschrijving)
 ]]></Implementation>
 </Method>
 
@@ -138,7 +128,7 @@
 	#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(ProductTypeApiStub, VertalerMock)
+	Set DescriptionBepaler  = ##class(WSimpl.AX.CalculatedProduct.VariantDescriptionBepaler.DescriptionBepaler).%New(ProductTypeApiStub, VertalerMock)
 	#dim Description As %String = DescriptionBepaler.GeefDescription(ProductMock, RandomTaal)
 	
 	Do $$$AssertEquals(Description, VerwachteDescription)
Index: WSimpl/AX/CalculatedProduct/VariantDescriptionBepaler.cls.xml
===================================================================
diff -u -r49661 -r60018
--- WSimpl/AX/CalculatedProduct/VariantDescriptionBepaler.cls.xml	(.../VariantDescriptionBepaler.cls.xml)	(revision 49661)
+++ WSimpl/AX/CalculatedProduct/VariantDescriptionBepaler.cls.xml	(.../VariantDescriptionBepaler.cls.xml)	(revision 60018)
@@ -32,11 +32,23 @@
 <ReturnType>%ListOfObjects</ReturnType>
 <Implementation><![CDATA[
 	#dim VariantDescriptionList As %ListOfObjects = ##class(%ListOfObjects).%New()
+	#dim VariantDescriptionNL As AXif.Dynamics.CalculatedProductOut.MessageParts.AxdEntityVariantDescription = ..GeefVariantDescription(Product, ##class(DOM.enu.Taal).Nederlands(), ConfigVariantId)
+	#dim VariantDescriptionFR As AXif.Dynamics.CalculatedProductOut.MessageParts.AxdEntityVariantDescription = ..GeefVariantDescription(Product, ##class(DOM.enu.Taal).Frans(), ConfigVariantId)
+	#dim VariantDescriptionEN As AXif.Dynamics.CalculatedProductOut.MessageParts.AxdEntityVariantDescription = ..GeefVariantDescription(Product, ##class(DOM.enu.Taal).Engels(), ConfigVariantId)
+	#dim VariantDescriptionDU As AXif.Dynamics.CalculatedProductOut.MessageParts.AxdEntityVariantDescription = ..GeefVariantDescription(Product, ##class(DOM.enu.Taal).Duits(), ConfigVariantId)
 	
-	Do VariantDescriptionList.Insert(..GeefVariantDescription(Product, ##class(DOM.enu.Taal).Nederlands(), ConfigVariantId))
-	Do VariantDescriptionList.Insert(..GeefVariantDescription(Product, ##class(DOM.enu.Taal).Frans(), ConfigVariantId))
-	Do VariantDescriptionList.Insert(..GeefVariantDescription(Product, ##class(DOM.enu.Taal).Engels(), ConfigVariantId))
-	Do VariantDescriptionList.Insert(..GeefVariantDescription(Product, ##class(DOM.enu.Taal).Duits(), ConfigVariantId))
+	If $$$Not(VariantDescriptionNL.Description = "") {
+		Do VariantDescriptionList.Insert(VariantDescriptionNL)
+	}
+	If $$$Not(VariantDescriptionFR.Description = "") {
+		Do VariantDescriptionList.Insert(VariantDescriptionFR)
+	}
+	If $$$Not(VariantDescriptionEN.Description = "") {
+		Do VariantDescriptionList.Insert(VariantDescriptionEN)
+	}
+	If $$$Not(VariantDescriptionDU.Description = "") {
+		Do VariantDescriptionList.Insert(VariantDescriptionDU)
+	}
 	
 	Quit VariantDescriptionList
 ]]></Implementation>