Index: vhUnitTest/EXT/Unishop/PurchaseOrder001/ProductConverter/Converteer/TestTBX.cls.xml
===================================================================
diff -u -r39932 -r41154
--- vhUnitTest/EXT/Unishop/PurchaseOrder001/ProductConverter/Converteer/TestTBX.cls.xml	(.../TestTBX.cls.xml)	(revision 39932)
+++ vhUnitTest/EXT/Unishop/PurchaseOrder001/ProductConverter/Converteer/TestTBX.cls.xml	(.../TestTBX.cls.xml)	(revision 41154)
@@ -29,7 +29,7 @@
 </Method>
 
 <Method name="Test : Converteer LadeMetVeelExtras">
-<Implementation><![CDATA[	Do ..AssertConverter("LadeMetVerlaagdeRug")
+<Implementation><![CDATA[	Do ..AssertConverter("LadeMetVeelExtras")
 ]]></Implementation>
 </Method>
 
Index: vhUnitTest/APPS/EDI/common/impl/LegacyConverter/AcceptatieTest.cls.xml
===================================================================
diff -u -r39497 -r41154
--- vhUnitTest/APPS/EDI/common/impl/LegacyConverter/AcceptatieTest.cls.xml	(.../AcceptatieTest.cls.xml)	(revision 39497)
+++ vhUnitTest/APPS/EDI/common/impl/LegacyConverter/AcceptatieTest.cls.xml	(.../AcceptatieTest.cls.xml)	(revision 41154)
@@ -48,7 +48,7 @@
 ]]></Implementation>
 </Method>
 
-<Method name="Test: EdiNaarLegacy Master of All Schuifkes">
+<Method name="Test: EdiNaarLegacy Lade met veel Extras">
 <Implementation><![CDATA[
 	#dim TeConverterenProduct As APPS.EDI.common.dto.v001.LadeTBX = ##class(vhTest.Utils.APPS.EDI.common.dto.LadeTBX).LadeMetVeelExtras()
 	Set ProductConverter = ##class(APPS.EDI.common.impl.LegacyConverter).%New()
Index: ECONimpl/PM/Maatwerk/EdiConverter/EconNaarEdi.cls.xml
===================================================================
diff -u -r40462 -r41154
--- ECONimpl/PM/Maatwerk/EdiConverter/EconNaarEdi.cls.xml	(.../EconNaarEdi.cls.xml)	(revision 40462)
+++ ECONimpl/PM/Maatwerk/EdiConverter/EconNaarEdi.cls.xml	(.../EconNaarEdi.cls.xml)	(revision 41154)
@@ -56,9 +56,9 @@
 <Implementation><![CDATA[
 	Set Eigenschappen.ZijwandVerhogingType = $Case(Product.ZijwandVerhogingType,"Zonder":"NoGallery","Reling":"SimpleGallery","InschuifElement":"DesignElement",:"NoGallery")
 	
+	Set Eigenschappen.ZijwandVerhogingKleur = Product.ZijwandVerhogingRelingKleur
 	If Product.ZijwandVerhogingType = ##class(ECON.PM.Maatwerk.enu.TBXZijwandVerhogingType).Reling() {
-		Set Eigenschappen.ZijwandVerhogingKleur = Product.ZijwandVerhogingRelingKleur
-		Set Eigenschappen.ZijwandVerhogingMateriaal = Product.ZijwandVerhogingMateriaal
+		Set Eigenschappen.ZijwandVerhogingMateriaal = ""
 	} ElseIf Product.ZijwandVerhogingType = ##class(ECON.PM.Maatwerk.enu.TBXZijwandVerhogingType).InschuifElement() {
 		Set Eigenschappen.ZijwandVerhogingMateriaal = $Case(Product.ZijwandVerhogingMateriaal,
 															##class(ECON.PM.Maatwerk.enu.TBXZijwandVerhogingInschuifelementMateriaal).Glas():##class(DOM.PM.enu.TBXZijwandVerhogingMateriaal).Glas(),
Index: vhTest/Utils/APPS/PM/Maatwerk/dto/TBXKenmerkenLegacy.cls.xml
===================================================================
diff -u -r39714 -r41154
--- vhTest/Utils/APPS/PM/Maatwerk/dto/TBXKenmerkenLegacy.cls.xml	(.../TBXKenmerkenLegacy.cls.xml)	(revision 39714)
+++ vhTest/Utils/APPS/PM/Maatwerk/dto/TBXKenmerkenLegacy.cls.xml	(.../TBXKenmerkenLegacy.cls.xml)	(revision 41154)
@@ -252,7 +252,7 @@
 	Set Kenmerken.ItemKL = "SW"
 	Set Kenmerken.ItemKLOms = ""
 	Set Kenmerken.ItemKLROPVL = "WI"
-	Set Kenmerken.ItemKV = "ALU.SW"
+	Set Kenmerken.ItemKV = "FZ8"
 	Set Kenmerken.ItemKVOms = ""
 	Set Kenmerken.ItemKX = ""
 	Set Kenmerken.ItemKXOms = ""
Index: APPS/EDI/common/impl/LegacyConverter/EdiNaarLegacy.cls.xml
===================================================================
diff -u -r39739 -r41154
--- APPS/EDI/common/impl/LegacyConverter/EdiNaarLegacy.cls.xml	(.../EdiNaarLegacy.cls.xml)	(revision 39739)
+++ APPS/EDI/common/impl/LegacyConverter/EdiNaarLegacy.cls.xml	(.../EdiNaarLegacy.cls.xml)	(revision 41154)
@@ -150,6 +150,12 @@
 	} ElseIf( Product.ZijwandVerhogingMateriaal = ##class(DOM.PM.enu.TBXZijwandVerhogingMateriaal).Geen()) {
 		Set TBXProduct.ItemKV = "ZV"
 	}
+	
+	If Product.ZijwandVerhogingType = "DesignElement" {
+		Set TBXProduct.ItemRK = Product.LadeKleur //quick and dirty, niet juist voor inox, ook hieronder
+	} Else {
+		Set TBXProduct.ItemRK = $$$If(Product.ZijwandVerhogingKleur="",Product.LadeKleur,Product.ZijwandVerhogingKleur)
+	}
 ]]></Implementation>
 </Method>
 
@@ -306,7 +312,6 @@
 	Do ConvertData.Add("VerpakkingType","ItemVPK", "Set Output = $Case(Input, ""Pallet"":""P"", ""VHoss"":""B"",""Procom"":""O"", ""Probox"":""X"", ""V1"":""S"")")
 	Do ConvertData.Add("GeleiderTechnologie","ItemBM", "Set Output = $Select(Input = ""B"" : ""I"", 1:Input)")
 	Do ConvertData.Add("LadeKleur","ItemKL")
-	Do ConvertData.Add("LadeKleur","ItemRK")
 	
 	Quit ConvertData
 ]]></Implementation>
