Index: DOM/PM/Maatwerk/Calc/Kost/impl/TAOR/SpecKostv004.cls.xml
===================================================================
diff -u -r53808 -r53809
--- DOM/PM/Maatwerk/Calc/Kost/impl/TAOR/SpecKostv004.cls.xml	(.../SpecKostv004.cls.xml)	(revision 53808)
+++ DOM/PM/Maatwerk/Calc/Kost/impl/TAOR/SpecKostv004.cls.xml	(.../SpecKostv004.cls.xml)	(revision 53809)
@@ -59,9 +59,8 @@
 		If ..IsWitteLadeVoorSfs(Context, IngegevenKenmerken) {
 			Set Procent = -13.3
 		}
-		Set Naam = "Rework " _ Procent _ "%"
+		Set Naam = "TAX Sifonlade Extra kost + Rework " _ Procent _ "%"
 		Set DecimaalPercentage = Procent / 100
-		Set Naam = "TAX Sifonlade Extra kost + " _ Naam
 		
 		#dim Values As %ListOfDataTypes = ##class(%ListOfDataTypes).%New()
 		Do Values.Insert("Glijder")
@@ -74,22 +73,31 @@
 		Set ProcentueelKostItem = ##class(DOM.PM.Maatwerk.Calc.Kost.TaxVerdubbelingEnProcentueelKostItem).%New(Naam,,, DecimaalPercentage, TotaalKostItem, KostItemNamenToExcludeFilter)
 		Do TotaalKostItem.VoegToe(ProcentueelKostItem)
 	} Else {
-		Set Naam = "Rework " _ Procent _ "%"
-		Set DecimaalPercentage = Procent / 100
-		Set ProcentueelKostItem = ##class(DOM.PM.Maatwerk.Calc.Kost.ProcentueelKostItem).%New(Naam,,, DecimaalPercentage, TotaalKostItem)
-		Do TotaalKostItem.VoegToe(ProcentueelKostItem)
+		Do ..ZetProcentueelKostItemEnVoegToeAanTotaalKostItem(Procent, TotaalKostItem)
 		
 		If ..IsWitteLadeVoorSfs(Context, IngegevenKenmerken) {
 			Set Procent = -15.3
-			Set Naam = "Rework " _ Procent _ "%"
-			Set DecimaalPercentage = Procent / 100
-			Set ProcentueelKostItem = ##class(DOM.PM.Maatwerk.Calc.Kost.ProcentueelKostItem).%New(Naam,,, DecimaalPercentage, TotaalKostItem)
-			Do TotaalKostItem.VoegToe(ProcentueelKostItem)
+			Do ..ZetProcentueelKostItemEnVoegToeAanTotaalKostItem(Procent, TotaalKostItem)
 		}
 	}
 ]]></Implementation>
 </Method>
 
+<Method name="ZetProcentueelKostItemEnVoegToeAanTotaalKostItem">
+<FormalSpec>Procent:%Decimal,TotaalKostItem:DOM.PM.Maatwerk.Calc.Kost.SamengesteldKostItem</FormalSpec>
+<Private>1</Private>
+<Implementation><![CDATA[
+	#dim ProcentueelKostItem As DOM.PM.Maatwerk.Calc.Kost.ProcentueelKostItem
+	#dim Naam As TECH.String
+	#dim DecimaalPercentage As %Decimal
+	
+	Set Naam = "Rework " _ Procent _ "%"
+	Set DecimaalPercentage = Procent / 100
+	Set ProcentueelKostItem = ##class(DOM.PM.Maatwerk.Calc.Kost.ProcentueelKostItem).%New(Naam,,, DecimaalPercentage, TotaalKostItem)
+	Do TotaalKostItem.VoegToe(ProcentueelKostItem)
+]]></Implementation>
+</Method>
+
 <Method name="IsWitteLadeVoorSfs">
 <FormalSpec>Context:DOM.PM.Maatwerk.Calc.Kost.KostContext,IngegevenKenmerken:DOM.PM.Maatwerk.Calc.Common.IngegevenKenmerken</FormalSpec>
 <Private>1</Private>