Index: EXT/Optima/CalculPrix/impl/RequestVerwerker.cls.xml
===================================================================
diff -u -r33650 -r33709
--- EXT/Optima/CalculPrix/impl/RequestVerwerker.cls.xml	(.../RequestVerwerker.cls.xml)	(revision 33650)
+++ EXT/Optima/CalculPrix/impl/RequestVerwerker.cls.xml	(.../RequestVerwerker.cls.xml)	(revision 33709)
@@ -71,6 +71,11 @@
 	Set NietMeeleverenRollen = ##class(%ListOfDataTypes).%New()
 	Do:(Lade.NietMeeleverenGeleider) NietMeeleverenRollen.Insert(..Enum.NietMeeleveren.Glijder)
 	Do:(Lade.NietMeeleverenFrontbevestiging) NietMeeleverenRollen.Insert(..Enum.NietMeeleveren.FrontBevestiging)
+	If (Lade.NietMeeleverenTOBSetEnStang) {
+		Do NietMeeleverenRollen.Insert(..Enum.NietMeeleveren.TiponBlumotionSetEenhedenEnMeenemers)
+		Do NietMeeleverenRollen.Insert(..Enum.NietMeeleveren.TiponBlumotionSynchronisatieStang)
+		Do NietMeeleverenRollen.Insert(..Enum.NietMeeleveren.TiponBlumotionSynchronisatieAdapter)
+	}
 	Set LadeTAX.NietMeeleveren = NietMeeleverenRollen
 ]]></Implementation>
 </Method>
Index: vhUnitTest/EXT/Optima/CalculPrix/impl/RequestVerwerker/Verwerk/Test.cls.xml
===================================================================
diff -u -r33650 -r33709
--- vhUnitTest/EXT/Optima/CalculPrix/impl/RequestVerwerker/Verwerk/Test.cls.xml	(.../Test.cls.xml)	(revision 33650)
+++ vhUnitTest/EXT/Optima/CalculPrix/impl/RequestVerwerker/Verwerk/Test.cls.xml	(.../Test.cls.xml)	(revision 33709)
@@ -20,6 +20,7 @@
 	Set Request.Lade.Draagkracht = DummyDraagkracht
 	Set Request.Lade.NietMeeleverenGeleider = 1
 	Set Request.Lade.NietMeeleverenFrontbevestiging = 1
+	Set Request.Lade.NietMeeleverenTOBSetEnStang = 1
 	
 	#dim EDIAanvraag As APPS.EDI.PrijsBerekening.dto.Aanvraag = RequestVerwerker.Verwerk(Request)
 	
@@ -31,7 +32,12 @@
 	Set VerwachteEDIProduct.GlijderType = ##class(DOM.PM.enu.TAORGlijderType).Movento()
 	Set VerwachteEDIProduct.IsBinnenbreedte = $$$True
 	Set VerwachteEDIProduct.OpvullijstKleur = ##class(DOM.PM.enu.TAOROpvullijstKleur).Lichtgrijs()
-	Set VerwachteEDIProduct.NietMeeleveren = ##class(TECH.ListUtils).CreateListOfDataTypes(..Enum.NietMeeleveren.Glijder,..Enum.NietMeeleveren.FrontBevestiging)
+	Set VerwachteEDIProduct.NietMeeleveren = ##class(TECH.ListUtils).CreateListOfDataTypes(..Enum.NietMeeleveren.Glijder, 
+																						   ..Enum.NietMeeleveren.FrontBevestiging, 
+																						   ..Enum.NietMeeleveren.TiponBlumotionSetEenhedenEnMeenemers,
+																						   ..Enum.NietMeeleveren.TiponBlumotionSynchronisatieStang,
+																						   ..Enum.NietMeeleveren.TiponBlumotionSynchronisatieAdapter
+																						   )
 	Do ..AssertProductMetIK(EDIAanvraag.Product,VerwachteEDIProduct)
 
 	Set VerwachteEDIAanvraag = ##class(APPS.EDI.PrijsBerekening.dto.Aanvraag).%New()