Index: vhPowerTools/DOM/PM/Maatwerk/Calc/Common/IKIDService.cls.xml
===================================================================
diff -u -r69085 -r70072
--- vhPowerTools/DOM/PM/Maatwerk/Calc/Common/IKIDService.cls.xml	(.../IKIDService.cls.xml)	(revision 69085)
+++ vhPowerTools/DOM/PM/Maatwerk/Calc/Common/IKIDService.cls.xml	(.../IKIDService.cls.xml)	(revision 70072)
@@ -86,6 +86,83 @@
 ]]></Implementation>
 </Method>
 
+<Method name="HerberekenHashesVoorAlleLegraboxen">
+<Implementation><![CDATA[
+	Write !, "Start ophalen configuraties: "_ ##class(TECH.DateTime).CurrentTimeStamp()
+	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.GeefKenmerkIKIDHashDataSetVoorAlleKleineLBXMetProbox()
+	#dim IDIterator As TECH.Iterator = ##class(TECH.ListIterator).%New(IDs)
+	
+	Write !, "Start herberekenen LBX probox <= 650: "_ ##class(TECH.DateTime).CurrentTimeStamp()
+	
+	While IDIterator.HasNext() {
+		#dim ID As %String = IDIterator.Next()
+		If $$$Not($Data(^HerberekeningLbxHashes(ID))) {
+			do ..DoHerberekenHash(ID)
+			Set ^HerberekeningLbxHashes(ID) = "Herberekend"
+		}
+	}
+	
+	Set IDs = Repo.GeefKenmerkIKIDHashDataSetVoorAlleGroteLBXMetProbox()
+	Set IDIterator = ##class(TECH.ListIterator).%New(IDs)
+	
+	Write !, "Start herberekenen LBX probox > 650: "_ ##class(TECH.DateTime).CurrentTimeStamp()
+	
+	While IDIterator.HasNext() {
+		Set ID = IDIterator.Next()
+		If $$$Not($Data(^HerberekeningLbxHashes(ID))) {
+			do ..DoHerberekenHash(ID)
+			Set ^HerberekeningLbxHashes(ID) = "Herberekend"
+		}
+	}
+	
+	Set IDs = Repo.GeefKenmerkIKIDHashDataSetVoorAlleKleineLBXMetV1()
+	Set IDIterator = ##class(TECH.ListIterator).%New(IDs)
+	
+	Write !, "Start herberekenen LBX V1 <= 650: "_ ##class(TECH.DateTime).CurrentTimeStamp()
+	
+	While IDIterator.HasNext() {
+		Set ID = IDIterator.Next()
+		If $$$Not($Data(^HerberekeningLbxHashes(ID))) {
+			do ..DoHerberekenHash(ID)
+			Set ^HerberekeningLbxHashes(ID) = "Herberekend"
+		}
+	}
+	
+	Set IDs = Repo.GeefKenmerkIKIDHashDataSetVoorAlleGroteLBXMetV1()
+	Set IDIterator = ##class(TECH.ListIterator).%New(IDs)
+	
+	Write !, "Start herberekenen LBX V1 > 650: "_ ##class(TECH.DateTime).CurrentTimeStamp()
+	
+	While IDIterator.HasNext() {
+		Set ID = IDIterator.Next()
+		If $$$Not($Data(^HerberekeningLbxHashes(ID))) {
+			do ..DoHerberekenHash(ID)
+			Set ^HerberekeningLbxHashes(ID) = "Herberekend"
+		}
+	}
+	
+	Set IDs = Repo.GeefKenmerkIKIDHashDataSetVoorAlleLBXPalletEnVHoss()
+	Set IDIterator = ##class(TECH.ListIterator).%New(IDs)
+	
+	Write !, "Start herberekenen LBX Pallet en VHoss: "_ ##class(TECH.DateTime).CurrentTimeStamp()
+	
+	While IDIterator.HasNext() {
+		Set ID = IDIterator.Next()
+		If $$$Not($Data(^HerberekeningLbxHashes(ID))) {
+			do ..DoHerberekenHash(ID)
+			Set ^HerberekeningLbxHashes(ID) = "Herberekend"
+		}
+	}
+	
+	Write !, "Stop: "_ ##class(TECH.DateTime).CurrentTimeStamp()
+	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 -r69085 -r70072
--- DOM/PM/Maatwerk/Calc/Common/impl/IKIDHashDataRepository.cls.xml	(.../IKIDHashDataRepository.cls.xml)	(revision 69085)
+++ DOM/PM/Maatwerk/Calc/Common/impl/IKIDHashDataRepository.cls.xml	(.../IKIDHashDataRepository.cls.xml)	(revision 70072)
@@ -98,6 +98,86 @@
 	Quit IKIDHashDataSet
 ]]></Implementation>
 </Method>
