Index: DOM/PM/Maatwerk/LadeInfo/impl/TAX/Rug.cls.xml
===================================================================
diff -u -r30280 -r30655
--- DOM/PM/Maatwerk/LadeInfo/impl/TAX/Rug.cls.xml	(.../Rug.cls.xml)	(revision 30280)
+++ DOM/PM/Maatwerk/LadeInfo/impl/TAX/Rug.cls.xml	(.../Rug.cls.xml)	(revision 30655)
@@ -13,6 +13,11 @@
 <Private>1</Private>
 </Property>
 
+<Property name="TAORRol">
+<Type>DOM.PM.Maatwerk.Calc.HF.enu.TAORRol.AutoComplete</Type>
+<Private>1</Private>
+</Property>
+
 <Method name="%OnNew">
 <FormalSpec>Lade:DOM.PM.Maatwerk.LadeInfo.Lade,HalffabItem:DOM.PM.Maatwerk.Calc.HF.SamengesteldHalffabItem,Kenmerken:DOM.PM.Maatwerk.Calc.Common.impl.TAORKenmerken,ProductAPI:DOM.PM.ProductAPI="",LadeRugUtils:DOM.PM.Maatwerk.Lade.RugUtils=""</FormalSpec>
 <Private>1</Private>
@@ -55,9 +60,9 @@
 <Implementation><![CDATA[
 	#dim Kleuren As %ArrayOfDataTypes = ##class(%ArrayOfDataTypes).%New()
 	
-	do Kleuren.SetAt(..GeefKleur(), "1")
-	do Kleuren.SetAt("", "2")
-	do Kleuren.SetAt(..GeefKleur(), "3")
+	do Kleuren.SetAt(..GeefKleur(), 1)
+	do Kleuren.SetAt("", 2)
+	do Kleuren.SetAt(..HalffabItem.GeefHalffabItem(..TAORRol.KantenBand).GeefHalffab().LadeKleur, 3)
 	
 	quit Kleuren
 ]]></Implementation>