Index: DOM/PM/impl/LangtekstCreator.cls.xml
===================================================================
diff -u -r63394 -r71379
--- DOM/PM/impl/LangtekstCreator.cls.xml	(.../LangtekstCreator.cls.xml)	(revision 63394)
+++ DOM/PM/impl/LangtekstCreator.cls.xml	(.../LangtekstCreator.cls.xml)	(revision 71379)
@@ -64,28 +64,46 @@
 <Private>1</Private>
 </Property>
 
+<Property name="OmleidingNaarDotNetBepaler">
+<Type>DOM.PM.Maatwerk.Calc.Common.impl.OmleidingNaarDotNetBepaler</Type>
+<Private>1</Private>
+</Property>
+
+<Property name="IsMaatwerkCalculatieInDotNet">
+<Type>%Boolean</Type>
+<Private>1</Private>
+</Property>
+
+<Property name="CorpusBreedteBepaler">
+<Type>DOM.PM.Maatwerk.Lade.impl.CorpusBreedteBepaler</Type>
+<Private>1</Private>
+</Property>
+
 <Method name="GeefLangtekst">
 <FormalSpec>IngegevenKenmerken:DOM.PM.Maatwerk.Calc.Common.IngegevenKenmerken,HalffabItemsBoom:DOM.PM.Maatwerk.Calc.HF.HalffabItemsBoom,Taal:DOM.enu.Taal,Korttekst:%String="",HalffabItemsBoomOnHerwerkt:DOM.PM.Maatwerk.Calc.HF.HalffabItemsBoom</FormalSpec>
 <ReturnType>DOM.PM.ProductLangtekst</ReturnType>
 <Implementation><![CDATA[
-	set ..Vertaler = ##class(DOM.DomeinContext).Instance().GeefVertaalAPI().GeefStandaardVertaler(Taal)
-	set ..KleurCodeVertaler = ##class(DOM.DomeinContext).Instance().GeefVertaalAPI().GeefKleurCodeVertaler(Taal)
+	Set ..Vertaler = ##class(DOM.DomeinContext).Instance().GeefVertaalAPI().GeefStandaardVertaler(Taal)
+	Set ..KleurCodeVertaler = ##class(DOM.DomeinContext).Instance().GeefVertaalAPI().GeefKleurCodeVertaler(Taal)
+	Set ..OmleidingNaarDotNetBepaler = ##class(DOM.PM.Maatwerk.Calc.Common.impl.OmleidingNaarDotNetBepaler).%New()
+	Set ..CorpusBreedteBepaler = ##class(DOM.PM.Maatwerk.Lade.impl.CorpusBreedteBepaler).%New()
 	
-	set ..IngegevenKenmerken = IngegevenKenmerken
-	set ..HalffabItemsBoom = HalffabItemsBoom
-	set ..Taal = Taal
-	set ..KortTekst = Korttekst
+	Set ..IngegevenKenmerken = IngegevenKenmerken
+	Set ..HalffabItemsBoom = HalffabItemsBoom
+	Set ..Taal = Taal
+	Set ..KortTekst = Korttekst
 	Set ..HalffabItemsBoomOnHerwerkt = HalffabItemsBoomOnHerwerkt
+	Set ..IsMaatwerkCalculatieInDotNet = ..BepaalIsMaatwerkCalculatieInDotNet(IngegevenKenmerken)
 	
-	do ..BepaalHoofding()
+	Do ..BepaalHoofding()
 	
 	Set ..LangtekstDetail = ##class(%ListOfDataTypes).%New()
 	
 	Set ..LangtekstHelper = ##class(DOM.PM.LangtekstHelper).%New(..Vertaler,..Taal)
-	do ..VoegToeBasisGegevens()
-	do ..VoegToeNietMeeTeLeverenRollen()
+	Do ..VoegToeBasisGegevens()
+	Do ..VoegToeNietMeeTeLeverenRollen()
 		
-	quit ##class(DOM.PM.impl.ProductLangtekst).%New(..LangtekstHoofding,..LangtekstDetail)
+	Quit ##class(DOM.PM.impl.ProductLangtekst).%New(..LangtekstHoofding,..LangtekstDetail)
 ]]></Implementation>
 </Method>
 
