Index: vhTest/Mock/APPS/PM/Maatwerk/impl/BerekeningServiceIngegevenKenmerken.cls.xml
===================================================================
diff -u -r42823 -r43297
--- vhTest/Mock/APPS/PM/Maatwerk/impl/BerekeningServiceIngegevenKenmerken.cls.xml	(.../BerekeningServiceIngegevenKenmerken.cls.xml)	(revision 42823)
+++ vhTest/Mock/APPS/PM/Maatwerk/impl/BerekeningServiceIngegevenKenmerken.cls.xml	(.../BerekeningServiceIngegevenKenmerken.cls.xml)	(revision 43297)
@@ -36,12 +36,6 @@
 <Implementation><![CDATA[	do ..VerwerkMethodCall("DesactiveerCache")
 ]]></Implementation>
 </Method>
-
-<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>
-<Implementation><![CDATA[	do ..VerwerkMethodCall("LogBoom",CachingInfo,IngegevenKenmerken,BerekeningsSpecificatie,MaatwerkAanpassing,Boom,CacheKey)
-]]></Implementation>
-</Method>
 </Class>
 
 
Index: APPS/PM/Maatwerk/impl/BerekeningServiceIngegevenKenmerken.cls.xml
===================================================================
diff -u -r42938 -r43297
--- APPS/PM/Maatwerk/impl/BerekeningServiceIngegevenKenmerken.cls.xml	(.../BerekeningServiceIngegevenKenmerken.cls.xml)	(revision 42938)
+++ APPS/PM/Maatwerk/impl/BerekeningServiceIngegevenKenmerken.cls.xml	(.../BerekeningServiceIngegevenKenmerken.cls.xml)	(revision 43297)
@@ -19,12 +19,14 @@
 <Type>%Boolean</Type>
 <InitialExpression>0</InitialExpression>
 <Private>1</Private>
+<ReadOnly>1</ReadOnly>
 </Property>
 
 <Property name="CacheGrootte">
 <Type>%Integer</Type>
 <InitialExpression>10</InitialExpression>
 <Private>1</Private>
+<ReadOnly>1</ReadOnly>
 </Property>
 
 <Method name="%OnNew">
@@ -36,7 +38,7 @@
 	set ..IngegevenKenmerkenAPI = ##class(DOM.PM.impl.IngegevenKenmerkenAPIimpl).%New()
 	Set ..Logger = ##class(vhLib.Logger).%New("")
 	Set:('$IsObject($Get(%HalffabItemsBoomCache))) %HalffabItemsBoomCache = ##class(%ArrayOfObjects).%New()
-	Set:(""=$Get(%CachingHalfFabBomenActief)) %CachingHalfFabBomenActief = "1"
+	Set:(""=$Get(%CachingHalfFabBomenActief)) %CachingHalfFabBomenActief = ..CachingActief
 	Quit $$$OK
 ]]></Implementation>
 </Method>
@@ -125,6 +127,7 @@
 
 <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>
 </Method>