Index: Tools/Mock/MockClassBase.cls.xml
===================================================================
diff -u -r1842 -r1952
--- Tools/Mock/MockClassBase.cls.xml	(.../MockClassBase.cls.xml)	(revision 1842)
+++ Tools/Mock/MockClassBase.cls.xml	(.../MockClassBase.cls.xml)	(revision 1952)
@@ -26,6 +26,10 @@
 <FormalSpec>MethodNaam:%String,VerwachteParameterWaarden...:%String</FormalSpec>
 <ReturnType>Tools.Mock.MethodCallStub</ReturnType>
 <Implementation><![CDATA[
+	if '##class(%Dictionary.CompiledMethod).%ExistsId($classname($this)_"||"_MethodNaam) {
+		do ##class(TECH.ExceptionHandler).Throw(##class(TECH.Exceptions.IllegalUsageException).%New("Method "_$classname($this)_":"_MethodNaam_" is niet meer in gebruik!!"))
+	}
+	
 	#dim VerwachteParameterWaardenList As %ListOfDataTypes = ##class(TECH.ListUtils).MultiDimensionalToListOfDataTypes( .VerwachteParameterWaarden )		
 	
 	#dim MethodCallStub As Tools.Mock.MethodCallStub = ..FindMethodCall(MethodNaam,VerwachteParameterWaardenList)