Index: vhUnitTest/DOM/PM/impl/MVXLangtekstCreator/Test.cls.xml
===================================================================
diff -u -r63415 -r70898
--- vhUnitTest/DOM/PM/impl/MVXLangtekstCreator/Test.cls.xml	(.../Test.cls.xml)	(revision 63415)
+++ vhUnitTest/DOM/PM/impl/MVXLangtekstCreator/Test.cls.xml	(.../Test.cls.xml)	(revision 70898)
@@ -55,6 +55,101 @@
 ]]></Implementation>
 </Method>
 
+<Method name="Test: StandaardLade M met wanddikte">
+<Implementation><![CDATA[
+	Set ..MvxKenmerken = ##class(vhTest.Utils.DOM.PM.Maatwerk.Calc.Common.impl.MVXKenmerken).StandaardLade()
+	Set ..MvxKenmerken.GUIKenmerken.IsBinnenbreedte = $$$False
+	Set ..MvxKenmerken.GUIKenmerken.WandDikte = 18
+	
+	#dim Langtekst As DOM.PM.ProductLangtekst = ..GeefLangtekst()
+	#dim ControleLangtekst As TECH.String = ##class(TECH.StringUtils).Concatenate(  "MERIVOBOX lade M" _ $$$CRLF, 
+																					"D:500xB:600; corpusbreedte: 636; wanddikte:" _ $$$CRLF, 
+																					"18; bodem:Orion grijs; ladezijkant:Orion" _ $$$CRLF, 
+																					"grijs; bevat: gemont. lade; corpusprofiel" _ $$$CRLF, 
+																					"40kg; BLUMOTION; frontbevest. INSERTA" _ $$$CRLF,
+																					"verpakt: Probox")
+	
+	Do $$$AssertEquals(Langtekst.GeefString(), ControleLangtekst)
+]]></Implementation>
+</Method>
+
+<Method name="Test: StandaardLade M met opvullijst en dwarsverdeling">
+<Implementation><![CDATA[
+	Set ..MvxKenmerken = ##class(vhTest.Utils.DOM.PM.Maatwerk.Calc.Common.impl.MVXKenmerken).StandaardLade()
+	Set ..MvxKenmerken.HeeftOpvullijstLinks = $$$True
+	Set ..MvxKenmerken.OpvullijstKleur = ..Enum.OpvullijstKleur.PlatinaZilverGrijs
+	Set ..MvxKenmerken.AantalDwarsverdelingen = 1
+	
+	#dim Langtekst As DOM.PM.ProductLangtekst = ..GeefLangtekst()
+	#dim ControleLangtekst As TECH.String = ##class(TECH.StringUtils).Concatenate(  "MERIVOBOX lade M" _ $$$CRLF, 
+																					"D:500xB:600; bodem:Orion grijs;" _ $$$CRLF, 
+																					"ladezijkant:Orion grijs; bevat: gemont." _ $$$CRLF, 
+																					"lade; corpusprofiel 40kg; BLUMOTION;" _ $$$CRLF, 
+																					"frontbevest. INSERTA; opvullijst" _ $$$CRLF,
+																					"1 dwarsreling"  _ $$$CRLF, 
+																					"verpakt: Probox")
+	
+	Do $$$AssertEquals(Langtekst.GeefString(), ControleLangtekst)
+]]></Implementation>
+</Method>
+
+<Method name="Test: StandaardLade M met meerdere opvullijsten en dwarsverdelingen">
+<Implementation><![CDATA[
+	Set ..MvxKenmerken = ##class(vhTest.Utils.DOM.PM.Maatwerk.Calc.Common.impl.MVXKenmerken).StandaardLade()
+	Set ..MvxKenmerken.HeeftOpvullijstLinks = $$$True
+	Set ..MvxKenmerken.HeeftOpvullijstRechts = $$$True
+	Set ..MvxKenmerken.OpvullijstKleur = ..Enum.OpvullijstKleur.PlatinaZilverGrijs
+	Set ..MvxKenmerken.AantalDwarsverdelingen = 2
+	
+	#dim Langtekst As DOM.PM.ProductLangtekst = ..GeefLangtekst()
+	#dim ControleLangtekst As TECH.String = ##class(TECH.StringUtils).Concatenate(  "MERIVOBOX lade M" _ $$$CRLF, 
+																					"D:500xB:600; bodem:Orion grijs;" _ $$$CRLF, 
+																					"ladezijkant:Orion grijs; bevat: gemont." _ $$$CRLF, 
+																					"lade; corpusprofiel 40kg; BLUMOTION;" _ $$$CRLF, 
+																					"frontbevest. INSERTA; opvullijsten" _ $$$CRLF,
+																					"2 dwarsrelingen"  _ $$$CRLF, 
+																					"verpakt: Probox")
+	
+	Do $$$AssertEquals(Langtekst.GeefString(), ControleLangtekst)
+]]></Implementation>
+</Method>
+
+<Method name="Test: StandaardLade M met zijstabilisering">
+<Implementation><![CDATA[
+	Set ..MvxKenmerken = ##class(vhTest.Utils.DOM.PM.Maatwerk.Calc.Common.impl.MVXKenmerken).StandaardLade()
+	Set ..MvxKenmerken.HeeftZijstabilisering = $$$True
+	
+	#dim Langtekst As DOM.PM.ProductLangtekst = ..GeefLangtekst()
+	#dim ControleLangtekst As TECH.String = ##class(TECH.StringUtils).Concatenate(  "MERIVOBOX lade M" _ $$$CRLF, 
+																					"D:500xB:600; bodem:Orion grijs;" _ $$$CRLF, 
+																					"ladezijkant:Orion grijs; bevat: gemont." _ $$$CRLF, 
+																					"lade; corpusprofiel 40kg; BLUMOTION;" _ $$$CRLF, 
+																					"frontbevest. INSERTA; zijdelingse" _ $$$CRLF,
+																					"stabilisatie"  _ $$$CRLF, 
+																					"verpakt: Probox")
+	
+	Do $$$AssertEquals(Langtekst.GeefString(), ControleLangtekst)
+]]></Implementation>
+</Method>
+
+<Method name="Test: StandaardLade M met gekoppelde mat">
+<Implementation><![CDATA[
+	Set ..MvxKenmerken = ##class(vhTest.Utils.DOM.PM.Maatwerk.Calc.Common.impl.MVXKenmerken).StandaardLade()
+	Do ..MvxKenmerken.GekoppeldeIngegevenKenmerken.SetAt(..GeefMatKenmerken(), ##class(DOM.PM.Maatwerk.Calc.Common.enu.GekoppeldIKType).MatX())
+	
+	#dim Langtekst As DOM.PM.ProductLangtekst = ..GeefLangtekst()
+	#dim ControleLangtekst As TECH.String = ##class(TECH.StringUtils).Concatenate(  "MERIVOBOX lade M" _ $$$CRLF, 
+																					"D:500xB:600; bodem:Orion grijs;" _ $$$CRLF, 
+																					"ladezijkant:Orion grijs; bevat: gemont." _ $$$CRLF, 
+																					"lade; corpusprofiel 40kg; BLUMOTION;" _ $$$CRLF, 
+																					"frontbevest. INSERTA" _ $$$CRLF,
+																					"antislip-fiber inlegmat antraciet"  _ $$$CRLF, 
+																					"verpakt: Probox")
+	
+	Do $$$AssertEquals(Langtekst.GeefString(), ControleLangtekst)
+]]></Implementation>
+</Method>
+
 <Method name="Test: StandaardLade M met stalen rug">
 <Implementation><![CDATA[
 	Set ..MvxKenmerken = ##class(vhTest.Utils.DOM.PM.Maatwerk.Calc.Common.impl.MVXKenmerken).StandaardLade()
@@ -107,6 +202,23 @@
 ]]></Implementation>
 </Method>
 
