Index: vhUnitTest/WSimpl/Vhisie4/Winkelkar/WinkelkarService/BewaarProductLijn/Test.cls.xml
===================================================================
diff -u -r62113 -r62116
--- vhUnitTest/WSimpl/Vhisie4/Winkelkar/WinkelkarService/BewaarProductLijn/Test.cls.xml	(.../Test.cls.xml)	(revision 62113)
+++ vhUnitTest/WSimpl/Vhisie4/Winkelkar/WinkelkarService/BewaarProductLijn/Test.cls.xml	(.../Test.cls.xml)	(revision 62116)
@@ -21,7 +21,7 @@
 	
 	Set WinkelkarServiceMock = ##class(vhTest.Mock.APPS.EC.Winkelkar.WinkelkarService).%New()
 	Do WinkelkarServiceMock.VerwachtMethodCall("VerwijderLijn","DummyID", "DummyLijnID").DanDoeNiks()
-	Do WinkelkarServiceMock.VerwachtMethodCall("VoegToeProduct", "DummyID", "EenGroep", "ProductId", 5, "PakketReferentie", "ProjectReferentie", "ExterneId","1.95","9.75","",23).DanDoeNiks()
+	Do WinkelkarServiceMock.VerwachtMethodCall("VoegToeProduct", "DummyID", "EenGroep", "ProductId", 5, "PakketReferentie", "ProjectReferentie", "ExterneId","1.95","9.75","","23").DanDoeNiks()
 	
 	Set Service = ##class(WSimpl.Vhisie4.Winkelkar.WinkelkarService.BewaarProductLijn).%New(WinkelkarServiceMock, WinkelkarRepositoryStub, WinkelkarLijnRepositoryMock, ProductApiStub,,SalesPriceServiceMock)
 	
@@ -50,7 +50,7 @@
 	Do WinkelkarLijnRepositoryMock.VerwachtMethodCall("BestaatViaID", "ExterneId").DanReturn($$$False)
 
 	#dim WinkelkarServiceMock As vhTest.Mock.APPS.EC.Winkelkar.WinkelkarService = ##class(vhTest.Mock.APPS.EC.Winkelkar.WinkelkarService).%New()
-	Do WinkelkarServiceMock.VerwachtMethodCall("VoegToeProduct", "DummyID", "EenGroep", "ProductId", 5, "PakketReferentie", "ProjectReferentie", "ExterneId", "1.95", "9.75","",23).DanDoeNiks()
+	Do WinkelkarServiceMock.VerwachtMethodCall("VoegToeProduct", "DummyID", "EenGroep", "ProductId", 5, "PakketReferentie", "ProjectReferentie", "ExterneId","1.95","9.75","","23").DanDoeNiks()
 	
 	#dim Service As WSimpl.Vhisie4.Winkelkar.WinkelkarService.BewaarProductLijn = ##class(WSimpl.Vhisie4.Winkelkar.WinkelkarService.BewaarProductLijn).%New(WinkelkarServiceMock, WinkelkarRepositoryStub, WinkelkarLijnRepositoryMock, ProductApiStub,,SalesPriceServiceMock)
 	
@@ -74,7 +74,7 @@
 	Do WinkelkarRepositoryMock.VerwachtMethodCall("GeefWinkelkarIDViaID", "WinkelkarId").DanReturn("DummyID")
 	
 	Set WinkelkarServiceStub = ##class(vhTest.Mock.APPS.EC.Winkelkar.WinkelkarService).%New()
-	Do WinkelkarServiceStub.IndienMethodCall("VoegToeProduct", "DummyID", "EenGroep", "ProductId", 5 , "PakketReferentie" , "ProjectReferentie","ExterneId","1.95","9.75","",23).DanDoeNiks()
+	Do WinkelkarServiceStub.IndienMethodCall("VoegToeProduct", "DummyID", "EenGroep", "ProductId", 5 , "PakketReferentie" , "ProjectReferentie","ExterneId","1.95","9.75","","23").DanDoeNiks()
 	
 	Set Service = ##class(WSimpl.Vhisie4.Winkelkar.WinkelkarService.BewaarProductLijn).%New(WinkelkarServiceStub, WinkelkarRepositoryMock,,ProductApiStub,,SalesPriceServiceMock)
 	
Index: DOM/EC/Winkelkar/ProductLijn.cls.xml
===================================================================
diff -u -r62094 -r62116
--- DOM/EC/Winkelkar/ProductLijn.cls.xml	(.../ProductLijn.cls.xml)	(revision 62094)
+++ DOM/EC/Winkelkar/ProductLijn.cls.xml	(.../ProductLijn.cls.xml)	(revision 62116)
@@ -23,12 +23,8 @@
 <Type>%String</Type>
 </Property>
 
