Index: vhUnitTest/DOM/PM/Maatwerk/Kost/TestKostItem.cls.xml
===================================================================
diff -u -r52909 -r52914
--- vhUnitTest/DOM/PM/Maatwerk/Kost/TestKostItem.cls.xml	(.../TestKostItem.cls.xml)	(revision 52909)
+++ vhUnitTest/DOM/PM/Maatwerk/Kost/TestKostItem.cls.xml	(.../TestKostItem.cls.xml)	(revision 52914)
@@ -129,6 +129,32 @@
 	Do $$$AssertEquals(Samengesteld1.GeefKost(),3502,"De kost is: 700 + 500 + 100 = 1300 * 2 = 2600 + 600 + 200 = 3400 + 102(3%) = 3502")
 ]]></Implementation>
 </Method>
+
+<Method name="Test: TaxVerdubbelingEnProcentueelKostItem alleen de gefilterde KostItems verdubbelen plus Percentage - Enkel Samengesteld KostItem">
+<Implementation><![CDATA[
+	Set Samengesteld1=##class(DOM.PM.Maatwerk.Calc.Kost.SamengesteldKostItem).%New("Samengesteld1")
+	Set Sub11 = ##class(DOM.PM.Maatwerk.Calc.Kost.StandaardHalffabKostItem).%New("Sub11",1800,"De details")
+	Do Samengesteld1.VoegToe(Sub11)
+	
+	Set Samengesteld2=##class(DOM.PM.Maatwerk.Calc.Kost.SamengesteldKostItem).%New("Samengesteld2")
+	Set Sub21 = ##class(DOM.PM.Maatwerk.Calc.Kost.StandaardHalffabKostItem).%New("Sub21",200,"De details")
+	Set Sub22 = ##class(DOM.PM.Maatwerk.Calc.Kost.StandaardHalffabKostItem).%New("Sub22",100,"De details")
+	Do Samengesteld2.VoegToe(Sub21)
+	Do Samengesteld2.VoegToe(Sub22)
+	
+	Do Samengesteld1.VoegToe(Samengesteld2)
+	
+	#dim ExcludeList As %ListOfDataTypes = ##class(%ListOfDataTypes).%New()
+	Do ExcludeList.Insert("Samengesteld2")
+	
+	#dim KostItemNamenToExcludeFilter As TECH.Filter = ##class(TECH.Filter.ValueBasedExcludeFilter).%New(ExcludeList)
+	
+	Set TaxVerdubbelingEnProcentueelKostItem = ##class(DOM.PM.Maatwerk.Calc.Kost.TaxVerdubbelingEnProcentueelKostItem).%New("",,,0.03,Samengesteld1,KostItemNamenToExcludeFilter)
+	Do Samengesteld1.VoegToe(TaxVerdubbelingEnProcentueelKostItem)
+	
+	Do $$$AssertEquals(Samengesteld1.GeefKost(),4017,"De kost is: 1800 * 2 = 3600 + 200 + 100 = 3900 + 117(3%) = 4017")
+]]></Implementation>
+</Method>
 </Class>
 
 
Index: DOM/PM/Maatwerk/Calc/Kost/SamengesteldKostItem.cls.xml
===================================================================
diff -u -r52909 -r52914
--- DOM/PM/Maatwerk/Calc/Kost/SamengesteldKostItem.cls.xml	(.../SamengesteldKostItem.cls.xml)	(revision 52909)
+++ DOM/PM/Maatwerk/Calc/Kost/SamengesteldKostItem.cls.xml	(.../SamengesteldKostItem.cls.xml)	(revision 52914)
@@ -106,10 +106,12 @@
 	
 	While (Iterator.HasNext()) {
 		#dim KostItem As KostItem = Iterator.Next()
-		If (KostItem.%Extends(##class(DOM.PM.Maatwerk.Calc.Kost.SamengesteldKostItem).%ClassName($$$True))) {
-			Set Kost = Kost + KostItem.GeefExtraKostVoorTaxSifonlade(KostItemNamenToExcludeFilter)
-		} ElseIf ($$$Not(KostItem.%Extends(##class(DOM.PM.Maatwerk.Calc.Kost.ProcentueelKostItem).%ClassName($$$True))) && $$$Not(KostItemNamenToExcludeFilter.IsValid(KostItem.GeefNaam()))) {
-			Set Kost = Kost + KostItem.GeefKost()
+		If ($$$Not(KostItemNamenToExcludeFilter.IsValid(KostItem.GeefNaam()))) {
+			If (KostItem.%Extends(##class(DOM.PM.Maatwerk.Calc.Kost.SamengesteldKostItem).%ClassName($$$True))) {
+				Set Kost = Kost + KostItem.GeefExtraKostVoorTaxSifonlade(KostItemNamenToExcludeFilter)
+			} ElseIf ($$$Not(KostItem.%Extends(##class(DOM.PM.Maatwerk.Calc.Kost.ProcentueelKostItem).%ClassName($$$True)))) {
+				Set Kost = Kost + KostItem.GeefKost()
+			}
 		}
 	}