Index: vhPowerTools/DOM/PM/Maatwerk/Calc/Common/IKIDService.cls.xml
===================================================================
diff -u -r64614 -r68714
--- vhPowerTools/DOM/PM/Maatwerk/Calc/Common/IKIDService.cls.xml	(.../IKIDService.cls.xml)	(revision 64614)
+++ vhPowerTools/DOM/PM/Maatwerk/Calc/Common/IKIDService.cls.xml	(.../IKIDService.cls.xml)	(revision 68714)
@@ -64,6 +64,23 @@
 ]]></Implementation>
 </Method>
 
+<Method name="HerberekenHashesVoorAlleLegraboxenv01">
+<Implementation><![CDATA[
+	lock +@..#LockString:0 
+	do:$$$Not($Test) ##class(TECH.ExceptionHandler).Throw(##class(TECH.Exceptions.LockedException).%New("IKIDService is in use"))
+		
+	set Repo = ##class(DOM.PM.Maatwerk.Calc.Common.impl.IKIDHashDataRepository).%New()
+	#dim IDs As %ListOfDataTypes = Repo.GeefKenmerkIKIDHashDataSetVoorAlleLegraboxenv01()
+	#dim IDIterator As TECH.Iterator = ##class(TECH.ListIterator).%New(IDs)
+	while IDIterator.HasNext() {
+		#dim ID As %String = IDIterator.Next()
+		do ..DoHerberekenHash(ID)
+	}
+	
+	lock -@..#LockString
+]]></Implementation>
+</Method>
+
 <Method name="HerberekenHash">
 <FormalSpec>IKIDid:%String</FormalSpec>
 <Implementation><![CDATA[
Index: DOM/PM/Maatwerk/Calc/Common/impl/IKIDHashDataRepository.cls.xml
===================================================================
diff -u -r64448 -r68714
--- DOM/PM/Maatwerk/Calc/Common/impl/IKIDHashDataRepository.cls.xml	(.../IKIDHashDataRepository.cls.xml)	(revision 64448)
+++ DOM/PM/Maatwerk/Calc/Common/impl/IKIDHashDataRepository.cls.xml	(.../IKIDHashDataRepository.cls.xml)	(revision 68714)
@@ -82,6 +82,22 @@
 	quit IKIDHashDataSet
 ]]></Implementation>
 </Method>
+
+<Method name="GeefKenmerkIKIDHashDataSetVoorAlleLegraboxenv01">
+<ReturnType>%ListOfDataTypes</ReturnType>
+<Implementation><![CDATA[
+	#dim Tabel As %String = "DOM_PM_Maatwerk_Calc_Common_impl.LBXKenmerkenv01"
+	#dim Query As %String = "SELECT HashData.IKID As ID FROM DOM_PM_Maatwerk_Calc_Common_impl.IKIDHashData HashData JOIN "_Tabel_" Kenmerk ON Kenmerk.ID = HashData.IngegevenKenmerken"
+
+	#dim ResultSet As TECH.ResultSet = ..QueryAPI.GetDynamicResultSet(Query)
+
+	#dim IKIDHashDataSet As %ListOfDataTypes = ..ResultSetToListOfDataTypes(ResultSet) 
+
+	Do ResultSet.Close()
+
+	Quit IKIDHashDataSet
+]]></Implementation>
+</Method>
 </Class>