Index: DOM/PM/Maatwerk/Calc/HF/impl/LBX/Builder/HFAfdekkapBinnenv001.cls.xml
===================================================================
diff -u -r29059 -r30376
--- DOM/PM/Maatwerk/Calc/HF/impl/LBX/Builder/HFAfdekkapBinnenv001.cls.xml	(.../HFAfdekkapBinnenv001.cls.xml)	(revision 29059)
+++ DOM/PM/Maatwerk/Calc/HF/impl/LBX/Builder/HFAfdekkapBinnenv001.cls.xml	(.../HFAfdekkapBinnenv001.cls.xml)	(revision 30376)
@@ -24,7 +24,7 @@
 <FormalSpec><![CDATA[&HalffabItem:DOM.PM.Maatwerk.Calc.HF.IHalffabItem,IngegevenKenmerken:DOM.PM.Maatwerk.Calc.Common.IngegevenKenmerken,Context:DOM.PM.Maatwerk.Calc.HF.HalffabContext,&HalffabList:%ListOfObjects]]></FormalSpec>
 <Implementation><![CDATA[
 	Do ##super(HalffabItem, IngegevenKenmerken, Context, HalffabList)
-	Set HalffabItem = ..SpoelbakHalffabItemVerwerker.VerdubbelAantalIndienSpoelbak(HalffabItem,IngegevenKenmerken)
+	Do ..SpoelbakHalffabItemVerwerker.VerdubbelAantalIndienSpoelbak(HalffabItem,IngegevenKenmerken)
 ]]></Implementation>
 </Method>
 
Index: vhTest/Fake/DOM/PM/Maatwerk/Calc/HF/impl/LBX/Builder/HFBoxCoverVoorv000.cls.xml
===================================================================
diff -u -r29059 -r30376
--- vhTest/Fake/DOM/PM/Maatwerk/Calc/HF/impl/LBX/Builder/HFBoxCoverVoorv000.cls.xml	(.../HFBoxCoverVoorv000.cls.xml)	(revision 29059)
+++ vhTest/Fake/DOM/PM/Maatwerk/Calc/HF/impl/LBX/Builder/HFBoxCoverVoorv000.cls.xml	(.../HFBoxCoverVoorv000.cls.xml)	(revision 30376)
@@ -16,8 +16,7 @@
 
 <Method name="PostProcessHalffabItem">
 <FormalSpec><![CDATA[&HalffabItem:DOM.PM.Maatwerk.Calc.HF.IHalffabItem,IngegevenKenmerken:DOM.PM.Maatwerk.Calc.Common.IngegevenKenmerken,Context:DOM.PM.Maatwerk.Calc.HF.HalffabContext,&HalffabList:%ListOfObjects]]></FormalSpec>
-<Implementation><![CDATA[
-]]></Implementation>
+<Implementation><![CDATA[]]></Implementation>
 </Method>
 </Class>
 
Index: DOM/PM/Maatwerk/Calc/HF/impl/LBX/Builder/HFBoxCoverAchterv000.cls.xml
===================================================================
diff -u -r29059 -r30376
--- DOM/PM/Maatwerk/Calc/HF/impl/LBX/Builder/HFBoxCoverAchterv000.cls.xml	(.../HFBoxCoverAchterv000.cls.xml)	(revision 29059)
+++ DOM/PM/Maatwerk/Calc/HF/impl/LBX/Builder/HFBoxCoverAchterv000.cls.xml	(.../HFBoxCoverAchterv000.cls.xml)	(revision 30376)
@@ -82,7 +82,7 @@
 <FormalSpec><![CDATA[&HalffabItem:DOM.PM.Maatwerk.Calc.HF.IHalffabItem,IngegevenKenmerken:DOM.PM.Maatwerk.Calc.Common.IngegevenKenmerken,Context:DOM.PM.Maatwerk.Calc.HF.HalffabContext,&HalffabList:%ListOfObjects]]></FormalSpec>
 <Implementation><![CDATA[
 	Do ##super(HalffabItem, IngegevenKenmerken, Context, HalffabList)
-	Set HalffabItem = ..SpoelbakHalffabItemVerwerker.VerdubbelAantalIndienSpoelbak(HalffabItem,IngegevenKenmerken)
+	Do ..SpoelbakHalffabItemVerwerker.VerdubbelAantalIndienSpoelbak(HalffabItem,IngegevenKenmerken)
 ]]></Implementation>
 </Method>
 </Class>
Index: DOM/PM/Maatwerk/Calc/HF/SamengesteldHalffabItem.cls.xml
===================================================================
diff -u -r30286 -r30376
--- DOM/PM/Maatwerk/Calc/HF/SamengesteldHalffabItem.cls.xml	(.../SamengesteldHalffabItem.cls.xml)	(revision 30286)
+++ DOM/PM/Maatwerk/Calc/HF/SamengesteldHalffabItem.cls.xml	(.../SamengesteldHalffabItem.cls.xml)	(revision 30376)
@@ -10,15 +10,28 @@
 
 <Property name="HalffabItems">
 <Type>DOM.PM.Maatwerk.Calc.HF.IHalffabItem</Type>
+<Collection>list</Collection>
+<Private>1</Private>
+</Property>
+
+<Property name="HalffabItemsIndex">
+<Type>%List</Type>
 <Collection>array</Collection>
