Index: DOM/ProdRes/impl/VerwachteInvoerAPIimpl.cls.xml
===================================================================
diff -u -r2221 -r2994
--- DOM/ProdRes/impl/VerwachteInvoerAPIimpl.cls.xml	(.../VerwachteInvoerAPIimpl.cls.xml)	(revision 2221)
+++ DOM/ProdRes/impl/VerwachteInvoerAPIimpl.cls.xml	(.../VerwachteInvoerAPIimpl.cls.xml)	(revision 2994)
@@ -145,6 +145,45 @@
 ]]></Implementation>
 </Method>
 
+<Method name="VerbreekInvoerUitvoerLinken">
+<Description>
+Verbreekt de nodige invoer-uitvoer-links en doet ook de nodige saves.</Description>
+<FormalSpec>VerwachteInvoerID:%String,VerwachteUitvoerID:%String</FormalSpec>
+<Implementation><![CDATA[
+	Set VerwachteUitvoerAPI = ##class(DOM.DomeinContext).Instance().GeefVerwachteUitvoerAPI()
+	Set VerwachteUitvoer = VerwachteUitvoerAPI.GeefVerwachteUitvoer(VerwachteUitvoerID)
+	Set VerwachteInvoer = ..GeefVerwachteInvoer(VerwachteInvoerID)
+	
+	Set OperatieScope = ##class(TECH.OperatieScope).StartMetTx()
+	Set $ZTRAP = "VerbreekError"
+	
+	Set InvoerUitvoerLinkIterator = VerwachteInvoer.GeefInvoerUitvoerLinkIterator()
+	While (InvoerUitvoerLinkIterator.HasNext())
+	{
+		Set InvoerUitvoerLink = InvoerUitvoerLinkIterator.Next()
+		Set Reservatie = InvoerUitvoerLink.GeefVerwachteUitvoerReservatie()
+		If (Reservatie.GeefVerwachteUitvoer() = VerwachteUitvoer)
+		{
+			Do Reservatie.VerwijderInvoerUitvoerLink(InvoerUitvoerLink)
+			Do VerwachteInvoer.VerwijderInvoerUitvoerLink(InvoerUitvoerLink)
+			Do Reservatie.Save()
+			Do VerwachteInvoer.Save()
+			Do InvoerUitvoerLink.Delete()
+		}
+	}
+	
+	Set $ZTRAP = ""
+	Do OperatieScope.Gelukt()
+	Quit
+	
+VerbreekError
+	Set $ZTRAP = ""
+	Set Exceptie = ##class(TECH.ExceptionHandler).Catch()
+	Do OperatieScope.Gefaald()
+	Do ##class(TECH.ExceptionHandler).Rethrow(Exceptie)
+]]></Implementation>
+</Method>
+
 <Method name="SplitsVerwachteInvoer">
 <FormalSpec>VerwachteInvoerID:%String,NieuweVerwachteInvoer:DOM.ProdRes.dto.VerwachteInvoerInfo</FormalSpec>
 <ReturnType>DOM.ProdRes.VerwachteInvoer</ReturnType>