Index: DOM/PM/Maatwerk/LadeInfo/impl/LadeOnderdeel.cls.xml
===================================================================
diff -u -r29332 -r29903
--- DOM/PM/Maatwerk/LadeInfo/impl/LadeOnderdeel.cls.xml	(.../LadeOnderdeel.cls.xml)	(revision 29332)
+++ DOM/PM/Maatwerk/LadeInfo/impl/LadeOnderdeel.cls.xml	(.../LadeOnderdeel.cls.xml)	(revision 29903)
@@ -74,12 +74,13 @@
 <ReturnType>%ArrayOfDataTypes</ReturnType>
 <Implementation><![CDATA[
 	Set Kleuren = ##class(%ArrayOfDataTypes).%New()
-	Do Kleuren.SetAt(1,..GeefKleur())
-	Do Kleuren.SetAt(2,..GeefKleur())
-	Do Kleuren.SetAt(3,..GeefKleur())
-	Do Kleuren.SetAt(4,..GeefKleur())
-	Do Kleuren.SetAt(5,..GeefKleur())
-	Do Kleuren.SetAt(6,..GeefKleur())
+	Do Kleuren.SetAt(..GeefKleur(),1)
+	Do Kleuren.SetAt(..GeefKleur(),2)
+	Do Kleuren.SetAt(..GeefKleur(),3)
+	Do Kleuren.SetAt(..GeefKleur(),4)
+	Do Kleuren.SetAt(..GeefKleur(),5)
+	Do Kleuren.SetAt(..GeefKleur(),6)
+	
 	Quit Kleuren
 ]]></Implementation>
 </Method>