Index: DOM/PM/impl/TAORLangtekstCreator.cls.xml
===================================================================
diff -u -r62134 -r72187
--- DOM/PM/impl/TAORLangtekstCreator.cls.xml	(.../TAORLangtekstCreator.cls.xml)	(revision 62134)
+++ DOM/PM/impl/TAORLangtekstCreator.cls.xml	(.../TAORLangtekstCreator.cls.xml)	(revision 72187)
@@ -105,9 +105,13 @@
 		} Else {
 			Set ..LangtekstHoofding = ..LangtekstHoofding _ ..Vertaler.GeefVertaling("Lade")
 		}
-		
+	
 		Set ..LangtekstHoofding = ..LangtekstHoofding _ " " _ ..IngegevenKenmerken.LadeHoogte
 		
+		If (..IngegevenKenmerken.ProductieWijze = ##class(DOM.PM.enu.TAORProductieWijze).FrontLBX()) {	
+			Set ..LangtekstHoofding = ..LangtekstHoofding _ " " _..Vertaler.GeefVertaling("voor LEGRABOX")
+		}
+		
 	} Else {
 		#dim LosseComponentHoofdingBepaler As DOM.PM.impl.TAORLangtekstCreator.LosseComponentHoofdingBepaler = ##class(DOM.PM.impl.TAORLangtekstCreator.LosseComponentHoofdingBepaler).%New(..Vertaler, ..KleurCodeVertaler)
 		Set ..LangtekstHoofding = LosseComponentHoofdingBepaler.BepaalHoofding(..IngegevenKenmerken, ..HalffabItemsBoom, ..Taal, ..KortTekst)
@@ -132,7 +136,7 @@
 <Implementation><![CDATA[
 	#dim Paragraaf As TECH.String = ""
 	
-	Do ..VoegToeLangtekstParagraaf(..GeefDimensieTekst())
+	Do ..VoegToeLangtekstParagraaf(..GeefDimensieTekst() _ ..GeefExterneDimensieTekst())
 	
 	If (..IsSifonlade()) {
 		#Dim UitsparingTekstFormatterInput As DOM.PM.Maatwerk.impl.UitsparingTekstFormatterInput = ##class(DOM.PM.Maatwerk.impl.UitsparingTekstFormatterInput).%New()
@@ -172,6 +176,7 @@
 		
 		Do ..VoegToeLangtekstParagraaf(Paragraaf)
 		Do ..VoegToeGekoppeldeInfoIndienNodig()
+		Do ..VoegToeDwarsverdelingInfo()
 		Do ..VoegToeLangtekstParagraaf(..GeefVerpakkingTekst())
 		
 	} Else {
@@ -277,7 +282,7 @@
 	#dim TAORKenmerken As DOM.PM.Maatwerk.Calc.Common.impl.TAORKenmerken = ..IngegevenKenmerken
 	If $$$HasLength(TAORKenmerken.ZijkantLogoID) && $$$Not(+TAORKenmerken.ZijkantLogoID = 0) {
 		#dim ZijkantLogo As DOM.PM.Maatwerk.TAX.Data.ZijkantLogo = ..ZijkantLogoRepository.GeefViaLogoID(TAORKenmerken.ZijkantLogoID)
-		Set ZijkantLogoTekst = ZijkantLogo.Naam
+		Set ZijkantLogoTekst = "Laser logo: " _ ZijkantLogo.Naam
 	}
 	Quit ZijkantLogoTekst
 ]]></Implementation>
@@ -335,6 +340,29 @@
 <Implementation><![CDATA[	Quit ..IngegevenKenmerken.IsBinnenlade
 ]]></Implementation>
 </Method>
+
+<Method name="VoegToeDwarsverdelingInfo">
+<Private>1</Private>
+<Implementation><![CDATA[
+	#dim TAORKenmerken As DOM.PM.Maatwerk.Calc.Common.impl.TAORKenmerken = ..IngegevenKenmerken
+	#dim AantalDwarsverdelingen As TECH.Integer = TAORKenmerken.AantalDwarsverdelingen
+	
+	If (AantalDwarsverdelingen > 0) {
+		#dim VertaalSleutel As TECH.String
+		If (TAORKenmerken.DwarsverdelingType = ##class(DOM.PM.enu.TAORDwarsverdelingType).Dubbel()) {
+			Set VertaalSleutel = "Langtekst_DubbeleDwarsverdeling" _ $Select(AantalDwarsverdelingen > 1:"en", 1:"")
+		} Else {
+			Set VertaalSleutel = "Langtekst_Dwarsverdeling" _ $Select(AantalDwarsverdelingen > 1:"en", 1:"")
+		}
+		#dim DwarsverdelingTekst As TECH.String = AantalDwarsverdelingen _ " " _ ..Vertaler.GeefVertaling(VertaalSleutel)
+		
+		#dim DwarsverdelingKleur As TECH.String = ..KleurCodeVertaler.GeefVertaling(TAORKenmerken.DwarsverdelingKleur)
+		Set DwarsverdelingTekst = DwarsverdelingTekst _ " "_ DwarsverdelingKleur
+		
+		Do ..VoegToeLangtekstParagraaf(DwarsverdelingTekst)
+	}
+]]></Implementation>
+</Method>
 </Class>