Index: AXimpl/Dynamics/SalesOrderIn/Converter/SalesOrderConverter.cls.xml
===================================================================
diff -u -r48196 -r48265
--- AXimpl/Dynamics/SalesOrderIn/Converter/SalesOrderConverter.cls.xml	(.../SalesOrderConverter.cls.xml)	(revision 48196)
+++ AXimpl/Dynamics/SalesOrderIn/Converter/SalesOrderConverter.cls.xml	(.../SalesOrderConverter.cls.xml)	(revision 48265)
@@ -68,8 +68,13 @@
 <Private>1</Private>
 </Property>
 
+<Property name="VerkoopApi">
+<Type>DOM.VKP.VerkoopAPI</Type>
+<Private>1</Private>
+</Property>
+
 <Method name="%OnNew">
-<FormalSpec>OrderAPI:DOM.VKP.OrderAPI,OrderLevenCyclusService:APPS.VKP.OrderLevenCyclusService,DateTimeAPI:TECH.DateTime="",ProductBepaler:AXimpl.Admin.Common.ProductBepaler,DocumentReferentiesRepository:DOM.VKP.DocumentReferentiesRepository,OrderlijnenSorteerder:AXimpl.Dynamics.SalesOrderIn.Converter.OrderlijnenSorteerder,OrderSluiter:CHUI.VKP.OrderIngave.BevestigdAXOrderSluiterv01,ToeleveringService:AXimpl.Dynamics.SalesOrderIn.Converter.ToeleveringService,OrderIngaveService:APPS.VKP.OrderIngaveService,OfferteRepository:APPS.VKP.Offerte.OfferteRepository</FormalSpec>
+<FormalSpec>OrderAPI:DOM.VKP.OrderAPI,OrderLevenCyclusService:APPS.VKP.OrderLevenCyclusService,DateTimeAPI:TECH.DateTime="",ProductBepaler:AXimpl.Admin.Common.ProductBepaler,DocumentReferentiesRepository:DOM.VKP.DocumentReferentiesRepository,OrderlijnenSorteerder:AXimpl.Dynamics.SalesOrderIn.Converter.OrderlijnenSorteerder,OrderSluiter:CHUI.VKP.OrderIngave.BevestigdAXOrderSluiterv01,ToeleveringService:AXimpl.Dynamics.SalesOrderIn.Converter.ToeleveringService,OrderIngaveService:APPS.VKP.OrderIngaveService,OfferteRepository:APPS.VKP.Offerte.OfferteRepository,VerkoopApi:DOM.VKP.VerkoopAPI</FormalSpec>
 <Private>1</Private>
 <ProcedureBlock>1</ProcedureBlock>
 <ReturnType>%Status</ReturnType>
