Index: vhUnitTest/APPS/VKP/OrderIngaveService/MaakOrderVanOfferte/TestProductLijn.cls.xml
===================================================================
diff -u -r48734 -r53652
--- vhUnitTest/APPS/VKP/OrderIngaveService/MaakOrderVanOfferte/TestProductLijn.cls.xml	(.../TestProductLijn.cls.xml)	(revision 48734)
+++ vhUnitTest/APPS/VKP/OrderIngaveService/MaakOrderVanOfferte/TestProductLijn.cls.xml	(.../TestProductLijn.cls.xml)	(revision 53652)
@@ -92,6 +92,36 @@
 	}
 ]]></Implementation>
 </Method>
+
+<Method name="Test: MaakOrderVanOfferte maakt een orderLijn met transportproduct en zet BTWCode en AfrondingRegel">
+<Implementation><![CDATA[
+	Set ..Offerte.VerzendingItem = ##class(APPS.VKP.impl.Offerte.VerzendingItem).%New()
+	Set ..Offerte.VerzendingItem.Code = 1
+	Set ..Offerte.VerzendingItem.Duurtijd = 1
+	Set ..Offerte.VerzendingItem.VerkoopPrijs = 9.99
+	Set ..Offerte.VerzendingItem.Omschrijving = "UPS (Worldwide) Express Plus" 
+	Do ..Offerte.Save()
+
+	#Dim Order As DOM.VKP.Order = ..OrderIngaveService.MaakOrderVanOfferte(..Offerte.GeefID())
+	
+	Do $$$AssertEquals(Order.GeefKlantID(),..Offerte.KlantID)
+
+	#dim TransportProductFound As %Boolean = $$$False
+	If $$$AssertTrue($IsObject(Order)) {
+		#dim Iter As TECH.Iterator = Order.GeefTypeOrderLijnIterator(##class(DOM.VKP.enu.OrderLijnType).Product())
+		while Iter.HasNext()
+		{
+			#dim OrderLijn As DOM.VKP.ProductOrderlijn = Iter.Next()
+			If (OrderLijn.GeefProductID() = ..#TransportProductID) {
+				Do $$$AssertEquals(OrderLijn.GeefBTWCode(),8)
+				Do $$$AssertEquals(OrderLijn.GeefAfrondingRegel(),"E1")
+				Set TransportProductFound = $$$True
+			}
+		}
+	}
+	Do $$$AssertTrue(TransportProductFound)
+]]></Implementation>
+</Method>
 </Class>
 
 
Index: APPS/VKP/OrderIngaveService.cls.xml
===================================================================
diff -u -r53632 -r53652
--- APPS/VKP/OrderIngaveService.cls.xml	(.../OrderIngaveService.cls.xml)	(revision 53632)
+++ APPS/VKP/OrderIngaveService.cls.xml	(.../OrderIngaveService.cls.xml)	(revision 53652)
@@ -83,8 +83,13 @@
 <Private>1</Private>
 </Property>
 
+<Property name="ProductAPI">
+<Type>DOM.PM.ProductAPI</Type>
+<Private>1</Private>
+</Property>
+
 <Method name="%OnNew">
