Index: vhDeploy/D20190404xBerekeningServiceCacheGrootte.cls.xml
===================================================================
diff -u
--- vhDeploy/D20190404xBerekeningServiceCacheGrootte.cls.xml	(revision 0)
+++ vhDeploy/D20190404xBerekeningServiceCacheGrootte.cls.xml	(revision 56036)
@@ -0,0 +1,27 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="vhDeploy.D20190404xBerekeningServiceCacheGrootte">
+<Super>vhDeploy.Deploy</Super>
+
+<Method name="ExecCode">
+<ClassMethod>1</ClassMethod>
+<Implementation><![CDATA[	Do ..ZetSleutel("APPS.PM.Maatwerk.impl.BerekeningServiceIngegevenKenmerken.CacheGrootte",100)
+]]></Implementation>
+</Method>
+
+<Method name="ZetSleutel">
+<ClassMethod>1</ClassMethod>
+<FormalSpec>Sleutel:%String,Waarde:%String</FormalSpec>
+<Private>1</Private>
+<Implementation><![CDATA[
+	if $$$Not(##class(TECH.Config.ConfigMgr).Instance().BestaatSleutel(Sleutel)){
+		Do ##class(TECH.Config.ConfigMgr).Instance().SetString(Sleutel,Waarde)
+	} else {
+		w !, "!!! configitem "_Sleutel _ " met waarde "_ ##class(TECH.Config.ConfigMgr).Instance().GetString(Sleutel) _" bestond reeds, niet aangepast."
+	}
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>
Index: APPS/PM/Maatwerk/impl/BerekeningServiceIngegevenKenmerken.cls.xml
===================================================================
diff -u -r55392 -r56036
--- APPS/PM/Maatwerk/impl/BerekeningServiceIngegevenKenmerken.cls.xml	(.../BerekeningServiceIngegevenKenmerken.cls.xml)	(revision 55392)
+++ APPS/PM/Maatwerk/impl/BerekeningServiceIngegevenKenmerken.cls.xml	(.../BerekeningServiceIngegevenKenmerken.cls.xml)	(revision 56036)
@@ -24,9 +24,8 @@
 
 <Property name="CacheGrootte">
 <Type>%Integer</Type>
-<InitialExpression>10</InitialExpression>
+<InitialExpression>100</InitialExpression>
 <Private>1</Private>
-<ReadOnly>1</ReadOnly>
 </Property>
 
 <Method name="%OnNew">
@@ -40,6 +39,8 @@
 	Set:('$IsObject($Get(%HalffabItemsBoomCache))) %HalffabItemsBoomCache = ##class(%ArrayOfObjects).%New()
 	Set:(""=$Get(%CachingHalfFabBomenActief)) %CachingHalfFabBomenActief = ..CachingActief
 	Set %CachingHalfFabBomenActief = $$$True
+	Set ..CacheGrootte = ##class(TECH.Config.ConfigMgr).Instance().GetString("APPS.PM.Maatwerk.impl.BerekeningServiceIngegevenKenmerken.CacheGrootte")
+	
 	Quit $$$OK
 ]]></Implementation>
 </Method>
@@ -134,7 +135,9 @@
 <Method name="LogBoom">
 <FormalSpec>CachingInfo:%String,IngegevenKenmerken:DOM.PM.Maatwerk.Calc.Common.IngegevenKenmerken,BerekeningsSpecificatie:DOM.PM.Maatwerk.Calc.Common.BerekeningsSpecificatie,MaatwerkAanpassing:DOM.PM.Maatwerk.Aanpassing.dto.MaatwerkAanpassing="",Boom:DOM.PM.Maatwerk.Calc.HF.HalffabItemsBoom,CacheKey:%String=""</FormalSpec>
 <Private>1</Private>
-<Implementation><![CDATA[	Do ..Logger.Debug("BerekenBoom", CachingInfo _" ; CacheKey:'"_CacheKey _"'; Boom:'"_Boom _"'; IK:'"_IngegevenKenmerken _"'; IK-ID:'"_IngegevenKenmerken.GeefID() _"'; Tag:'"_BerekeningsSpecificatie.GeefBerekenTag() _"'; Datum:'"_BerekeningsSpecificatie.GeefBerekenDatum() _"'; BerekeningWijze:'"_BerekeningsSpecificatie.GeefBerekeningWijze() _"' ; Cache-tabel:'"_%HalffabItemsBoomCache _"'")
+<Implementation><![CDATA[
+	Do ##class(Tools.Wlip).%New(127).String($j_"/"_CachingInfo _" ; CacheKey:'"_CacheKey _"'; Boom:'"_Boom _"'; IK:'"_IngegevenKenmerken _"'; IK-ID:'"_IngegevenKenmerken.GeefID() _"'; Tag:'"_BerekeningsSpecificatie.GeefBerekenTag() _"'; Datum:'"_BerekeningsSpecificatie.GeefBerekenDatum() _"'; BerekeningWijze:'"_BerekeningsSpecificatie.GeefBerekeningWijze() _"' ; Cache-tabel:'"_%HalffabItemsBoomCache _"'")
+	Do ..Logger.Debug("BerekenBoom", CachingInfo _" ; CacheKey:'"_CacheKey _"'; Boom:'"_Boom _"'; IK:'"_IngegevenKenmerken _"'; IK-ID:'"_IngegevenKenmerken.GeefID() _"'; Tag:'"_BerekeningsSpecificatie.GeefBerekenTag() _"'; Datum:'"_BerekeningsSpecificatie.GeefBerekenDatum() _"'; BerekeningWijze:'"_BerekeningsSpecificatie.GeefBerekeningWijze() _"' ; Cache-tabel:'"_%HalffabItemsBoomCache _"'")
 ]]></Implementation>
 </Method>
 </Class>