Index: AXimpl/Dynamics/SalesOrderIn/Converter/ToeleveringService.cls.xml
===================================================================
diff -u -r57033 -r57039
--- AXimpl/Dynamics/SalesOrderIn/Converter/ToeleveringService.cls.xml	(.../ToeleveringService.cls.xml)	(revision 57033)
+++ AXimpl/Dynamics/SalesOrderIn/Converter/ToeleveringService.cls.xml	(.../ToeleveringService.cls.xml)	(revision 57039)
@@ -39,6 +39,7 @@
 <Implementation><![CDATA[
 	#dim ControleerToeleveringenInBatch As %Boolean = $$$True   ; Kan later ook als method parameter gevraagd worden. 
 	If ControleerToeleveringenInBatch {
+		Do ..VerwijderToeleveringenUitBatches(Order)
 		Do ..ControleerToeleveringen(Order)
 	}
 
@@ -76,6 +77,18 @@
 ]]></Implementation>
 </Method>
 
+<Method name="VerwijderToeleveringenUitBatches">
+<FormalSpec>Order:DOM.VKP.Order</FormalSpec>
+<Private>1</Private>
+<Implementation><![CDATA[
+	#dim ToeleveringenReedsInBatch As %ArrayOfDataTypes = ..GeefToeleveringenReedsInBatch(Order)
+	If ToeleveringenReedsInBatch.Count() > 0 {
+		Do ..Logger.Info("VerwijderToeleveringenUitBatches", "Voor het order '" _Order.GeefID() _"' worden toeleveringen uit batch gewist : ToeNr: "_##class(TECH.ListUtils).ListToPieces(##class(TECH.ListUtils).KeyList(ToeleveringenReedsInBatch),", ")_ " .")
+		Do ..BatchService.VerwijderToeleveringenUitBatches(ToeleveringenReedsInBatch)
+	}
+]]></Implementation>
+</Method>
+
 <Method name="ControleerToeleveringen">
 <FormalSpec>Order:DOM.VKP.Order</FormalSpec>
 <Private>1</Private>