Index: DOM/PM/Maatwerk/Calc/HF/HalffabItemsBoom.cls.xml
===================================================================
diff -u -r29857 -r30279
--- DOM/PM/Maatwerk/Calc/HF/HalffabItemsBoom.cls.xml	(.../HalffabItemsBoom.cls.xml)	(revision 29857)
+++ DOM/PM/Maatwerk/Calc/HF/HalffabItemsBoom.cls.xml	(.../HalffabItemsBoom.cls.xml)	(revision 30279)
@@ -63,7 +63,30 @@
 
 <Method name="GeefHalffabItemsIterator">
 <ReturnType>TECH.Iterator</ReturnType>
-<Implementation><![CDATA[	Quit ##class(TECH.ListIterator).%New(..HalffabItems)
+<Implementation><![CDATA[
+	#dim IsTAOR As %Boolean = (..Wortel.GeefRol() = ##class(DOM.PM.enu.LadeVariant).LogicalToDisplay(##class(DOM.PM.enu.LadeVariant).TAOR()))
+	
+	// Tijdelijke lelijke fix i.v.m.  [UST1242] TAX-LC : HalffabItemsBoom is veranderd 
+	If IsTAOR {
+		Set HFItemsIt = ##class(TECH.ListIterator).%New(..HalffabItems)
+		Set HFItemsZoalsVroeger = ##class(%ArrayOfObjects).%New()
+		While (HFItemsIt.HasNext()) {
+			#dim HFItem As DOM.PM.Maatwerk.Calc.HF.IHalffabItem = HFItemsIt.Next()
+			If (##class(TECH.StringUtils).Equals(HFItem.GeefRol(), "Rug","Front","ZijkantLinks","ZijkantRechts")) {
+				#dim SubItemsIt As TECH.Iterator = HFItem.GeefHalffabItemsIterator()
+				While (SubItemsIt.HasNext()) {
+					Do HFItemsZoalsVroeger.SetAt(SubItemsIt.Next(),SubItemsIt.Key())
+				}
+			}
+			Do HFItemsZoalsVroeger.SetAt(HFItem,HFItemsIt.Key())
+		}
+	}
+	Else {
+		Set HFItemsZoalsVroeger = ..HalffabItems
+	}
+	
+
+	Quit ##class(TECH.ListIterator).%New(HFItemsZoalsVroeger)
 ]]></Implementation>
 </Method>
 </Class>