@@ -105,6 +123,24 @@
 <Private>1</Private>
 </Method>
 
+<Method name="BepaalIsMaatwerkCalculatieInDotNet">
+<FormalSpec>IngegevenKenmerken:DOM.PM.Maatwerk.Calc.Common.IngegevenKenmerken</FormalSpec>
+<Private>1</Private>
+<ReturnType>%Boolean</ReturnType>
+<Implementation><![CDATA[
+	#dim IsMaatwerkCalculatieInDotNet As %Boolean
+	
+	If (..OmleidingNaarDotNetBepaler.IsMaatwerkCalculatieInDotNet(IngegevenKenmerken.GeefVariant(), IngegevenKenmerken.GeefVersieNr()))
+	{
+		Set IsMaatwerkCalculatieInDotNet = $$$True
+	} Else {
+		Set IsMaatwerkCalculatieInDotNet = $$$False
+	}
+		
+	Quit IsMaatwerkCalculatieInDotNet
+]]></Implementation>
+</Method>
+
 <Method name="VoegToeNietMeeTeLeverenRollen">
 <Final>1</Final>
 <Private>1</Private>
@@ -113,25 +149,6 @@
 	
 	If ..IsNietMeeleverenInfoViaVerwijderdeHalffabItems() {
 		Set NietMeeTeLeverenRollenOnvertaald = ..GeefNietMeegeleverdeRollenViaVerwijderdeHalffabItems()
-		
-		// Hardcoded strings toegevoegd in afwachting van implementatie extra rollen MVX (nog geen builders ervoor in DotNet):
-		// Vergeet niet aanpassingen ook te doen in klassen: vhUnitTest.DOM.PM.impl.MVXLangtekstCreator.Test en vhTest.Utils.DOM.PM.Maatwerk.Calc.Common.impl.MVXKenmerken
-		If (##class(TECH.ListUtils).Contains(..IngegevenKenmerken.NietMeeleveren, "AfdekkapBinnen")) {
-			Do NietMeeTeLeverenRollenOnvertaald.Insert("AfdekkapBinnen") 
-		}
-		If (##class(TECH.ListUtils).Contains(..IngegevenKenmerken.NietMeeleveren, "AfdekkapBuiten")) {
-			Do NietMeeTeLeverenRollenOnvertaald.Insert("AfdekkapBuiten") 
-		}
-		
-		If (##class(TECH.ListUtils).Contains(..IngegevenKenmerken.NietMeeleveren, "Geleider")) {
-			Do NietMeeTeLeverenRollenOnvertaald.Insert("Geleider") 
-		}
-		
-		#dim MvxKenmerken As DOM.PM.Maatwerk.Calc.Common.impl.MVXKenmerken = ..IngegevenKenmerken
-		If (MvxKenmerken.GeleiderTechnologie = ##class(DOM.PM.enu.MVXGeleiderTechnologie).TIPONBLUMOTION()) {
-			If (##class(TECH.ListUtils).Contains(..IngegevenKenmerken.NietMeeleveren, "TiponBlumotionMeenemers")) Do NietMeeTeLeverenRollenOnvertaald.Insert("TiponBlumotionMeenemers")
-		}
-		
 		// Omdat NietMeeTeLeverenRollenOnvertaald eerst in GeefNietMeegeleverdeRollenViaVerwijderdeHalffabItems gevuld wordt en daarna hier aangevuld wordt is alfabetisering nodig:
 		Set Comparator = ##class(TECH.Comparator.StringComparator).%New()
 		Do ##class(TECH.Algo.Sort.MergeSort).Sort(.NietMeeTeLeverenRollenOnvertaald, Comparator)
@@ -149,7 +166,7 @@
 
 <Method name="IsNietMeeleverenInfoViaVerwijderdeHalffabItems">
 <Private>1</Private>
-<Implementation><![CDATA[	Quit $$$False
+<Implementation><![CDATA[	Quit ..IsMaatwerkCalculatieInDotNet
 ]]></Implementation>
 </Method>
 
@@ -167,19 +184,79 @@
 		
 		// De rollen FrontBevestigingBoven en FrontBevestigingOnder mogen in de langtekst omgezet worden naar de voor LBX-rol bestaande vertaling voor "FrontBevestiging":
 		#dim IsRolVoorFrontBevestiging As %Boolean = ((Rol = ##class(DOM.PM.Maatwerk.Calc.HF.enu.MVXRol).FrontBevestigingBoven()) || (Rol = ##class(DOM.PM.Maatwerk.Calc.HF.enu.MVXRol).FrontBevestigingOnder()))
+		// De rol 'Boxcover' wordt meegegeven, maar enkel 'BoxcoverVoor' en 'BoxcoverAchter' zijn gekend in MvxRol -> gebruik in de plaats de rol van MVXNietMeeleveren
+		#dim IsRolVoorBoxcover As %Boolean = (Rol = ##class(DOM.PM.Maatwerk.Calc.HF.enu.MVXNietMeeleveren).Boxcover())
 		
 		If (IsRolVoorFrontBevestiging && ($$$Not(IsRolFrontBevestigingToegevoegd))) {
-			Do NietMeegeleverdeRollen.Insert(##class(DOM.PM.Maatwerk.Calc.HF.enu.LBXRol).FrontBevestiging())
+			Do NietMeegeleverdeRollen.Insert(##class(DOM.PM.Maatwerk.Calc.HF.enu.LBXRol).FrontBevestiging())   ; Review opmerking: MVX en LBX hier door elkaar gebruikt !!! 
 			Set IsRolFrontBevestigingToegevoegd = $$$True
-		} ElseIf (($$$Not(IsRolVoorFrontBevestiging)) && (..HalffabItemsBoom.VerwijderdeHalffabItems.IsDefined(Rol))) {
+		} ElseIf (($$$Not(IsRolVoorFrontBevestiging)) && (..HalffabItemsBoom.VerwijderdeHalffabItems.IsDefined(Rol) || ..HalffabItemsBoom.HalffabItems.IsDefined(Rol))) {
+			Set:(Rol="Glijder") Rol = "Geleider" ;Oude benaming Glijder heeft key Geleider in de nieuwe vertalingen
 			Do NietMeegeleverdeRollen.Insert(Rol)
+		} ElseIf (IsRolVoorBoxcover && (..HalffabItemsBoom.VerwijderdeHalffabItems.IsDefined(Rol))) {
+			Do NietMeegeleverdeRollen.Insert(##class(DOM.PM.Maatwerk.Calc.HF.enu.MVXNietMeeleveren).Boxcover())
 		}
 	}
 	
+	If ($Extract(..IngegevenKenmerken.GeefVariant(),1,3) = "TBX") {
+		Do ..VoegToeExtraNietMeegeleverdeRollenVoorTbx(.NietMeegeleverdeRollen)
+	}
+	
 	Quit NietMeegeleverdeRollen
 ]]></Implementation>
 </Method>
 
+<Method name="VoegToeExtraNietMeegeleverdeRollenVoorTbx">
+<FormalSpec><![CDATA[&NietMeegeleverdeRollen:%ListOfDataTypes]]></FormalSpec>
+<Private>1</Private>
+<Implementation><![CDATA[
+	If (..HalffabItemsBoom.VerwijderdeHalffabItems.IsDefined("TiponBlumotionBodemstabilisering")) {
+		Do NietMeegeleverdeRollen.Insert("NietMeeTBX-TOBBODEMSTAB")
+	}
+	
+	If (..HalffabItemsBoom.VerwijderdeHalffabItems.IsDefined("TiponBlumotionSetEenhedenMeenemersEnAdapters")) {
+		Do NietMeegeleverdeRollen.Insert("NietMeeTBX-TOBSET")
+	}
+	
+	If (..HalffabItemsBoom.VerwijderdeHalffabItems.IsDefined("TiponBlumotionSynchronisatieStangHouder")) {
+		Do NietMeegeleverdeRollen.Insert("NietMeeTBX-TOBSTHOUDER")
+	}
+	
+	If (..HalffabItemsBoom.VerwijderdeHalffabItems.IsDefined("RelingZijkant")) {
+		Do NietMeegeleverdeRollen.Insert("RelingZijkant")
+	}
+	
+	If (..HalffabItemsBoom.VerwijderdeHalffabItems.IsDefined("BodemsteunFront")) {
+		Do NietMeegeleverdeRollen.Insert("Bodemsteun")
+	}
+]]></Implementation>
+</Method>
+
+<Method name="GeefVerwijderdHalffab">
+<FormalSpec>Rol:%String</FormalSpec>
+<Private>1</Private>
+<ReturnType>%String</ReturnType>
+<Implementation><![CDATA[
+	#dim VerwijderdHalffab, HalffabItem As APPS.PM.Maatwerk.dto.DotNet.VerwijderdHalffabItemParsedFromJson
+	
+	If (..HalffabItemsBoom.VerwijderdeHalffabItems.IsDefined(Rol)) {
+		Set VerwijderdeHalffabItemsIterator = ##class(TECH.ListIterator).%New(..HalffabItemsBoom.VerwijderdeHalffabItems)
+		
+		While (VerwijderdeHalffabItemsIterator.HasNext())
+		{
+			Set HalffabItem = VerwijderdeHalffabItemsIterator.Next()
+			If (VerwijderdeHalffabItemsIterator.Key() = Rol) {
+				Set VerwijderdHalffab = HalffabItem
+			}
+		}
+	} Else {
+		Do ##class(TECH.ExceptionHandler).Throw(##class(TECH.Exceptions.InvalidInputException).%New("Rol '"_Rol_"' is niet terug te vinden in de Verwijderde halffabs."))
+	}
+	
+	Quit VerwijderdHalffab
+]]></Implementation>
+</Method>
+
 <Method name="GeefNietMeegeleverdeRollen">
 <Final>1</Final>
 <Private>1</Private>
@@ -304,6 +381,20 @@
 ]]></Implementation>
 </Method>
 
+<Method name="GeefExterneDimensieTekst">
+<Private>1</Private>
+<ReturnType>TECH.String</ReturnType>
+<Implementation><![CDATA[
+	#dim ExterneDimensieTekst As %String = ""
+	
+	If ($$$Not(..CorpusBreedteBepaler.GeefIsBinnenbreedte(..IngegevenKenmerken)) && $$$Not(##class(TECH.StringUtils).Equals(..CorpusBreedteBepaler.GeefWandDikte(..IngegevenKenmerken), "0", ""))) {
+		Set ExterneDimensieTekst = ..#KenmerkSeparator _ ..Vertaler.GeefVertaling("corpusbreedte")_": "_..CorpusBreedteBepaler.GeefCorpusBreedte(..IngegevenKenmerken) _ ..#KenmerkSeparator _ ..Vertaler.GeefVertaling("wanddikte")_": "_..CorpusBreedteBepaler.GeefWandDikte(..IngegevenKenmerken)
+	}
+	
+	Quit ExterneDimensieTekst
+]]></Implementation>
+</Method>
+
 <Method name="GeefDraagkrachtTekst">
 <Private>1</Private>
 <ReturnType>TECH.String</ReturnType>