Index: DOM/PM/Maatwerk/LadeInfo/Plaat.cls.xml
===================================================================
diff -u -r36882 -r36904
--- DOM/PM/Maatwerk/LadeInfo/Plaat.cls.xml	(.../Plaat.cls.xml)	(revision 36882)
+++ DOM/PM/Maatwerk/LadeInfo/Plaat.cls.xml	(.../Plaat.cls.xml)	(revision 36904)
@@ -1,7 +1,6 @@
 <?xml version="1.0" encoding="UTF-8"?>
 <Export generator="Cache" version="24">
 <Class name="DOM.PM.Maatwerk.LadeInfo.Plaat">
-<Abstract>1</Abstract>
 <Super>TECH.Mockable</Super>
 
 <Property name="GewichtBepaler">
Index: vhUnitTest/DOM/PM/Maatwerk/LadeInfo/Plaat/Test.cls.xml
===================================================================
diff -u
--- vhUnitTest/DOM/PM/Maatwerk/LadeInfo/Plaat/Test.cls.xml	(revision 0)
+++ vhUnitTest/DOM/PM/Maatwerk/LadeInfo/Plaat/Test.cls.xml	(revision 36904)
@@ -0,0 +1,22 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="vhUnitTest.DOM.PM.Maatwerk.LadeInfo.Plaat.Test">
+<Super>vhUnitTest.TestCase</Super>
+
+<Method name="Test: GewichtBepaler wordt opgeroepen bij opvragen van het gewicht">
+<Implementation><![CDATA[
+	#dim VerwachtGewicht As TECH.Weight = $$$DummyInteger
+	#dim GewichtBepalerMock As vhTest.Mock.DOM.PM.Maatwerk.LadeInfo.impl.Plaat.GewichtBepaler = ##class(vhTest.Mock.DOM.PM.Maatwerk.LadeInfo.impl.Plaat.GewichtBepaler).%New()
+	#dim Plaat As DOM.PM.Maatwerk.LadeInfo.Plaat = ##class(DOM.PM.Maatwerk.LadeInfo.impl.TAX.BodemPlaat).%New("", "", "", GewichtBepalerMock)
+	
+	Do GewichtBepalerMock.VerwachtMethodCall("GeefGewicht", Plaat).DanReturn(VerwachtGewicht)
+	
+	Do $$$AssertEquals(Plaat.GeefGewicht(), VerwachtGewicht)
+	
+	Do GewichtBepalerMock.Verifieer()
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>
Index: vhTest/Mock/DOM/PM/Maatwerk/LadeInfo/Plaat.cls.xml
===================================================================
diff -u -r36882 -r36904
--- vhTest/Mock/DOM/PM/Maatwerk/LadeInfo/Plaat.cls.xml	(.../Plaat.cls.xml)	(revision 36882)
+++ vhTest/Mock/DOM/PM/Maatwerk/LadeInfo/Plaat.cls.xml	(.../Plaat.cls.xml)	(revision 36904)
@@ -27,6 +27,12 @@
 ]]></Implementation>
 </Method>
 
+<Method name="GeefGewicht">
+<ReturnType>TECH.Weight</ReturnType>
+<Implementation><![CDATA[	quit ..VerwerkMethodCall("GeefGewicht")
+]]></Implementation>
+</Method>
+
 <Method name="GeefKleur">
 <ReturnType>TECH.Enumeration</ReturnType>
 <Implementation><![CDATA[	quit ..VerwerkMethodCall("GeefKleur")