-<Property name="HandelAankoopprijs">
-<Type>%Decimal</Type>
-</Property>
-
 <Method name="%OnNew">
-<FormalSpec>ProductId:%String,Aantal:%Integer,PakketReferentie:%String="",ProjectReferentie:%String="",ExterneId:%String="",KlantOrderlijnNr:%String="",HandelAankoopprijs:%Decimal=""</FormalSpec>
+<FormalSpec>ProductId:%String,Aantal:%Integer,PakketReferentie:%String="",ProjectReferentie:%String="",ExterneId:%String="",KlantOrderlijnNr:%String=""</FormalSpec>
 <Private>1</Private>
 <ProcedureBlock>1</ProcedureBlock>
 <ReturnType>%Status</ReturnType>
@@ -39,7 +35,6 @@
 	Set ..ProjectReferentie = ProjectReferentie
 	Set ..ExterneId = ExterneId	
 	Set ..KlantOrderlijnNr = KlantOrderlijnNr
-	Set ..HandelAankoopprijs = HandelAankoopprijs
 	Quit ##super()
 ]]></Implementation>
 </Method>
@@ -92,12 +87,6 @@
 ]]></Implementation>
 </Method>
 
-<Method name="ZetHandelAankoopprijs">
-<FormalSpec>NieuweHandelAankoopprijs:%Decimal</FormalSpec>
-<Implementation><![CDATA[	Set ..HandelAankoopprijs = NieuweHandelAankoopprijs
-]]></Implementation>
-</Method>
-
 <Storage name="Default">
 <Type>%Library.CacheStorage</Type>
 <DefaultData>ProductLijnDefaultData</DefaultData>
Index: WSimpl/Vhisie4/Winkelkar/WinkelkarService/BewaarProductLijn.cls.xml
===================================================================
diff -u -r62113 -r62116
--- WSimpl/Vhisie4/Winkelkar/WinkelkarService/BewaarProductLijn.cls.xml	(.../BewaarProductLijn.cls.xml)	(revision 62113)
+++ WSimpl/Vhisie4/Winkelkar/WinkelkarService/BewaarProductLijn.cls.xml	(.../BewaarProductLijn.cls.xml)	(revision 62116)
@@ -67,7 +67,6 @@
 		
 		#dim HandelAankoopprijs As %Decimal = ..HaalHandelAankoopprijs(BewaarProductLijnRequest) 
 		Do ..WinkelkarService.VoegToeProduct(WinkelkarID, "EenGroep", BewaarProductLijnRequest.ProductId, BewaarProductLijnRequest.Aantal, BewaarProductLijnRequest.PakketReferentie, BewaarProductLijnRequest.ProjectReferentie, BewaarProductLijnRequest.LijnId, BewaarProductLijnRequest.EenheidPrijs,BewaarProductLijnRequest.TotaalPrijs,, HandelAankoopprijs)
-		Do ##class(Tools.Wlip).%New(252).String("gelukt")
 	} Catch {
 		Lock -^Vhisie4.Winkelkar(BewaarProductLijnRequest.WinkelkarId,BewaarProductLijnRequest.LijnId)
 		Do ##class(TECH.ExceptionHandler).Rethrow()
Index: DOM/EC/Winkelkar/impl/WinkelkarService.cls.xml
===================================================================
diff -u -r62113 -r62116
--- DOM/EC/Winkelkar/impl/WinkelkarService.cls.xml	(.../WinkelkarService.cls.xml)	(revision 62113)
+++ DOM/EC/Winkelkar/impl/WinkelkarService.cls.xml	(.../WinkelkarService.cls.xml)	(revision 62116)
@@ -129,7 +129,7 @@
 	#dim ProductLijn As DOM.EC.Winkelkar.ProductLijn = ..ProductLijnBuilder.MaakLijn(GroepNaam, ProductID, Aantal, PakketReferentie, ProjectReferentie, ExterneId, KlantOrderlijnNr)
 	Do ProductLijn.ZetEindklantEenheidPrijsNettoExclBTW(EenheidPrijs)
 	Do ProductLijn.ZetEindklantTotaalPrijs(TotaalPrijs)
-	Do ProductLijn.ZetHandelAankoopprijs(HandelAankoopprijs)
+	Do ProductLijn.ZetEenheidPrijsNettoExclBTW(HandelAankoopprijs)
 	Do ..WinkelkarLijnRepository.Bewaar(ProductLijn)
 	
 	Quit ProductLijn.GeefID()