+<Private>1</Private>
 </Property>
 
 <Method name="GeefHalffabItemsIterator">
 <ReturnType>TECH.Iterator</ReturnType>
-<Implementation><![CDATA[	Quit ##class(TECH.ListIterator).%New(..HalffabItems)
+<Implementation><![CDATA[	Quit ##class(DOM.PM.Maatwerk.Calc.HF.SamengesteldHalffabItem.GesorteerdOpRolIterator).%New(..HalffabItems,..HalffabItemsIndex)
 ]]></Implementation>
 </Method>
 
+<Method name="GeefHalffabItemsIteratorReversedIterator">
+<ReturnType>TECH.Iterator</ReturnType>
+<Implementation><![CDATA[	quit ##class(TECH.ReversedListIterator).%New(..HalffabItems)
+]]></Implementation>
+</Method>
+
 <Method name="GeefKindIterator">
 <ReturnType>TECH.Iterator</ReturnType>
 <Implementation><![CDATA[	Quit ##class(TECH.ListIterator).%New(..HalffabItems)
@@ -31,6 +44,23 @@
 ]]></Implementation>
 </Method>
 
+<Method name="VerwijderHalffabItem">
+<FormalSpec>Rol:%String</FormalSpec>
+<ReturnType>%String</ReturnType>
+<Implementation><![CDATA[
+	#dim Iterator As TECH.Iterator = ..GeefHalffabItemsIteratorReversedIterator()
+	while Iterator.HasNext() {
+		#dim HalffabItem As DOM.PM.Maatwerk.Calc.HF.IHalffabItem = Iterator.Next()
+		if (HalffabItem.GeefRol() = Rol) {
+			#dim IndexNr As TECH.Integer = Iterator.Key()
+			do ..HalffabItems.RemoveAt(IndexNr)
+			do ..HalffabItemsIndex.RemoveAt(Rol)
+			do ..UpdateHalffabItemsIndex(IndexNr)
+		}
+	}
+]]></Implementation>
+</Method>
+
 <Method name="Accept">
 <Description>
 </Description>
@@ -44,7 +74,8 @@
 <ReturnType>DOM.PM.Maatwerk.Calc.HF.IHalffabItem</ReturnType>
 <Implementation><![CDATA[
 	#dim Delimiter As TECH.String = "->"
-	#dim HalffabItem As DOM.PM.Maatwerk.Calc.HF.IHalffabItem = ..HalffabItems.GetAt($Piece(Rol, Delimiter))
+	#dim Index As %List = ..HalffabItemsIndex.GetAt($Piece(Rol, Delimiter))
+	#dim HalffabItem As DOM.PM.Maatwerk.Calc.HF.ConcreetHalffabItem = ..HalffabItems.GetAt($listget(Index))
 	#dim Counter As %Integer
 	
 	For Counter=2:1:$Length(Rol, Delimiter) {
@@ -70,9 +101,12 @@
 	
 	#endif
 	
-	#dim Status As %Status = ..HalffabItems.SetAt(HalffabItem,HalffabItem.GeefRol())
+	#dim Status As %Status = ..HalffabItems.Insert(HalffabItem)
 	do ##class(TECH.Exceptions.StatusException).ThrowIndienNietOK(Status,"VoegToe niet gelukt",..E.InvalidInputException)
 	
+	#dim Index As %List = ..HalffabItemsIndex.GetAt(HalffabItem.GeefRol()) _ $listbuild(..HalffabItems.Count())
+	do ..HalffabItemsIndex.SetAt(Index,HalffabItem.GeefRol())
+
 	set HalffabItem.ParentItem = $this
 ]]></Implementation>
 </Method>
@@ -110,6 +144,22 @@
 	}
 ]]></Implementation>
 </Method>
+
+<Method name="UpdateHalffabItemsIndex">
+<FormalSpec>IndexNr:TECH.Integer</FormalSpec>
+<Private>1</Private>
+<Implementation><![CDATA[
+	#dim Index As %String =""
+	#dim HalffabItemIndices As %List 
+	for { set HalffabItemIndices = ..HalffabItemsIndex.GetNext(.Index) quit:Index=""
+		#dim Counter As %Integer
+		for Counter=1:1:$listlength(HalffabItemIndices) { 
+			if $listget(HalffabItemIndices,Counter) > IndexNr set $list(HalffabItemIndices,Counter) = $listget(HalffabItemIndices,Counter)-1
+		}
+		do ..HalffabItemsIndex.SetAt(HalffabItemIndices,Index)
+	}
+]]></Implementation>
+</Method>
 </Class>
 
 
Index: DOM/PM/Maatwerk/Calc/HF/impl/LBX/Builder/HFRugBodemSchroefv001.cls.xml
===================================================================
diff -u -r29059 -r30376
--- DOM/PM/Maatwerk/Calc/HF/impl/LBX/Builder/HFRugBodemSchroefv001.cls.xml	(.../HFRugBodemSchroefv001.cls.xml)	(revision 29059)
+++ DOM/PM/Maatwerk/Calc/HF/impl/LBX/Builder/HFRugBodemSchroefv001.cls.xml	(.../HFRugBodemSchroefv001.cls.xml)	(revision 30376)
@@ -24,7 +24,7 @@
 <FormalSpec><![CDATA[&HalffabItem:DOM.PM.Maatwerk.Calc.HF.IHalffabItem,IngegevenKenmerken:DOM.PM.Maatwerk.Calc.Common.impl.LBXKenmerken,Context:DOM.PM.Maatwerk.Calc.HF.HalffabContext,&HalffabList:%ListOfObjects]]></FormalSpec>
 <Implementation><![CDATA[
 	Do ##super(HalffabItem, IngegevenKenmerken, Context, HalffabList)
-	Set HalffabItem = ..SpoelbakHalffabItemVerwerker.VerdubbelAantalIndienSpoelbak(HalffabItem,IngegevenKenmerken)
+	Do ..SpoelbakHalffabItemVerwerker.VerdubbelAantalIndienSpoelbak(HalffabItem,IngegevenKenmerken)
 ]]></Implementation>
 </Method>
 </Class>
