Index: OBJTimpl/PM/Maatwerk/KenmerkenConverter/AppsNaarOBJT/Tbx.cls.xml
===================================================================
diff -u -r72086 -r72088
--- OBJTimpl/PM/Maatwerk/KenmerkenConverter/AppsNaarOBJT/Tbx.cls.xml	(.../Tbx.cls.xml)	(revision 72086)
+++ OBJTimpl/PM/Maatwerk/KenmerkenConverter/AppsNaarOBJT/Tbx.cls.xml	(.../Tbx.cls.xml)	(revision 72088)
@@ -7,6 +7,9 @@
 <FormalSpec>AppsKenmerken:APPS.PM.Maatwerk.dto.TBXKenmerken</FormalSpec>
 <ReturnType>OBJT.PM.Maatwerk.dto.LadeKenmerken</ReturnType>
 <Implementation><![CDATA[
+	// HeeftTbxMintolerantieb
+	// zijwand <-> ladehoogte
+	
 	Set OBJTKenmerken = ##class(OBJT.PM.Maatwerk.dto.TbxKenmerken).%New()
 	
 	Set OBJTKenmerken.Toepassing = AppsKenmerken.Toepassing
@@ -31,12 +34,19 @@
 	Set OBJTKenmerken.LadeKleur = AppsKenmerken.LadeKleur
 	Set OBJTKenmerken.OpvullijstKleur = AppsKenmerken.OpvullijstKleur
 	Set OBJTKenmerken.PlaatMateriaal = AppsKenmerken.PlaatMateriaal
-	Set OBJTKenmerken.ProductieWijze = AppsKenmerken.ProductieWijze
+	Set OBJTKenmerken.ProductieWijze = $Select((AppsKenmerken.ProductieWijze = ""): "V", 1: AppsKenmerken.ProductieWijze)
 	Set OBJTKenmerken.RugHoogte = AppsKenmerken.RugHoogte
 	Set OBJTKenmerken.RugwandMateriaal = AppsKenmerken.RugwandMateriaal
+	Set OBJTKenmerken.VerpakkingType = AppsKenmerken.VerpakkingType
+	Set OBJTKenmerken.ZijwandHoogte = AppsKenmerken.LadeHoogte
+	Set OBJTKenmerken.ZijkantHoogte = AppsKenmerken.ZijkantHoogte
 	
 	Do ..ConverteerFrontOndersteuning(AppsKenmerken, OBJTKenmerken)
 	Do ..ConverteerGreepEnMeenemer(AppsKenmerken, OBJTKenmerken)
+	Do ..ConverteerLadeDesign(AppsKenmerken, OBJTKenmerken)
+	Do ..ConverteerInbouwHoogte(AppsKenmerken, OBJTKenmerken)
+	Do ..ConverteerMat(AppsKenmerken, OBJTKenmerken)
+	Do ..ConverteerZijwand(AppsKenmerken, OBJTKenmerken)
 	Do ..ConverteerUitsparingData(AppsKenmerken, .OBJTKenmerken)
 	
 	Quit OBJTKenmerken
@@ -75,6 +85,71 @@
 ]]></Implementation>
 </Method>
 
