Test
 	/// Do ^zJBLTestZoekKenmerken
	w "Zoek OL, 80 producten"
	set aantalkeer = 10
	Set totaaltijd = 0
	for i=1:1:aantalkeer {
		Set PRNrs = ##class(%ListOfDataTypes).%New()
		Do PRNrs.Insert(315014)
		Do PRNrs.Insert(557372)
		Do PRNrs.Insert(64879)
		Do PRNrs.Insert(64879)
		Do PRNrs.Insert(64936)
		Do PRNrs.Insert(64936)
		Do PRNrs.Insert(200030)
		Do PRNrs.Insert(200030)
		Do PRNrs.Insert(396730)
		Do PRNrs.Insert(396730)
		Do PRNrs.Insert(396731)
		Do PRNrs.Insert(396731)
		Do PRNrs.Insert(583763)
		Do PRNrs.Insert(583763)
		Do PRNrs.Insert(64880)
		Do PRNrs.Insert(64880)
		Do PRNrs.Insert(64937)
		Do PRNrs.Insert(64937)
		Do PRNrs.Insert(200031)
		Do PRNrs.Insert(200031)
		Do PRNrs.Insert(562940)
		Do PRNrs.Insert(562940)
		Do PRNrs.Insert(562941)
		Do PRNrs.Insert(562941)
		Do PRNrs.Insert(583764)
		Do PRNrs.Insert(583764)
		Do PRNrs.Insert(204672)
		Do PRNrs.Insert(204672)
		Do PRNrs.Insert(204673)
		Do PRNrs.Insert(204673)
		Do PRNrs.Insert(583765)
		Do PRNrs.Insert(583765)
		Do PRNrs.Insert(64872)
		Do PRNrs.Insert(64872)
		Do PRNrs.Insert(64924)
		Do PRNrs.Insert(64924)
		Do PRNrs.Insert(200020)
		Do PRNrs.Insert(200020)
		Do PRNrs.Insert(64873)
		Do PRNrs.Insert(64873)
		Do PRNrs.Insert(64927)
		Do PRNrs.Insert(64927)
		Do PRNrs.Insert(200021)
		Do PRNrs.Insert(200021)
		Do PRNrs.Insert(64874)
		Do PRNrs.Insert(64874)
		Do PRNrs.Insert(64931)
		Do PRNrs.Insert(64931)
		Do PRNrs.Insert(200022)
		Do PRNrs.Insert(200022)
		Do PRNrs.Insert(359903)
		Do PRNrs.Insert(359903)
		Do PRNrs.Insert(521355)
		Do PRNrs.Insert(521355)
		Do PRNrs.Insert(583766)
		Do PRNrs.Insert(583766)
		Do PRNrs.Insert(64875)
		Do PRNrs.Insert(64875)
		Do PRNrs.Insert(64933)
		Do PRNrs.Insert(64933)
		Do PRNrs.Insert(200023)
		Do PRNrs.Insert(200023)
		Do PRNrs.Insert(354439)
		Do PRNrs.Insert(354439)
		Do PRNrs.Insert(396268)
		Do PRNrs.Insert(396268)
		Do PRNrs.Insert(583767)
		Do PRNrs.Insert(583767)
		Do PRNrs.Insert(64877)
		Do PRNrs.Insert(64877)
		Do PRNrs.Insert(64934)
		Do PRNrs.Insert(64934)
		Do PRNrs.Insert(200024)
		Do PRNrs.Insert(200024)
		Do PRNrs.Insert(64878)
		Do PRNrs.Insert(64878)
		Do PRNrs.Insert(64935)
		Do PRNrs.Insert(64935)
		Do PRNrs.Insert(200029)
		Do PRNrs.Insert(200029)
		Set KenmerkGroepen = ##class(%ListOfDataTypes).%New()
		Do KenmerkGroepen.Insert("OL")
		
	 	Do StartTimer^vhLib
		Set Result = ##class(APPS.PM.KenmerkenService).%New().GeefProductKenmerken(PRNrs,KenmerkGroepen)	
		Do StopTimer^vhLib
		Set Time = $$GetInterval^vhLib
		Set totaaltijd = totaaltijd + $$GetInterval^vhLib
	}
	
	w $C(13,10),"gemiddelde : ",(totaaltijd/aantalkeer),!
	
	
	w "Zoek alle groepen, 80 producten"
	set aantalkeer = 10
	Set totaaltijd = 0
	for i=1:1:aantalkeer {
		Set PRNrs = ##class(%ListOfDataTypes).%New()
		Do PRNrs.Insert(315014)
		Do PRNrs.Insert(557372)
		Do PRNrs.Insert(64879)
		Do PRNrs.Insert(64879)
		Do PRNrs.Insert(64936)
		Do PRNrs.Insert(64936)
		Do PRNrs.Insert(200030)
		Do PRNrs.Insert(200030)
		Do PRNrs.Insert(396730)
		Do PRNrs.Insert(396730)
		Do PRNrs.Insert(396731)
		Do PRNrs.Insert(396731)
		Do PRNrs.Insert(583763)
		Do PRNrs.Insert(583763)
		Do PRNrs.Insert(64880)
		Do PRNrs.Insert(64880)
		Do PRNrs.Insert(64937)
		Do PRNrs.Insert(64937)
		Do PRNrs.Insert(200031)
		Do PRNrs.Insert(200031)
		Do PRNrs.Insert(562940)
		Do PRNrs.Insert(562940)
		Do PRNrs.Insert(562941)
		Do PRNrs.Insert(562941)
		Do PRNrs.Insert(583764)
		Do PRNrs.Insert(583764)
		Do PRNrs.Insert(204672)
		Do PRNrs.Insert(204672)
		Do PRNrs.Insert(204673)
		Do PRNrs.Insert(204673)
		Do PRNrs.Insert(583765)
		Do PRNrs.Insert(583765)
		Do PRNrs.Insert(64872)
		Do PRNrs.Insert(64872)
		Do PRNrs.Insert(64924)
		Do PRNrs.Insert(64924)
		Do PRNrs.Insert(200020)
		Do PRNrs.Insert(200020)
		Do PRNrs.Insert(64873)
		Do PRNrs.Insert(64873)
		Do PRNrs.Insert(64927)
		Do PRNrs.Insert(64927)
		Do PRNrs.Insert(200021)
		Do PRNrs.Insert(200021)
		Do PRNrs.Insert(64874)
		Do PRNrs.Insert(64874)
		Do PRNrs.Insert(64931)
		Do PRNrs.Insert(64931)
		Do PRNrs.Insert(200022)
		Do PRNrs.Insert(200022)
		Do PRNrs.Insert(359903)
		Do PRNrs.Insert(359903)
		Do PRNrs.Insert(521355)
		Do PRNrs.Insert(521355)
		Do PRNrs.Insert(583766)
		Do PRNrs.Insert(583766)
		Do PRNrs.Insert(64875)
		Do PRNrs.Insert(64875)
		Do PRNrs.Insert(64933)
		Do PRNrs.Insert(64933)
		Do PRNrs.Insert(200023)
		Do PRNrs.Insert(200023)
		Do PRNrs.Insert(354439)
		Do PRNrs.Insert(354439)
		Do PRNrs.Insert(396268)
		Do PRNrs.Insert(396268)
		Do PRNrs.Insert(583767)
		Do PRNrs.Insert(583767)
		Do PRNrs.Insert(64877)
		Do PRNrs.Insert(64877)
		Do PRNrs.Insert(64934)
		Do PRNrs.Insert(64934)
		Do PRNrs.Insert(200024)
		Do PRNrs.Insert(200024)
		Do PRNrs.Insert(64878)
		Do PRNrs.Insert(64878)
		Do PRNrs.Insert(64935)
		Do PRNrs.Insert(64935)
		Do PRNrs.Insert(200029)
		Do PRNrs.Insert(200029)
		Set KenmerkGroepen = ##class(%ListOfDataTypes).%New()
		
	 	Do StartTimer^vhLib
		Set Result = ##class(APPS.PM.KenmerkenService).%New().GeefProductKenmerken(PRNrs,KenmerkGroepen)	
		
		Do StopTimer^vhLib
		Set Time = $$GetInterval^vhLib
		
		Set totaaltijd = totaaltijd + $$GetInterval^vhLib
	}
	
	w $C(13,10),"gemiddelde : ",(totaaltijd/aantalkeer),!