+<Method name="Test: Standaard Binnenlade M met meenemerset">
+<Implementation><![CDATA[
+	Set ..MvxKenmerken = ##class(vhTest.Utils.DOM.PM.Maatwerk.Calc.Common.impl.MVXKenmerken).StandaardBinnenlade()
+	Set ..MvxKenmerken.MeenemerSet = ..Enum.MeenemerSet.VolledigeSet
+	
+	#dim Langtekst As DOM.PM.ProductLangtekst = ..GeefLangtekst()
+	#dim ControleLangtekst As TECH.String = ##class(TECH.StringUtils).Concatenate(  "MERIVOBOX binnenlade M" _ $$$CRLF, 
+																					"D:500xB:600; bodem:Orion grijs;" _ $$$CRLF, 
+																					"ladezijkant:Orion grijs; bevat: gemont." _ $$$CRLF, 
+																					"lade; gesloten voorstuk; corpusprofiel" _ $$$CRLF, 
+																					"40kg; BLUMOTION; meenemerset" _ $$$CRLF, 
+																					"verpakt: Probox")
+	
+	Do $$$AssertEquals(Langtekst.GeefString(), ControleLangtekst)
+]]></Implementation>
+</Method>
+
 <Method name="Test: Standaard Binnenlade M met stalen rug">
 <Implementation><![CDATA[
 	Set ..MvxKenmerken = ##class(vhTest.Utils.DOM.PM.Maatwerk.Calc.Common.impl.MVXKenmerken).StandaardBinnenlade()
@@ -143,6 +255,107 @@
 ]]></Implementation>
 </Method>
 
