Index: AXimpl/Dynamics/SalesOrderIn/Converter/ToeleveringService.cls.xml
===================================================================
diff -u
--- AXimpl/Dynamics/SalesOrderIn/Converter/ToeleveringService.cls.xml	(revision 0)
+++ AXimpl/Dynamics/SalesOrderIn/Converter/ToeleveringService.cls.xml	(revision 47989)
@@ -0,0 +1,39 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="AXimpl.Dynamics.SalesOrderIn.Converter.ToeleveringService">
+<Super>TECH.Mockable</Super>
+
+<Method name="VerwijderToeleveringenViaOrder">
+<FormalSpec>Order:DOM.VKP.Order</FormalSpec>
+<Implementation><![CDATA[
+	#dim OrderLijnIterator As TECH.ListIterator = Order.GeefProductOrderLijnIterator()
+	While OrderLijnIterator.HasNext() {
+		#dim OrderLijn As DOM.VKP.ProductOrderlijn = OrderLijnIterator.Next()
+		#dim ToeleveringID As %String = OrderLijn.GeefToeleveringID()
+		If $$$HasLength(ToeleveringID) {
+			Do ..VerwijderToelevering(ToeleveringID)
+		}
+	}
+]]></Implementation>
+</Method>
+
+<Method name="VerwijderToelevering">
+<FormalSpec>ToeleveringID:%String</FormalSpec>
+<Private>1</Private>
+<Implementation><![CDATA[
+	#dim OperatieScope As TECH.OperatieScope = ##class(TECH.OperatieScope).StartMetTx()
+	Try {
+		Do ##class(vhLib.OldSchool).InitVars()			
+		Do ##class(BL.Legacy.FLOWTOE).VerbreekKOMLinkVanToelevering(ToeleveringID)
+		Do ##class(BL.Legacy.FLOWTOE).VerwijderToeleveringMetBehoudVanOrder(ToeleveringID)
+		Do OperatieScope.Gelukt()
+	} Catch {
+		#dim Exceptie As TECH.Exceptions.Exception = ##class(TECH.ExceptionHandler).Catch()
+		Do OperatieScope.Gefaald()
+	}
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>
Index: vhTest/Mock/AXimpl/Dynamics/SalesOrderIn/Converter/ToeleveringService.cls.xml
===================================================================
diff -u
--- vhTest/Mock/AXimpl/Dynamics/SalesOrderIn/Converter/ToeleveringService.cls.xml	(revision 0)
+++ vhTest/Mock/AXimpl/Dynamics/SalesOrderIn/Converter/ToeleveringService.cls.xml	(revision 47989)
@@ -0,0 +1,19 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="vhTest.Mock.AXimpl.Dynamics.SalesOrderIn.Converter.ToeleveringService">
+<Description>
+Deze klasse werd automatisch gegenereerd en onderhouden - lokale aanpassingen zijn niet nodig.
+Een hercompilatie van de basis interface - met een correct werkende studiohook ( v2.20 ++ ) - zorgt ervoor dat deze klasse aangepast wordt</Description>
+<ProcedureBlock>1</ProcedureBlock>
+<Super>AXimpl.Dynamics.SalesOrderIn.Converter.ToeleveringService,Tools.Mock.MockClassBase</Super>
+<Inheritance>right</Inheritance>
+
+<Method name="VerwijderToeleveringenViaOrder">
+<FormalSpec>Order:DOM.VKP.Order</FormalSpec>
+<Implementation><![CDATA[	do ..VerwerkMethodCall("VerwijderToeleveringenViaOrder",Order)
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>
Index: vhTest/Fake/AXimpl/Dynamics/SalesOrderIn/Converter/ToeleveringService.cls.xml
===================================================================
diff -u
--- vhTest/Fake/AXimpl/Dynamics/SalesOrderIn/Converter/ToeleveringService.cls.xml	(revision 0)
+++ vhTest/Fake/AXimpl/Dynamics/SalesOrderIn/Converter/ToeleveringService.cls.xml	(revision 47989)
@@ -0,0 +1,18 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="vhTest.Fake.AXimpl.Dynamics.SalesOrderIn.Converter.ToeleveringService">
+<Description>
+Deze klasse werd automatisch gegenereerd en onderhouden, nieuwe methodes worden automatisch bijgevoegd, bestaande blijven zoals ze zijn.
+Een hercompilatie van de basis interface - met een correct werkende studiohook ( v2.20 ++ ) - zorgt ervoor dat deze klasse aangepast wordt</Description>
+<ProcedureBlock>1</ProcedureBlock>
+<Super>AXimpl.Dynamics.SalesOrderIn.Converter.ToeleveringService</Super>
+
+<Method name="VerwijderToeleveringenViaOrder">
+<FormalSpec>Order:DOM.VKP.Order</FormalSpec>
+<Implementation><![CDATA[
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>