Index: ECONimpl/PM/Maatwerk/EdiConverter/EdiNaarEcon.cls.xml
===================================================================
diff -u -r39230 -r39310
--- ECONimpl/PM/Maatwerk/EdiConverter/EdiNaarEcon.cls.xml	(.../EdiNaarEcon.cls.xml)	(revision 39230)
+++ ECONimpl/PM/Maatwerk/EdiConverter/EdiNaarEcon.cls.xml	(.../EdiNaarEcon.cls.xml)	(revision 39310)
@@ -34,19 +34,57 @@
 	
 	Set Eigenschappen.DwarsverdelingAantal = Product.AantalDwarsverdelingen
 	Set Eigenschappen.GreepEnMeenemer = $Case(Product.GreepEnMeenemer,"No":"Zonder","Handle":"Greep","HandleAndLatch":"Meenemer",:"Zonder")
-	Set Eigenschappen.ZijwandVerhogingType = $Case(Product.ZijwandVerhogingType,"NoGallery":"Laag","SimpleGallery":"Reling","DesignElement":"InschuifElement",:"Laag")
 	Set Eigenschappen.HeeftAfwijkendeRughoogte = $$$False
 	Set Eigenschappen.Toepassing = Product.Klasse
 	
+	Do ..ConverteerRugHoogte(Product, .Eigenschappen)
 	Do ..ConverteerNietMeeleveren(Product, .Eigenschappen)
+	Do ..ConverteerZijwand(Product, .Eigenschappen)
 	
 	Quit Eigenschappen
 ]]></Implementation>
 </Method>
 
