Index: vhUnitTest/WSimpl/Vhisie4/OCC/OCCService/OCCKenmerkenConverter/Test.cls.xml
===================================================================
diff -u -r60946 -r60947
--- vhUnitTest/WSimpl/Vhisie4/OCC/OCCService/OCCKenmerkenConverter/Test.cls.xml	(.../Test.cls.xml)	(revision 60946)
+++ vhUnitTest/WSimpl/Vhisie4/OCC/OCCService/OCCKenmerkenConverter/Test.cls.xml	(.../Test.cls.xml)	(revision 60947)
@@ -633,19 +633,6 @@
 ]]></Implementation>
 </Method>
 
-<Method name="Test: MeldingenAanGebruiker vanwege ontbrekende Ladehoogte bij TBX">
-<Implementation><![CDATA[
-	#dim OCCKenmerkenRequest As WS.Vhisie4.OCC.GeefNaarEconGeconverteerdeKenmerkenRequest = ..GeefRequestMetKenmerken(1,,"TANDEMBOX antaro")
-	Do ..SluitUitMeldingVoorBodemkleur(OCCKenmerkenRequest, "TBX")
-	Do ..SluitUitMeldingVoorExtraKenmerkenVolgensConstructionType(OCCKenmerkenRequest, "TBX")
-	
-	#dim Resultaat As WS.Vhisie4.OCC.GeefNaarEconGeconverteerdeKenmerkenResponse = ..OCCKenmerkenConverter.ConverteerBlumKenmerkenNaarEconKenmerken(OCCKenmerkenRequest)
-	
-	Do $$$AssertEquals(Resultaat.MeldingenAanGebruiker.Count(), 1)
-	Do $$$AssertEquals(Resultaat.MeldingenAanGebruiker.GetAt(1), "Omdat Ladehoogte niet kon geconverteerd worden kan ook de Rughoogte niet bepaald worden bij de vertaling van BlumKenmerken naar EconKenmerken. ")
-]]></Implementation>
-</Method>
-
 <Method name="Test: MeldingenAanGebruiker vanwege ontbrekende Ladehoogte bij LBX">
 <Implementation><![CDATA[
 	#dim OCCKenmerkenRequest As WS.Vhisie4.OCC.GeefNaarEconGeconverteerdeKenmerkenRequest = ..GeefRequestMetKenmerken(1)
@@ -659,27 +646,6 @@
 ]]></Implementation>
 </Method>
 
