Index: vhUnitTest/APPS/EDI/common/impl/LegacyConverter/ConverteerLegacyNaarEdi/Test.cls.xml
===================================================================
diff -u -r39027 -r39067
--- vhUnitTest/APPS/EDI/common/impl/LegacyConverter/ConverteerLegacyNaarEdi/Test.cls.xml	(.../Test.cls.xml)	(revision 39027)
+++ vhUnitTest/APPS/EDI/common/impl/LegacyConverter/ConverteerLegacyNaarEdi/Test.cls.xml	(.../Test.cls.xml)	(revision 39067)
@@ -347,37 +347,37 @@
 ]]></Implementation>
 </Method>
 
-<UDLText name="T">
-<Content><![CDATA[
-/*
-Method "Test: ProductFeatures: AntislipMat: HeeftMat ingevuld en matkleur -> ItemASM"()
-{
-	#dim TeConverterenProduct = ..GeefTeConverterenProduct()
-	Set TeConverterenProduct.HeeftMat = $$$True
-	Set TeConverterenProduct.MatKleur = ##class(DOM.PM.enu.MATKleur).ZwartAntislip()
+<Method name="Test: ProductFeatures: AntislipMat: ItemASM ingevuld -&gt; HeeftMat en juist kleurke overgezet">
+<Implementation><![CDATA[
+	#dim TeConverterenProduct As DOM.PM.Maatwerk.Calc.Common.impl.TBXKenmerkenLegacy = ##class(vhTest.Utils.DOM.PM.Maatwerk.Calc.Common.impl.TBXKenmerkenLegacy).StandaardLade()
+	Set TeConverterenProduct.ItemASM = "ZW.AF"
 	
-	Set DummyTBXLadeCodeBepaler = ##class(vhTest.Dummy.APPS.EDI.Bestel.impl.BestelService.TandemboxBesteller.TBXLadeCodeBepaler).%New()
+	#dim ProductConverter = ##class(APPS.EDI.common.impl.LegacyConverter).%New()
+	#dim GeconverteerdProduct As WS.TBX.EM.OrderLijn = ProductConverter.ConverteerLegacyNaarEdi(TeConverterenProduct)
 	
-	#dim ProductConverter = ##class(APPS.EDI.common.impl.LegacyConverter).%New(DummyTBXLadeCodeBepaler)
-	#dim WebOrderLijn As WS.TBX.EM.OrderLijn = ProductConverter.ConverteerEdiNaarLegacy(TeConverterenProduct)
-	
-	Do $$$AssertEquals(WebOrderLijn.ItemASM,"Z")
-}
+	Do $$$AssertTrue(GeconverteerdProduct.HeeftMat)
+	Do $$$AssertEquals(GeconverteerdProduct.MatKleur,##class(DOM.PM.enu.MATKleur).AntiSlipFiberZwart())
+	Do $$$AssertEquals(GeconverteerdProduct.MatMateriaal,##class(DOM.PM.enu.MATMateriaal).AntislipFiber())
+]]></Implementation>
+</Method>
 
-Method "Test: ProductFeatures: AntislipMat: HeeftMat false"()
-{
-	#dim TeConverterenProduct = ..GeefTeConverterenProduct()
-	Set TeConverterenProduct.HeeftMat = $$$False
-	Set TeConverterenProduct.MatKleur = ##class(DOM.PM.enu.MATKleur).ZwartAntislip()
+<Method name="Test: ProductFeatures: AntislipMat: HeeftMat false">
+<Implementation><![CDATA[
+	#dim TeConverterenProduct As DOM.PM.Maatwerk.Calc.Common.impl.TBXKenmerkenLegacy = ##class(vhTest.Utils.DOM.PM.Maatwerk.Calc.Common.impl.TBXKenmerkenLegacy).StandaardLade()
+	Set TeConverterenProduct.ItemASM = ""
 	
-	Set DummyTBXLadeCodeBepaler = ##class(vhTest.Dummy.APPS.EDI.Bestel.impl.BestelService.TandemboxBesteller.TBXLadeCodeBepaler).%New()
+	#dim ProductConverter = ##class(APPS.EDI.common.impl.LegacyConverter).%New()
+	#dim GeconverteerdProduct As WS.TBX.EM.OrderLijn = ProductConverter.ConverteerLegacyNaarEdi(TeConverterenProduct)
 	
-	#dim ProductConverter = ##class(APPS.EDI.common.impl.LegacyConverter).%New(DummyTBXLadeCodeBepaler)
-	#dim WebOrderLijn As WS.TBX.EM.OrderLijn = ProductConverter.ConverteerEdiNaarLegacy(TeConverterenProduct)
-	
-	Do $$$AssertEquals(WebOrderLijn.ItemASM,"")
-}
+	Do $$$AssertFalse(GeconverteerdProduct.HeeftMat)
+	Do $$$AssertEquals(GeconverteerdProduct.MatKleur,"")
+	Do $$$AssertEquals(GeconverteerdProduct.MatMateriaal,"")
+]]></Implementation>
+</Method>
 
+<UDLText name="T">
+<Content><![CDATA[
+/*
 Method "Test: ProductFeatures: LadeCodeKenmerken -> ItemLT"()
 {
 	#dim TeConverterenProduct = ..GeefTeConverterenProduct()
Index: APPS/EDI/common/impl/LegacyConverter/LegacyNaarEdi.cls.xml
===================================================================
diff -u -r39033 -r39067
--- APPS/EDI/common/impl/LegacyConverter/LegacyNaarEdi.cls.xml	(.../LegacyNaarEdi.cls.xml)	(revision 39033)
+++ APPS/EDI/common/impl/LegacyConverter/LegacyNaarEdi.cls.xml	(.../LegacyNaarEdi.cls.xml)	(revision 39067)
@@ -18,7 +18,7 @@
 <Private>1</Private>
 </Property>
 
-<Property name="Zijwand">
+<Property name="Zijkant">
 <Type>%String</Type>
 <Private>1</Private>
 </Property>
@@ -56,12 +56,11 @@
 	Do ..ConvertInschuifElement(Product,TBXProduct)
 	Do ..ConvertCorpusWandDikte(Product,TBXProduct)
 	Do ..ConvertLadeType(Product,TBXProduct)
+	Do ..ConvertMat(Product,TBXProduct)
 	
 	/*Do ..ConvertDesignEnKleuren(Product,TBXProduct)
 
 	Do ..ConvertGreepEnMeenemer(Product,TBXProduct)
-	Do ..ConvertMat(Product,TBXProduct)
-	Do ..ConvertLadeCodeKenmerken(Product,TBXProduct)
 	Do ..ConvertUitsparingen(Product,TBXProduct)
 	Do ..ConvertVerlaagdeRug(Product,TBXProduct)*/
 	
@@ -169,9 +168,42 @@
 	Set TBXProduct.Type = "TBX"
 	Set TBXProduct.RugHoogte = ..Rughoogte
 	Set TBXProduct.IsBinnenlade = (..LadeType = "B")
+	Set TBXProduct.ZijkantHoogte = ..Zijkant
 ]]></Implementation>
 </Method>
 