+<Method name="ConverteerZijwand">
+<FormalSpec><![CDATA[Product:APPS.EDI.common.dto.v001.LadeTBX,&Eigenschappen:ECON.PM.Maatwerk.dto.TbxKenmerken]]></FormalSpec>
+<Private>1</Private>
+<Implementation><![CDATA[
+	Set Eigenschappen.ZijwandVerhogingType = $Case(Product.ZijwandVerhogingType,"NoGallery":"Zonder","SimpleGallery":"Reling","DesignElement":"InschuifElement",:"Zonder")
+	
+	If Product.ZijwandVerhogingType = "SimpleGallery" {
+		Set Eigenschappen.ZijwandVerhogingRelingKleur = Product.ZijwandVerhogingKleur
+		Set Eigenschappen.ZijwandVerhogingMateriaal = Product.ZijwandVerhogingMateriaal
+	} ElseIf Product.ZijwandVerhogingType = "DesignElement" {
+		Set Eigenschappen.ZijwandVerhogingMateriaal = $Case(Product.ZijwandVerhogingMateriaal,
+															##class(DOM.PM.enu.TBXZijwandVerhogingMateriaal).Glas():##class(ECON.PM.Maatwerk.enu.TBXZijwandVerhogingInschuifelementMateriaal).Glas(),
+															##class(DOM.PM.enu.TBXZijwandVerhogingMateriaal).Aluminium():##class(ECON.PM.Maatwerk.enu.TBXZijwandVerhogingInschuifelementMateriaal).Aluminium(),
+															##class(DOM.PM.enu.TBXZijwandVerhogingMateriaal).Geen():##class(ECON.PM.Maatwerk.enu.TBXZijwandVerhogingInschuifelementMateriaal).ZonderVerhoging())
+		Set Eigenschappen.ZijwandVerhogingInschuifelementKleur = $Case(Product.ZijwandVerhogingKleur,
+														##class(DOM.PM.enu.TBXZijwandVerhogingKleur).MetallicGrijs():##class(ECON.PM.Maatwerk.enu.TBXZijwandVerhogingInschuifelementKleur).AluMetallicGrijs(),
+														##class(DOM.PM.enu.TBXZijwandVerhogingKleur).ZijdeWit():##class(ECON.PM.Maatwerk.enu.TBXZijwandVerhogingInschuifelementKleur).AluZijdeWit(),
+														##class(DOM.PM.enu.TBXZijwandVerhogingKleur).TerraZwart():##class(ECON.PM.Maatwerk.enu.TBXZijwandVerhogingInschuifelementKleur).AluTerraZwart(),
+														##class(DOM.PM.enu.TBXZijwandVerhogingKleur).FloatHelder8mm():##class(ECON.PM.Maatwerk.enu.TBXZijwandVerhogingInschuifelementKleur).FloatHelder8mm(),
+														##class(DOM.PM.enu.TBXZijwandVerhogingKleur).FloatGezuurd8mm():##class(ECON.PM.Maatwerk.enu.TBXZijwandVerhogingInschuifelementKleur).FloatGezuurd8mm())
+		
+	}
+]]></Implementation>
+</Method>
+
+<Method name="ConverteerRugHoogte">
+<FormalSpec><![CDATA[Product:APPS.EDI.common.dto.v001.LadeTBX,&Eigenschappen:ECON.PM.Maatwerk.dto.TbxKenmerken]]></FormalSpec>
+<Private>1</Private>
+<Implementation><![CDATA[
+	If (Product.RugHoogte '= Product.LadeHoogte) {
+		Set Eigenschappen.RugHoogte = Product.RugHoogte
+	} Else {
+		Set Eigenschappen.RugHoogte = ""
+	}
+]]></Implementation>
+</Method>
+
 <Method name="ConverteerNietMeeleveren">
 <FormalSpec><![CDATA[Product:APPS.EDI.common.dto.v001.LadeTBX,&Eigenschappen:ECON.PM.Maatwerk.dto.TbxKenmerken]]></FormalSpec>
-<ReturnType>%String</ReturnType>
+<Private>1</Private>
 <Implementation><![CDATA[
 	Do:Product.NietMeeleveren.Find("NMFB") Eigenschappen.NietMeeleveren.InsertOrdered(##class(ECON.PM.Maatwerk.enu.NietMeeleveren).FrontBevestiging())
 	Do:Product.NietMeeleveren.Find("NMCP") Eigenschappen.NietMeeleveren.InsertOrdered(##class(ECON.PM.Maatwerk.enu.NietMeeleveren).Geleider())
@@ -101,7 +139,6 @@
 		
 		Do ..ConverterData.Add(PropertyName,PropertyName)
 	}
-	Do ..ConverterData.Add("ZijwandVerhogingKleur","ZijwandVerhogingRelingKleur")
 	
 	Quit ..ConverterData
 ]]></Implementation>
Index: vhTest/Utils/ECON/PM/Maatwerk/dto/TbxKenmerken.cls.xml
===================================================================
diff -u -r39252 -r39310
--- vhTest/Utils/ECON/PM/Maatwerk/dto/TbxKenmerken.cls.xml	(.../TbxKenmerken.cls.xml)	(revision 39252)
+++ vhTest/Utils/ECON/PM/Maatwerk/dto/TbxKenmerken.cls.xml	(.../TbxKenmerken.cls.xml)	(revision 39310)
@@ -9,25 +9,24 @@
 <Implementation><![CDATA[
 	#dim TbxKenmerken As ECON.PM.Maatwerk.dto.TbxKenmerken = ##class(ECON.PM.Maatwerk.dto.TbxKenmerken).%New()	
 	
-	Set TbxKenmerken.BodemKleur = ##class(DOM.PM.enu.TBXBodemKleur).Wit()
+	Set TbxKenmerken.BodemKleur = ##class(ECON.PM.Maatwerk.enu.TBXBodemKleur).Wit()
 	Set TbxKenmerken.CorpusBreedte = 600
-	Set TbxKenmerken.Draagkracht = ##class(DOM.PM.enu.TBXDraagkracht).Draagkracht30()
-	Set TbxKenmerken.DwarsverdelingAantal = ##class(DOM.PM.enu.TBXDwarsverdeling).Zonder()
-	Set TbxKenmerken.FrontBevestiging = ##class(DOM.PM.enu.TBXFrontBevestiging).Inserta()
-	Set TbxKenmerken.GeleiderTechnologie = ##class(DOM.PM.enu.TBXGeleiderTechnologie).Blumotion()
-	Set TbxKenmerken.GreepEnMeenemer = "Zonder"
+	Set TbxKenmerken.Draagkracht = ##class(ECON.PM.Maatwerk.enu.TBXDraagkracht).Draagkracht30()
+	Set TbxKenmerken.DwarsverdelingAantal = ##class(ECON.PM.Maatwerk.enu.TBXDwarsverdelingAantal).Zonder()
+	Set TbxKenmerken.FrontBevestiging = ##class(ECON.PM.Maatwerk.enu.TBXFrontBevestiging).Inserta()
+	Set TbxKenmerken.GeleiderTechnologie = ##class(ECON.PM.Maatwerk.enu.TBXGeleiderTechnologie).Blumotion()
+	Set TbxKenmerken.GreepEnMeenemer = ##class(ECON.PM.Maatwerk.enu.TBXGreepEnMeenemer).Zonder()
 	Set TbxKenmerken.HeeftAfwijkendeRughoogte = $$$False
 	Set TbxKenmerken.HeeftZijstabilisering = $$$False
 	Set TbxKenmerken.IsBinnenbreedte = $$$True
 	Set TbxKenmerken.IsBinnenlade = $$$False
-	Set TbxKenmerken.LadeDiepte = ##class(DOM.PM.enu.TBXLadeDiepte).LadeDiepte400()
-	Set TbxKenmerken.LadeHoogte = ##class(DOM.PM.enu.TBXLadehoogte).M()
-	Set TbxKenmerken.LadeKleur = "SW"
-	Set TbxKenmerken.RugHoogte = ##class(DOM.PM.enu.TBXRugHoogte).M()
-	Set TbxKenmerken.Toepassing = ##class(DOM.PM.enu.TBXToepassing).Lade()
-	Set TbxKenmerken.VerpakkingType = ##class(DOM.PM.enu.TBXVerpakkingType).V1()
-	Set TbxKenmerken.ZijkantHoogte = ##class(DOM.PM.enu.TBXZijkantHoogte).M()
-	Set TbxKenmerken.ZijwandVerhogingType = ##class(DOM.PM.enu.TBXZijwandVerhogingType).Laag()
+	Set TbxKenmerken.LadeDiepte = ##class(ECON.PM.Maatwerk.enu.TBXLadeDiepte).LadeDiepte400()
+	Set TbxKenmerken.LadeHoogte = ##class(ECON.PM.Maatwerk.enu.TBXLadeHoogte).M()
+	Set TbxKenmerken.LadeKleur = ##class(ECON.PM.Maatwerk.enu.TBXLadeKleur).ZijdeWit()
+	Set TbxKenmerken.Toepassing = ##class(ECON.PM.Maatwerk.enu.TBXToepassing).Lade()
+	Set TbxKenmerken.VerpakkingType = ##class(ECON.PM.Maatwerk.enu.TBXVerpakkingType).V1()
+	Set TbxKenmerken.ZijkantHoogte = ##class(ECON.PM.Maatwerk.enu.TBXZijkantHoogte).M()
+	Set TbxKenmerken.ZijwandVerhogingType = ##class(ECON.PM.Maatwerk.enu.TBXZijwandVerhogingType).Zonder()
 	
 	Quit TbxKenmerken
 ]]></Implementation>
@@ -40,11 +39,10 @@
 	#dim TbxKenmerken As ECON.PM.Maatwerk.dto.TbxKenmerken = ..StandaardLade()
 	
 	Set TbxKenmerken.IsBinnenlade = $$$True
-	Set TbxKenmerken.FrontBevestiging = ##class(DOM.PM.enu.TBXFrontBevestiging).Zonder()
-	Set TbxKenmerken.LadeHoogte = ##class(DOM.PM.enu.TBXLadehoogte).D()
-	Set TbxKenmerken.RugHoogte = ##class(DOM.PM.enu.TBXRugHoogte).D()
-	Set TbxKenmerken.ZijkantHoogte = ##class(DOM.PM.enu.TBXZijkantHoogte).M()
-	Set TbxKenmerken.ZijwandVerhogingType = ##class(DOM.PM.enu.TBXZijwandVerhogingType).Reling()
+	Set TbxKenmerken.FrontBevestiging = ##class(ECON.PM.Maatwerk.enu.TBXFrontBevestiging).Zonder()
+	Set TbxKenmerken.LadeHoogte = ##class(ECON.PM.Maatwerk.enu.TBXLadeHoogte).D()
+	Set TbxKenmerken.ZijkantHoogte = ##class(ECON.PM.Maatwerk.enu.TBXZijkantHoogte).M()
+	Set TbxKenmerken.ZijwandVerhogingType = ##class(ECON.PM.Maatwerk.enu.TBXZijwandVerhogingType).Reling()
 	
 	Quit TbxKenmerken
 ]]></Implementation>
@@ -92,23 +90,22 @@
 <Implementation><![CDATA[
 	#dim TbxKenmerken As ECON.PM.Maatwerk.dto.TbxKenmerken = ..StandaardLade()
 	
-	Set TbxKenmerken.BodemKleur = ##class(DOM.PM.enu.TBXBodemKleur).Wit()
+	Set TbxKenmerken.BodemKleur = ##class(ECON.PM.Maatwerk.enu.TBXBodemKleur).Wit()
 	Set TbxKenmerken.CorpusWandDikte = 18
-	Set TbxKenmerken.DwarsverdelingAantal = ##class(DOM.PM.enu.TBXDwarsverdeling).Drie()
-	Set TbxKenmerken.FrontBevestiging = ##class(DOM.PM.enu.TBXFrontBevestiging).Inserta()
-	Set TbxKenmerken.GeleiderTechnologie = ##class(DOM.PM.enu.TBXGeleiderTechnologie).TiponBlumotion()
+	Set TbxKenmerken.DwarsverdelingAantal = ##class(ECON.PM.Maatwerk.enu.TBXDwarsverdelingAantal).Drie()
+	Set TbxKenmerken.FrontBevestiging = ##class(ECON.PM.Maatwerk.enu.TBXFrontBevestiging).Inserta()
+	Set TbxKenmerken.GeleiderTechnologie = ##class(ECON.PM.Maatwerk.enu.TBXGeleiderTechnologie).TiponBlumotion()
 	Set TbxKenmerken.HeeftOpvullijstLinks = $$$True
 	Set TbxKenmerken.HeeftOpvullijstRechts = $$$True
 	Set TbxKenmerken.IsBinnenbreedte = $$$False
 	Set TbxKenmerken.IsBinnenlade = $$$False
-	Set TbxKenmerken.LadeHoogte = ##class(DOM.PM.enu.TBXLadehoogte).C()
-	Set TbxKenmerken.MatKleur =  ##class(DOM.PM.enu.MATKleur).AntiSlipFiberWit()
-	Set TbxKenmerken.MatMateriaal = ##class(DOM.PM.enu.MATMateriaal).AntislipFiber()
-	Set TbxKenmerken.OpvullijstKleur = ##class(DOM.PM.enu.TBXOpvullijstKleur).Wit()
-	Set TbxKenmerken.RugHoogte = ##class(DOM.PM.enu.TBXRugHoogte).C()
-	Set TbxKenmerken.ZijwandVerhogingMateriaal = ##class(DOM.PM.enu.TBXZijwandVerhogingMateriaal).Aluminium()
-	Set TbxKenmerken.ZijwandVerhogingRelingKleur = ##class(DOM.PM.enu.TBXZijwandVerhogingKleur).ZijdeWit()
-	Set TbxKenmerken.ZijwandVerhogingType = ##class(DOM.PM.enu.TBXZijwandVerhogingType).InschuifElement()
+	Set TbxKenmerken.LadeHoogte = ##class(ECON.PM.Maatwerk.enu.TBXLadeHoogte).C()
+	Set TbxKenmerken.MatKleur =  ##class(ECON.PM.Maatwerk.enu.TBXMatAntislipFiberKleur).AntiSlipFiberWit()
+	Set TbxKenmerken.MatMateriaal = ##class(ECON.PM.Maatwerk.enu.TBXMatMateriaal).AntislipFiber()
+	Set TbxKenmerken.OpvullijstKleur = ##class(ECON.PM.Maatwerk.enu.TBXOpvullijstKleur).Wit()
+	Set TbxKenmerken.ZijwandVerhogingMateriaal = ##class(ECON.PM.Maatwerk.enu.TBXZijwandVerhogingInschuifelementMateriaal).Aluminium()
+	Set TbxKenmerken.ZijwandVerhogingInschuifelementKleur = ##class(ECON.PM.Maatwerk.enu.TBXZijwandVerhogingInschuifelementKleur).AluZijdeWit()
+	Set TbxKenmerken.ZijwandVerhogingType = ##class(ECON.PM.Maatwerk.enu.TBXZijwandVerhogingType).InschuifElement()
 	
 	Quit TbxKenmerken
 ]]></Implementation>
@@ -142,8 +139,8 @@
 <Implementation><![CDATA[
 	#dim TbxKenmerken As ECON.PM.Maatwerk.dto.TBXKenmerken = ..StandaardLade()
 	
-	Set TbxKenmerken.LadeHoogte = ##class(DOM.PM.enu.TBXLadehoogte).C()
-	Set TbxKenmerken.RugHoogte = ##class(DOM.PM.enu.TBXRugHoogte).M()
+	Set TbxKenmerken.LadeHoogte = ##class(ECON.PM.Maatwerk.enu.TBXLadeHoogte).C()
+	Set TbxKenmerken.RugHoogte = ##class(ECON.PM.Maatwerk.enu.TBXRugHoogte).M()
 	
 	Quit TbxKenmerken
 ]]></Implementation>
Index: ECONimpl/PM/Maatwerk/EdiConverter/EconNaarEdi.cls.xml
===================================================================
diff -u -r39231 -r39310
--- ECONimpl/PM/Maatwerk/EdiConverter/EconNaarEdi.cls.xml	(.../EconNaarEdi.cls.xml)	(revision 39231)
+++ ECONimpl/PM/Maatwerk/EdiConverter/EconNaarEdi.cls.xml	(.../EconNaarEdi.cls.xml)	(revision 39310)
@@ -37,18 +37,57 @@
 	Set Eigenschappen.Klasse = Product.Toepassing
 	Set Eigenschappen.Type = "TBX"
 	Set Eigenschappen.GreepEnMeenemer = $Case(Product.GreepEnMeenemer,"Zonder":"No","Greep":"Handle","Meenemer":"HandleAndLatch",:"No")
-	Set Eigenschappen.ZijwandVerhogingType = $Case(Product.ZijwandVerhogingType,"Laag":"NoGallery","Reling":"SimpleGallery","InschuifElement":"DesignElement",:"NoGallery")
+	
 	Set Eigenschappen.AantalDwarsverdelingen = Product.DwarsverdelingAantal
 	
+	Do ..ConverteerRugHoogte(Product, .Eigenschappen)
 	Do ..ConverteerNietMeeleveren(Product, .Eigenschappen)
+	Do ..ConverteerZijwand(Product, .Eigenschappen)
 	
 	Quit Eigenschappen
 ]]></Implementation>
 </Method>
 
