Index: Tools/Wlip.cls.xml
===================================================================
diff -u -r2064 -r2074
--- Tools/Wlip.cls.xml	(.../Wlip.cls.xml)	(revision 2064)
+++ Tools/Wlip.cls.xml	(.../Wlip.cls.xml)	(revision 2074)
@@ -133,6 +133,18 @@
 ]]></Implementation>
 </Method>
 
+<Method name="HalffabItemsBoom">
+<FormalSpec>HalffabItemsBoom:DOM.PM.Maatwerk.Calc.HF.HalffabItemsBoom</FormalSpec>
+<Implementation><![CDATA[
+	Do ..Wlip("Boom",3)
+	#dim It As TECH.Iterator = HalffabItemsBoom.GeefHalffabItemsIterator()
+	While It.HasNext() {
+		#dim HalffabItem As DOM.PM.Maatwerk.Calc.HF.IHalffabItem = It.Next()
+		Do ..Wlip($$$TAB_"Rol:"_HalffabItem.GeefVolledigeRolNaam()_", Aantal:"_HalffabItem.Aantal_", Type:"_HalffabItem, 0, 0, 0)
+	}
+]]></Implementation>
+</Method>
+
 <Method name="Wlip">
 <FormalSpec>String:TECH.String="",Count:TECH.Integer,MetTijd:%Boolean=1,MetLocatieData:%Boolean=1</FormalSpec>
 <Private>1</Private>