Index: vhUnitTest/WSimpl/Vhisie4/Winkelkar/WinkelkarService/HerberekenMaatwerk/Test.cls.xml
===================================================================
diff -u -r40480 -r40491
--- vhUnitTest/WSimpl/Vhisie4/Winkelkar/WinkelkarService/HerberekenMaatwerk/Test.cls.xml	(.../Test.cls.xml)	(revision 40480)
+++ vhUnitTest/WSimpl/Vhisie4/Winkelkar/WinkelkarService/HerberekenMaatwerk/Test.cls.xml	(.../Test.cls.xml)	(revision 40491)
@@ -3,47 +3,57 @@
 <Class name="vhUnitTest.WSimpl.Vhisie4.Winkelkar.WinkelkarService.HerberekenMaatwerk.Test">
 <Super>vhUnitTest.TestCase</Super>
 
-<Method name="Test: Herbereken maatwerklijn herberekent maatwerklijnen en geeft geen herberekende maatwerklijnen weer">
+<Property name="WinkelkarRepositoryMock">
+<Type>vhTest.Mock.WSimpl.Vhisie4.Winkelkar.WinkelkarRepository</Type>
+</Property>
+
+<Property name="VerkoopServiceMock">
+<Type>vhTest.Mock.APPS.EC.Verkoop.ExterneVerkoopService</Type>
+</Property>
+
+<Property name="HerberekenMaatwerk">
+<Type>WSimpl.Vhisie4.Winkelkar.WinkelkarService.HerberekenMaatwerk</Type>
+</Property>
+
+<Method name="OnBeforeOneTest">
+<FormalSpec>aTestName:%String</FormalSpec>
 <Implementation><![CDATA[
-	Set WinkelkarRepositoryMock = ##class(vhTest.Mock.WSimpl.Vhisie4.Winkelkar.WinkelkarRepository).%New()
-	Do WinkelkarRepositoryMock.VerwachtMethodCall("GeefOfferteIDViaID", "DummyWinkelkarId").DanReturn("DummyOfferteId")
+	Do ##super(aTestName)
+	Set ..WinkelkarRepositoryMock = ##class(vhTest.Mock.WSimpl.Vhisie4.Winkelkar.WinkelkarRepository).%New()
+	Set ..VerkoopServiceMock = ##class(vhTest.Mock.APPS.EC.Verkoop.ExterneVerkoopService).%New()
+	Set ..HerberekenMaatwerk = ##class(WSimpl.Vhisie4.Winkelkar.WinkelkarService.HerberekenMaatwerk).%New(..WinkelkarRepositoryMock, ..VerkoopServiceMock)
+]]></Implementation>
+</Method>
 