Index: vhTest/Utils/ECON/PM/Maatwerk/dto/TbxKenmerken.cls.xml
===================================================================
diff -u -r39953 -r41154
--- vhTest/Utils/ECON/PM/Maatwerk/dto/TbxKenmerken.cls.xml	(.../TbxKenmerken.cls.xml)	(revision 39953)
+++ vhTest/Utils/ECON/PM/Maatwerk/dto/TbxKenmerken.cls.xml	(.../TbxKenmerken.cls.xml)	(revision 41154)
@@ -168,8 +168,8 @@
 	Set TbxKenmerken.RugHoogte = ##class(ECON.PM.Maatwerk.enu.TBXRugHoogte).C()
 	Set TbxKenmerken.ZijkantHoogte = ##class(ECON.PM.Maatwerk.enu.TBXZijkantHoogte).M()
 	Set TbxKenmerken.ZijwandHoogte = ##class(ECON.PM.Maatwerk.enu.TBXZijwandHoogte).C()
-	Set TbxKenmerken.ZijwandVerhogingMateriaal = ##class(ECON.PM.Maatwerk.enu.TBXZijwandVerhogingInschuifelementMateriaal).Aluminium()
-	Set TbxKenmerken.ZijwandVerhogingInschuifelementKleur = ##class(ECON.PM.Maatwerk.enu.TBXZijwandVerhogingInschuifelementKleur).AluZijdeWit()
+	Set TbxKenmerken.ZijwandVerhogingMateriaal = ##class(ECON.PM.Maatwerk.enu.TBXZijwandVerhogingInschuifelementMateriaal).Glas()
+	Set TbxKenmerken.ZijwandVerhogingInschuifelementKleur = ##class(ECON.PM.Maatwerk.enu.TBXZijwandVerhogingInschuifelementKleur).FloatGezuurd8mm()
 	Set TbxKenmerken.ZijwandVerhogingType = ##class(ECON.PM.Maatwerk.enu.TBXZijwandVerhogingType).InschuifElement()
 	
 	Quit TbxKenmerken
