Index: vhUnitTest/APPS/Halux/PPS/Activiteit/impl/TAOR/Zijkant/OpdeelzaagUitvoeringInfoAanvuller/VulAan/Test.cls.xml
===================================================================
diff -u -r30755 -r30984
--- vhUnitTest/APPS/Halux/PPS/Activiteit/impl/TAOR/Zijkant/OpdeelzaagUitvoeringInfoAanvuller/VulAan/Test.cls.xml	(.../Test.cls.xml)	(revision 30755)
+++ vhUnitTest/APPS/Halux/PPS/Activiteit/impl/TAOR/Zijkant/OpdeelzaagUitvoeringInfoAanvuller/VulAan/Test.cls.xml	(.../Test.cls.xml)	(revision 30984)
@@ -8,6 +8,11 @@
 <Default>12345</Default>
 </Parameter>
 
+<Parameter name="DummyOvermaatInMM">
+<Type>%Numeric</Type>
+<Default>3</Default>
+</Parameter>
+
 <Property name="OvermaatBepaler">
 <Type>APPS.Halux.Machine.OpdeelZaag.impl.OvermaatBepaler</Type>
 <Private>1</Private>
@@ -54,7 +59,7 @@
 	
 	#dim ZijkantInfoPlaatStub As vhTest.Mock.DOM.PM.Maatwerk.LadeInfo.impl.TAX.ZijkantPlaat = ..GeefZijkantPlaatInfoMock(ZijkantInfoMock)
 	Set OvermaatBepalerMock = ##class(vhTest.Mock.APPS.Halux.Machine.OpdeelZaag.impl.OvermaatBepaler).%New()
-	Do OvermaatBepalerMock.VerwachtMethodCall("BepaalOvermaat", ZijkantInfoMock).DanReturn($$$DummyInteger)
+	Do OvermaatBepalerMock.VerwachtMethodCall("BepaalOvermaat", ZijkantInfoMock).DanReturn(..#DummyOvermaatInMM)
 	Set ..OvermaatBepaler = OvermaatBepalerMock
 	
 	Set Aanvuller = ##class(APPS.Halux.PPS.Activiteit.impl.TAOR.Zijkant.OpdeelzaagOptimalisatieDataAanvuller).%New(ZijkantInfoPlaatStub, ..Const.Binnenkant , ..OvermaatBepaler)
@@ -106,8 +111,8 @@
 	Do $$$AssertEquals(OpdeelzaagUitvoeringInfo.OptimalisatieData.Rol,"ZijkantPlaat")
 	Do $$$AssertEquals(OpdeelzaagUitvoeringInfo.OptimalisatieData.Aantal,1)
 	Do $$$AssertEquals(OpdeelzaagUitvoeringInfo.OptimalisatieData.Dikte,2.5)
-	Do $$$AssertEquals(OpdeelzaagUitvoeringInfo.OptimalisatieData.Lengte,..LengteInMM+$$$DummyInteger)
-	Do $$$AssertEquals(OpdeelzaagUitvoeringInfo.OptimalisatieData.Breedte,..HoogteInMM)
+	Do $$$AssertEquals(OpdeelzaagUitvoeringInfo.OptimalisatieData.Lengte,..LengteInMM+..#DummyOvermaatInMM)
+	Do $$$AssertEquals(OpdeelzaagUitvoeringInfo.OptimalisatieData.Breedte,..HoogteInMM+..#DummyOvermaatInMM)
 	Do $$$AssertEquals(OpdeelzaagUitvoeringInfo.OptimalisatieData.Kleur,..Kleur)
 	Do $$$AssertEquals(OpdeelzaagUitvoeringInfo.OptimalisatieData.Decor,..Decor,"")
 ]]></Implementation>