Index: APPS/OrderUitvoering/impl/OrderUitvoeringServiceImpl.cls.xml
===================================================================
diff -u -r2994 -r3005
--- APPS/OrderUitvoering/impl/OrderUitvoeringServiceImpl.cls.xml	(.../OrderUitvoeringServiceImpl.cls.xml)	(revision 2994)
+++ APPS/OrderUitvoering/impl/OrderUitvoeringServiceImpl.cls.xml	(.../OrderUitvoeringServiceImpl.cls.xml)	(revision 3005)
@@ -291,7 +291,19 @@
 	Set VerwachteInvoerInfo = OrderUitvoeringService.MaakVerwachteInvoerStructuur(Toelevering, ToeleveringLijn)
 	
 	Set VerwachteInvoerAPI = ##class(DOM.DomeinContext).Instance().GeefVerwachteInvoerAPI()
-	Do VerwachteInvoerAPI.RegistreerVerwachteInvoer(VerwachteInvoerInfo)
+	Set VerwachteInvoer = VerwachteInvoerAPI.RegistreerVerwachteInvoer(VerwachteInvoerInfo)
+	
+	Set GelinkteOrderLijn = ToeleveringLijn.GeefOrderLijn()
+	If ($IsObject(GelinkteOrderLijn))
+	{
+		Set GelinktOrder = GelinkteOrderLijn.GeefOrder()
+		Set OrderID = GelinktOrder.GeefOrderNr()
+		Set OrderLijnCode = GelinkteOrderLijn.GeefOLU()
+		Set VerwachteUitvoerAPI = ##class(DOM.DomeinContext).Instance().GeefVerwachteUitvoerAPI()
+		Set VerwachteUitvoer = VerwachteUitvoerAPI.ZoekUitvoerViaTransactieLijnRef(OrderID,OrderLijnCode,##class(DOM.common.enu.Bedrijf).VanHoecke())
+		If ('$IsObject(VerwachteUitvoer)) Do ##class(TECH.ExceptionHandler).Throw(##class(TECH.Exceptions.ObjectExpectedException).%New("Geen verwachte uitvoer gevonden voor (OrderID, OrderLijnCode): "_OrderID_", "_OrderLijnCode))
+		Do VerwachteInvoerAPI.RegistreerInvoerUitvoerLinken(VerwachteInvoer.%Id(), VerwachteUitvoer.%Id())
+	}
 ]]></Implementation>
 </Method>