Index: DOM/PM/Maatwerk/Calc/HF/impl/LBX/Builder/HFRugWandHouderSchroefv001.cls.xml
===================================================================
diff -u -r29059 -r30376
--- DOM/PM/Maatwerk/Calc/HF/impl/LBX/Builder/HFRugWandHouderSchroefv001.cls.xml	(.../HFRugWandHouderSchroefv001.cls.xml)	(revision 29059)
+++ DOM/PM/Maatwerk/Calc/HF/impl/LBX/Builder/HFRugWandHouderSchroefv001.cls.xml	(.../HFRugWandHouderSchroefv001.cls.xml)	(revision 30376)
@@ -26,7 +26,7 @@
 <FormalSpec><![CDATA[&HalffabItem:DOM.PM.Maatwerk.Calc.HF.IHalffabItem,IngegevenKenmerken:DOM.PM.Maatwerk.Calc.Common.IngegevenKenmerken,Context:DOM.PM.Maatwerk.Calc.HF.HalffabContext,&HalffabList:%ListOfObjects]]></FormalSpec>
 <Implementation><![CDATA[
 	Do ##super(HalffabItem,IngegevenKenmerken,Context,HalffabList)
-	Set HalffabItem = ..SpoelbakHalffabItemVerwerker.VerdubbelAantalIndienSpoelbak(HalffabItem,IngegevenKenmerken)
+	do ..SpoelbakHalffabItemVerwerker.VerdubbelAantalIndienSpoelbak(HalffabItem,IngegevenKenmerken)
 	If (Context.HalffabItemsBoom.BevatRol(##class(DOM.PM.Maatwerk.Calc.HF.enu.LBXRol).Sifonkap())) {
 		#dim SifonkapHalffabItemsIt As TECH.Iterator = Context.HalffabItemsBoom.GeefHalffabItem(##class(DOM.PM.Maatwerk.Calc.HF.enu.LBXRol).Sifonkap()).GeefHalffabItemsIterator()
 		While SifonkapHalffabItemsIt.HasNext() {
Index: vhUnitTest/DOM/PM/Maatwerk/Calc/HF/IHalffabItemBuilder/Bereken/TestVerdubbelIndienSpoelbak.cls.xml
===================================================================
diff -u -r29059 -r30376
--- vhUnitTest/DOM/PM/Maatwerk/Calc/HF/IHalffabItemBuilder/Bereken/TestVerdubbelIndienSpoelbak.cls.xml	(.../TestVerdubbelIndienSpoelbak.cls.xml)	(revision 29059)
+++ vhUnitTest/DOM/PM/Maatwerk/Calc/HF/IHalffabItemBuilder/Bereken/TestVerdubbelIndienSpoelbak.cls.xml	(.../TestVerdubbelIndienSpoelbak.cls.xml)	(revision 30376)
@@ -101,7 +101,7 @@
 	#dim LBXIngegevenKenmerken As DOM.PM.Maatwerk.Calc.Common.impl.LBXKenmerken = ..GeefIngegevenKenmerken(##class(DOM.PM.enu.LBXKlasse).Lade())
 	
 	Set HalffabItem = ##class(vhUnitTest.DOM.PM.Maatwerk.Calc.HF.IHalffabItemBuilder.Bereken.DummyHalffabItem).%New(..DummyContext, $$$DummyString)
-	Do ..SpoelbakHalffabItemVerwerkerMock.VerwachtMethodCall("VerdubbelAantalIndienSpoelbak",HalffabItem,LBXIngegevenKenmerken).DanReturn(HalffabItem)
+	Do ..SpoelbakHalffabItemVerwerkerMock.VerwachtMethodCall("VerdubbelAantalIndienSpoelbak",HalffabItem,LBXIngegevenKenmerken)
 	
 	Do HFBuilder.PostProcessHalffabItem(HalffabItem, LBXIngegevenKenmerken,..DummyContext, HalffabList)
 	
Index: DOM/PM/Maatwerk/Calc/HF/impl/LBX/Builder/HFRugWandHouderv001.cls.xml
===================================================================
diff -u -r29059 -r30376
--- DOM/PM/Maatwerk/Calc/HF/impl/LBX/Builder/HFRugWandHouderv001.cls.xml	(.../HFRugWandHouderv001.cls.xml)	(revision 29059)
+++ DOM/PM/Maatwerk/Calc/HF/impl/LBX/Builder/HFRugWandHouderv001.cls.xml	(.../HFRugWandHouderv001.cls.xml)	(revision 30376)
@@ -24,7 +24,7 @@
 <FormalSpec><![CDATA[&HalffabItem:DOM.PM.Maatwerk.Calc.HF.IHalffabItem,IngegevenKenmerken:DOM.PM.Maatwerk.Calc.Common.IngegevenKenmerken,Context:DOM.PM.Maatwerk.Calc.HF.HalffabContext,&HalffabList:%ListOfObjects]]></FormalSpec>
 <Implementation><![CDATA[
 	Do ##super(HalffabItem, IngegevenKenmerken, Context, HalffabList)
-	Set HalffabItem = ..SpoelbakHalffabItemVerwerker.VerdubbelAantalIndienSpoelbak(HalffabItem,IngegevenKenmerken)
+	Do ..SpoelbakHalffabItemVerwerker.VerdubbelAantalIndienSpoelbak(HalffabItem,IngegevenKenmerken)
 ]]></Implementation>
 </Method>
 </Class>
Index: DOM/PM/Maatwerk/Calc/HF/impl/LBX/Builder/HFAfdekkapBuitenv001.cls.xml
===================================================================
diff -u -r29059 -r30376
--- DOM/PM/Maatwerk/Calc/HF/impl/LBX/Builder/HFAfdekkapBuitenv001.cls.xml	(.../HFAfdekkapBuitenv001.cls.xml)	(revision 29059)
+++ DOM/PM/Maatwerk/Calc/HF/impl/LBX/Builder/HFAfdekkapBuitenv001.cls.xml	(.../HFAfdekkapBuitenv001.cls.xml)	(revision 30376)
@@ -24,7 +24,7 @@
 <FormalSpec><![CDATA[&HalffabItem:DOM.PM.Maatwerk.Calc.HF.IHalffabItem,IngegevenKenmerken:DOM.PM.Maatwerk.Calc.Common.IngegevenKenmerken,Context:DOM.PM.Maatwerk.Calc.HF.HalffabContext,&HalffabList:%ListOfObjects]]></FormalSpec>
 <Implementation><![CDATA[
 	Do ##super(HalffabItem, IngegevenKenmerken, Context, HalffabList)
-	Set HalffabItem = ..SpoelbakHalffabItemVerwerker.VerdubbelAantalIndienSpoelbak(HalffabItem,IngegevenKenmerken)
+	Do ..SpoelbakHalffabItemVerwerker.VerdubbelAantalIndienSpoelbak(HalffabItem,IngegevenKenmerken)
 ]]></Implementation>
 </Method>
 </Class>
Index: DOM/PM/Maatwerk/Calc/HF/impl/LBX/Builder/HFInschuifElementZijkantv000.cls.xml
===================================================================
diff -u -r29059 -r30376
--- DOM/PM/Maatwerk/Calc/HF/impl/LBX/Builder/HFInschuifElementZijkantv000.cls.xml	(.../HFInschuifElementZijkantv000.cls.xml)	(revision 29059)
+++ DOM/PM/Maatwerk/Calc/HF/impl/LBX/Builder/HFInschuifElementZijkantv000.cls.xml	(.../HFInschuifElementZijkantv000.cls.xml)	(revision 30376)
@@ -25,7 +25,7 @@
 <FormalSpec><![CDATA[&HalffabItem:DOM.PM.Maatwerk.Calc.HF.IHalffabItem,IngegevenKenmerken:DOM.PM.Maatwerk.Calc.Common.IngegevenKenmerken,Context:DOM.PM.Maatwerk.Calc.HF.HalffabContext,&HalffabList:%ListOfObjects]]></FormalSpec>
 <Implementation><![CDATA[
 	Do ##super(HalffabItem, IngegevenKenmerken, Context, HalffabList)
-	Set HalffabItem = ..SpoelbakHalffabItemVerwerker.VerdubbelAantalIndienSpoelbak(HalffabItem,IngegevenKenmerken)
+	Do ..SpoelbakHalffabItemVerwerker.VerdubbelAantalIndienSpoelbak(HalffabItem,IngegevenKenmerken)
 ]]></Implementation>
 </Method>
 </Class>
Index: DOM/PM/Maatwerk/Calc/HF/impl/LBX/Builder/HFLadeZijkantv001.cls.xml
===================================================================
diff -u -r29059 -r30376
--- DOM/PM/Maatwerk/Calc/HF/impl/LBX/Builder/HFLadeZijkantv001.cls.xml	(.../HFLadeZijkantv001.cls.xml)	(revision 29059)
+++ DOM/PM/Maatwerk/Calc/HF/impl/LBX/Builder/HFLadeZijkantv001.cls.xml	(.../HFLadeZijkantv001.cls.xml)	(revision 30376)
@@ -24,7 +24,7 @@
 <FormalSpec><![CDATA[&HalffabItem:DOM.PM.Maatwerk.Calc.HF.IHalffabItem,IngegevenKenmerken:DOM.PM.Maatwerk.Calc.Common.IngegevenKenmerken,Context:DOM.PM.Maatwerk.Calc.HF.HalffabContext,&HalffabList:%ListOfObjects]]></FormalSpec>
 <Implementation><![CDATA[
 	Do ##super(HalffabItem, IngegevenKenmerken, Context, HalffabList)
-	Set HalffabItem = ..SpoelbakHalffabItemVerwerker.VerdubbelAantalIndienSpoelbak(HalffabItem,IngegevenKenmerken)
+	Do ..SpoelbakHalffabItemVerwerker.VerdubbelAantalIndienSpoelbak(HalffabItem,IngegevenKenmerken)
 ]]></Implementation>
 </Method>
 
Index: vhTest/Mock/DOM/PM/Maatwerk/Calc/HF/impl/LBX/Builder/HFBoxCoverAchterv000.cls.xml
===================================================================
diff -u -r29059 -r30376
--- vhTest/Mock/DOM/PM/Maatwerk/Calc/HF/impl/LBX/Builder/HFBoxCoverAchterv000.cls.xml	(.../HFBoxCoverAchterv000.cls.xml)	(revision 29059)
+++ vhTest/Mock/DOM/PM/Maatwerk/Calc/HF/impl/LBX/Builder/HFBoxCoverAchterv000.cls.xml	(.../HFBoxCoverAchterv000.cls.xml)	(revision 30376)
@@ -21,20 +21,6 @@
 <Implementation><![CDATA[	do ..VerwerkMethodCall("PostProcessHalffabItem",.HalffabItem,IngegevenKenmerken,Context,.HalffabList)
 ]]></Implementation>
 </Method>
-
-<Method name="VoegToeBoxCoverViaV1">
-<FormalSpec>SubRol:TECH.String,BoxCoverViaHalffabSelectie:DOM.PM.Maatwerk.Calc.HF.SamengesteldHalffabItem,Context:DOM.PM.Maatwerk.Calc.HF.HalffabContext</FormalSpec>
-<ReturnType>DOM.PM.Maatwerk.Calc.HF.ConcreetHalffabItem</ReturnType>
-<Implementation><![CDATA[	quit ..VerwerkMethodCall("VoegToeBoxCoverViaV1",SubRol,BoxCoverViaHalffabSelectie,Context)
-]]></Implementation>
-</Method>
-
-<Method name="VoegToeBoxCoversViaV1">
-<FormalSpec>Context:DOM.PM.Maatwerk.Calc.HF.HalffabContext,BoxCoverViaHalffabSelectie:DOM.PM.Maatwerk.Calc.HF.SamengesteldHalffabItem</FormalSpec>
-<ReturnType>%ListOfObjects</ReturnType>
-<Implementation><![CDATA[	quit ..VerwerkMethodCall("VoegToeBoxCoversViaV1",Context,BoxCoverViaHalffabSelectie)
-]]></Implementation>
-</Method>
 </Class>
 
 
Index: DOM/PM/Maatwerk/Calc/HF/impl/LBX/Builder/HFTransportZekerheidv000.cls.xml
===================================================================
diff -u -r29059 -r30376
--- DOM/PM/Maatwerk/Calc/HF/impl/LBX/Builder/HFTransportZekerheidv000.cls.xml	(.../HFTransportZekerheidv000.cls.xml)	(revision 29059)
+++ DOM/PM/Maatwerk/Calc/HF/impl/LBX/Builder/HFTransportZekerheidv000.cls.xml	(.../HFTransportZekerheidv000.cls.xml)	(revision 30376)
@@ -32,7 +32,7 @@
 <FormalSpec><![CDATA[&HalffabItem:DOM.PM.Maatwerk.Calc.HF.IHalffabItem,IngegevenKenmerken:DOM.PM.Maatwerk.Calc.Common.IngegevenKenmerken,Context:DOM.PM.Maatwerk.Calc.HF.HalffabContext,&HalffabList:%ListOfObjects]]></FormalSpec>
 <Implementation><![CDATA[
 	Do ##super(HalffabItem, IngegevenKenmerken, Context, HalffabList)
-	Set HalffabItem = ..SpoelbakHalffabItemVerwerker.VerdubbelAantalIndienSpoelbak(HalffabItem,IngegevenKenmerken)
+	Do ..SpoelbakHalffabItemVerwerker.VerdubbelAantalIndienSpoelbak(HalffabItem,IngegevenKenmerken)
 ]]></Implementation>
 </Method>
 
Index: vhTest/Mock/DOM/PM/Maatwerk/Calc/HF/impl/LBX/SpoelbakHalffabItemVerwerker.cls.xml
===================================================================
diff -u -r29059 -r30376
--- vhTest/Mock/DOM/PM/Maatwerk/Calc/HF/impl/LBX/SpoelbakHalffabItemVerwerker.cls.xml	(.../SpoelbakHalffabItemVerwerker.cls.xml)	(revision 29059)
+++ vhTest/Mock/DOM/PM/Maatwerk/Calc/HF/impl/LBX/SpoelbakHalffabItemVerwerker.cls.xml	(.../SpoelbakHalffabItemVerwerker.cls.xml)	(revision 30376)
@@ -9,9 +9,8 @@
 <Super>DOM.PM.Maatwerk.Calc.HF.impl.LBX.SpoelbakHalffabItemVerwerker,Tools.Mock.MockClassBase</Super>
 
 <Method name="VerdubbelAantalIndienSpoelbak">
-<FormalSpec>HalffabItem:DOM.PM.Maatwerk.Calc.HF.IHalffabItem="",IngegevenKenmerken:DOM.PM.Maatwerk.Calc.Common.impl.LBXKenmerkenv01</FormalSpec>
-<ReturnType>DOM.PM.Maatwerk.Calc.HF.IHalffabItem</ReturnType>
-<Implementation><![CDATA[	quit ..VerwerkMethodCall("VerdubbelAantalIndienSpoelbak",HalffabItem,IngegevenKenmerken)
+<FormalSpec><![CDATA[&HalffabItem:DOM.PM.Maatwerk.Calc.HF.IHalffabItem="",IngegevenKenmerken:DOM.PM.Maatwerk.Calc.Common.impl.LBXKenmerkenv01]]></FormalSpec>
+<Implementation><![CDATA[	do ..VerwerkMethodCall("VerdubbelAantalIndienSpoelbak",.HalffabItem,IngegevenKenmerken)
 ]]></Implementation>
 </Method>
 </Class>
Index: DOM/PM/Maatwerk/Calc/HF/impl/LBX/SpoelbakHalffabItemVerwerker.cls.xml
===================================================================
diff -u -r29059 -r30376
--- DOM/PM/Maatwerk/Calc/HF/impl/LBX/SpoelbakHalffabItemVerwerker.cls.xml	(.../SpoelbakHalffabItemVerwerker.cls.xml)	(revision 29059)
+++ DOM/PM/Maatwerk/Calc/HF/impl/LBX/SpoelbakHalffabItemVerwerker.cls.xml	(.../SpoelbakHalffabItemVerwerker.cls.xml)	(revision 30376)
@@ -4,8 +4,7 @@
 <Super>TECH.Mockable</Super>
 
 <Method name="VerdubbelAantalIndienSpoelbak">
-<FormalSpec>HalffabItem:DOM.PM.Maatwerk.Calc.HF.IHalffabItem="",IngegevenKenmerken:DOM.PM.Maatwerk.Calc.Common.impl.LBXKenmerkenv01</FormalSpec>
-<ReturnType>DOM.PM.Maatwerk.Calc.HF.IHalffabItem</ReturnType>
+<FormalSpec><![CDATA[&HalffabItem:DOM.PM.Maatwerk.Calc.HF.IHalffabItem="",IngegevenKenmerken:DOM.PM.Maatwerk.Calc.Common.impl.LBXKenmerkenv01]]></FormalSpec>
 <Implementation><![CDATA[
 	If $IsObject(HalffabItem){
 		If IngegevenKenmerken.Klasse = ##class(DOM.PM.enu.LBXKlasse).Spoelbak(){
@@ -17,7 +16,7 @@
 			}
 		}
 	}
-	Quit HalffabItem
+	Quit
 ]]></Implementation>
 </Method>
 </Class>
Index: DOM/PM/Maatwerk/Calc/HF/SamengesteldHalffabItem/GesorteerdOpRolIterator.cls.xml
===================================================================
diff -u
--- DOM/PM/Maatwerk/Calc/HF/SamengesteldHalffabItem/GesorteerdOpRolIterator.cls.xml	(revision 0)
+++ DOM/PM/Maatwerk/Calc/HF/SamengesteldHalffabItem/GesorteerdOpRolIterator.cls.xml	(revision 30376)
@@ -0,0 +1,68 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="DOM.PM.Maatwerk.Calc.HF.SamengesteldHalffabItem.GesorteerdOpRolIterator">
+<Super>TECH.RegisteredObject,TECH.Iterator</Super>
+
+<Property name="HalffabItems">
+<Type>DOM.PM.Maatwerk.Calc.HF.IHalffabItem</Type>
+<Collection>list</Collection>
+<Private>1</Private>
+</Property>
+
+<Property name="HalffabItemsIndex">
+<Type>%List</Type>
+<Collection>array</Collection>
+<Private>1</Private>
+</Property>
+
+<Property name="IndexIterator">
+<Type>TECH.Iterator</Type>
+<Private>1</Private>
+</Property>
+
+<Method name="%OnNew">
+<FormalSpec>HalffabItems:%CacheString,HalffabItemsIndex:%CacheString</FormalSpec>
+<Private>1</Private>
+<ProcedureBlock>1</ProcedureBlock>
+<ReturnType>%Status</ReturnType>
+<ServerOnly>1</ServerOnly>
+<Implementation><![CDATA[
+	set ..HalffabItems = HalffabItems
+	set ..HalffabItemsIndex = HalffabItemsIndex
+
+	do ..Reset()
+	Quit $$$OK
+]]></Implementation>
+</Method>
+
+<Method name="HasNext">
+<Description>
+Returns true if the iteration has more elements.</Description>
+<ReturnType>%Boolean</ReturnType>
+<Implementation><![CDATA[	quit ..IndexIterator.HasNext()
+]]></Implementation>
+</Method>
+
+<Method name="Key">
+<ReturnType>%String</ReturnType>
+<Implementation><![CDATA[	quit ..IndexIterator.Key()
+]]></Implementation>
+</Method>
+
+<Method name="Next">
+<ReturnType>%CacheString</ReturnType>
+<Implementation><![CDATA[
+	#dim IndexData As %List = ..IndexIterator.Next()
+	#dim Next As DOM.PM.Maatwerk.Calc.HF.IHalffabItem = ..HalffabItems.GetAt($listget(IndexData))
+	quit Next
+]]></Implementation>
+</Method>
+
+<Method name="Reset">
+<Implementation><![CDATA[	set ..IndexIterator = ##class(TECH.ListIterator).%New(..HalffabItemsIndex)
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>
Index: vhTest/Integratie/Productie/Planning/ActieveBatches/Taorbox/Aansturing/TestLosseComponent.cls.xml
===================================================================
diff -u -r30334 -r30376
--- vhTest/Integratie/Productie/Planning/ActieveBatches/Taorbox/Aansturing/TestLosseComponent.cls.xml	(.../TestLosseComponent.cls.xml)	(revision 30334)
+++ vhTest/Integratie/Productie/Planning/ActieveBatches/Taorbox/Aansturing/TestLosseComponent.cls.xml	(.../TestLosseComponent.cls.xml)	(revision 30376)
@@ -4,6 +4,8 @@
 <Super>vhTest.Integratie.Productie.Planning.ActieveBatches.Taorbox.Aansturing.TestBase,vhTest.DOM.PM.Maatwerk.TAX.BaseLosseComponent</Super>
 
 <Parameter name="SkipTestCase">
+<Description>
+Indien true wordt de gehele testcase niet uitgevoerd</Description>
 <Type>%Boolean</Type>
 <Default>1</Default>
 </Parameter>
@@ -21,7 +23,6 @@
 	#dim ProductieWijzen As TECH.Iterator = ..GeefLosseComponentProductieWijzeIterator()
 	while (ProductieWijzen.HasNext()) {
 		#dim ProductieWijze As DOM.PM.enu.TAORProductieWijze = ProductieWijzen.Next()
-		continue:(ProductieWijze = ..Enum.ProductieWijze.Volledig)
 		do Laden.Insert(##class(vhTest.Integratie.Productie.Setup.ProductInfo).%New(..GeefTAORProductID(ProductieWijze),$$$Aantal))
 	}
 	
@@ -41,14 +42,6 @@
 	Quit ..MaakProduct(TAORIngegevenKenmerken)
 ]]></Implementation>
 </Method>
-
-<Method name="OnAfterOneTest">
-<FormalSpec>aTestCase:%String</FormalSpec>
-<Implementation><![CDATA[
-	do ##super(aTestCase)
-	kill ^DOM.PM.Maatwerk.TAOR.LosseComponentD
-]]></Implementation>
-</Method>
 </Class>
 
 
Index: DOM/PM/Maatwerk/Calc/HF/impl/LBX/Builder/HFFrontBevestigingv001.cls.xml
===================================================================
diff -u -r29059 -r30376
--- DOM/PM/Maatwerk/Calc/HF/impl/LBX/Builder/HFFrontBevestigingv001.cls.xml	(.../HFFrontBevestigingv001.cls.xml)	(revision 29059)
+++ DOM/PM/Maatwerk/Calc/HF/impl/LBX/Builder/HFFrontBevestigingv001.cls.xml	(.../HFFrontBevestigingv001.cls.xml)	(revision 30376)
@@ -24,7 +24,7 @@
 <FormalSpec><![CDATA[&HalffabItem:DOM.PM.Maatwerk.Calc.HF.IHalffabItem,IngegevenKenmerken:DOM.PM.Maatwerk.Calc.Common.IngegevenKenmerken,Context:DOM.PM.Maatwerk.Calc.HF.HalffabContext,&HalffabList:%ListOfObjects]]></FormalSpec>
 <Implementation><![CDATA[
 	Do ##super(HalffabItem, IngegevenKenmerken, Context, HalffabList)
-	Set HalffabItem = ..SpoelbakHalffabItemVerwerker.VerdubbelAantalIndienSpoelbak(HalffabItem,IngegevenKenmerken)
+	Do ..SpoelbakHalffabItemVerwerker.VerdubbelAantalIndienSpoelbak(HalffabItem,IngegevenKenmerken)
 ]]></Implementation>
 </Method>
 </Class>
Index: DOM/PM/Maatwerk/Calc/HF/HalffabSpec.cls.xml
===================================================================
diff -u -r29708 -r30376
--- DOM/PM/Maatwerk/Calc/HF/HalffabSpec.cls.xml	(.../HalffabSpec.cls.xml)	(revision 29708)
+++ DOM/PM/Maatwerk/Calc/HF/HalffabSpec.cls.xml	(.../HalffabSpec.cls.xml)	(revision 30376)
@@ -238,7 +238,7 @@
 	}
 	
 	Set Context.HalffabItemsBoom.Wortel =..Builder.GeefHalffabItem(IngegevenKenmerken,Context)
-	If (SpecialsHalffabItems.HalffabItems.Count() > 0) {
+	If (SpecialsHalffabItems.HeeftHalffabItems() > 0) {
 		Do Context.HalffabItemsBoom.AddHalffabItem(SpecialsHalffabItems)
 		Do Context.HalffabItemsBoom.Wortel.VoegToe(SpecialsHalffabItems)
 	}
@@ -249,17 +249,14 @@
 <FormalSpec>Context:DOM.PM.Maatwerk.Calc.HF.HalffabContext,SamengesteldHalffabItem:DOM.PM.Maatwerk.Calc.HF.SamengesteldHalffabItem</FormalSpec>
 <Private>1</Private>
 <Implementation><![CDATA[
-	#dim Iterator As TECH.Iterator = ##class(TECH.ReversedListIterator).%New(SamengesteldHalffabItem.HalffabItems)
-	While (Iterator.HasNext())
-	{
+	#dim Iterator As TECH.Iterator = SamengesteldHalffabItem.GeefHalffabItemsIteratorReversedIterator()
+	While (Iterator.HasNext()) {
 		#dim HalffabItem As DOM.PM.Maatwerk.Calc.HF.IHalffabItem = Iterator.Next()
-		If ('HalffabItem.OpnemenInEindproduct) && ('HalffabItem.%Extends("DOM.PM.Maatwerk.Calc.HF.InbegrepenHalffabItem"))
-		{
-			Do SamengesteldHalffabItem.HalffabItems.RemoveAt(HalffabItem.GeefRol())
+		If ('HalffabItem.OpnemenInEindproduct) && ('HalffabItem.%Extends("DOM.PM.Maatwerk.Calc.HF.InbegrepenHalffabItem")) {
+			Do SamengesteldHalffabItem.VerwijderHalffabItem(HalffabItem.GeefRol())
 			Do Context.HalffabItemsBoom.VerwijderHalffabItem(HalffabItem)
 		}
-		ElseIf (HalffabItem.%Extends("DOM.PM.Maatwerk.Calc.HF.SamengesteldHalffabItem"))
-		{
+		ElseIf (HalffabItem.%Extends("DOM.PM.Maatwerk.Calc.HF.SamengesteldHalffabItem")) {
 			Do ..VerwijderNietOpTeNemenKindItems(Context, HalffabItem)
 		}
 	}
@@ -272,14 +269,12 @@
 <Implementation><![CDATA[
 	// De aantallen op de samengestelde halffab items "doorduwen" naar de kinderen
 	// Zo hoeft code die de items gebruikt (bouwsteen creator, maatwerk viewer,...) niet telkens zelf alles te accumuleren
-	#dim Iterator As TECH.Iterator = ##class(TECH.ListIterator).%New(SamengesteldHalffabItem.HalffabItems)
+	#dim Iterator As TECH.Iterator = SamengesteldHalffabItem.GeefHalffabItemsIterator()
 	Set GecumuleerdAantal = GecumuleerdAantal * SamengesteldHalffabItem.Aantal
 	Set SamengesteldHalffabItem.Aantal = 1
-	While (Iterator.HasNext())
-	{
+	While (Iterator.HasNext()) {
 		#dim HalffabItem As DOM.PM.Maatwerk.Calc.HF.IHalffabItem = Iterator.Next()
-		If (HalffabItem.%Extends("DOM.PM.Maatwerk.Calc.HF.SamengesteldHalffabItem"))
-		{
+		If (HalffabItem.%Extends("DOM.PM.Maatwerk.Calc.HF.SamengesteldHalffabItem")) {
 			Do ..VerplaatsSamengesteldHalffabItemAantalNaarKinderen(Context, HalffabItem, GecumuleerdAantal)
 		} Else {
 			Set HalffabItem.Aantal = HalffabItem.Aantal * GecumuleerdAantal
Index: DOM/PM/Maatwerk/Calc/HF/impl/LBX/Builder/HFBoxCoverVoorv000.cls.xml
===================================================================
diff -u -r29059 -r30376
--- DOM/PM/Maatwerk/Calc/HF/impl/LBX/Builder/HFBoxCoverVoorv000.cls.xml	(.../HFBoxCoverVoorv000.cls.xml)	(revision 29059)
+++ DOM/PM/Maatwerk/Calc/HF/impl/LBX/Builder/HFBoxCoverVoorv000.cls.xml	(.../HFBoxCoverVoorv000.cls.xml)	(revision 30376)
@@ -49,7 +49,7 @@
 <FormalSpec><![CDATA[&HalffabItem:DOM.PM.Maatwerk.Calc.HF.IHalffabItem,IngegevenKenmerken:DOM.PM.Maatwerk.Calc.Common.IngegevenKenmerken,Context:DOM.PM.Maatwerk.Calc.HF.HalffabContext,&HalffabList:%ListOfObjects]]></FormalSpec>
 <Implementation><![CDATA[
 	Do ##super(HalffabItem, IngegevenKenmerken, Context, HalffabList)
-	Set HalffabItem = ..SpoelbakHalffabItemVerwerker.VerdubbelAantalIndienSpoelbak(HalffabItem,IngegevenKenmerken)
+	Do ..SpoelbakHalffabItemVerwerker.VerdubbelAantalIndienSpoelbak(HalffabItem,IngegevenKenmerken)
 ]]></Implementation>
 </Method>
 </Class>
Index: vhTest/Fake/DOM/PM/Maatwerk/Calc/HF/impl/LBX/Builder/HFBoxCoverAchterv000.cls.xml
===================================================================
diff -u -r29059 -r30376
--- vhTest/Fake/DOM/PM/Maatwerk/Calc/HF/impl/LBX/Builder/HFBoxCoverAchterv000.cls.xml	(.../HFBoxCoverAchterv000.cls.xml)	(revision 29059)
+++ vhTest/Fake/DOM/PM/Maatwerk/Calc/HF/impl/LBX/Builder/HFBoxCoverAchterv000.cls.xml	(.../HFBoxCoverAchterv000.cls.xml)	(revision 30376)
@@ -16,8 +16,7 @@
 
 <Method name="PostProcessHalffabItem">
 <FormalSpec><![CDATA[&HalffabItem:DOM.PM.Maatwerk.Calc.HF.IHalffabItem,IngegevenKenmerken:DOM.PM.Maatwerk.Calc.Common.IngegevenKenmerken,Context:DOM.PM.Maatwerk.Calc.HF.HalffabContext,&HalffabList:%ListOfObjects]]></FormalSpec>
-<Implementation><![CDATA[
-]]></Implementation>
+<Implementation><![CDATA[]]></Implementation>
 </Method>
 </Class>