Index: vhUnitTest/APPS/VKP/impl/OfferteService/GeefProductVerpakkingDetails/Test.cls.xml
===================================================================
diff -u -r33827 -r33828
--- vhUnitTest/APPS/VKP/impl/OfferteService/GeefProductVerpakkingDetails/Test.cls.xml	(.../Test.cls.xml)	(revision 33827)
+++ vhUnitTest/APPS/VKP/impl/OfferteService/GeefProductVerpakkingDetails/Test.cls.xml	(.../Test.cls.xml)	(revision 33828)
@@ -5,9 +5,7 @@
 
 <Method name="Test: GeefProductVerpakkingDetails geeft verpakkinglist terug met de waarden die gemapt worden vanuit de maatwerklijnen van een winkelkar.">
 <Implementation><![CDATA[
-	#dim OfferteRepositoryFake As APPS.VKP.Offerte.OfferteRepository = ##class(vhTest.Fake.APPS.VKP.Offerte.OfferteRepository).%New()
-
-	#dim OfferteService As APPS.VKP.impl.OfferteService = ##class(APPS.VKP.impl.OfferteService).%New(OfferteRepositoryFake, ..MaakWinkelkarServiceMock())
+	#dim OfferteService As APPS.VKP.impl.OfferteService = ##class(APPS.VKP.impl.OfferteService).%New(..MaakOfferteRepositoryFake(), ..MaakWinkelkarServiceMock())
 	#dim VerpakkingList As APPS.VKP.Offerte.dto.VerpakkingList = OfferteService.GeefProductVerpakkingDetails("OfferteIDDummy")
 	
 	Do ..AssertVerpakkingResultaat(VerpakkingList.GetAt(1))
@@ -16,9 +14,7 @@
 
 <Method name="Test: GeefProductVerpakkingDetails geeft verpakkinglist terug met de afmeting die gemapt worden vanuit de maatwerklijnen van een winkelkar.">
 <Implementation><![CDATA[
-	#dim OfferteRepositoryFake As APPS.VKP.Offerte.OfferteRepository = ##class(vhTest.Fake.APPS.VKP.Offerte.OfferteRepository).%New()
-	
-	#dim OfferteService As APPS.VKP.impl.OfferteService = ##class(APPS.VKP.impl.OfferteService).%New(OfferteRepositoryFake, ..MaakWinkelkarServiceMock())
+	#dim OfferteService As APPS.VKP.impl.OfferteService = ##class(APPS.VKP.impl.OfferteService).%New(..MaakOfferteRepositoryFake(), ..MaakWinkelkarServiceMock())
 	#dim VerpakkingList As APPS.VKP.Offerte.dto.VerpakkingList = OfferteService.GeefProductVerpakkingDetails("OfferteIDDummy")
 	
 	Do ..AssertAfmetingResultaat(VerpakkingList.GetAt(1))
@@ -27,9 +23,7 @@
 
 <Method name="Test: GeefProductVerpakkingDetails geeft hetzelfde aantal verpakkingen als het aantal lijnen in de offerte namelijk 1.">
 <Implementation><![CDATA[
-	#dim OfferteRepositoryFake As APPS.VKP.Offerte.OfferteRepository = ##class(vhTest.Fake.APPS.VKP.Offerte.OfferteRepository).%New()
-	
-	#dim OfferteService As APPS.VKP.impl.OfferteService = ##class(APPS.VKP.impl.OfferteService).%New(OfferteRepositoryFake, ..MaakWinkelkarServiceMock())
+	#dim OfferteService As APPS.VKP.impl.OfferteService = ##class(APPS.VKP.impl.OfferteService).%New(..MaakOfferteRepositoryFake(), ..MaakWinkelkarServiceMock())
 	#dim VerpakkingList As APPS.VKP.Offerte.dto.VerpakkingList = OfferteService.GeefProductVerpakkingDetails("OfferteIDDummy")
 	
 	Do ..AssertHeeft1Verpakking(VerpakkingList)
@@ -38,9 +32,7 @@
 
 <Method name="Test: GeefProductVerpakkingDetails geeft hetzelfde aantal verpakkingen als het aantal lijnen in de offerte namelijk 2.">
 <Implementation><![CDATA[
-	#dim OfferteRepositoryFake As APPS.VKP.Offerte.OfferteRepository = ##class(vhTest.Fake.APPS.VKP.Offerte.OfferteRepository).%New()
-	
-	#dim OfferteService As APPS.VKP.impl.OfferteService = ##class(APPS.VKP.impl.OfferteService).%New(OfferteRepositoryFake, ..MaakWinkelkarServiceMock(2))
+	#dim OfferteService As APPS.VKP.impl.OfferteService = ##class(APPS.VKP.impl.OfferteService).%New(..MaakOfferteRepositoryFake(), ..MaakWinkelkarServiceMock(2))
 	#dim VerpakkingList As APPS.VKP.Offerte.dto.VerpakkingList = OfferteService.GeefProductVerpakkingDetails("OfferteIDDummy")
 	
 	Do ..AssertHeeft2Verpakkingen(VerpakkingList)
@@ -49,6 +41,7 @@
 
 <Method name="AssertAfmetingResultaat">
 <FormalSpec>Verpakking:APPS.TRANSP.OfferteService.dto.Afmeting</FormalSpec>
+<Private>1</Private>
 <Implementation><![CDATA[
 	#dim VerwachteAfmeting As APPS.TRANSP.OfferteService.dto.Afmeting = ##class(APPS.TRANSP.OfferteService.dto.Afmeting).%New(120,130,110)
 	Do $$$AssertEquals(VerwachteAfmeting.Breedte,Verpakking.Afmeting.Breedte)
@@ -59,18 +52,21 @@
 
 <Method name="AssertHeeft2Verpakkingen">
 <FormalSpec>VerpakkingList:APPS.VKP.Offerte.dto.VerpakkingList</FormalSpec>
+<Private>1</Private>
 <Implementation><![CDATA[	 Do $$$AssertEquals(2,VerpakkingList.Count())
 ]]></Implementation>
 </Method>
 
 <Method name="AssertHeeft1Verpakking">
 <FormalSpec>VerpakkingList:APPS.VKP.Offerte.dto.VerpakkingList</FormalSpec>
+<Private>1</Private>
 <Implementation><![CDATA[	 Do $$$AssertEquals(1,VerpakkingList.Count())
 ]]></Implementation>
 </Method>
 
 <Method name="AssertVerpakkingResultaat">
 <FormalSpec>Verpakking:APPS.VKP.Offerte.dto.Verpakking</FormalSpec>
+<Private>1</Private>
 <Implementation><![CDATA[
 	Do $$$AssertEquals(2,Verpakking.Aantal)
 	Do $$$AssertEquals("DummyProductID",Verpakking.ProductID)
@@ -81,6 +77,7 @@
 
 <Method name="MaakWinkelkarServiceMock">
 <FormalSpec>AantalLijnen:%Integer=1</FormalSpec>
+<Private>1</Private>
 <ReturnType>vhTest.Mock.APPS.EC.Winkelkar.WinkelkarService</ReturnType>
 <Implementation><![CDATA[
 	#dim WinkelkarServiceMock As vhTest.Mock.APPS.EC.Winkelkar.WinkelkarService = ##class(vhTest.Mock.APPS.EC.Winkelkar.WinkelkarService).%New()
@@ -97,6 +94,13 @@
 	Quit WinkelkarServiceMock
 ]]></Implementation>
 </Method>
+
+<Method name="MaakOfferteRepositoryFake">
+<Private>1</Private>
+<ReturnType>APPS.VKP.Offerte.OfferteRepository</ReturnType>
+<Implementation><![CDATA[	Quit ##class(vhTest.Fake.APPS.VKP.Offerte.OfferteRepository).%New()
+]]></Implementation>
+</Method>
 </Class>