Index: DOM/PM/impl/LBXLangtekstCreator.cls.xml
===================================================================
diff -u -r53365 -r57887
--- DOM/PM/impl/LBXLangtekstCreator.cls.xml	(.../LBXLangtekstCreator.cls.xml)	(revision 53365)
+++ DOM/PM/impl/LBXLangtekstCreator.cls.xml	(.../LBXLangtekstCreator.cls.xml)	(revision 57887)
@@ -111,13 +111,30 @@
 		Do ..VoegToeGekoppeldeInfoIndienNodig()
 		Do ..VoegToeDwarsverdelingInfo()
 		Do ..VoegToeLangtekstParagraaf(..GeefVerpakkingTekst())
+		Do ..VoegToeSmalleLadeInfo() 
 	} Else {
 		Do ..VoegToeLangtekstParagraaf(Paragraaf)
 		Do ..VoegToeEnkelOnderdeelTekst()
 	}
 ]]></Implementation>
 </Method>
 
+<Method name="IsSmalleLade">
+<Private>1</Private>
+<ReturnType>%Boolean</ReturnType>
+<Implementation><![CDATA[	Quit ..IngegevenKenmerkenTypeAPI.IsSmalleLade(..IngegevenKenmerken)
+]]></Implementation>
+</Method>
+
+<Method name="VoegToeSmalleLadeInfo">
+<Private>1</Private>
+<Implementation><![CDATA[
+	If (..IsSmalleLade() && (..IsGeleiderTechnologieTiponBlumotion())) {
+		Do ..VoegToeLangtekstParagraaf(..Vertaler.GeefVertaling("SmalleLadeInfoTOB"))
+	}
+]]></Implementation>
+</Method>
+
 <Method name="IsSpoelbaklade">
 <Private>1</Private>
 <ReturnType>%Boolean</ReturnType>
@@ -285,19 +302,25 @@
 ]]></Implementation>
 </Method>
 
+<Method name="IsGeleiderTechnologieTiponBlumotion">
+<Private>1</Private>
+<ReturnType>%Boolean</ReturnType>
+<Implementation><![CDATA[	Quit (..IngegevenKenmerken.GeleiderTechnologie = ..Enum.GeleiderTechnologie.TIPONBLUMOTION)
+]]></Implementation>
+</Method>
+
 <Method name="GeefGeleiderTekst">
 <Private>1</Private>
 <ReturnType>TECH.String</ReturnType>
 <Implementation><![CDATA[
-	#Dim IsGeleiderTechnologieTiponBlumotion As %Boolean = (..IngegevenKenmerken.GeleiderTechnologie = ..Enum.GeleiderTechnologie.TIPONBLUMOTION)
 	#Dim BevatRolTiponBlumotionEenheid As %Boolean = (..HalffabItemsBoomOnHerwerkt.BevatRol(..Enum.Rol.TiponBlumotionEenheid))
 	#Dim BevatRolTiponBlumotionSetEenhedenEnMeenemers As %Boolean = (..HalffabItemsBoomOnHerwerkt.BevatRol(..Enum.Rol.TiponBlumotionSetEenhedenEnMeenemers))
 	#Dim GeleiderTekst As TECH.String = ""
 	#dim TOBTekst As %String = ""
 	
 	Set GeleiderTekst = GeleiderTekst _ ..Vertaler.GeefVertaling("Geleider") _ " " _ ..GeefDraagkrachtTekst()
 
-	If (IsGeleiderTechnologieTiponBlumotion && (BevatRolTiponBlumotionEenheid || BevatRolTiponBlumotionSetEenhedenEnMeenemers)) {
+	If (..IsGeleiderTechnologieTiponBlumotion() && (BevatRolTiponBlumotionEenheid || BevatRolTiponBlumotionSetEenhedenEnMeenemers)) {
 		Set TOBTekst = TOBTekst _ ##class(DOM.PM.enu.LBXGeleiderTechnologie).LogicalToDisplay(..IngegevenKenmerken.GeleiderTechnologie)
 		#Dim ConcreetHalffabItem As DOM.PM.Maatwerk.Calc.HF.ConcreetHalffabItem
 		If BevatRolTiponBlumotionSetEenhedenEnMeenemers {