+<Method name="Test: Standaard Binnenlade M met NM inschuifElementVoor">
+<Implementation><![CDATA[
+	Set ..MvxKenmerken = ##class(vhTest.Utils.DOM.PM.Maatwerk.Calc.Common.impl.MVXKenmerken).StandaardBinnenlade()
+	Set ..MvxKenmerken.VoorwandType = ##class(DOM.PM.enu.MVXVoorwandType).GlasHoog()
+	
+	Set VerwijderdeHalffabItemsOpHalffabItemsBoom = ##class(%ArrayOfObjects).%New()
+	Do VerwijderdeHalffabItemsOpHalffabItemsBoom.SetAt(..GeefVerwijderdHalffabItem(), ##class(DOM.PM.Maatwerk.Calc.HF.enu.MVXRol).InschuifElementVoor())
+	
+	#dim Langtekst As DOM.PM.ProductLangtekst = ..GeefLangtekst(VerwijderdeHalffabItemsOpHalffabItemsBoom)
+	#dim ControleLangtekst As TECH.String = ##class(TECH.StringUtils).Concatenate(  "MERIVOBOX binnenlade M" _ $$$CRLF, 
+																					"D:500xB:600; bodem:Orion grijs;" _ $$$CRLF, 
+																					"ladezijkant:Orion grijs; bevat: gemont." _ $$$CRLF, 
+																					"lade; voorstuk met inschuifelement: met"_ $$$CRLF,
+																					"eigen inschuifelement; corpusprofiel 40kg;" _ $$$CRLF, 
+																					"BLUMOTION" _ $$$CRLF, 
+																					"verpakt: Probox")
+	
+	Do $$$AssertEquals(Langtekst.GeefString(), ControleLangtekst)
+]]></Implementation>
+</Method>
+
+<Method name="Test: Standaard Binnenlade M met laag inschuifElement vooraan">
+<Implementation><![CDATA[
+	Set ..MvxKenmerken = ##class(vhTest.Utils.DOM.PM.Maatwerk.Calc.Common.impl.MVXKenmerken).StandaardBinnenlade()
+	Set ..MvxKenmerken.VoorwandType = ##class(DOM.PM.enu.MVXVoorwandType).GlasLaag()
+	
+	#dim Langtekst As DOM.PM.ProductLangtekst = ..GeefLangtekst()
+	#dim ControleLangtekst As TECH.String = ##class(TECH.StringUtils).Concatenate(  "MERIVOBOX binnenlade M" _ $$$CRLF, 
+																					"D:500xB:600; bodem:Orion grijs;" _ $$$CRLF, 
+																					"ladezijkant:Orion grijs; bevat: gemont." _ $$$CRLF, 
+																					"lade; voorstuk met laag inschuifelement:"_ $$$CRLF,
+																					"glas diamant helder; corpusprofiel 40kg;" _ $$$CRLF, 
+																					"BLUMOTION" _ $$$CRLF, 
+																					"verpakt: Probox")
+	
+	Do $$$AssertEquals(Langtekst.GeefString(), ControleLangtekst)
+]]></Implementation>
+</Method>
+
+<Method name="Test: Standaard binnenlade E met boxcover">
+<Implementation><![CDATA[
+	Set ..MvxKenmerken = ##class(vhTest.Utils.DOM.PM.Maatwerk.Calc.Common.impl.MVXKenmerken).StandaardBinnenlade()
+	Set ..MvxKenmerken.LadeHoogte = ..Enum.LadeHoogte.E
+	Set ..MvxKenmerken.RugHoogte = ..Enum.RugHoogte.E
+	Set ..MvxKenmerken.ZijwandType = ##class(DOM.PM.enu.MVXZijWandType).Boxcover()
+	
+	#dim Langtekst As DOM.PM.ProductLangtekst = ..GeefLangtekst()
+	#dim ControleLangtekst As TECH.String = ##class(TECH.StringUtils).Concatenate(  "MERIVOBOX binnenlade E" _ $$$CRLF, 
+																					"D:500xB:600; bodem:Orion grijs;" _ $$$CRLF, 
+																					"ladezijkant:Orion grijs; bevat: gemont." _ $$$CRLF, 
+																					"lade; BOXCOVER met inschuifelement diamant"_ $$$CRLF,
+																					"glas 8mm; gesloten voorstuk; corpusprofiel" _ $$$CRLF, 
+																					"40kg; BLUMOTION" _ $$$CRLF, 
+																					"verpakt: Probox")
+	
+	Do $$$AssertEquals(Langtekst.GeefString(), ControleLangtekst)
+]]></Implementation>
+</Method>
+
+<Method name="Test: Standaard binnenlade E met boxcap">
+<Implementation><![CDATA[
+	Set ..MvxKenmerken = ##class(vhTest.Utils.DOM.PM.Maatwerk.Calc.Common.impl.MVXKenmerken).StandaardBinnenlade()
+	Set ..MvxKenmerken.LadeHoogte = ..Enum.LadeHoogte.E
+	Set ..MvxKenmerken.RugHoogte = ..Enum.RugHoogte.E
+	Set ..MvxKenmerken.ZijwandType = ##class(DOM.PM.enu.MVXZijWandType).Boxcap()
+	
+	#dim Langtekst As DOM.PM.ProductLangtekst = ..GeefLangtekst()
+	#dim ControleLangtekst As TECH.String = ##class(TECH.StringUtils).Concatenate(  "MERIVOBOX binnenlade E" _ $$$CRLF, 
+																					"D:500xB:600; bodem:Orion grijs;" _ $$$CRLF, 
+																					"ladezijkant:Orion grijs; bevat: gemont." _ $$$CRLF, 
+																					"lade; BOXCAP; gesloten voorstuk;"_ $$$CRLF,
+																					"corpusprofiel 40kg; BLUMOTION" _ $$$CRLF, 
+																					"verpakt: Probox")
+	
+	Do $$$AssertEquals(Langtekst.GeefString(), ControleLangtekst)
+]]></Implementation>
+</Method>
+
+<Method name="Test: Standaard binnenlade E met NM reling zijkant">
+<Implementation><![CDATA[
+	Set ..MvxKenmerken = ##class(vhTest.Utils.DOM.PM.Maatwerk.Calc.Common.impl.MVXKenmerken).StandaardBinnenlade()
+	Set ..MvxKenmerken.LadeHoogte = ..Enum.LadeHoogte.E
+	Set ..MvxKenmerken.RugHoogte = ..Enum.RugHoogte.E
+	Set ..MvxKenmerken.ZijwandType = ##class(DOM.PM.enu.MVXZijWandType).RelingEnInschuifElement()
+	
+	Set VerwijderdeHalffabItemsOpHalffabItemsBoom = ##class(%ArrayOfObjects).%New()
+	Do VerwijderdeHalffabItemsOpHalffabItemsBoom.SetAt(..GeefVerwijderdHalffabItem(), ##class(DOM.PM.Maatwerk.Calc.HF.enu.MVXRol).RelingZijkant())
+	
+	#dim Langtekst As DOM.PM.ProductLangtekst = ..GeefLangtekst(VerwijderdeHalffabItemsOpHalffabItemsBoom)
+	#dim ControleLangtekst As TECH.String = ##class(TECH.StringUtils).Concatenate(  "MERIVOBOX binnenlade E" _ $$$CRLF, 
+																					"D:500xB:600; bodem:Orion grijs;" _ $$$CRLF, 
+																					"ladezijkant:Orion grijs; bevat: gemont." _ $$$CRLF, 
+																					"lade; reling met inschuifelement: met eigen"_ $$$CRLF,
+																					"inschuifelement; gesloten voorstuk;" _ $$$CRLF, 
+																					"corpusprofiel 40kg; BLUMOTION" _ $$$CRLF, 
+																					"verpakt: Probox")
+	
+	Do $$$AssertEquals(Langtekst.GeefString(), ControleLangtekst)
+]]></Implementation>
+</Method>
+
 <Method name="Test: StandaardLade E en afwijkende RugHoogte =&gt; RugHoogte vermeld">
 <Implementation><![CDATA[
 	Set ..MvxKenmerken = ##class(vhTest.Utils.DOM.PM.Maatwerk.Calc.Common.impl.MVXKenmerken).StandaardLade()
@@ -404,7 +617,7 @@
 	#dim Langtekst As DOM.PM.ProductLangtekst = ..GeefLangtekst()
 	#dim ControleLangtekst As TECH.String = ##class(TECH.StringUtils).Concatenate(  "MERIVOBOX Spoelbaklade M" _ $$$CRLF, 
 																					"D:500xB:600" _ $$$CRLF, 
-																					"Spoelbakopening = 470mm (70/470/60);" _ $$$CRLF, 
+																					"spoelbakopening = 470mm (70/470/60);" _ $$$CRLF, 
 																					"bodem:Orion grijs; ladezijkant:Orion grijs;" _ $$$CRLF, 
 																					"bevat: gemont. lade; corpusprofiel 40kg;" _ $$$CRLF, 
 																					"BLUMOTION; frontbevest. INSERTA" _ $$$CRLF, 
@@ -424,7 +637,7 @@
 	#dim ControleLangtekst As TECH.String = ##class(TECH.StringUtils).Concatenate(  "MERIVOBOX pure" _ $$$CRLF, 
 																					"Spoelbaklade E" _ $$$CRLF, 
 																					"D:500xB:600" _ $$$CRLF, 
-																					"Spoelbakopening = 470mm (70/470/60);" _ $$$CRLF, 
+																					"spoelbakopening = 470mm (70/470/60);" _ $$$CRLF, 
 																					"bodem:Orion grijs; ladezijkant:Orion grijs;" _ $$$CRLF, 
 																					"rugwand hoogte M; bevat: gemont. lade;" _ $$$CRLF, 
 																					"corpusprofiel 40kg; BLUMOTION; frontbevest." _ $$$CRLF, 
@@ -438,48 +651,70 @@
 <Method name="Test: StandaardLade M met NietMeeleverens =&gt; Allemaal">
 <Implementation><![CDATA[
 	Set ..MvxKenmerken = ##class(vhTest.Utils.DOM.PM.Maatwerk.Calc.Common.impl.MVXKenmerken).StandaardLadeMetNietMeeleverens()
+	//Terug op TOB zetten eens signaletiek in .NET zit
+	Set ..MvxKenmerken.GeleiderTechnologie = ##class(DOM.PM.enu.MVXGeleiderTechnologie).BLUMOTION() 
 	
 	Set VerwijderdeHalffabItemsOpHalffabItemsBoom = ##class(%ArrayOfObjects).%New()
-	;Do VerwijderdeHalffabItemsOpHalffabItemsBoom.SetAt(..GeefVerwijderdHalffabItem(), "AfdekkapBinnen") 	// Nog niet in enum, want nog geen builder in DotNet! Code in DOM.PM.impl.LangtekstCreator vult deze voorlopig aan!
-	;Do VerwijderdeHalffabItemsOpHalffabItemsBoom.SetAt(..GeefVerwijderdHalffabItem(), "AfdekkapBuiten") 	// Nog niet in enum, want nog geen builder in DotNet! Code in DOM.PM.impl.LangtekstCreator vult deze voorlopig aan!
+	Do VerwijderdeHalffabItemsOpHalffabItemsBoom.SetAt(..GeefVerwijderdHalffabItem(), ##class(DOM.PM.Maatwerk.Calc.HF.enu.MVXRol).AfdekkapBinnen())
+	Do VerwijderdeHalffabItemsOpHalffabItemsBoom.SetAt(..GeefVerwijderdHalffabItem(), ##class(DOM.PM.Maatwerk.Calc.HF.enu.MVXRol).AfdekkapBuiten())
 	Do VerwijderdeHalffabItemsOpHalffabItemsBoom.SetAt(..GeefVerwijderdHalffabItem(), ##class(DOM.PM.Maatwerk.Calc.HF.enu.MVXRol).AfdekkapRugWandHouder())
+	//Do VerwijderdeHalffabItemsOpHalffabItemsBoom.SetAt(..GeefVerwijderdHalffabItem(), ##class(DOM.PM.Maatwerk.Calc.HF.enu.MVXRol).Boxcap())
+	Do VerwijderdeHalffabItemsOpHalffabItemsBoom.SetAt(..GeefVerwijderdHalffabItem(), ##class(DOM.PM.Maatwerk.Calc.HF.enu.MVXNietMeeleveren).Boxcover())		//Er is een voor en achter
 	Do VerwijderdeHalffabItemsOpHalffabItemsBoom.SetAt(..GeefVerwijderdHalffabItem(), ##class(DOM.PM.Maatwerk.Calc.HF.enu.MVXRol).FrontBevestigingBoven())
 	Do VerwijderdeHalffabItemsOpHalffabItemsBoom.SetAt(..GeefVerwijderdHalffabItem(), ##class(DOM.PM.Maatwerk.Calc.HF.enu.MVXRol).FrontBevestigingOnder())
-	;Do VerwijderdeHalffabItemsOpHalffabItemsBoom.SetAt(..GeefVerwijderdHalffabItem(), "Geleider") 			// Nog niet in enum, want nog geen builder in DotNet! Code in DOM.PM.impl.LangtekstCreator vult deze voorlopig aan!
-	Do VerwijderdeHalffabItemsOpHalffabItemsBoom.SetAt(..GeefVerwijderdHalffabItem(), ##class(DOM.PM.Maatwerk.Calc.HF.enu.MVXRol).TiponBlumotionEenheid())
-	Do VerwijderdeHalffabItemsOpHalffabItemsBoom.SetAt(..GeefVerwijderdHalffabItem(), ##class(DOM.PM.Maatwerk.Calc.HF.enu.MVXRol).TiponBlumotionSynchronisatieStang())
+	//Do VerwijderdeHalffabItemsOpHalffabItemsBoom.SetAt(..GeefVerwijderdHalffabItem(), "FrontStabilisator")
+	Do VerwijderdeHalffabItemsOpHalffabItemsBoom.SetAt(..GeefVerwijderdHalffabItem(), ##class(DOM.PM.Maatwerk.Calc.HF.enu.MVXRol).Geleider())
+	Do VerwijderdeHalffabItemsOpHalffabItemsBoom.SetAt(..GeefVerwijderdHalffabItem(), ##class(DOM.PM.Maatwerk.Calc.HF.enu.MVXRol).InschuifElementVoor())
+	Do VerwijderdeHalffabItemsOpHalffabItemsBoom.SetAt(..GeefVerwijderdHalffabItem(), ##class(DOM.PM.Maatwerk.Calc.HF.enu.MVXRol).InschuifElementZijkant())
+	Do VerwijderdeHalffabItemsOpHalffabItemsBoom.SetAt(..GeefVerwijderdHalffabItem(), ##class(DOM.PM.Maatwerk.Calc.HF.enu.MVXRol).Opvullijst())
+	Do VerwijderdeHalffabItemsOpHalffabItemsBoom.SetAt(..GeefVerwijderdHalffabItem(), ##class(DOM.PM.Maatwerk.Calc.HF.enu.MVXRol).RelingVoor())
+	//Do VerwijderdeHalffabItemsOpHalffabItemsBoom.SetAt(..GeefVerwijderdHalffabItem(), ##class(DOM.PM.Maatwerk.Calc.HF.enu.MVXRol).RelingZijkant())
+	//TOB terug activeren eens signaletiek in .NET zit, is te veel werk om dit te laten slagen in cache
+	//Do VerwijderdeHalffabItemsOpHalffabItemsBoom.SetAt(..GeefVerwijderdHalffabItem(), ##class(DOM.PM.Maatwerk.Calc.HF.enu.MVXRol).TiponBlumotionMeenemer())
+	//Do VerwijderdeHalffabItemsOpHalffabItemsBoom.SetAt(..GeefVerwijderdHalffabItem(), ##class(DOM.PM.Maatwerk.Calc.HF.enu.MVXRol).TiponBlumotionEenheid())
+	//Do VerwijderdeHalffabItemsOpHalffabItemsBoom.SetAt(..GeefVerwijderdHalffabItem(), ##class(DOM.PM.Maatwerk.Calc.HF.enu.MVXRol).TiponBlumotionSynchronisatieStang())
+	Do VerwijderdeHalffabItemsOpHalffabItemsBoom.SetAt(..GeefVerwijderdHalffabItem(), ##class(DOM.PM.Maatwerk.Calc.HF.enu.MVXRol).Zijstabilisering())
 	
 	#dim Langtekst As DOM.PM.ProductLangtekst = ..GeefLangtekst(VerwijderdeHalffabItemsOpHalffabItemsBoom)
 	#dim ControleLangtekst As TECH.String = ##class(TECH.StringUtils).Concatenate(  "MERIVOBOX lade M" _ $$$CRLF, 
 																					"D:500xB:600; bodem:Orion grijs;" _ $$$CRLF, 
-																					"ladezijkant:Orion grijs; bevat: gemont." _ $$$CRLF, 
-																					"lade; corpusprofiel 40kg; TIP-ON BLUMOTION;" _ $$$CRLF, 
-																					"frontbevest. INSERTA" _ $$$CRLF, 
+																					"ladezijkant:Orion grijs; bevat: gemont. lade" _ $$$CRLF, 
 																					"verpakt: Probox" _ $$$CRLF,
 																					"niet meegeleverd: afdekkappen binnen;" _ $$$CRLF,
 																					"afdekkappen buiten; afdekkappen" _ $$$CRLF,
-																					"rugwandhouders M; Frontbevestiging;" _ $$$CRLF,
-																					"corpusprofiel; TIP-ON BLUMOTION eenheid;" _ $$$CRLF,
-																					"TIP-ON BLUMOTION meenemers; TIP-ON" _ $$$CRLF,
-																					"BLUMOTION synchronisatiestang")
+																					"rugwandhouders; BOXCOVER; Frontbevestiging;" _ $$$CRLF,
+																					"corpusprofiel; inschuifelement front;" _ $$$CRLF,
+																					"inschuifelementen ladezijkant; opvullijst;" _ $$$CRLF,
+																					"reling; zijdelingse stabilisatie")
 	
 	Do $$$AssertEquals(Langtekst.GeefString(), ControleLangtekst)
 ]]></Implementation>
 </Method>
 
-<Method name="Test: StandaardLade M met NietMeeleverens =&gt; Enkel TiponBlumotion-rollen">
-<Implementation><![CDATA[
+<UDLText name="T">
+<Content><![CDATA[
+// Test terug activeren eens signaletiek in .NET zit, is te veel werk om dit te laten slagen in cache
+
+]]></Content>
+</UDLText>
+
+<UDLText name="T">
+<Content><![CDATA[
+/*
+Method "Test: StandaardLade M met NietMeeleverens => Enkel TiponBlumotion-rollen"()
+{
 	Set ..MvxKenmerken = ##class(vhTest.Utils.DOM.PM.Maatwerk.Calc.Common.impl.MVXKenmerken).StandaardLade()
 	Set ..MvxKenmerken.GeleiderTechnologie = ##class(DOM.PM.enu.MVXGeleiderTechnologie).TIPONBLUMOTION()
 	
-	Set NietMeeleverens = ##class(%ListOfDataTypes).%New()
-	Do NietMeeleverens.Insert("TiponBlumotionMeenemers") 														// Nog niet in enum, want nog geen builder in DotNet! ##class(DOM.PM.Maatwerk.Calc.HF.enu.MVXRol).TiponBlumotionMeenemers()
+	Set NietMeeleverens = ##class(%ListOfDataTypes).%New()	
 	Do NietMeeleverens.Insert(##class(DOM.PM.Maatwerk.Calc.HF.enu.MVXRol).TiponBlumotionEenheid())
+	Do NietMeeleverens.Insert(##class(DOM.PM.Maatwerk.Calc.HF.enu.MVXRol).TiponBlumotionMeenemer())
 	Do NietMeeleverens.Insert(##class(DOM.PM.Maatwerk.Calc.HF.enu.MVXRol).TiponBlumotionSynchronisatieStang()) 	// Volgens docu: "TiponBlumotionSynchronisatieStangEnAdapters"
 	Set ..MvxKenmerken.NietMeeleveren = NietMeeleverens
 	
 	Set VerwijderdeHalffabItemsOpHalffabItemsBoom = ##class(%ArrayOfObjects).%New()
 	Do VerwijderdeHalffabItemsOpHalffabItemsBoom.SetAt(..GeefVerwijderdHalffabItem(), ##class(DOM.PM.Maatwerk.Calc.HF.enu.MVXRol).TiponBlumotionEenheid())
+	Do VerwijderdeHalffabItemsOpHalffabItemsBoom.SetAt(..GeefVerwijderdHalffabItem(), ##class(DOM.PM.Maatwerk.Calc.HF.enu.MVXRol).TiponBlumotionMeenemer())
 	Do VerwijderdeHalffabItemsOpHalffabItemsBoom.SetAt(..GeefVerwijderdHalffabItem(), ##class(DOM.PM.Maatwerk.Calc.HF.enu.MVXRol).TiponBlumotionSynchronisatieStang())
 	
 	#dim Langtekst As DOM.PM.ProductLangtekst = ..GeefLangtekst(VerwijderdeHalffabItemsOpHalffabItemsBoom)
@@ -489,13 +724,15 @@
 																					"lade; corpusprofiel 40kg; TIP-ON BLUMOTION;" _ $$$CRLF, 
 																					"frontbevest. INSERTA" _ $$$CRLF, 
 																					"verpakt: Probox" _ $$$CRLF,
-																					"niet meegeleverd: TIP-ON BLUMOTION eenheid;" _ $$$CRLF,
-																					"TIP-ON BLUMOTION meenemers; TIP-ON" _ $$$CRLF,
-																					"BLUMOTION synchronisatiestang")
+																					"niet meegeleverd: TIP-ON BLUMOTION" _ $$$CRLF,
+																					"eenheden; TIP-ON BLUMOTION meenemers;" _ $$$CRLF,
+																					"TIP-ON BLUMOTION synchronisatiestang")
 	
 	Do $$$AssertEquals(Langtekst.GeefString(), ControleLangtekst)
-]]></Implementation>
-</Method>
+}
+*/
+]]></Content>
+</UDLText>
 
 <Method name="Test: StandaardLade M met NietMeeleverens =&gt; Enkel FrontBevestiging">
 <Implementation><![CDATA[
@@ -514,8 +751,7 @@
 	#dim ControleLangtekst As TECH.String = ##class(TECH.StringUtils).Concatenate(  "MERIVOBOX lade M" _ $$$CRLF, 
 																					"D:500xB:600; bodem:Orion grijs;" _ $$$CRLF, 
 																					"ladezijkant:Orion grijs; bevat: gemont." _ $$$CRLF, 
-																					"lade; corpusprofiel 40kg; BLUMOTION;" _ $$$CRLF, 
-																					"frontbevest. INSERTA" _ $$$CRLF, 
+																					"lade; corpusprofiel 40kg; BLUMOTION" _ $$$CRLF,
 																					"verpakt: Probox" _ $$$CRLF,
 																					"niet meegeleverd: Frontbevestiging")
 	
@@ -549,7 +785,6 @@
 	If ($IsObject(VerwijderdeHalffabItems)) {
 		Set HalffabItemsBoom.VerwijderdeHalffabItems = VerwijderdeHalffabItems
 	}
-	
 	Quit ..MvxLangtekstCreator.GeefLangtekst(..MvxKenmerken, HalffabItemsBoom, Taal,, "")
 ]]></Implementation>
 </Method>
@@ -560,6 +795,28 @@
 <Implementation><![CDATA[	Quit ##class(DOM.PM.Maatwerk.Calc.HF.VerwijderdHalffabItem).%New()
 ]]></Implementation>
 </Method>
+
+<Method name="GeefMatKenmerken">
+<ClassMethod>1</ClassMethod>
+<Private>1</Private>
+<ReturnType>DOM.PM.Maatwerk.Calc.Common.impl.MATKenmerken</ReturnType>
+<Implementation><![CDATA[
+	#dim MATKenmerken As DOM.PM.Maatwerk.Calc.Common.impl.MATKenmerken = ##class(DOM.PM.Maatwerk.Calc.Common.impl.MATKenmerken).%New()
+	
+	Set MATKenmerken.Breedte = 500
+	Set MATKenmerken.Diepte = 473
+	Set MATKenmerken.Kleur = ##class(DOM.PM.enu.MATKleur).AntiSlipFiberAntraciet()
+	Set MATKenmerken.Materiaal = ##class(DOM.PM.enu.MATMateriaal).AntislipFiber()
+	Set MATKenmerken.Type = ##class(DOM.PM.enu.MatType).Basis()
+	Set MATKenmerken.ExplicietGekozenKenmerken = ##class(%ListOfDataTypes).%New()
+	Set MATKenmerken.NietMeeleveren = ##class(%ListOfDataTypes).%New()
+	Set MATKenmerken.Onderdelen = ##class(%ListOfDataTypes).%New()
+	Set MATKenmerken.ProductieWijze = ""
+	Set MATKenmerken.VersieNr = 0
+	
+	Quit MATKenmerken
+]]></Implementation>
+</Method>
 </Class>