Index: WSimpl/Vhisie4/OCC/OCCService/OCCKenmerkenConverter/BlumNaarEconKenmerkenConverter.cls.xml
===================================================================
diff -u -r59674 -r59723
--- WSimpl/Vhisie4/OCC/OCCService/OCCKenmerkenConverter/BlumNaarEconKenmerkenConverter.cls.xml	(.../BlumNaarEconKenmerkenConverter.cls.xml)	(revision 59674)
+++ WSimpl/Vhisie4/OCC/OCCService/OCCKenmerkenConverter/BlumNaarEconKenmerkenConverter.cls.xml	(.../BlumNaarEconKenmerkenConverter.cls.xml)	(revision 59723)
@@ -86,6 +86,8 @@
 	Quit:(KenmerkNameBlumKenmerk="colour/surface of pull-out system") "Data.Kenmerken.Ladekleur"
 	Quit:(KenmerkNameBlumKenmerk=..#Latch) "Data.Kenmerken.Meenemerset"
 	Quit:(KenmerkNameBlumKenmerk="pull-out type") "Data.Kenmerken.Toepassing"
+	Quit:(KenmerkNameBlumKenmerk="version of front") "Data.Kenmerken.VoorWandTypeVanMBinnenlade"
+	Quit:(KenmerkNameBlumKenmerk="type of back") "Data.Kenmerken.Rugwandmateriaal"
 	
 	Quit ""
 ]]></Implementation>
@@ -129,6 +131,11 @@
 	Quit:(KenmerkValueBlumKenmerk="terra black") ##class(DOM.PM.enu.LBXLadeKleur).Terrazwart()
 	Quit:(KenmerkValueBlumKenmerk="drawer") ##class(DOM.PM.enu.LBXKlasse).Lade()
 	Quit:(KenmerkValueBlumKenmerk="sink drawer") ##class(DOM.PM.enu.LBXKlasse).Spoelbak()
+	Quit:(KenmerkValueBlumKenmerk="with closed front piece") ##class(DOM.PM.enu.LBXVoorWandTypeVanMBinnenlade).Metaal()
+	Quit:(KenmerkValueBlumKenmerk="with design element") ##class(DOM.PM.enu.LBXVoorWandTypeVanMBinnenlade).Glas()
+	Quit:(KenmerkValueBlumKenmerk="wood") ##class(DOM.PM.enu.LBXRugWandMateriaal).Hout()
+	Quit:(KenmerkValueBlumKenmerk="chipboard back") ##class(DOM.PM.enu.LBXRugWandMateriaal).Hout()
+	Quit:(KenmerkValueBlumKenmerk="steel back") ##class(DOM.PM.enu.LBXRugWandMateriaal).Staal()
 	
 	Quit KenmerkValueBlumKenmerk
 ]]></Implementation>
Index: vhUnitTest/WSimpl/Vhisie4/OCC/OCCService/OCCKenmerkenConverter/BlumNaarEconKenmerkenConverter/Test.cls.xml
===================================================================
diff -u -r59674 -r59723
--- vhUnitTest/WSimpl/Vhisie4/OCC/OCCService/OCCKenmerkenConverter/BlumNaarEconKenmerkenConverter/Test.cls.xml	(.../Test.cls.xml)	(revision 59674)
+++ vhUnitTest/WSimpl/Vhisie4/OCC/OCCService/OCCKenmerkenConverter/BlumNaarEconKenmerkenConverter/Test.cls.xml	(.../Test.cls.xml)	(revision 59723)
@@ -110,6 +110,21 @@
 ]]></Implementation>
 </Method>
 
+<Method name="Test: VoorWandTypeVanMBinnenlade">
+<Implementation><![CDATA[
+	Do ..AssertConversieBlumKenmerkenNaarEconKenmerken("Version of front", "With closed front piece", "Data.Kenmerken.VoorWandTypeVanMBinnenlade", ##class(DOM.PM.enu.LBXVoorWandTypeVanMBinnenlade).Metaal())
+	Do ..AssertConversieBlumKenmerkenNaarEconKenmerken("Version of front", "With design element", "Data.Kenmerken.VoorWandTypeVanMBinnenlade", ##class(DOM.PM.enu.LBXVoorWandTypeVanMBinnenlade).Glas())
+]]></Implementation>
+</Method>
+
+<Method name="Test: RugWandMateriaal">
+<Implementation><![CDATA[
+	Do ..AssertConversieBlumKenmerkenNaarEconKenmerken("Type of back", "Wood", "Data.Kenmerken.Rugwandmateriaal", ##class(DOM.PM.enu.LBXRugWandMateriaal).Hout())
+	Do ..AssertConversieBlumKenmerkenNaarEconKenmerken("Type of back", "Chipboard back", "Data.Kenmerken.Rugwandmateriaal", ##class(DOM.PM.enu.LBXRugWandMateriaal).Hout())
+	Do ..AssertConversieBlumKenmerkenNaarEconKenmerken("Type of back", "Steel back", "Data.Kenmerken.Rugwandmateriaal", ##class(DOM.PM.enu.LBXRugWandMateriaal).Staal())
+]]></Implementation>
+</Method>
+
 <Method name="AssertConversieBlumKenmerkenNaarEconKenmerken">
 <FormalSpec>BlumKenmerkName:%String,BlumKenmerkValue:%String,VerwachteEconKenmerkName:%String,VerwachteKenmerkValue:%String</FormalSpec>
 <Private>1</Private>
@@ -118,7 +133,7 @@
 	Set BlumKenmerk.Name = BlumKenmerkName
 	Set BlumKenmerk.Value = BlumKenmerkValue
 	
-	#dim Resultaat As WS.Vhisie4.OCC.dto.Kenmerk = ..Converter.ConvertBlumNaarEconKenmerk(BlumKenmerk)
+	#dim Resultaat As WS.Vhisie4.OCC.dto.Kenmerk = ..Converter.ConvertBlumNaarEconKenmerk(BlumKenmerk, "LBX")
 	
 	Do $$$AssertEquals(Resultaat.Name, VerwachteEconKenmerkName)
 	Do $$$AssertEquals(Resultaat.Value, VerwachteKenmerkValue)