Index: DOM/PM/impl/LangtekstCreator.cls.xml
===================================================================
diff -u -r63372 -r63394
--- DOM/PM/impl/LangtekstCreator.cls.xml	(.../LangtekstCreator.cls.xml)	(revision 63372)
+++ DOM/PM/impl/LangtekstCreator.cls.xml	(.../LangtekstCreator.cls.xml)	(revision 63394)
@@ -114,35 +114,25 @@
 	If ..IsNietMeeleverenInfoViaVerwijderdeHalffabItems() {
 		Set NietMeeTeLeverenRollenOnvertaald = ..GeefNietMeegeleverdeRollenViaVerwijderdeHalffabItems()
 		
-		// Voeg hardcoded strings toe in afwachting implementatie extra rollen MVX:
+		// 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") 
-			Do ##class(Tools.Wlip).%New(191).String("Rol inserted in NietMeeTeLeverenRollenOnvertaald: AfdekkapBinnen")
 		}
 		If (##class(TECH.ListUtils).Contains(..IngegevenKenmerken.NietMeeleveren, "AfdekkapBuiten")) {
 			Do NietMeeTeLeverenRollenOnvertaald.Insert("AfdekkapBuiten") 
-			Do ##class(Tools.Wlip).%New(191).String("Rol inserted in NietMeeTeLeverenRollenOnvertaald: AfdekkapBuiten")
 		}
 		
-		If ((##class(TECH.ListUtils).Contains(..IngegevenKenmerken.NietMeeleveren, ##class(DOM.PM.Maatwerk.Calc.HF.enu.MVXRol).FrontBevestigingBoven())) || (##class(TECH.ListUtils).Contains(..IngegevenKenmerken.NietMeeleveren, ##class(DOM.PM.Maatwerk.Calc.HF.enu.MVXRol).FrontBevestigingOnder()))) {
-			Do NietMeeTeLeverenRollenOnvertaald.Insert("FrontBevestiging")
-			Do ##class(Tools.Wlip).%New(191).String("Rol inserted in NietMeeTeLeverenRollenOnvertaald: FrontBevestiging")
-		}
-		
 		If (##class(TECH.ListUtils).Contains(..IngegevenKenmerken.NietMeeleveren, "Geleider")) {
 			Do NietMeeTeLeverenRollenOnvertaald.Insert("Geleider") 
-			Do ##class(Tools.Wlip).%New(191).String("Rol inserted in NietMeeTeLeverenRollenOnvertaald: Geleider")
 		}
 		
 		#dim MvxKenmerken As DOM.PM.Maatwerk.Calc.Common.impl.MVXKenmerken = ..IngegevenKenmerken
 		If (MvxKenmerken.GeleiderTechnologie = ##class(DOM.PM.enu.MVXGeleiderTechnologie).TIPONBLUMOTION()) {
-			Do ##class(Tools.Wlip).%New(191).String("Rol inserted in NietMeeTeLeverenRollenOnvertaald: 3 rollen voor TIPONBLUMOTION")
 			If (##class(TECH.ListUtils).Contains(..IngegevenKenmerken.NietMeeleveren, "TiponBlumotionMeenemers")) Do NietMeeTeLeverenRollenOnvertaald.Insert("TiponBlumotionMeenemers")
-			;If (##class(TECH.ListUtils).Contains(..IngegevenKenmerken.NietMeeleveren, ##class(DOM.PM.Maatwerk.Calc.HF.enu.MVXRol).TiponBlumotionEenheid())) Do NietMeeTeLeverenRollenOnvertaald.Insert(##class(DOM.PM.Maatwerk.Calc.HF.enu.MVXRol).TiponBlumotionEenheid())
-			;If (##class(TECH.ListUtils).Contains(..IngegevenKenmerken.NietMeeleveren, ##class(DOM.PM.Maatwerk.Calc.HF.enu.MVXRol).TiponBlumotionSynchronisatieStang())) Do NietMeeTeLeverenRollenOnvertaald.Insert(##class(DOM.PM.Maatwerk.Calc.HF.enu.MVXRol).TiponBlumotionSynchronisatieStang())
 		}
 		
+		// 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)
 	}
@@ -169,13 +159,19 @@
 <ReturnType>%ListOfDataTypes</ReturnType>
 <Implementation><![CDATA[
 	Set NietMeegeleverdeRollen = ##class(%ListOfDataTypes).%New()
-	
+	#dim IsRolFrontBevestigingToegevoegd As %Boolean = $$$False
 	#dim NietMeeleverenIterator As TECH.ListIterator = ##class(TECH.ListIterator).%New(..IngegevenKenmerken.NietMeeleveren)
+	
 	While NietMeeleverenIterator.HasNext() {
-		#dim Rol As %String = NietMeeleverenIterator.Next()
+		#dim Rol As DOM.PM.Maatwerk.Calc.HF.enu.HalffabRol = NietMeeleverenIterator.Next()
+		
+		// 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()))
-		If (..HalffabItemsBoom.VerwijderdeHalffabItems.IsDefined(Rol) && $$$Not(IsRolVoorFrontBevestiging)) {
-			Do ##class(Tools.Wlip).%New(191).String("Rol inserted in GeefNietMeegeleverdeRollenViaVerwijderdeHalffabItems: '"_Rol_"'")
+		
+		If (IsRolVoorFrontBevestiging && ($$$Not(IsRolFrontBevestigingToegevoegd))) {
+			Do NietMeegeleverdeRollen.Insert(##class(DOM.PM.Maatwerk.Calc.HF.enu.LBXRol).FrontBevestiging())
+			Set IsRolFrontBevestigingToegevoegd = $$$True
+		} ElseIf (($$$Not(IsRolVoorFrontBevestiging)) && (..HalffabItemsBoom.VerwijderdeHalffabItems.IsDefined(Rol))) {
 			Do NietMeegeleverdeRollen.Insert(Rol)
 		}
 	}