+<Method name="ConverteerZijwand">
+<FormalSpec><![CDATA[Product:ECON.PM.Maatwerk.dto.TbxKenmerken,&Eigenschappen:APPS.EDI.common.dto.v001.LadeTBX]]></FormalSpec>
+<Private>1</Private>
+<Implementation><![CDATA[
+	Set Eigenschappen.ZijwandVerhogingType = $Case(Product.ZijwandVerhogingType,"Zonder":"NoGallery","Reling":"SimpleGallery","InschuifElement":"DesignElement",:"NoGallery")
+	
+	If Product.ZijwandVerhogingType = ##class(ECON.PM.Maatwerk.enu.TBXZijwandVerhogingType).Reling() {
+		Set Eigenschappen.ZijwandVerhogingKleur = Product.ZijwandVerhogingRelingKleur
+		Set Eigenschappen.ZijwandVerhogingMateriaal = Product.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(),
+															##class(ECON.PM.Maatwerk.enu.TBXZijwandVerhogingInschuifelementMateriaal).Aluminium():##class(DOM.PM.enu.TBXZijwandVerhogingMateriaal).Aluminium(),
+															##class(ECON.PM.Maatwerk.enu.TBXZijwandVerhogingInschuifelementMateriaal).ZonderVerhoging():##class(DOM.PM.enu.TBXZijwandVerhogingMateriaal).Geen())
+		Set Eigenschappen.ZijwandVerhogingKleur = $Case(Product.ZijwandVerhogingInschuifelementKleur,
+														##class(ECON.PM.Maatwerk.enu.TBXZijwandVerhogingInschuifelementKleur).AluMetallicGrijs():##class(DOM.PM.enu.TBXZijwandVerhogingKleur).MetallicGrijs(),
+														##class(ECON.PM.Maatwerk.enu.TBXZijwandVerhogingInschuifelementKleur).AluZijdeWit():##class(DOM.PM.enu.TBXZijwandVerhogingKleur).ZijdeWit(),
+														##class(ECON.PM.Maatwerk.enu.TBXZijwandVerhogingInschuifelementKleur).AluTerraZwart():##class(DOM.PM.enu.TBXZijwandVerhogingKleur).TerraZwart(),
+														##class(ECON.PM.Maatwerk.enu.TBXZijwandVerhogingInschuifelementKleur).FloatHelder8mm():##class(DOM.PM.enu.TBXZijwandVerhogingKleur).FloatHelder8mm(),
+														##class(ECON.PM.Maatwerk.enu.TBXZijwandVerhogingInschuifelementKleur).FloatGezuurd8mm():##class(DOM.PM.enu.TBXZijwandVerhogingKleur).FloatGezuurd8mm())
+		
+	}
+]]></Implementation>
+</Method>
+
+<Method name="ConverteerRugHoogte">
+<FormalSpec><![CDATA[Product:ECON.PM.Maatwerk.dto.TbxKenmerken,&Eigenschappen:APPS.EDI.common.dto.v001.LadeTBX]]></FormalSpec>
+<Private>1</Private>
+<Implementation><![CDATA[
+	If $$$HasLength(Product.RugHoogte) {
+		Set Eigenschappen.RugHoogte = Product.RugHoogte
+	} Else {
+		Set Eigenschappen.RugHoogte = Product.LadeHoogte
+	}
+]]></Implementation>
+</Method>
+
 <Method name="ConverteerNietMeeleveren">
 <FormalSpec><![CDATA[Product:ECON.PM.Maatwerk.dto.TbxKenmerken,&Eigenschappen:APPS.EDI.common.dto.v001.LadeTBX]]></FormalSpec>
-<ReturnType>%String</ReturnType>
+<Private>1</Private>
 <Implementation><![CDATA[
 	Do:Product.NietMeeleveren.Find(##class(ECON.PM.Maatwerk.enu.NietMeeleveren).FrontBevestiging()) Eigenschappen.NietMeeleveren.InsertOrdered("NMFB")
 	Do:Product.NietMeeleveren.Find(##class(ECON.PM.Maatwerk.enu.NietMeeleveren).Geleider()) Eigenschappen.NietMeeleveren.InsertOrdered("NMCP")