+
+<Method name="GeefKenmerkIKIDHashDataSetVoorAlleKleineLBXMetProbox">
+<ReturnType>%ListOfDataTypes</ReturnType>
+<Implementation><![CDATA[
+	#dim Tabel As %String = "DOM_PM_Maatwerk_Calc_Common_impl.LBXKenmerkenBasisv000"
+	#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 where Kenmerk.VerpakkingType = 'Probox' and Kenmerk.InterneBreedte <= 650"
+
+	#dim ResultSet As TECH.ResultSet = ..QueryAPI.GetDynamicResultSet(Query)
+
+	#dim IKIDHashDataSet As %ListOfDataTypes = ..ResultSetToListOfDataTypes(ResultSet) 
+
+	Do ResultSet.Close()
+
+	Quit IKIDHashDataSet
+]]></Implementation>
+</Method>
+
+<Method name="GeefKenmerkIKIDHashDataSetVoorAlleGroteLBXMetProbox">
+<ReturnType>%ListOfDataTypes</ReturnType>
+<Implementation><![CDATA[
+	#dim Tabel As %String = "DOM_PM_Maatwerk_Calc_Common_impl.LBXKenmerkenBasisv000"
+	#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 where Kenmerk.VerpakkingType = 'Probox' and Kenmerk.InterneBreedte > 650"
+
+	#dim ResultSet As TECH.ResultSet = ..QueryAPI.GetDynamicResultSet(Query)
+
+	#dim IKIDHashDataSet As %ListOfDataTypes = ..ResultSetToListOfDataTypes(ResultSet) 
+
+	Do ResultSet.Close()
+
+	Quit IKIDHashDataSet
+]]></Implementation>
+</Method>
+
+<Method name="GeefKenmerkIKIDHashDataSetVoorAlleKleineLBXMetV1">
+<ReturnType>%ListOfDataTypes</ReturnType>
+<Implementation><![CDATA[
+	#dim Tabel As %String = "DOM_PM_Maatwerk_Calc_Common_impl.LBXKenmerkenBasisv000"
+	#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 where Kenmerk.VerpakkingType = 'V1' and Kenmerk.InterneBreedte <= 650"
+
+	#dim ResultSet As TECH.ResultSet = ..QueryAPI.GetDynamicResultSet(Query)
+
+	#dim IKIDHashDataSet As %ListOfDataTypes = ..ResultSetToListOfDataTypes(ResultSet) 
+
+	Do ResultSet.Close()
+
+	Quit IKIDHashDataSet
+]]></Implementation>
+</Method>
+
+<Method name="GeefKenmerkIKIDHashDataSetVoorAlleGroteLBXMetV1">
+<ReturnType>%ListOfDataTypes</ReturnType>
+<Implementation><![CDATA[
+	#dim Tabel As %String = "DOM_PM_Maatwerk_Calc_Common_impl.LBXKenmerkenBasisv000"
+	#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 where Kenmerk.VerpakkingType = 'V1' and Kenmerk.InterneBreedte > 650"
+
+	#dim ResultSet As TECH.ResultSet = ..QueryAPI.GetDynamicResultSet(Query)
+
+	#dim IKIDHashDataSet As %ListOfDataTypes = ..ResultSetToListOfDataTypes(ResultSet) 
+
+	Do ResultSet.Close()
+
+	Quit IKIDHashDataSet
+]]></Implementation>
+</Method>
+
+<Method name="GeefKenmerkIKIDHashDataSetVoorAlleLBXPalletEnVHoss">
+<ReturnType>%ListOfDataTypes</ReturnType>
+<Implementation><![CDATA[
+	#dim Tabel As %String = "DOM_PM_Maatwerk_Calc_Common_impl.LBXKenmerkenBasisv000"
+	#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 where Kenmerk.VerpakkingType = 'Pallet' or Kenmerk.VerpakkingType = 'VHoss'"
+
+	#dim ResultSet As TECH.ResultSet = ..QueryAPI.GetDynamicResultSet(Query)
+
+	#dim IKIDHashDataSet As %ListOfDataTypes = ..ResultSetToListOfDataTypes(ResultSet) 
+
+	Do ResultSet.Close()
+
+	Quit IKIDHashDataSet
+]]></Implementation>
+</Method>
 </Class>