Index: vhTest/Mock/APPS/VKP/impl/WinkelkarLijnenNaarOrderKopieerder.cls.xml
===================================================================
diff -u -r42449 -r60514
--- vhTest/Mock/APPS/VKP/impl/WinkelkarLijnenNaarOrderKopieerder.cls.xml	(.../WinkelkarLijnenNaarOrderKopieerder.cls.xml)	(revision 42449)
+++ vhTest/Mock/APPS/VKP/impl/WinkelkarLijnenNaarOrderKopieerder.cls.xml	(.../WinkelkarLijnenNaarOrderKopieerder.cls.xml)	(revision 60514)
@@ -8,6 +8,13 @@
 <Super>APPS.VKP.impl.WinkelkarLijnenNaarOrderKopieerder,Tools.Mock.MockClassBase</Super>
 <Inheritance>right</Inheritance>
 
+<Method name="%OnNew">
+<FormalSpec>BerekeningService:APPS.PM.Maatwerk.impl.BerekeningServiceProduct,VerkoopAPI:DOM.VKP.VerkoopAPI,VerkoopPrijsAPI:APPS.VKP.VerkoopPrijsAPI,OrderLevenCyclusService:APPS.VKP.OrderLevenCyclusService</FormalSpec>
+<ReturnType>%Status</ReturnType>
+<Implementation><![CDATA[	Quit $$$OK
+]]></Implementation>
+</Method>
+
 <Method name="Finalize">
 <Implementation><![CDATA[	do ..VerwerkMethodCall("Finalize")
 ]]></Implementation>
Index: APPS/VKP/impl/WinkelkarLijnenNaarOrderKopieerder.cls.xml
===================================================================
diff -u -r54166 -r60514
--- APPS/VKP/impl/WinkelkarLijnenNaarOrderKopieerder.cls.xml	(.../WinkelkarLijnenNaarOrderKopieerder.cls.xml)	(revision 54166)
+++ APPS/VKP/impl/WinkelkarLijnenNaarOrderKopieerder.cls.xml	(.../WinkelkarLijnenNaarOrderKopieerder.cls.xml)	(revision 60514)
@@ -132,7 +132,19 @@
 <FormalSpec>MaatwerkLijn:DOM.EC.Winkelkar.MaatwerkLijn</FormalSpec>
 <Private>1</Private>
 <ReturnType>DOM.PM.Product</ReturnType>
-<Implementation><![CDATA[	Quit ..BerekeningService.MaakProductVanKenmerken(MaatwerkLijn.GeefIngegevenKenmerken(),..Order.GeefKlantID(),MaatwerkLijn.GeefAantal())
+<Implementation><![CDATA[
+	#dim Product As DOM.PM.Product = ""
+	#Dim OperatieScope As TECH.OperatieScope = ##class(TECH.OperatieScope).StartMetTx()
+	
+	Try {
+		Set Product = ..BerekeningService.MaakProductVanKenmerken(MaatwerkLijn.GeefIngegevenKenmerken(),..Order.GeefKlantID(),MaatwerkLijn.GeefAantal())
+		Do OperatieScope.Gelukt()
+	} Catch {
+		Do OperatieScope.Gefaald()
+		Do ##class(TECH.ExceptionHandler).Rethrow()
+	}
+	
+	Quit Product
 ]]></Implementation>
 </Method>
 
Index: APPS/VKP/OrderIngaveService.cls.xml
===================================================================
diff -u -r54438 -r60514
--- APPS/VKP/OrderIngaveService.cls.xml	(.../OrderIngaveService.cls.xml)	(revision 54438)
+++ APPS/VKP/OrderIngaveService.cls.xml	(.../OrderIngaveService.cls.xml)	(revision 60514)
@@ -183,8 +183,6 @@
 		Do BevestigingControleur.VerzekerBevestiging(..#MaakOrderVanOfferteDubbelBestellen, GegevenBevestigingen)
 	}
 
-	#Dim OperatieScope As TECH.OperatieScope = ##class(TECH.OperatieScope).StartMetTx()
-
 	Try {
 		#Dim OrderDocRef As DOM.VKP.DocumentReferenties = Offerte.GeefDocumentReferenties().%ConstructClone(1)		
 		
@@ -222,11 +220,7 @@
 		
 		Do Offerte.ZetOrderID(Order.GeefID())
 		Do ..OfferteRepository.Bewaar(Offerte)
-
-		Do OperatieScope.Gelukt()
-		
 	} Catch {
-		Do OperatieScope.Gefaald()
 		Do ##class(TECH.ExceptionHandler).Rethrow()
 	}
 	
Index: vhTest/Mock/APPS/VKP/OrderIngaveService.cls.xml
===================================================================
diff -u -r48189 -r60514
--- vhTest/Mock/APPS/VKP/OrderIngaveService.cls.xml	(.../OrderIngaveService.cls.xml)	(revision 48189)
+++ vhTest/Mock/APPS/VKP/OrderIngaveService.cls.xml	(.../OrderIngaveService.cls.xml)	(revision 60514)
@@ -8,6 +8,13 @@
 <Super>APPS.VKP.OrderIngaveService,Tools.Mock.MockClassBase</Super>
 <Inheritance>right</Inheritance>
 
+<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,ProductAPI:DOM.PM.ProductAPI</FormalSpec>
+<ReturnType>%Status</ReturnType>
+<Implementation><![CDATA[	Quit $$$OK
+]]></Implementation>
+</Method>
+
 <Method name="BepaalOorsprongKetting">
 <FormalSpec>Offerte:APPS.VKP.impl.Offerte</FormalSpec>
 <ReturnType>%List</ReturnType>
Index: DOM/EC/Winkelkar/Winkelkar.cls.xml
===================================================================
diff -u -r52678 -r60514
--- DOM/EC/Winkelkar/Winkelkar.cls.xml	(.../Winkelkar.cls.xml)	(revision 52678)
+++ DOM/EC/Winkelkar/Winkelkar.cls.xml	(.../Winkelkar.cls.xml)	(revision 60514)
@@ -315,13 +315,24 @@
 <ReturnType>%Status</ReturnType>
 <Implementation><![CDATA[
 	#dim LijnIterator = ..Root.SublijnIterator()
+	
 	While (LijnIterator.HasNext())
 	{
 		#dim WinkelkarLijn As DOM.EC.Winkelkar.Lijn = LijnIterator.Next()
+		
 		if $IsObject(WinkelkarLijn) {
-			Do WinkelkarLijn.Accept(Visitor)
+			#Dim OperatieScope As TECH.OperatieScope = ##class(TECH.OperatieScope).StartMetTx()
+			
+			Try {
+				Do WinkelkarLijn.Accept(Visitor)
+				Do OperatieScope.Gelukt()
+			} Catch {
+				Do OperatieScope.Gefaald()
+				Do ##class(TECH.ExceptionHandler).Rethrow()
+			}
 		}
 	}
+	
 	Do Visitor.Finalize()
 	
 	Quit $$$OK