-	Set VerkoopServiceMock = ##class(vhTest.Mock.APPS.EC.Verkoop.ExterneVerkoopService).%New()
-	Do VerkoopServiceMock.VerwachtMethodCall("GeefOfferteEnHerberekenIndienNodig", "DummyOfferteId").DanReturn(..GeefOfferte())
-	Do VerkoopServiceMock.VerwachtMethodCall("GeefOfferteZonderHerberekening", "DummyOfferteId").DanReturn(..GeefOfferte())
+<Method name="Test: Herbereken maatwerklijn herberekent maatwerklijnen en geeft geen herberekende maatwerklijnen weer">
+<Implementation><![CDATA[
+	Do ..WinkelkarRepositoryMock.VerwachtMethodCall("GeefOfferteIDViaID", "DummyWinkelkarId").DanReturn("DummyOfferteId")
+	Do ..VerkoopServiceMock.VerwachtMethodCall("GeefOfferteEnHerberekenIndienNodig", "DummyOfferteId").DanReturn(..GeefOfferte())
+	Do ..VerkoopServiceMock.VerwachtMethodCall("GeefOfferteZonderHerberekening", "DummyOfferteId").DanReturn(..GeefOfferte())
 	
-	Set HerberekenMaatwerk = ##class(WSimpl.Vhisie4.Winkelkar.WinkelkarService.HerberekenMaatwerk).%New(WinkelkarRepositoryMock, VerkoopServiceMock)
 	#dim HerberekenMaatwerkResponse As WS.Vhisie4.Winkelkar.HerberekenMaatwerkResponse 
-	Set HerberekenMaatwerkResponse = HerberekenMaatwerk.HerberekenMaatwerk(..GeefHerberekenMaatwerkRequest())
+	Set HerberekenMaatwerkResponse = ..HerberekenMaatwerk.HerberekenMaatwerk(..GeefHerberekenMaatwerkRequest())
 	
 	Do $$$AssertEquals(HerberekenMaatwerkResponse.HerberekendeLijnen.Count(),0) 
 	Do $$$AssertEquals(HerberekenMaatwerkResponse.MeldingenAanGebruiker.Count(),0)
 	Do $$$AssertTrue(HerberekenMaatwerkResponse.WasNogGeldig)
 
-	Do WinkelkarRepositoryMock.Verifieer()
-	Do VerkoopServiceMock.Verifieer()
+	Do ..WinkelkarRepositoryMock.Verifieer()
+	Do ..VerkoopServiceMock.Verifieer()
 ]]></Implementation>
 </Method>
 
 <Method name="Test: Herbereken maatwerklijn herberekent maatwerklijnen en geeft een herberekende maatwerklijn weer">
 <Implementation><![CDATA[
-	Set WinkelkarRepositoryMock = ##class(vhTest.Mock.WSimpl.Vhisie4.Winkelkar.WinkelkarRepository).%New()
-	Do WinkelkarRepositoryMock.VerwachtMethodCall("GeefOfferteIDViaID", "DummyWinkelkarId").DanReturn("DummyOfferteId")
-
-	Set VerkoopServiceMock = ##class(vhTest.Mock.APPS.EC.Verkoop.ExterneVerkoopService).%New()
-	Do VerkoopServiceMock.VerwachtMethodCall("GeefOfferteEnHerberekenIndienNodig", "DummyOfferteId").DanReturn(..GeefOfferte(13.20))
-	Do VerkoopServiceMock.VerwachtMethodCall("GeefOfferteZonderHerberekening", "DummyOfferteId").DanReturn(..GeefOfferte(13.20))
+	Do ..WinkelkarRepositoryMock.VerwachtMethodCall("GeefOfferteIDViaID", "DummyWinkelkarId").DanReturn("DummyOfferteId")
+	Do ..VerkoopServiceMock.VerwachtMethodCall("GeefOfferteEnHerberekenIndienNodig", "DummyOfferteId").DanReturn(..GeefOfferte(13.20))
+	Do ..VerkoopServiceMock.VerwachtMethodCall("GeefOfferteZonderHerberekening", "DummyOfferteId").DanReturn(..GeefOfferte(13.20))
 	
-	Set HerberekenMaatwerk = ##class(WSimpl.Vhisie4.Winkelkar.WinkelkarService.HerberekenMaatwerk).%New(WinkelkarRepositoryMock, VerkoopServiceMock)
 	#dim HerberekenMaatwerkResponse As WS.Vhisie4.Winkelkar.HerberekenMaatwerkResponse 
-	Set HerberekenMaatwerkResponse = HerberekenMaatwerk.HerberekenMaatwerk(..GeefHerberekenMaatwerkRequest())
+	Set HerberekenMaatwerkResponse = ..HerberekenMaatwerk.HerberekenMaatwerk(..GeefHerberekenMaatwerkRequest())
 	
 	If $$$AssertEquals(HerberekenMaatwerkResponse.HerberekendeLijnen.Count(),1) {
-		#dim HerberekendeLijn As WS.Vhisie4.Winkelkar.dto.HerberekendeMaatwerkLijn 
-		Set HerberekendeLijn = HerberekenMaatwerkResponse.HerberekendeLijnen.GetAt(1)
-		Do $$$AssertEquals(HerberekendeLijn.EenheidPrijs, 13.2)
-		Do $$$AssertEquals(HerberekendeLijn.TotaalPrijs, 26.40)
-		Do $$$AssertEquals(HerberekendeLijn.PrijzenGeldigTotEnMet , $$$DummyDate)
+		Do ..AssertMaatwerkLijn(HerberekenMaatwerkResponse.HerberekendeLijnen.GetAt(1), 13.2, 26.40, $$$DummyDate)
 	}
 	
 	If $$$AssertEquals(HerberekenMaatwerkResponse.MeldingenAanGebruiker.Count(),1) {
@@ -52,31 +62,69 @@
 
 	Do $$$AssertFalse(HerberekenMaatwerkResponse.WasNogGeldig)
 	
-	Do WinkelkarRepositoryMock.Verifieer()
-	Do VerkoopServiceMock.Verifieer()
+	Do ..WinkelkarRepositoryMock.Verifieer()
+	Do ..VerkoopServiceMock.Verifieer()
 ]]></Implementation>
 </Method>
 
+<Method name="Test: Herbereken maatwerklijn herberekent maatwerklijnen en geeft twee herberekende maatwerklijnen weer">
+<Implementation><![CDATA[
+	Do ..WinkelkarRepositoryMock.VerwachtMethodCall("GeefOfferteIDViaID", "DummyWinkelkarId").DanReturn("DummyOfferteId")
+	Do ..VerkoopServiceMock.VerwachtMethodCall("GeefOfferteEnHerberekenIndienNodig", "DummyOfferteId").DanReturn(..GeefOfferte(13.20,2))
+	Do ..VerkoopServiceMock.VerwachtMethodCall("GeefOfferteZonderHerberekening", "DummyOfferteId").DanReturn(..GeefOfferte(13.20,2))
+	
+	#dim HerberekenMaatwerkResponse As WS.Vhisie4.Winkelkar.HerberekenMaatwerkResponse 
+	Set HerberekenMaatwerkResponse = ..HerberekenMaatwerk.HerberekenMaatwerk(..GeefHerberekenMaatwerkRequest(2))
+	
+	If $$$AssertEquals(HerberekenMaatwerkResponse.HerberekendeLijnen.Count(),2) {
+		Do ..AssertMaatwerkLijn(HerberekenMaatwerkResponse.HerberekendeLijnen.GetAt(1), 13.2, 26.40, $$$DummyDate)
+		Do ..AssertMaatwerkLijn(HerberekenMaatwerkResponse.HerberekendeLijnen.GetAt(2), 26.40, 52.80, $$$DummyDate)
+	}
+	
+	If $$$AssertEquals(HerberekenMaatwerkResponse.MeldingenAanGebruiker.Count(),1) {
+		Do $$$AssertEquals(HerberekenMaatwerkResponse.MeldingenAanGebruiker.GetAt(1),"DummyMelding")
+	}
+
+	Do $$$AssertFalse(HerberekenMaatwerkResponse.WasNogGeldig)
+	
+	Do ..WinkelkarRepositoryMock.Verifieer()
+	Do ..VerkoopServiceMock.Verifieer()
+]]></Implementation>
+</Method>
+
+<Method name="AssertMaatwerkLijn">
+<FormalSpec>HerberekendeLijn:WS.Vhisie4.Winkelkar.dto.HerberekendeMaatwerkLijn,EenheidPrijs:%Decimal,TotaalPrijs:%Decimal,Datum:%Date</FormalSpec>
+<Private>1</Private>
+<Implementation><![CDATA[
+	Do $$$AssertEquals(HerberekendeLijn.EenheidPrijs, EenheidPrijs)
+	Do $$$AssertEquals(HerberekendeLijn.TotaalPrijs, TotaalPrijs)
+	Do $$$AssertEquals(HerberekendeLijn.PrijzenGeldigTotEnMet, Datum)
+]]></Implementation>
+</Method>
+
 <Method name="GeefHerberekenMaatwerkRequest">
+<FormalSpec>AantalLijnen:%Integer=1</FormalSpec>
 <Private>1</Private>
 <ReturnType>WS.Vhisie4.Winkelkar.HerberekenMaatwerkRequest</ReturnType>
 <Implementation><![CDATA[
 	Set HerberekenMaatwerkRequest = ##class(WS.Vhisie4.Winkelkar.HerberekenMaatwerkRequest).%New()
 	Set HerberekenMaatwerkRequest.Winkelkar.Id = "DummyWinkelkarId"
 	
-	Set WinkelkarLijn = ##class(WS.Vhisie4.Winkelkar.dto.MaatwerkLijn).%New()
-	Set WinkelkarLijn.Id = "ExterneWinkelkarLijnID"
-	Set WinkelkarLijn.EenheidPrijs = 12.5
-	Set WinkelkarLijn.TotaalPrijs = 25
-	Set WinkelkarLijn.EconConfiguratie = ##class(vhTest.Utils.ECON.PM.Maatwerk.dto.TbxKenmerken).StandaardLade().ToArray()
-	Do HerberekenMaatwerkRequest.Winkelkar.Lijnen.Insert(WinkelkarLijn)
-	
+	#Dim LijnId As %Integer = 1
+	for LijnId = 1:1:AantalLijnen {
+		Set WinkelkarLijn = ##class(WS.Vhisie4.Winkelkar.dto.MaatwerkLijn).%New()
+		Set WinkelkarLijn.Id = LijnId
+		Set WinkelkarLijn.EenheidPrijs = 12.5
+		Set WinkelkarLijn.TotaalPrijs = 25
+		Set WinkelkarLijn.EconConfiguratie = ##class(vhTest.Utils.ECON.PM.Maatwerk.dto.TbxKenmerken).StandaardLade().ToArray()
+		Do HerberekenMaatwerkRequest.Winkelkar.Lijnen.Insert(WinkelkarLijn)
+	}
 	Quit HerberekenMaatwerkRequest
 ]]></Implementation>
 </Method>
 
 <Method name="GeefOfferte">
-<FormalSpec>EenheidPrijs:%Decimal=12.5</FormalSpec>
+<FormalSpec>EenheidPrijs:%Decimal=12.5,AantalLijnen:%Integer=1</FormalSpec>
 <Private>1</Private>
 <ReturnType>APPS.EC.dto.Offerte</ReturnType>
 <Implementation><![CDATA[
@@ -85,13 +133,16 @@
 	Set Offerte.Winkelkar.WinkelkarID = "DummyWinkelkarId"
 	Set Offerte.Melding = "DummyMelding"
 	
-	Set WinkelkarLijn = ##class(APPS.EC.Winkelkar.dto.MaatwerkLijn).%New()
-	Set WinkelkarLijn.ExterneId = "ExterneWinkelkarLijnID"
-	Set WinkelkarLijn.EenheidPrijs = EenheidPrijs
-	Set WinkelkarLijn.TotaalPrijs = EenheidPrijs * 2
-	Set WinkelkarLijn.PrijzenGeldigTotEnMet = $$$DummyDate
-	
-	Do Offerte.Winkelkar.Lijnen.Insert(WinkelkarLijn)
+	#Dim LijnId As %Integer = 1
+	for LijnId = 1:1:AantalLijnen {
+		Set WinkelkarLijn = ##class(APPS.EC.Winkelkar.dto.MaatwerkLijn).%New()
+		Set WinkelkarLijn.ExterneId = LijnId
+		Set WinkelkarLijn.EenheidPrijs = EenheidPrijs * LijnId
+		Set WinkelkarLijn.TotaalPrijs = EenheidPrijs * 2 * LijnId
+		Set WinkelkarLijn.PrijzenGeldigTotEnMet = $$$DummyDate
+		
+		Do Offerte.Winkelkar.Lijnen.Insert(WinkelkarLijn)
+	}
 	Quit Offerte
 ]]></Implementation>
 </Method>