+<Method name="ConverteerLadeDesign">
+<FormalSpec><![CDATA[AppsKenmerken:APPS.PM.Maatwerk.dto.TBXKenmerken,&TbxKenmerken:OBJT.PM.Maatwerk.dto.TbxKenmerken]]></FormalSpec>
+<Private>1</Private>
+<ReturnType>%String</ReturnType>
+<Implementation><![CDATA[
+	#dim DesignCodeId As %String = AppsKenmerken.GeefLadeDesign()
+	#dim LadeKleur As Prod.GAMeta.BT.TBLadeKleur = ##class(Prod.GAMeta.BT.TBLadeKleur).OpenViaItemCode(AppsKenmerken.LadeKleur, DesignCodeId, 1)
+	Set TbxKenmerken.LadeDesign = LadeKleur.BepaalDesignID(DesignCodeId)
+]]></Implementation>
+</Method>
+
+<Method name="ConverteerInbouwHoogte">
+<FormalSpec><![CDATA[AppsKenmerken:APPS.PM.Maatwerk.dto.TBXKenmerken,&TbxKenmerken:OBJT.PM.Maatwerk.dto.TbxKenmerken]]></FormalSpec>
+<Private>1</Private>
+<Implementation><![CDATA[
+	Set:(##class(TECH.StringUtils).Equals(AppsKenmerken.LadeHoogte, "N", "M", "K", "B")) TbxKenmerken.InbouwHoogte = AppsKenmerken.LadeHoogte
+	Set:(##class(TECH.StringUtils).Equals(AppsKenmerken.LadeHoogte, "C", "D")) TbxKenmerken.InbouwHoogte = AppsKenmerken.LadeHoogte _ AppsKenmerken.ZijkantHoogte
+]]></Implementation>
+</Method>
+
+<Method name="ConverteerMat">
+<FormalSpec><![CDATA[AppsKenmerken:APPS.PM.Maatwerk.dto.TBXKenmerken,&TbxKenmerken:OBJT.PM.Maatwerk.dto.TbxKenmerken]]></FormalSpec>
+<Private>1</Private>
+<Implementation><![CDATA[
+	Set TbxKenmerken.MatMateriaal = ##class(BL.PPS.TBX.impl.TBXMatToEnuMatConverter).%New().GeefMateriaal(AppsKenmerken.Antislipmat)
+	Set TbxKenmerken.MatKleur = ##class(BL.PPS.TBX.impl.TBXMatToEnuMatConverter).%New().GeefKleur(AppsKenmerken.Antislipmat)
+]]></Implementation>
+</Method>
+
+<Method name="ConverteerZijwand">
+<FormalSpec><![CDATA[AppsKenmerken:APPS.PM.Maatwerk.dto.TBXKenmerken,&TbxKenmerken:OBJT.PM.Maatwerk.dto.TbxKenmerken]]></FormalSpec>
+<Private>1</Private>
+<Implementation><![CDATA[
+	If (AppsKenmerken.ZijwandVerhogingType = ##class(DOM.PM.enu.TBXZijwandVerhogingType).Laag()) || (AppsKenmerken.ZijwandVerhogingType = "") {
+		Set TbxKenmerken.ZijwandVerhogingType = "Zonder"
+	} Else {
+		Set TbxKenmerken.ZijwandVerhogingType = AppsKenmerken.ZijwandVerhogingType
+	}
+	
+	If AppsKenmerken.ZijwandVerhogingType = "Reling" {
+		Set TbxKenmerken.ZijwandVerhogingRelingKleur = AppsKenmerken.ZijwandVerhogingKleur
+		Set TbxKenmerken.ZijwandVerhogingMateriaal = AppsKenmerken.ZijwandVerhogingMateriaal
+	} ElseIf AppsKenmerken.ZijwandVerhogingType = "InschuifElement" {
+		Set TbxKenmerken.ZijwandVerhogingRelingKleur = AppsKenmerken.LadeKleur
+		Set TbxKenmerken.ZijwandVerhogingMateriaal = $Case(AppsKenmerken.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(),
+															:##class(ECON.PM.Maatwerk.enu.TBXZijwandVerhogingInschuifelementMateriaal).ZonderVerhoging())
+		Set TbxKenmerken.ZijwandVerhogingInschuifelementKleur = $Case(AppsKenmerken.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(),
+														:"")
+		
+	}
+
+	If AppsKenmerken.ZijwandVerhogingMateriaal = ##class(DOM.PM.enu.TBXZijwandVerhogingMateriaal).Geen() {
+		Set TbxKenmerken.ZijwandVerhogingMateriaal = ""	
+	}
+]]></Implementation>
+</Method>
+
 <Method name="ConverteerUitsparingData">
 <FormalSpec><![CDATA[Kenmerken:APPS.PM.Maatwerk.dto.TBXKenmerken,&TbxKenmerken:OBJT.PM.Maatwerk.dto.TbxKenmerken]]></FormalSpec>
 <Private>1</Private>