-<Method name="Test: MeldingenAanGebruiker vanwege onconverteerbare Rughoogte bij TBX">
-<Implementation><![CDATA[
-	#dim OCCKenmerkenRequest As WS.Vhisie4.OCC.GeefNaarEconGeconverteerdeKenmerkenRequest = ..GeefRequestMetKenmerken(1,,"TANDEMBOX antaro")
-	Do ..SluitUitMeldingVoorBodemkleur(OCCKenmerkenRequest, "TBX")
-	Do ..SluitUitMeldingVoorExtraKenmerkenVolgensConstructionType(OCCKenmerkenRequest, "TBX")
-	
-	#dim BlumKenmerkLadehoogte As WS.Vhisie4.OCC.dto.Kenmerk = ..GeefKenmerkMetValue("Construction type", "Voor Rughoogteconversie onbekende Ladehoogte")
-	Do ..SluitInBlumKenmerkInRequest(OCCKenmerkenRequest, BlumKenmerkLadehoogte)
-	
-	#dim EconKenmerkLadehoogte As WS.Vhisie4.OCC.dto.Kenmerk = ..GeefKenmerkMetValue("Data.Kenmerken.Ladehoogte", "Voor Rughoogteconversie onbekende Ladehoogte")
-	
-	Do ..BlumNaarEconKenmerkenConverterMock.IndienMethodCall("ConvertBlumNaarEconKenmerk", BlumKenmerkLadehoogte, "TBX").DanReturn(EconKenmerkLadehoogte)
-	
-	Set ..OCCKenmerkenConverter = ##class(WSimpl.Vhisie4.OCC.OCCService.OCCKenmerkenConverter).%New(..BlumNaarEconKenmerkenConverterMock)
-	#dim Resultaat As WS.Vhisie4.OCC.GeefNaarEconGeconverteerdeKenmerkenResponse = ..OCCKenmerkenConverter.ConverteerBlumKenmerkenNaarEconKenmerken(OCCKenmerkenRequest)
-	
-	Do $$$AssertEquals(Resultaat.MeldingenAanGebruiker.Count(), 1)
-	Do $$$AssertEquals(Resultaat.MeldingenAanGebruiker.GetAt(1), "De Rughoogte kon niet gevonden worden volgens Ladehoogte 'Voor Rughoogteconversie onbekende Ladehoogte'. ")
-]]></Implementation>
-</Method>
-
 <Method name="Test: MeldingenAanGebruiker vanwege onconverteerbare Rughoogte bij LBX">
 <Implementation><![CDATA[
 	#dim OCCKenmerkenRequest As WS.Vhisie4.OCC.GeefNaarEconGeconverteerdeKenmerkenRequest = ..GeefRequestMetKenmerken(1)
Index: WSimpl/Vhisie4/OCC/OCCService/OCCKenmerkenConverter.cls.xml
===================================================================
diff -u -r60946 -r60947
--- WSimpl/Vhisie4/OCC/OCCService/OCCKenmerkenConverter.cls.xml	(.../OCCKenmerkenConverter.cls.xml)	(revision 60946)
+++ WSimpl/Vhisie4/OCC/OCCService/OCCKenmerkenConverter.cls.xml	(.../OCCKenmerkenConverter.cls.xml)	(revision 60947)
@@ -283,29 +283,13 @@
 <FormalSpec>EconConfiguratieArray:%ArrayOfDataTypes,LadeType:%String</FormalSpec>
 <Private>1</Private>
 <Implementation><![CDATA[
-	// NOG AAN TE PASSEN... VOOR TBX = INBOUWHOOGTE IPV LADEHOOGTE (al OK in onderliggende converter, maar hier nog niet) + ONTBREKENDE TESTEN VOOR RUGHOOGTE !!!
-	// IS NOG AF TE WACHT OF BIJ TESTEN OP ACCEPT IS GEBLEKEN OF RUGHOOGTE NU WEL OF NIET MEEGEGEVEN MOET WORDEN BIJ TBX !!!
-	// Indien niet, dan mag de code hieronder voor TBX gewoon weg.
-	// Indien wel, dan moet de code hieronder dus aangepast worden.
-	// Momenteel wordt voor TBX rughoogte NIET meegegeven, want er wordt gecheckt op Ladehoogte, terwijl het bij TBX Inbouhoogte is.
-	
-	If (EconConfiguratieArray.IsDefined("Data.Kenmerken.Ladehoogte")) {
-		#dim LadeHoogte As %String = EconConfiguratieArray.GetAt("Data.Kenmerken.Ladehoogte")
-		#dim RugHoogte As %String = ""
-		
-		If (LadeType = "TBX") {
-			If (LadeHoogte = ##class(ECON.PM.Maatwerk.enu.TBXInbouwHoogte).B()) {
-				Set RugHoogte = ##class(ECON.PM.Maatwerk.enu.TBXRugHoogte).B()
-			} ElseIf (LadeHoogte = ##class(ECON.PM.Maatwerk.enu.TBXInbouwHoogte).CM()) {
-				Set RugHoogte = ##class(ECON.PM.Maatwerk.enu.TBXRugHoogte).C()
-			} ElseIf (LadeHoogte = ##class(ECON.PM.Maatwerk.enu.TBXInbouwHoogte).K()) {
-				Set RugHoogte = ##class(ECON.PM.Maatwerk.enu.TBXRugHoogte).K()
-			} ElseIf (LadeHoogte = ##class(ECON.PM.Maatwerk.enu.TBXInbouwHoogte).M()) {
-				Set RugHoogte = ##class(ECON.PM.Maatwerk.enu.TBXRugHoogte).M()
-			} ElseIf (LadeHoogte = ##class(ECON.PM.Maatwerk.enu.TBXInbouwHoogte).N()) {
-				Set RugHoogte = ##class(ECON.PM.Maatwerk.enu.TBXRugHoogte).N()
-			}
-		} ElseIf (LadeType = "LBX") {
+	If (LadeType = "TBX") {
+		// Bij TBX is het defaulten van de Rughoogte volgens de Inbouwhoogte niet nodig.
+	} ElseIf (LadeType = "LBX") {
+		If (EconConfiguratieArray.IsDefined("Data.Kenmerken.Ladehoogte")) {
+			#dim LadeHoogte As %String = EconConfiguratieArray.GetAt("Data.Kenmerken.Ladehoogte")
+			#dim RugHoogte As %String = ""
+			
 			If (LadeHoogte = ##class(DOM.PM.enu.LBXLadeHoogte).C()) {
 				Set RugHoogte = ##class(DOM.PM.enu.LBXRugHoogte).C()
 			} ElseIf (LadeHoogte = ##class(DOM.PM.enu.LBXLadeHoogte).F()) {
@@ -317,15 +301,15 @@
 			} ElseIf (LadeHoogte = ##class(DOM.PM.enu.LBXLadeHoogte).N()) {
 				Set RugHoogte = ##class(DOM.PM.enu.LBXRugHoogte).N()
 			}
-		}
-		
-		If ($$$HasLength(RugHoogte)) {
-			Do EconConfiguratieArray.SetAt(RugHoogte, "Data.Kenmerken.Rughoogte")
+			
+			If ($$$HasLength(RugHoogte)) {
+				Do EconConfiguratieArray.SetAt(RugHoogte, "Data.Kenmerken.Rughoogte")
+			} Else {
+				Do ..MeldingenAanGebruiker.Insert("De Rughoogte kon niet gevonden worden volgens Ladehoogte '"_LadeHoogte_"'. ")
+			}
 		} Else {
-			Do ..MeldingenAanGebruiker.Insert("De Rughoogte kon niet gevonden worden volgens Ladehoogte '"_LadeHoogte_"'. ")
+			Do ..MeldingenAanGebruiker.Insert("Omdat Ladehoogte niet kon geconverteerd worden kan ook de Rughoogte niet bepaald worden bij de vertaling van BlumKenmerken naar EconKenmerken. ")
 		}
-	} Else {
-		Do ..MeldingenAanGebruiker.Insert("Omdat Ladehoogte niet kon geconverteerd worden kan ook de Rughoogte niet bepaald worden bij de vertaling van BlumKenmerken naar EconKenmerken. ")
 	}
 ]]></Implementation>
 </Method>