Index: DOM/PM/Maatwerk/Calc/HF/HalffabSpec.cls.xml
===================================================================
diff -u -r29673 -r29692
--- DOM/PM/Maatwerk/Calc/HF/HalffabSpec.cls.xml	(.../HalffabSpec.cls.xml)	(revision 29673)
+++ DOM/PM/Maatwerk/Calc/HF/HalffabSpec.cls.xml	(.../HalffabSpec.cls.xml)	(revision 29692)
@@ -182,8 +182,7 @@
 	Do Context.HalffabItemsBoom.Clear()
 	Set NietMeeLeveren = ##class(%ArrayOfDataTypes).%New()
 	Set NietMeeLeverenIterator = ##class(TECH.ListIterator).%New(IngegevenKenmerken.NietMeeleveren)
-	While (NietMeeLeverenIterator.HasNext())
-	{
+	While (NietMeeLeverenIterator.HasNext()) {
 		Do NietMeeLeveren.SetAt("",NietMeeLeverenIterator.Next())
 	}
 	
@@ -193,68 +192,54 @@
 	Set Context.HalffabItemsBoom.Wortel=##class(DOM.PM.Maatwerk.Calc.HF.SamengesteldHalffabItem).%New(Context,..Builder.GeefRol())   ; De root voorlopig invullen met een 'lege' HalffabItem. 
 	
 	#dim HFItemBuilderSeqIterator As TECH.Iterator =..GeefHFItemBuilderSeqIterator()
-	While HFItemBuilderSeqIterator.HasNext()
-	{
+	While HFItemBuilderSeqIterator.HasNext() {
 		#dim HFItemBuilder As DOM.PM.Maatwerk.Calc.HF.IHalffabItemBuilder = HFItemBuilderSeqIterator.Next()
 		#dim HalffabrikaatAanpassing As DOM.PM.Maatwerk.Aanpassing.dto.HalffabrikaatAanpassing = MaatwerkAanpassing.GeefHalffabrikaatAanpassing(HFItemBuilder.GeefRol())
 		
 		#dim HalffabItem As DOM.PM.Maatwerk.Calc.HF.IHalffabItem
-		If ($IsObject(HalffabrikaatAanpassing.ToevoegenAanpassing))
-		{
+		If ($IsObject(HalffabrikaatAanpassing.ToevoegenAanpassing)) {
 			Set HFGegegevensVisitor = ##class(DOM.PM.Maatwerk.Calc.HF.impl.HalffabrikaatGegevensNaarHalffabItemVisitor).%New(Context, HFItemBuilder.GeefRol())
 			Do HalffabrikaatAanpassing.ToevoegenAanpassing.HalffabrikaatGegevens.Accept(HFGegegevensVisitor)
 			Set HalffabItem = HFGegegevensVisitor.GeefHalffabItem()
 			Do VerwerkteRollenToevoegAanpassingen.Verhoog(HFItemBuilder.GeefRol())
-		}
-		Else
-		{
+		} Else {
 			Set HalffabItem = HFItemBuilder.Bereken(IngegevenKenmerken,Context)
 		}
 		
-		If ($IsObject(HalffabItem))
-		{
-			If ($IsObject(HalffabrikaatAanpassing.VervangenAanpassing))
-			{
+		If ($IsObject(HalffabItem))	{
+			If ($IsObject(HalffabrikaatAanpassing.VervangenAanpassing))	{
 				Set HFGegegevensVisitor = ##class(DOM.PM.Maatwerk.Calc.HF.impl.HalffabrikaatGegevensNaarHalffabItemVisitor).%New(Context, HFItemBuilder.GeefRol())
 				Do HalffabrikaatAanpassing.VervangenAanpassing.HalffabrikaatGegevens.Accept(HFGegegevensVisitor)
 				Set HalffabItem = HFGegegevensVisitor.GeefHalffabItem()
 			}
-			Set AanpassingWilVerwijderen = $IsObject(HalffabrikaatAanpassing.VerwijderenAanpassing)
-			Set HalffabrikaatNietMeeleveren = NietMeeLeveren.IsDefined(HalffabItem.GeefRol())
-			If (AanpassingWilVerwijderen) {
-				Set HalffabItem.OpnemenInEindproduct = 0
-			}
+			
+			Set:$IsObject(HalffabrikaatAanpassing.VerwijderenAanpassing) HalffabItem.OpnemenInEindproduct = 0
+			
+			#dim HalffabrikaatNietMeeleveren As %Boolean = NietMeeLeveren.IsDefined(HalffabItem.GeefRol())
 			If (('HalffabItem.BuilderBepaaltOpnemenInEindproduct) && HalffabrikaatNietMeeleveren) {
 				Set HalffabItem.OpnemenInEindproduct = 0
 			}
 			Do Context.HalffabItemsBoom.AddHalffabItem(HalffabItem)
 		}
 	}
-	
 
 	Set SpecialsHalffabItems = ##class(DOM.PM.Maatwerk.Calc.HF.SamengesteldHalffabItem).%New(Context,"Specials")
 	Set AanpassingIterator = ##class(TECH.ListIterator).%New(MaatwerkAanpassing.HalffabrikaatAanpassingen)
-	While (AanpassingIterator.HasNext())
-	{
+	While (AanpassingIterator.HasNext()) {
 		#dim Aanpassing As DOM.PM.Maatwerk.Aanpassing.dto.HalffabrikaatAanpassing = AanpassingIterator.Next()
 		#dim Rol As %String = AanpassingIterator.Key()
-		If $IsObject(Aanpassing.ToevoegenAanpassing) && (VerwerkteRollenToevoegAanpassingen.GeefFrequentieVanItem(Rol) = 0)
-		{
+		If $IsObject(Aanpassing.ToevoegenAanpassing) && (VerwerkteRollenToevoegAanpassingen.GeefFrequentieVanItem(Rol) = 0) {
 			Set HFGegegevensVisitor = ##class(DOM.PM.Maatwerk.Calc.HF.impl.HalffabrikaatGegevensNaarHalffabItemVisitor).%New(Context, Rol)
 			Do Aanpassing.ToevoegenAanpassing.HalffabrikaatGegevens.Accept(HFGegegevensVisitor)
 			Do SpecialsHalffabItems.VoegToe(HFGegegevensVisitor.GeefHalffabItem())
 		}
 	}
 	
-	Set Context.HalffabItemsBoom.Wortel=..Builder.GeefHalffabItem(IngegevenKenmerken,Context)
-	
-	If (SpecialsHalffabItems.HalffabItems.Count() > 0)
-	{
+	Set Context.HalffabItemsBoom.Wortel =..Builder.GeefHalffabItem(IngegevenKenmerken,Context)
+	If (SpecialsHalffabItems.HalffabItems.Count() > 0) {
 		Do Context.HalffabItemsBoom.AddHalffabItem(SpecialsHalffabItems)
 		Do Context.HalffabItemsBoom.Wortel.VoegToe(SpecialsHalffabItems)
 	}
-	
-	quit
 ]]></Implementation>
 </Method>