@@ -85,6 +90,7 @@
 	Set ..ToeleveringService = $$$Inject(ToeleveringService, ##class(AXimpl.Dynamics.SalesOrderIn.Converter.ToeleveringService).%New())
 	Set ..OrderIngaveService = $$$Inject(OrderIngaveService, ##class(APPS.VKP.OrderIngaveService).%New())
 	Set ..OfferteRepository = $$$Inject(OfferteRepository, ##class(APPS.VKP.Offerte.impl.OfferteRepository).%New())
+	Set ..VerkoopApi = $$$Inject(VerkoopApi, ##class(APPS.VKP.impl.VerkoopAPI).%New())
 	
 	Set ..Logger = ##class(vhLib.Logger).%New()
 
@@ -155,6 +161,10 @@
 	Do OrderLijn.ZetMunt(OrderLine.CurrencyCode) 
 	Do OrderLijn.ZetEenheidPrijsExclBTW(OrderLine.LineAmount / OrderLine.RemainSalesPhysical)
 	Do OrderLijn.ZetTotaalNettoExclBTW(OrderLine.LineAmount)
+	If (..VerkoopApi.GeefKlant(OrderLijn.GeefOrder().GeefKlantID()).GeefFacturatieWijze() = ##class(DOM.VKP.enu.FacturatieWijze).Incl()) {
+		Do OrderLijn.ZetEenheidPrijsExclBTW(##class(TECH.Math).Round(OrderLijn.GeefEenheidPrijsExclBTW()/(1+(##class(DOM.common.enu.BTWCode).LogicalToDisplay(OrderLijn.GeefBTWCode())/100))),2)
+		Do OrderLijn.ZetTotaalNettoExclBTW(##class(TECH.Math).Round(OrderLijn.GeefTotaalNettoExclBTW()/(1+(##class(DOM.common.enu.BTWCode).LogicalToDisplay(OrderLijn.GeefBTWCode())/100))),2)
+	}
 	Do OrderLijn.ZetLeverdag(..GeefLeverDatum(OrderLine))
 	Do OrderLijn.ZetAxConfigId(OrderLine.ConfigId)
 	Do:..IsReedsVerwerkteOrderlijn(OrderLine) OrderLijn.ZetToeleveringLijnNr(..#ToeleveringLijnIsReedsVerwerkt)
Index: vhUnitTest/AXimpl/Dynamics/SalesOrderIn/Converter/SalesOrderConverter/Convert/Test.cls.xml
===================================================================
diff -u -r48196 -r48265
--- vhUnitTest/AXimpl/Dynamics/SalesOrderIn/Converter/SalesOrderConverter/Convert/Test.cls.xml	(.../Test.cls.xml)	(revision 48196)
+++ vhUnitTest/AXimpl/Dynamics/SalesOrderIn/Converter/SalesOrderConverter/Convert/Test.cls.xml	(.../Test.cls.xml)	(revision 48265)
@@ -43,8 +43,11 @@
 	
 	Set OrderLijnenSorteerderMock = ##class(vhTest.Mock.AXimpl.Dynamics.SalesOrderIn.Converter.OrderlijnenSorteerder).%New()
 	Do OrderLijnenSorteerderMock.VerwachtMethodCall("SorteerGepersisteerdeOrderLijnen", OrderMock).DanDoeNiks()
+	
+	Set VerkoopApiStub = ##class(vhTest.Mock.DOM.VKP.VerkoopAPI).%New()
+	Do VerkoopApiStub.IndienMethodCall("GeefKlant","K||1234").DanReturn(##class(vhTest.Utils.DOM.VKP.VanHoeckeKlant).StandaardKlant())
 
-	Set SalesOrderConverter = ##class(AXimpl.Dynamics.SalesOrderIn.Converter.SalesOrderConverter).%New(OrderAPIMock, OrderLevenCyclusServiceMock, , ,DocumentReferentiesRepositoryMock, OrderLijnenSorteerderMock,, ..GeefToeleveringService())
+	Set SalesOrderConverter = ##class(AXimpl.Dynamics.SalesOrderIn.Converter.SalesOrderConverter).%New(OrderAPIMock, OrderLevenCyclusServiceMock, , ,DocumentReferentiesRepositoryMock, OrderLijnenSorteerderMock,, ..GeefToeleveringService(),,,VerkoopApiStub)
 	Do SalesOrderConverter.Convert(StandaardOrder)
 	
 	Do $$$AssertEquals("Mijn orderreferentie", OrderDocRef.OrderReferentie)
@@ -83,7 +86,10 @@
 	Do ProductBepalerMock.VerwachtMethodCall("GeefProductId","0.741.108.3").DanReturn("DummyProductID")
 	Do ProductBepalerMock.VerwachtMethodCall("GeefFoutmeldingIndienGenerischProduct","DummyProductID").DanDoeNiks()
 	
-	Set SalesOrderConverter = ##class(AXimpl.Dynamics.SalesOrderIn.Converter.SalesOrderConverter).%New(..GeefOrderApi(OrderMock), OrderLevenCyclusServiceMock,,ProductBepalerMock,..GeefDocumentReferentie(), ..GeefOrderLijnenSorteerder(),, ..GeefToeleveringService())
+	Set VerkoopApiStub = ##class(vhTest.Mock.DOM.VKP.VerkoopAPI).%New()
+	Do VerkoopApiStub.IndienMethodCall("GeefKlant","K||1234").DanReturn(##class(vhTest.Utils.DOM.VKP.VanHoeckeKlant).StandaardKlant())
+
+	Set SalesOrderConverter = ##class(AXimpl.Dynamics.SalesOrderIn.Converter.SalesOrderConverter).%New(..GeefOrderApi(OrderMock), OrderLevenCyclusServiceMock,,ProductBepalerMock,..GeefDocumentReferentie(), ..GeefOrderLijnenSorteerder(),, ..GeefToeleveringService(),,, VerkoopApiStub)
 	Do SalesOrderConverter.Convert(StandaardOrder)
 	
 	Do OrderMock.Verifieer()
@@ -122,7 +128,10 @@
 	#dim ToeleveringServiceMock As vhTest.Mock.AXimpl.Dynamics.SalesOrderIn.Converter.ToeleveringService = ##class(vhTest.Mock.AXimpl.Dynamics.SalesOrderIn.Converter.ToeleveringService).%New()
 	Do ToeleveringServiceMock.VerwachtMethodCall("VerwijderToeleveringenViaOrder" , OrderMock).ExactAantalKeer(1).DanDoeNiks()
 
-	Set SalesOrderConverter = ##class(AXimpl.Dynamics.SalesOrderIn.Converter.SalesOrderConverter).%New(..GeefOrderApi(OrderMock), OrderLevenCyclusServiceMock,,ProductBepalerMock,..GeefDocumentReferentie(), ..GeefOrderLijnenSorteerder(), ,ToeleveringServiceMock)
+	Set VerkoopApiStub = ##class(vhTest.Mock.DOM.VKP.VerkoopAPI).%New()
+	Do VerkoopApiStub.IndienMethodCall("GeefKlant","K||1234").DanReturn(##class(vhTest.Utils.DOM.VKP.VanHoeckeKlant).StandaardKlant())
+
+	Set SalesOrderConverter = ##class(AXimpl.Dynamics.SalesOrderIn.Converter.SalesOrderConverter).%New(..GeefOrderApi(OrderMock), OrderLevenCyclusServiceMock,,ProductBepalerMock,..GeefDocumentReferentie(), ..GeefOrderLijnenSorteerder(), ,ToeleveringServiceMock,,,VerkoopApiStub)
 	Do SalesOrderConverter.Convert(StandaardOrder)
 	
 	Do OrderMock.Verifieer()
@@ -150,6 +159,8 @@
 	Do ProductOrderlijnMock.VerwachtMethodCall("ZetTotaalNettoExclBTW", 250).DanDoeNiks()
 	Do ProductOrderlijnMock.VerwachtMethodCall("ZetAxConfigId", "").DanDoeNiks()
 	Do ProductOrderlijnMock.VerwachtMethodCall("ZetTekstVoorAfdrukDocumentType", "PackingSlipBody", ##class(DOM.VKP.enu.TekstAfdrukDocumentType).LeverBon()).DanDoeNiks()
+	Do ProductOrderlijnMock.IndienMethodCall("GeefEenheidPrijsExclBTW",).DanReturn(25)
+	Do ProductOrderlijnMock.IndienMethodCall("GeefBTWCode",).DanReturn(8)
 
 	Set OrderLevenCyclusServiceMock = ##class(vhTest.Mock.APPS.VKP.OrderLevenCyclusService).%New()
 	Do OrderLevenCyclusServiceMock.IndienMethodCall("MaakOrderMetKlantGegevens", $$$ElkeWaarde,$$$ElkeWaarde).DanReturn(OrderMock)
@@ -159,7 +170,10 @@
 	Do ProductBepalerMock.VerwachtMethodCall("GeefProductIdVoorLeverancierId","0.741.108.3",##class(DOM.AKP.enu.Leverancier).Blum(),"SOPRContractId").DanReturn("DummyProductID")
 	Do ProductBepalerMock.VerwachtMethodCall("GeefFoutmeldingIndienGenerischProduct","DummyProductID").DanDoeNiks()
 	
-	Set SalesOrderConverter = ##class(AXimpl.Dynamics.SalesOrderIn.Converter.SalesOrderConverter).%New(..GeefOrderApi(OrderMock), OrderLevenCyclusServiceMock,,ProductBepalerMock,..GeefDocumentReferentie(), ..GeefOrderLijnenSorteerder(), ,..GeefToeleveringService())
+	Set VerkoopApiStub = ##class(vhTest.Mock.DOM.VKP.VerkoopAPI).%New()
+	Do VerkoopApiStub.IndienMethodCall("GeefKlant","K||1234").DanReturn(##class(vhTest.Utils.DOM.VKP.VanHoeckeKlant).StandaardKlant())
+
+	Set SalesOrderConverter = ##class(AXimpl.Dynamics.SalesOrderIn.Converter.SalesOrderConverter).%New(..GeefOrderApi(OrderMock), OrderLevenCyclusServiceMock,,ProductBepalerMock,..GeefDocumentReferentie(), ..GeefOrderLijnenSorteerder(), ,..GeefToeleveringService(),,,VerkoopApiStub)
 	Do SalesOrderConverter.Convert(StandaardOrder)
 	
 	Do OrderMock.Verifieer()
@@ -223,7 +237,10 @@
 	Set OrderSluiterMock = ##class(vhTest.Mock.CHUI.VKP.OrderIngave.OrderSluiter).%New()
 	Do OrderSluiterMock.VerwachtMethodCall("Sluit", OrderMock.GeefID(),"","").ExactAantalKeer(1).DanDoeNiks()
 	
-	Set SalesOrderConverter = ##class(AXimpl.Dynamics.SalesOrderIn.Converter.SalesOrderConverter).%New(OrderAPIMock, OrderLevenCyclusServiceMock, , ,DocumentReferentiesRepositoryMock, OrderLijnenSorteerderMock, OrderSluiterMock, ..GeefToeleveringService())
+	Set VerkoopApiStub = ##class(vhTest.Mock.DOM.VKP.VerkoopAPI).%New()
+	Do VerkoopApiStub.IndienMethodCall("GeefKlant","K||1234").DanReturn(##class(vhTest.Utils.DOM.VKP.VanHoeckeKlant).StandaardKlant())
+
+	Set SalesOrderConverter = ##class(AXimpl.Dynamics.SalesOrderIn.Converter.SalesOrderConverter).%New(OrderAPIMock, OrderLevenCyclusServiceMock, , ,DocumentReferentiesRepositoryMock, OrderLijnenSorteerderMock, OrderSluiterMock, ..GeefToeleveringService(),,,VerkoopApiStub)
 	Do SalesOrderConverter.Convert(StandaardOrder)
 	
 	Do OrderSluiterMock.Verifieer()
@@ -261,12 +278,14 @@
 	Set OrderLevenCyclusServiceMock = ##class(vhTest.Mock.APPS.VKP.OrderLevenCyclusService).%New()
 	Do OrderLevenCyclusServiceMock.IndienMethodCall("MaakOrderMetKlantGegevens", $$$ElkeWaarde,$$$ElkeWaarde).DanReturn(OrderMock)
 	Do OrderLevenCyclusServiceMock.IndienMethodCall("VoegToeProductVoorKlant",$$$ElkeWaarde,$$$ElkeWaarde,$$$ElkeWaarde,$$$ElkeWaarde).DanReturn(ProductOrderlijnMock)
-
 	
+	Set VerkoopApiStub = ##class(vhTest.Mock.DOM.VKP.VerkoopAPI).%New()
+	Do VerkoopApiStub.IndienMethodCall("GeefKlant","K||1234").DanReturn(##class(vhTest.Utils.DOM.VKP.VanHoeckeKlant).StandaardKlant())
+	
 	Set OrderLijnenSorteerderMock = ##class(vhTest.Mock.AXimpl.Dynamics.SalesOrderIn.Converter.OrderlijnenSorteerder).%New()
 	Do OrderLijnenSorteerderMock.IndienMethodCall("SorteerGepersisteerdeOrderLijnen", OrderMock).DanDoeNiks()
 	
-	Set SalesOrderConverter = ##class(AXimpl.Dynamics.SalesOrderIn.Converter.SalesOrderConverter).%New(OrderAPIMock, OrderLevenCyclusServiceMock, , ,DocumentReferentiesRepositoryMock, OrderLijnenSorteerderMock, , ..GeefToeleveringService())
+	Set SalesOrderConverter = ##class(AXimpl.Dynamics.SalesOrderIn.Converter.SalesOrderConverter).%New(OrderAPIMock, OrderLevenCyclusServiceMock, , ,DocumentReferentiesRepositoryMock, OrderLijnenSorteerderMock, , ..GeefToeleveringService(),,,VerkoopApiStub)
 	Do SalesOrderConverter.Convert(StandaardOrderMetProductLijn)
 	
 	Do ProductOrderlijnMock.Verifieer()
@@ -308,8 +327,11 @@
 	Do StandaardOfferte.ZetOrderID(StandaardOfferte.GeefID())
 	Do OfferteRepositoryStub.VerwachtMethodCall("Bewaar",StandaardOfferte).DanDoeNiks()
 
+	Set VerkoopApiStub = ##class(vhTest.Mock.DOM.VKP.VerkoopAPI).%New()
+	Do VerkoopApiStub.IndienMethodCall("GeefKlant","K||1234").DanReturn(##class(vhTest.Utils.DOM.VKP.VanHoeckeKlant).StandaardKlant())
+
 	#dim StandaardOrder As AXif.Dynamics.SalesOrderIn.Envelope = ##class(vhTest.Utils.AXif.Dynamics.SalesOrderIn.Envelope).StandaardOrder()
-	Set SalesOrderConverter = ##class(AXimpl.Dynamics.SalesOrderIn.Converter.SalesOrderConverter).%New(OrderAPIMock, OrderLevenCyclusServiceMock, , ,DocumentReferentiesRepositoryMock, OrderLijnenSorteerderMock,, ..GeefToeleveringService(), OrderIngaveServiceMock, OfferteRepositoryStub)
+	Set SalesOrderConverter = ##class(AXimpl.Dynamics.SalesOrderIn.Converter.SalesOrderConverter).%New(OrderAPIMock, OrderLevenCyclusServiceMock, , ,DocumentReferentiesRepositoryMock, OrderLijnenSorteerderMock,, ..GeefToeleveringService(), OrderIngaveServiceMock, OfferteRepositoryStub, VerkoopApiStub)
 	Do SalesOrderConverter.Convert(StandaardOrder)
 	
 	Do OrderAPIMock.Verifieer()
@@ -321,6 +343,45 @@
 	Do OfferteRepositoryStub.Verifieer()
 ]]></Implementation>
 </Method>
+
+<Method name="Test: Indien Klant BTW incl -&gt; prijs verminderen met BTW">
+<Implementation><![CDATA[
+	#dim StandaardOrder As AXif.Dynamics.SalesOrderIn.Envelope = ##class(vhTest.Utils.AXif.Dynamics.SalesOrderIn.Envelope).StandaardOrderMetProductLijn()
+	
+	#dim OrderMock As vhTest.Mock.DOM.VKP.Order = ..GeefOrder()
+	
+	Do OrderMock.VerwachtMethodCall("BestaatOrderLijnViaAxInventTransId","000019541").DanReturn($$$False)
+	Do OrderMock.VerwachtMethodCall("GeefKlantID").DanReturn("DummyKlantID")
+	
+	#dim ProductOrderlijnMock As vhTest.Mock.DOM.VKP.impl.DataM.DataMProductOrderlijn = ##class(vhTest.Utils.DOM.VKP.ProductOrderlijn).StandaardProductLijn()
+	Do ProductOrderlijnMock.VerwachtMethodCall("ZetAxInventTransId",StandaardOrder.Body.MessageParts.ADUMsgSalesOrderOutQuery.OrderHeader.GetAt(1).OrderLine.GetAt(1).InventTransId).DanDoeNiks()
+	Do ProductOrderlijnMock.VerwachtMethodCall("ZetMunt","EUR").DanDoeNiks()
+	Do ProductOrderlijnMock.VerwachtMethodCall("ZetLeverdag", $$INTDATE^vhLib.DataTypes("19-07-2017")).DanDoeNiks()
+	Do ProductOrderlijnMock.VerwachtMethodCall("ZetEenheidPrijsExclBTW", 25).DanDoeNiks()
+	Do ProductOrderlijnMock.VerwachtMethodCall("ZetTotaalNettoExclBTW", 250).DanDoeNiks()
+	Do ProductOrderlijnMock.VerwachtMethodCall("ZetAxConfigId", "").DanDoeNiks()
+	Do ProductOrderlijnMock.VerwachtMethodCall("ZetTekstVoorAfdrukDocumentType", "PackingSlipBody", ##class(DOM.VKP.enu.TekstAfdrukDocumentType).LeverBon()).DanDoeNiks()
+
+	Set OrderLevenCyclusServiceMock = ##class(vhTest.Mock.APPS.VKP.OrderLevenCyclusService).%New()
+	Do OrderLevenCyclusServiceMock.IndienMethodCall("MaakOrderMetKlantGegevens", $$$ElkeWaarde,$$$ElkeWaarde).DanReturn(OrderMock)
+	Do OrderLevenCyclusServiceMock.VerwachtMethodCall("VoegToeProductVoorKlant",OrderMock,"DummyKlantID","DummyProductID",10).DanReturn(ProductOrderlijnMock).ExactAantalKeer(1)
+	
+	Set ProductBepalerMock = ##class(vhTest.Mock.AXimpl.Admin.Common.ProductBepaler).%New()
+	Do ProductBepalerMock.VerwachtMethodCall("GeefProductId","0.741.108.3").DanReturn("DummyProductID")
+	Do ProductBepalerMock.VerwachtMethodCall("GeefFoutmeldingIndienGenerischProduct","DummyProductID").DanDoeNiks()
+	
+	Set VerkoopApiStub = ##class(vhTest.Mock.DOM.VKP.VerkoopAPI).%New()
+	Do VerkoopApiStub.IndienMethodCall("GeefKlant","K||1234").DanReturn(##class(vhTest.Utils.DOM.VKP.VanHoeckeKlant).StandaardKlant())
+
+	Set SalesOrderConverter = ##class(AXimpl.Dynamics.SalesOrderIn.Converter.SalesOrderConverter).%New(..GeefOrderApi(OrderMock), OrderLevenCyclusServiceMock,,ProductBepalerMock,..GeefDocumentReferentie(), ..GeefOrderLijnenSorteerder(),, ..GeefToeleveringService(),,,VerkoopApiStub)
+	Do SalesOrderConverter.Convert(StandaardOrder)
+	
+	Do OrderMock.Verifieer()
+	Do OrderLevenCyclusServiceMock.Verifieer()
+	Do ProductBepalerMock.Verifieer()
+	Do ProductOrderlijnMock.Verifieer()
+]]></Implementation>
+</Method>
 </Class>
 
 
Index: vhUnitTest/AXimpl/Dynamics/SalesOrderIn/Converter/SalesOrderConverter/Convert/TestUpdate.cls.xml
===================================================================
diff -u -r48187 -r48265
--- vhUnitTest/AXimpl/Dynamics/SalesOrderIn/Converter/SalesOrderConverter/Convert/TestUpdate.cls.xml	(.../TestUpdate.cls.xml)	(revision 48187)
+++ vhUnitTest/AXimpl/Dynamics/SalesOrderIn/Converter/SalesOrderConverter/Convert/TestUpdate.cls.xml	(.../TestUpdate.cls.xml)	(revision 48265)
@@ -73,7 +73,10 @@
 	#dim ToeleveringServiceMock As vhTest.Mock.AXimpl.Dynamics.SalesOrderIn.Converter.ToeleveringService = ##class(vhTest.Mock.AXimpl.Dynamics.SalesOrderIn.Converter.ToeleveringService).%New()
 	Do ToeleveringServiceMock.VerwachtMethodCall("VerwijderToeleveringenViaOrder" , OrderMock).ExactAantalKeer(1).DanDoeNiks()
 	
-	Set SalesOrderConverter = ##class(AXimpl.Dynamics.SalesOrderIn.Converter.SalesOrderConverter).%New(..GeefOrderApi(OrderMock),,,,..GeefDocumentReferentie(), ..GeefOrderLijnenSorteerder(), ,ToeleveringServiceMock)
+	Set VerkoopApiStub = ##class(vhTest.Mock.DOM.VKP.VerkoopAPI).%New()
+	Do VerkoopApiStub.IndienMethodCall("GeefKlant","K||1234").DanReturn(##class(vhTest.Utils.DOM.VKP.VanHoeckeKlant).StandaardKlant())
+
+	Set SalesOrderConverter = ##class(AXimpl.Dynamics.SalesOrderIn.Converter.SalesOrderConverter).%New(..GeefOrderApi(OrderMock),,,,..GeefDocumentReferentie(), ..GeefOrderLijnenSorteerder(), ,ToeleveringServiceMock,,,VerkoopApiStub)
 	Do SalesOrderConverter.Convert(StandaardOrder)
 	
 	Do OrderMock.Verifieer()