Index: vhUnitTest/WSimpl/Vhisie4/Winkelkar/WinkelkarService/BewaarMaatwerkLijn/Test.cls.xml
===================================================================
diff -u -r39069 -r39079
--- vhUnitTest/WSimpl/Vhisie4/Winkelkar/WinkelkarService/BewaarMaatwerkLijn/Test.cls.xml	(.../Test.cls.xml)	(revision 39069)
+++ vhUnitTest/WSimpl/Vhisie4/Winkelkar/WinkelkarService/BewaarMaatwerkLijn/Test.cls.xml	(.../Test.cls.xml)	(revision 39079)
@@ -3,89 +3,150 @@
 <Class name="vhUnitTest.WSimpl.Vhisie4.Winkelkar.WinkelkarService.BewaarMaatwerkLijn.Test">
 <Super>vhUnitTest.TestCase</Super>
 
+<Property name="WinkelkarServiceMock">
+<Type>vhTest.Mock.APPS.EC.Winkelkar.impl.WinkelkarService</Type>
+<Private>1</Private>
+</Property>
+
+<Property name="WinkelkarRepositoryMock">
+<Type>vhTest.Mock.WSimpl.Vhisie4.Winkelkar.WinkelkarRepository</Type>
+<Private>1</Private>
+</Property>
+
+<Property name="WinkelkarLijnRepositoryMock">
+<Type>vhTest.Mock.WSimpl.Vhisie4.Winkelkar.WinkelkarLijnRepository</Type>
+<Private>1</Private>
+</Property>
+
+<Property name="EdiConverterMock">
+<Type>vhTest.Mock.ECONimpl.PM.Maatwerk.EdiConverter</Type>
+<Private>1</Private>
+</Property>
+
+<Property name="LegacyConverterMock">
+<Type>vhTest.Mock.APPS.EDI.common.impl.LegacyConverter</Type>
+<Private>1</Private>
+</Property>
+
+<Property name="LegacyKenmerkenMatcher">
+<Type>Tools.Mock.ArgumentMatchers.DataTransferObjectMatcher</Type>
+<Private>1</Private>
+</Property>
+
+<Property name="EconKenmerkenMatcher">
+<Type>Tools.Mock.ArgumentMatchers.ObjectMatcher</Type>
+<Private>1</Private>
+</Property>
+
+<Property name="BewaarMaatwerkLijn">
+<Type>WSimpl.Vhisie4.Winkelkar.WinkelkarService.BewaarMaatwerkLijn</Type>
+<Private>1</Private>
+</Property>
+
 <Method name="Test: Bewaarmaatwerklijn verwijderd lijn als deze bestaat en bewaart dan maatwerklijn met de juiste parameters">
 <Implementation><![CDATA[
-	#dim TeConverterenProduct As APPS.EDI.common.dto.v001.LadeTBX = ..GeefTeConverterenProduct()
+	Do ..ZetVerwachteMethods()
 	
-	#dim IngegevenKenmerken As APPS.PM.Maatwerk.dto.TBXKenmerken = ##class(APPS.PM.Maatwerk.dto.TBXKenmerken).%New()
-	Set IngegevenKenmerken.LegacyKenmerken = ..GeefLegacyKenmerken()
-	
-	#dim LegacyKenmerkenMatcher = ##class(Tools.Mock.ArgumentMatchers.DataTransferObjectMatcher).%New(IngegevenKenmerken)
-	
-	#dim WinkelkarServiceMock As vhTest.Mock.APPS.EC.Winkelkar.impl.WinkelkarService = ##class(vhTest.Mock.APPS.EC.Winkelkar.impl.WinkelkarService).%New()
-	Do WinkelkarServiceMock.VerwachtMethodCall("VerwijderLijn", "OfferteId", "DummyLijnID").DanDoeNiks()
-	Do WinkelkarServiceMock.VerwachtMethodCall("VoegToeMaatwerk", "OfferteId", "", LegacyKenmerkenMatcher, "1", "ProjectReferentie", "LijnID").DanReturn("WinkelkarLijnId")
-	Do WinkelkarServiceMock.VerwachtMethodCall("GeefLijn", "OfferteId", "WinkelkarLijnId").DanReturn(..GeefMaatwerkLijn())
+	Do ..WinkelkarLijnRepositoryMock.VerwachtMethodCall("BestaatViaExterneId", "LijnID").DanReturn($$$True)
+	Do ..WinkelkarLijnRepositoryMock.VerwachtMethodCall("GeefLijnIDViaExterneId", "LijnID").DanReturn("DummyLijnID")
+	Do ..WinkelkarServiceMock.VerwachtMethodCall("VerwijderLijn", "OfferteId", "DummyLijnID").DanDoeNiks()
 
-	#dim WinkelkarRepositoryMock As vhTest.Mock.WSimpl.Vhisie4.Winkelkar.WinkelkarRepository = ##class(vhTest.Mock.WSimpl.Vhisie4.Winkelkar.WinkelkarRepository).%New()
-	Do WinkelkarRepositoryMock.VerwachtMethodCall("BestaatViaExterneId","ExterneId").DanReturn($$$True)
-	Do WinkelkarRepositoryMock.VerwachtMethodCall("GeefWinkelkarIDViaExterneId","ExterneId").DanReturn("OfferteId")
-	Do WinkelkarRepositoryMock.VerwachtMethodCall("GeefOfferteViaExterneId", "ExterneId").DanReturn(##class(vhTest.Fake.APPS.VKP.Offerte).%New())
+	Do ..MaakBewaarMaatwerkLijn()
+	Do ..BewaarMaatwerkLijn.BewaarMaatwerkLijn(..GeefBewaarMaatwerkLijnRequest())
 	
-	#dim WinkelkarLijnRepositoryMock As vhTest.Mock.WSimpl.Vhisie4.Winkelkar.WinkelkarLijnRepository = ##class(vhTest.Mock.WSimpl.Vhisie4.Winkelkar.WinkelkarLijnRepository).%New()
-	Do WinkelkarLijnRepositoryMock.VerwachtMethodCall("BestaatViaExterneId", "LijnID").DanReturn($$$True)
-	Do WinkelkarLijnRepositoryMock.VerwachtMethodCall("GeefLijnIDViaExterneId", "LijnID").DanReturn("DummyLijnID")
+	Do ..VerifieerMocks()
+]]></Implementation>
+</Method>
 
-	#dim EconKenmerkenMatcher = ##class(Tools.Mock.ArgumentMatchers.ObjectMatcher).%New(..GeefEconKenmerken())
+<Method name="Test: Bewaarmaatwerklijn bewaart maatwerklijn met de juiste parameters">
+<Implementation><![CDATA[
+	Do ..ZetVerwachteMethods()
 	
-	#dim EdiConverterMock As vhTest.Mock.ECONimpl.PM.Maatwerk.EdiConverter = ##class(vhTest.Mock.ECONimpl.PM.Maatwerk.EdiConverter).%New()
-	Do EdiConverterMock.VerwachtMethodCall("ConverteerEconNaarEdi",EconKenmerkenMatcher).DanReturn(TeConverterenProduct)
+	Do ..WinkelkarLijnRepositoryMock.VerwachtMethodCall("BestaatViaExterneId", "LijnID").DanReturn($$$False)
 
-	#dim LegacyConverterMock As vhTest.Mock.APPS.EDI.common.impl.LegacyConverter = ##class(vhTest.Mock.APPS.EDI.common.impl.LegacyConverter).%New()
-	Do LegacyConverterMock.VerwachtMethodCall("ConverteerEdiNaarLegacy",TeConverterenProduct).DanReturn(..GeefLegacyKenmerken())
+	Do ..MaakBewaarMaatwerkLijn()
+	Do ..BewaarMaatwerkLijn.BewaarMaatwerkLijn(..GeefBewaarMaatwerkLijnRequest())
 	
-	#dim BewaarMaatwerkLijn As WSimpl.Vhisie4.Winkelkar.WinkelkarService.BewaarMaatwerkLijn 
-	Set BewaarMaatwerkLijn = ##class(WSimpl.Vhisie4.Winkelkar.WinkelkarService.BewaarMaatwerkLijn).%New(WinkelkarServiceMock, WinkelkarRepositoryMock, EdiConverterMock, LegacyConverterMock, WinkelkarLijnRepositoryMock)
-	
-	Do BewaarMaatwerkLijn.BewaarMaatwerkLijn(..GeefBewaarMaatwerkLijnRequest())
-	
-	Do WinkelkarLijnRepositoryMock.Verifieer()
-	Do LegacyConverterMock.Verifieer()
-	Do EdiConverterMock.Verifieer()
-	Do WinkelkarRepositoryMock.Verifieer()
-	Do WinkelkarServiceMock.Verifieer()
+	Do ..VerifieerMocks()
 ]]></Implementation>
 </Method>
 
-<Method name="Test: Bewaarmaatwerklijn bewaart maatwerklijn met de juiste parameters">
+<Method name="ZetVerwachteMethods">
+<Private>1</Private>
 <Implementation><![CDATA[
-	#dim TeConverterenProduct As APPS.EDI.common.dto.v001.LadeTBX = ..GeefTeConverterenProduct()
+	Do ..MaakWinkelkarServiceMock()
+	Do ..WinkelkarServiceMock.VerwachtMethodCall("VoegToeMaatwerk", "OfferteId", "", ..LegacyKenmerkenMatcher, "1", "ProjectReferentie", "LijnID").DanReturn("WinkelkarLijnId")
+	Do ..WinkelkarServiceMock.VerwachtMethodCall("GeefLijn", "OfferteId", "WinkelkarLijnId").DanReturn(..GeefMaatwerkLijn())
+
+	Do ..MaakWinkelkarRepositoryMock()
+	Do ..WinkelkarRepositoryMock.VerwachtMethodCall("BestaatViaExterneId","ExterneId").DanReturn($$$True)
+	Do ..WinkelkarRepositoryMock.VerwachtMethodCall("GeefWinkelkarIDViaExterneId","ExterneId").DanReturn("OfferteId")
+	Do ..WinkelkarRepositoryMock.VerwachtMethodCall("GeefOfferteViaExterneId", "ExterneId").DanReturn(..GeefOfferte())
 	
+	Do ..MaakWinkelkarLijnRepositoryMock()
+
+	#dim TeConverterenProduct As APPS.EDI.common.dto.v001.LadeTBX = ..GeefTeConverterenProduct()
+
+	Do ..MaakEdiConverterMock()
+	Do ..EdiConverterMock.VerwachtMethodCall("ConverteerEconNaarEdi",..EconKenmerkenMatcher).DanReturn(TeConverterenProduct)
+
+	Do ..MaakLegacyConverterMock()
+	Do ..LegacyConverterMock.VerwachtMethodCall("ConverteerEdiNaarLegacy",TeConverterenProduct).DanReturn(..GeefLegacyKenmerken())
+]]></Implementation>
+</Method>
+
+<Method name="MaakBewaarMaatwerkLijn">
+<Private>1</Private>
+<Implementation><![CDATA[	Set ..BewaarMaatwerkLijn = ##class(WSimpl.Vhisie4.Winkelkar.WinkelkarService.BewaarMaatwerkLijn).%New(..WinkelkarServiceMock, ..WinkelkarRepositoryMock, ..EdiConverterMock, ..LegacyConverterMock, ..WinkelkarLijnRepositoryMock)
+]]></Implementation>
+</Method>
+
+<Method name="VerifieerMocks">
+<Private>1</Private>
+<Implementation><![CDATA[
+	Do ..WinkelkarLijnRepositoryMock.Verifieer()
+	Do ..LegacyConverterMock.Verifieer()
+	Do ..EdiConverterMock.Verifieer()
+	Do ..WinkelkarRepositoryMock.Verifieer()
+	Do ..WinkelkarServiceMock.Verifieer()
+]]></Implementation>
+</Method>
+
+<Method name="MaakEdiConverterMock">
+<Private>1</Private>
+<Implementation><![CDATA[
+	Set ..EconKenmerkenMatcher = ##class(Tools.Mock.ArgumentMatchers.ObjectMatcher).%New(..GeefEconKenmerken())
+	Set ..EdiConverterMock = ##class(vhTest.Mock.ECONimpl.PM.Maatwerk.EdiConverter).%New()
+]]></Implementation>
+</Method>
+
+<Method name="MaakLegacyConverterMock">
+<Private>1</Private>
+<Implementation><![CDATA[	Set ..LegacyConverterMock = ##class(vhTest.Mock.APPS.EDI.common.impl.LegacyConverter).%New()
+]]></Implementation>
+</Method>
+
+<Method name="MaakWinkelkarLijnRepositoryMock">
+<Private>1</Private>
+<Implementation><![CDATA[	Set ..WinkelkarLijnRepositoryMock = ##class(vhTest.Mock.WSimpl.Vhisie4.Winkelkar.WinkelkarLijnRepository).%New()
+]]></Implementation>
+</Method>
+
+<Method name="MaakWinkelkarRepositoryMock">
+<Private>1</Private>
+<Implementation><![CDATA[	Set ..WinkelkarRepositoryMock = ##class(vhTest.Mock.WSimpl.Vhisie4.Winkelkar.WinkelkarRepository).%New()
+]]></Implementation>
+</Method>
+
+<Method name="MaakWinkelkarServiceMock">
+<Private>1</Private>
+<Implementation><![CDATA[
 	#dim IngegevenKenmerken As APPS.PM.Maatwerk.dto.TBXKenmerken = ##class(APPS.PM.Maatwerk.dto.TBXKenmerken).%New()
 	Set IngegevenKenmerken.LegacyKenmerken = ..GeefLegacyKenmerken()
 	
-	#dim LegacyKenmerkenMatcher = ##class(Tools.Mock.ArgumentMatchers.DataTransferObjectMatcher).%New(IngegevenKenmerken)
+	Set ..LegacyKenmerkenMatcher = ##class(Tools.Mock.ArgumentMatchers.DataTransferObjectMatcher).%New(IngegevenKenmerken)
 	
-	#dim WinkelkarServiceMock As vhTest.Mock.APPS.EC.Winkelkar.impl.WinkelkarService = ##class(vhTest.Mock.APPS.EC.Winkelkar.impl.WinkelkarService).%New()
-	Do WinkelkarServiceMock.VerwachtMethodCall("VoegToeMaatwerk", "OfferteId", "", LegacyKenmerkenMatcher, "1", "ProjectReferentie", "LijnID").DanReturn("WinkelkarLijnId")
-	Do WinkelkarServiceMock.VerwachtMethodCall("GeefLijn", "OfferteId", "WinkelkarLijnId").DanReturn(..GeefMaatwerkLijn())
-	
-	#dim WinkelkarRepositoryMock As vhTest.Mock.WSimpl.Vhisie4.Winkelkar.WinkelkarRepository = ##class(vhTest.Mock.WSimpl.Vhisie4.Winkelkar.WinkelkarRepository).%New()
-	Do WinkelkarRepositoryMock.VerwachtMethodCall("BestaatViaExterneId","ExterneId").DanReturn($$$True)
-	Do WinkelkarRepositoryMock.VerwachtMethodCall("GeefWinkelkarIDViaExterneId","ExterneId").DanReturn("OfferteId")
-	Do WinkelkarRepositoryMock.VerwachtMethodCall("GeefOfferteViaExterneId", "ExterneId").DanReturn(##class(vhTest.Fake.APPS.VKP.Offerte).%New())
-	
-	#dim WinkelkarLijnRepositoryMock As vhTest.Mock.WSimpl.Vhisie4.Winkelkar.WinkelkarLijnRepository = ##class(vhTest.Mock.WSimpl.Vhisie4.Winkelkar.WinkelkarLijnRepository).%New()
-	Do WinkelkarLijnRepositoryMock.VerwachtMethodCall("BestaatViaExterneId", "LijnID").DanReturn($$$False)
-
-	#dim EconKenmerkenMatcher = ##class(Tools.Mock.ArgumentMatchers.ObjectMatcher).%New(..GeefEconKenmerken())
-	
-	#dim EdiConverterMock As vhTest.Mock.ECONimpl.PM.Maatwerk.EdiConverter = ##class(vhTest.Mock.ECONimpl.PM.Maatwerk.EdiConverter).%New()
-	Do EdiConverterMock.VerwachtMethodCall("ConverteerEconNaarEdi",EconKenmerkenMatcher).DanReturn(TeConverterenProduct)
-
-	#dim LegacyConverterMock As vhTest.Mock.APPS.EDI.common.impl.LegacyConverter = ##class(vhTest.Mock.APPS.EDI.common.impl.LegacyConverter).%New()
-	Do LegacyConverterMock.VerwachtMethodCall("ConverteerEdiNaarLegacy",TeConverterenProduct).DanReturn(..GeefLegacyKenmerken())
-	
-	#dim BewaarMaatwerkLijn As WSimpl.Vhisie4.Winkelkar.WinkelkarService.BewaarMaatwerkLijn 
-	Set BewaarMaatwerkLijn = ##class(WSimpl.Vhisie4.Winkelkar.WinkelkarService.BewaarMaatwerkLijn).%New(WinkelkarServiceMock, WinkelkarRepositoryMock, EdiConverterMock, LegacyConverterMock, WinkelkarLijnRepositoryMock)
-	
-	Do BewaarMaatwerkLijn.BewaarMaatwerkLijn(..GeefBewaarMaatwerkLijnRequest())
-	
-	Do WinkelkarLijnRepositoryMock.Verifieer()
-	Do LegacyConverterMock.Verifieer()
-	Do EdiConverterMock.Verifieer()
-	Do WinkelkarRepositoryMock.Verifieer()
-	Do WinkelkarServiceMock.Verifieer()
+	Set ..WinkelkarServiceMock = ##class(vhTest.Mock.APPS.EC.Winkelkar.impl.WinkelkarService).%New()
 ]]></Implementation>
 </Method>
 
@@ -129,9 +190,16 @@
 </Method>
 
 <Method name="GeefMaatwerkLijn">
+<Private>1</Private>
 <Implementation><![CDATA[	Quit ##class(APPS.EC.Winkelkar.dto.MaatwerkLijn).%New()
 ]]></Implementation>
 </Method>
+
+<Method name="GeefOfferte">
+<Private>1</Private>
+<Implementation><![CDATA[	Quit ##class(vhTest.Fake.APPS.VKP.Offerte).%New()
+]]></Implementation>
+</Method>
 </Class>