Index: DOM/PM/impl/TAORLangtekstCreator.cls.xml
===================================================================
diff -u -r56705 -r57434
--- DOM/PM/impl/TAORLangtekstCreator.cls.xml	(.../TAORLangtekstCreator.cls.xml)	(revision 56705)
+++ DOM/PM/impl/TAORLangtekstCreator.cls.xml	(.../TAORLangtekstCreator.cls.xml)	(revision 57434)
@@ -23,11 +23,6 @@
 <Private>1</Private>
 </Property>
 
-<Property name="BodemSlicedTypeBepaler">
-<Type>zTryout.WV.FPV1.DOM.impl.BodemSlicedTypeBepaler</Type>
-<Private>1</Private>
-</Property>
-
 <Property name="IngegevenKenmerken">
 <Type>DOM.PM.Maatwerk.Calc.Common.impl.TAORKenmerken</Type>
 <Private>1</Private>
@@ -66,7 +61,6 @@
 <ServerOnly>1</ServerOnly>
 <Implementation><![CDATA[
 	Set ..LadeInfoAPI = $$$Inject(LadeInfoAPI,##class(DOM.PM.Maatwerk.impl.LadeInfoAPI).%New())
-	Set ..BodemSlicedTypeBepaler = ##class(zTryout.WV.FPV1.DOM.impl.BodemSlicedTypeBepaler).%New()
 	Set ..LosseComponentFactory = $$$Inject(LosseComponentFactory,##class(DOM.PM.Maatwerk.LadeInfo.impl.LosseComponentFactory).%New())
 	Set ..ProductieWijzeNaarLosseComponentConverter = ##class(DOM.PM.Maatwerk.TAX.impl.ProductieWijzeNaarLosseComponentConverter).%New()
 	Set ..KleurCodeBepaler = $$$Inject(KleurCodeBepaler, ##class(DOM.PM.ProductTekst.impl.KleurcodeBepaler).%New())
@@ -203,14 +197,7 @@
 	
 	If (..Lade.GeefBodems().Count() > 0) {
 		#dim Bodem As DOM.PM.Maatwerk.LadeInfo.Bodem = ..Lade.GeefBodems().GetAt(1)
-		#dim VertaalSleutel As TECH.String = ""
-		
-		If (..BodemSlicedTypeBepaler.GeefBodemSlicedType(..IngegevenKenmerken) = ##class(DOM.PM.Maatwerk.Calc.HF.enu.TAX.SlicedType).Sliced()) {
-			Set VertaalSleutel = "Bodem_Sliced"
-		} Else {
-			Set VertaalSleutel = "Bodem"
-		}
-		Do ..VoegToeLangtekstParagraaf(..Vertaler.GeefVertaling(VertaalSleutel, "", $$$True) _ ":" _ ..KleurCodeVertaler.GeefVertaling(Bodem.GeefKleur()))
+		Do ..VoegToeLangtekstParagraaf(..Vertaler.GeefVertaling("Bodem", "", $$$True) _ ":" _ ..KleurCodeVertaler.GeefVertaling(Bodem.GeefKleur()))
 	}
 	If ..Lade.GeefRuggen().Count() > 0 {
 		#dim Rug As DOM.PM.Maatwerk.LadeInfo.Rug = ..Lade.GeefRuggen().GetAt(1)