+<Method name="ConvertMat">
+<FormalSpec><![CDATA[Product:APPS.PM.Maatwerk.dto.TBXKenmerkenLegacy,&TBXProduct:APPS.EDI.common.dto.v001.LadeTBX]]></FormalSpec>
+<Private>1</Private>
+<Implementation><![CDATA[
+	If Product.ItemASM = "Z" {
+		Set TBXProduct.MatKleur = ##class(DOM.PM.enu.MATKleur).ZwartAntislip() 
+		Set TBXProduct.MatMateriaal = ##class(DOM.PM.enu.MATMateriaal).Antislip()
+		Set TBXProduct.HeeftMat = $$$True	
+	}
+	If Product.ItemASM = "ZW.AF" {
+		Set TBXProduct.MatKleur = ##class(DOM.PM.enu.MATKleur).AntiSlipFiberZwart() 
+		Set TBXProduct.MatMateriaal = ##class(DOM.PM.enu.MATMateriaal).AntislipFiber()
+		Set TBXProduct.HeeftMat = $$$True	
+	}
+	If Product.ItemASM = "WI.AF" {
+		Set TBXProduct.MatKleur = ##class(DOM.PM.enu.MATKleur).AntiSlipFiberWit() 
+		Set TBXProduct.MatMateriaal = ##class(DOM.PM.enu.MATMateriaal).AntislipFiber()
+		Set TBXProduct.HeeftMat = $$$True	
+	}
+	If Product.ItemASM = "G" {
+		Set TBXProduct.MatKleur = ##class(DOM.PM.enu.MATKleur).ParelGrijs() 
+		Set TBXProduct.MatMateriaal = ##class(DOM.PM.enu.MATMateriaal).Antislip()
+		Set TBXProduct.HeeftMat = $$$True	
+	}
+	If Product.ItemASM = "" {
+		Set TBXProduct.MatKleur = ""
+		Set TBXProduct.MatMateriaal = ""
+		Set TBXProduct.HeeftMat = $$$False	
+	}
+]]></Implementation>
+</Method>
+
 <Method name="GeefConvertDataTBX">
 <Private>1</Private>
 <ReturnType>TECH.ObjectUtils.ObjectConvertData</ReturnType>
@@ -205,7 +237,7 @@
 	
 	Set ..Klasse = arKenm("TBKlasse")
 	Set ..LadeType = arKenm("TBLadeType")
-	Set ..Zijwand = arKenm("TBZijwand")
+	Set ..Zijkant = arKenm("TBZijwand")
 	Set ..Rughoogte = arKenm("TBRugHoogte")
 ]]></Implementation>
 </Method>