Index: vhTest/Spy/APPS/TRANSP/Offerte/impl/DHL/StapelingBepaler.cls.xml
===================================================================
diff -u -r41633 -r41660
--- vhTest/Spy/APPS/TRANSP/Offerte/impl/DHL/StapelingBepaler.cls.xml	(.../StapelingBepaler.cls.xml)	(revision 41633)
+++ vhTest/Spy/APPS/TRANSP/Offerte/impl/DHL/StapelingBepaler.cls.xml	(.../StapelingBepaler.cls.xml)	(revision 41660)
@@ -46,6 +46,12 @@
 ]]></Implementation>
 </Method>
 
+<Method name="VerwijderOudeGegevens">
+<FormalSpec>Referentie:%String</FormalSpec>
+<Implementation><![CDATA[	Do ..VerwerkMethodCall("VerwijderOudeGegevens", Referentie)
+]]></Implementation>
+</Method>
+
 <Method name="GeefCollisOpPalletList">
 <ReturnType>%ListOfObjects</ReturnType>
 <Implementation><![CDATA[	Quit ..CollisOpPalletList
Index: vhUnitTest/APPS/EC/Transport/Service/TestBerekenPalletGegevens.cls.xml
===================================================================
diff -u -r41633 -r41660
--- vhUnitTest/APPS/EC/Transport/Service/TestBerekenPalletGegevens.cls.xml	(.../TestBerekenPalletGegevens.cls.xml)	(revision 41633)
+++ vhUnitTest/APPS/EC/Transport/Service/TestBerekenPalletGegevens.cls.xml	(.../TestBerekenPalletGegevens.cls.xml)	(revision 41660)
@@ -26,7 +26,8 @@
 	Do VerkoopOfferteServiceStub.IndienMethodCall("GeefProductVerpakkingDetails",OfferteID).DanReturn(DummyVerpakkingen)
 	
 	Set StapelingBepalerSpy = ##class(vhTest.Spy.APPS.TRANSP.Offerte.impl.DHL.StapelingBepaler).%New()
-	Do StapelingBepalerSpy.VerwachtMethodCall("BerekenMetVastAantal", $$$ElkeWaarde, 16)
+	Do StapelingBepalerSpy.VerwachtMethodCall("BerekenMetVastAantal", $$$ElkeWaarde, 16).DanDoeNiks()
+	Do StapelingBepalerSpy.VerwachtMethodCall("VerwijderOudeGegevens", OfferteID).DanDoeNiks()
 	
 	Set Service = ##class(APPS.EC.Transport.Service).%New(VerkoopOfferteServiceStub, , , , , StapelingBepalerSpy)
 	Do Service.BerekenPalletGegevens(OfferteID)
@@ -53,7 +54,8 @@
 	Do VerkoopOfferteServiceMock.VerwachtMethodCall("GeefProductVerpakkingDetails",OfferteID).DanReturn(DummyVerpakkingen)
 	
 	Set StapelingBepalerSpy = ##class(vhTest.Spy.APPS.TRANSP.Offerte.impl.DHL.StapelingBepaler).%New()
-	Do StapelingBepalerSpy.VerwachtMethodCall("Bereken",$$$ElkeWaarde)
+	Do StapelingBepalerSpy.VerwachtMethodCall("Bereken",$$$ElkeWaarde).DanDoeNiks()
+	Do StapelingBepalerSpy.VerwachtMethodCall("VerwijderOudeGegevens", OfferteID).DanDoeNiks()
 	
 	Set Service = ##class(APPS.EC.Transport.Service).%New(VerkoopOfferteServiceMock, , , , , StapelingBepalerSpy)
 	Do Service.BerekenPalletGegevens(OfferteID)
@@ -82,7 +84,8 @@
 	
 	Set StapelingBepalerSpy = ##class(vhTest.Spy.APPS.TRANSP.Offerte.impl.DHL.StapelingBepaler).%New()
 	Do StapelingBepalerSpy.IndienMethodCall("Bereken", $$$ElkeWaarde).DanDoeNiks()
-	
+	Do StapelingBepalerSpy.IndienMethodCall("VerwijderOudeGegevens", $$$ElkeWaarde).DanDoeNiks()
+
 	Set Service = ##class(APPS.EC.Transport.Service).%New(VerkoopOfferteServiceMock, , , , , StapelingBepalerSpy)
 	Do Service.BerekenPalletGegevens(OfferteID)