Index: vhTest/Utils/APPS/EDI/common/dto/LadeTBX.cls.xml
===================================================================
diff -u -r40462 -r41154
--- vhTest/Utils/APPS/EDI/common/dto/LadeTBX.cls.xml	(.../LadeTBX.cls.xml)	(revision 40462)
+++ vhTest/Utils/APPS/EDI/common/dto/LadeTBX.cls.xml	(.../LadeTBX.cls.xml)	(revision 41154)
@@ -138,8 +138,8 @@
 	Set Resultaat.OpvullijstKleur = ##class(DOM.PM.enu.TBXOpvullijstKleur).Wit()
 	Set Resultaat.RugHoogte = ##class(DOM.PM.enu.TBXRugHoogte).C()
 	Set Resultaat.ZijkantHoogte = ##class(DOM.PM.enu.TBXZijkantHoogte).M()
-	Set Resultaat.ZijwandVerhogingKleur = ##class(DOM.PM.enu.TBXZijwandVerhogingKleur).ZijdeWit()
-	Set Resultaat.ZijwandVerhogingMateriaal = ##class(DOM.PM.enu.TBXZijwandVerhogingMateriaal).Aluminium()
+	Set Resultaat.ZijwandVerhogingKleur = ##class(DOM.PM.enu.TBXZijwandVerhogingKleur).FloatGezuurd8mm()
+	Set Resultaat.ZijwandVerhogingMateriaal = ##class(DOM.PM.enu.TBXZijwandVerhogingMateriaal).Glas()
 	Set Resultaat.ZijwandVerhogingType = "DesignElement"
 	
 	Quit Resultaat
Index: vhTest/Utils/EXT/Unishop/PurchaseOrder001/CreateOrder/LadeEigenschappenTBX.cls.xml
===================================================================
diff -u -r40462 -r41154
--- vhTest/Utils/EXT/Unishop/PurchaseOrder001/CreateOrder/LadeEigenschappenTBX.cls.xml	(.../LadeEigenschappenTBX.cls.xml)	(revision 40462)
+++ vhTest/Utils/EXT/Unishop/PurchaseOrder001/CreateOrder/LadeEigenschappenTBX.cls.xml	(.../LadeEigenschappenTBX.cls.xml)	(revision 41154)
@@ -132,8 +132,8 @@
 	Set Kenmerken.MatMateriaal = ##class(DOM.PM.enu.MATMateriaal).AntislipFiber()
 	Set Kenmerken.OpvullijstKleur = ##class(DOM.PM.enu.TBXOpvullijstKleur).Wit()
 	Set Kenmerken.RugHoogte = ##class(DOM.PM.enu.TBXRugHoogte).C()
-	Set Kenmerken.ZijwandVerhogingKleur = ##class(DOM.PM.enu.TBXZijwandVerhogingKleur).ZijdeWit()
-	Set Kenmerken.ZijwandVerhogingMateriaal = ##class(DOM.PM.enu.TBXZijwandVerhogingMateriaal).Aluminium()
+	Set Kenmerken.ZijwandVerhogingKleur = ##class(DOM.PM.enu.TBXZijwandVerhogingKleur).FloatGezuurd8mm()
+	Set Kenmerken.ZijwandVerhogingMateriaal = ##class(DOM.PM.enu.TBXZijwandVerhogingMateriaal).Glas()
 	Set Kenmerken.ZijwandVerhogingType = "DesignElement"
 	
 	Quit Kenmerken
Index: vhTest/Utils/DOM/PM/Maatwerk/Calc/Common/impl/TBXKenmerkenLegacy.cls.xml
===================================================================
diff -u -r39252 -r41154
--- vhTest/Utils/DOM/PM/Maatwerk/Calc/Common/impl/TBXKenmerkenLegacy.cls.xml	(.../TBXKenmerkenLegacy.cls.xml)	(revision 39252)
+++ vhTest/Utils/DOM/PM/Maatwerk/Calc/Common/impl/TBXKenmerkenLegacy.cls.xml	(.../TBXKenmerkenLegacy.cls.xml)	(revision 41154)
@@ -252,7 +252,7 @@
 	Set Kenmerken.ItemKL = "SW"
 	Set Kenmerken.ItemKLOms = ""
 	Set Kenmerken.ItemKLROPVL = "WI"
-	Set Kenmerken.ItemKV = "ALU.SW"
+	Set Kenmerken.ItemKV = "FZ8"
 	Set Kenmerken.ItemKVOms = ""
 	Set Kenmerken.ItemKX = ""
 	Set Kenmerken.ItemKXOms = ""