-<FormalSpec>TekstLijnenToevoeger:APPS.VKP.OrderIngaveService.TekstLijnenToevoeger="",DateTimeAPI:TECH.DateTime.DateTimeAPI="",OfferteRepository:APPS.VKP.Offerte.impl.OfferteRepository,OrderAPI:DOM.VKP.OrderAPI,GebruikerBeheerder:DOM.common.VanHoeckeGebruikerBeheerder,OrderLevenCyclusService:APPS.VKP.OrderLevenCyclusService,WinkelkarRepository:DOM.EC.Winkelkar.impl.WinkelkarRepository,OrderPrijsValidator:APPS.VKP.impl.OrderPrijsValidatie,VroegsteLeverdatumBepaler:APPS.EC.impl.VroegsteLeverdatumBepaler,DocumentReferentiesRepository:DOM.VKP.DocumentReferentiesRepository,AdresUtils:APPS.VKP.OrderIngave.impl.AdresUtils,WinkelkarLijnenNaarOrderKopieerder:APPS.VKP.impl.WinkelkarLijnenNaarOrderKopieerder,LeveradresAanpasser:APPS.VKP.OrderIngaveService.LeverAdresAanpasserBijHerbestellingBijProbleem</FormalSpec>
+<FormalSpec>TekstLijnenToevoeger:APPS.VKP.OrderIngaveService.TekstLijnenToevoeger="",DateTimeAPI:TECH.DateTime.DateTimeAPI="",OfferteRepository:APPS.VKP.Offerte.impl.OfferteRepository,OrderAPI:DOM.VKP.OrderAPI,GebruikerBeheerder:DOM.common.VanHoeckeGebruikerBeheerder,OrderLevenCyclusService:APPS.VKP.OrderLevenCyclusService,WinkelkarRepository:DOM.EC.Winkelkar.impl.WinkelkarRepository,OrderPrijsValidator:APPS.VKP.impl.OrderPrijsValidatie,VroegsteLeverdatumBepaler:APPS.EC.impl.VroegsteLeverdatumBepaler,DocumentReferentiesRepository:DOM.VKP.DocumentReferentiesRepository,AdresUtils:APPS.VKP.OrderIngave.impl.AdresUtils,WinkelkarLijnenNaarOrderKopieerder:APPS.VKP.impl.WinkelkarLijnenNaarOrderKopieerder,LeveradresAanpasser:APPS.VKP.OrderIngaveService.LeverAdresAanpasserBijHerbestellingBijProbleem,ProductAPI:DOM.PM.ProductAPI</FormalSpec>
 <Private>1</Private>
 <ProcedureBlock>1</ProcedureBlock>
 <ReturnType>%Status</ReturnType>
@@ -104,6 +109,7 @@
 	Set ..VroegsteLeverdatumBepaler = $$$Inject(VroegsteLeverdatumBepaler,##class(APPS.EC.impl.VroegsteLeverdatumBepaler).%New())
 	Set ..DocumentReferentiesRepository = $$$Inject(DocumentReferentiesRepository,##class(DOM.VKP.DocumentReferentiesRepository).%New())
 	set ..LeveradresAanpasser = $$$Inject(LeveradresAanpasser,##class(APPS.VKP.OrderIngaveService.LeverAdresAanpasserBijHerbestellingBijProbleem).%New())
+	Set ..ProductAPI = $$$Inject(ProductAPI, ##class(DOM.DomeinContext).Instance().GeefProductAPI())
 
 	Quit $$$OK
 ]]></Implementation>
@@ -280,6 +286,11 @@
 	#dim TransportProductLijn As DOM.VKP.ProductOrderlijn = Order.MaakNieuweProductLijn( ..#TransportProductID)
 	Do TransportProductLijn.ZetAantal(1)	
 	Do TransportProductLijn.ZetTotaalExclBTW(EenheidPrijsExclBTW)
+
+	#dim Product As DOM.PM.Product = ..ProductAPI.GeefProduct(..#TransportProductID)
+	Do TransportProductLijn.ZetBTWCode(Product.GeefBTWCode())
+	Do TransportProductLijn.ZetAfrondingRegel(Product.GeefGrootteOrdeVerkoop()_1)
+
 	Do TransportProductLijn.ZetTekstVoorAfdrukDocumentType(ManueleLijnOmschrijving,##class(DOM.VKP.enu.TekstAfdrukDocumentType).Toelevering())
 	Do TransportProductLijn.ZetTekstVoorAfdrukDocumentType(ManueleLijnOmschrijving,##class(DOM.VKP.enu.TekstAfdrukDocumentType).LeverBon())
 ]]></Implementation>