Index: DOM/PM/Maatwerk/Calc/Kost/SamengesteldKostItem.cls.xml
===================================================================
diff -u -r30245 -r30411
--- DOM/PM/Maatwerk/Calc/Kost/SamengesteldKostItem.cls.xml	(.../SamengesteldKostItem.cls.xml)	(revision 30245)
+++ DOM/PM/Maatwerk/Calc/Kost/SamengesteldKostItem.cls.xml	(.../SamengesteldKostItem.cls.xml)	(revision 30411)
@@ -47,8 +47,10 @@
 	#endif
 	
 	#dim Status As %Status = ..KostItems.Insert(KostItem)
+	
 	Do ##class(TECH.Exceptions.StatusException).ThrowIndienNietOK(Status,"VoegToe niet gelukt",..E.InvalidInputException)
 	Do KostItem.ZetParent($this)
+	
 	Quit $$$OK
 ]]></Implementation>
 </Method>
@@ -65,30 +67,32 @@
 <Private>1</Private>
 <ReturnType>%Float</ReturnType>
 <Implementation><![CDATA[
-	Set Som=0
-	Set Iterator=..GeefKostItemsIterator()
-	While Iterator.HasNext()
-	{
-		Set Som=Som+Iterator.Next().GeefKost()
+	#dim Kost As %Decimal = 0
+	#dim Iterator As TECH.Iterator = ..GeefKostItemsIterator()
+	
+	while (Iterator.HasNext()) {
+		set Kost = Kost + Iterator.Next().GeefKost()
 	}
-	Quit ..Afgerond(Som)
+	
+	quit ..Afgerond(Kost)
 ]]></Implementation>
 </Method>
 
 <Method name="GeefKostOmPercentageOpTeBerekenen">
 <ReturnType>%Decimal</ReturnType>
 <Implementation><![CDATA[
-	Set Som=0
-	Set Iterator=..GeefKostItemsIterator()
-	While Iterator.HasNext()
-	{
+	#dim Kost As %Decimal = 0
+	#dim Iterator As TECH.Iterator = ..GeefKostItemsIterator()
+	
+	while (Iterator.HasNext()) {
 		#dim KostItem As KostItem = Iterator.Next()
-		If ('KostItem.%Extends("DOM.PM.Maatwerk.Calc.Kost.ProcentueelKostItem"))
-		{
-			Set Som=Som+KostItem.GeefKost()
+		
+		if $$$Not(KostItem.%Extends("DOM.PM.Maatwerk.Calc.Kost.ProcentueelKostItem")) {
+			Set Kost = Kost + KostItem.GeefKost()
 		}
 	}
-	Quit Som
+	
+	quit Kost
 ]]></Implementation>
 </Method>
 </Class>
Index: DOM/PM/Maatwerk/Calc/Kost/SamengesteldKostItemBuilder.cls.xml
===================================================================
diff -u -r29059 -r30411
--- DOM/PM/Maatwerk/Calc/Kost/SamengesteldKostItemBuilder.cls.xml	(.../SamengesteldKostItemBuilder.cls.xml)	(revision 29059)
+++ DOM/PM/Maatwerk/Calc/Kost/SamengesteldKostItemBuilder.cls.xml	(.../SamengesteldKostItemBuilder.cls.xml)	(revision 30411)
@@ -38,22 +38,25 @@
 <FormalSpec>Context:KostContext,HalffabItemsBoom:DOM.PM.Maatwerk.Calc.HF.HalffabItemsBoom,IngegevenKenmerken:DOM.PM.Maatwerk.Calc.Common.IngegevenKenmerken</FormalSpec>
 <ReturnType>DOM.PM.Maatwerk.Calc.Kost.KostItem</ReturnType>
 <Implementation><![CDATA[
-	Set SamengesteldKostItem=""
-	If (..Evaluator.Evalueer(HalffabItemsBoom,Context,IngegevenKenmerken))
-	{
-		Set SamengesteldKostItem = ##class(DOM.PM.Maatwerk.Calc.Kost.SamengesteldKostItem).%New(..Naam)
-		Set itKostItemBuilders=..GeefKostItemBuildersIterator()
-		While (itKostItemBuilders.HasNext())
-		{
-			Set KostItemBuilder=itKostItemBuilders.Next()
-			If (KostItemBuilder.GeefEvaluator().Evalueer(HalffabItemsBoom, Context, IngegevenKenmerken))
-			{
-				Set KostItem=KostItemBuilder.Bereken(Context,HalffabItemsBoom,IngegevenKenmerken)
-				Do:$IsObject(KostItem) SamengesteldKostItem.VoegToe(KostItem)
+	#dim SamengesteldKostItem As DOM.PM.Maatwerk.Calc.Kost.KostItem = ""
+	
+	if (..Evaluator.Evalueer(HalffabItemsBoom, Context, IngegevenKenmerken)) {
+		set SamengesteldKostItem = ##class(DOM.PM.Maatwerk.Calc.Kost.SamengesteldKostItem).%New(..Naam)
+		
+		#dim Iterator As TECH.Iterator = ..GeefKostItemBuildersIterator()
+		
+		while (Iterator.HasNext()) {
+			#dim KostItemBuilder As DOM.PM.Maatwerk.Calc.Kost.IKostItemBuilder = Iterator.Next()
+			
+			if (KostItemBuilder.GeefEvaluator().Evalueer(HalffabItemsBoom, Context, IngegevenKenmerken)) {
+				#dim KostItem As DOM.PM.Maatwerk.Calc.Kost.KostItem = KostItemBuilder.Bereken(Context, HalffabItemsBoom, IngegevenKenmerken)
+				
+				do:$IsObject(KostItem) SamengesteldKostItem.VoegToe(KostItem)
 			}
 		}
 	}
-	Quit SamengesteldKostItem
+	
+	quit SamengesteldKostItem
 ]]></Implementation>
 </Method>
 </Class>