Index: DOM/ProdRes/impl/ProductReservatieIterator.cls.xml
===================================================================
diff -u
--- DOM/ProdRes/impl/ProductReservatieIterator.cls.xml	(revision 0)
+++ DOM/ProdRes/impl/ProductReservatieIterator.cls.xml	(revision 2161)
@@ -0,0 +1,79 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="9">
+<Class name="DOM.ProdRes.impl.ProductReservatieIterator">
+<ProcedureBlock>1</ProcedureBlock>
+<Super>%RegisteredObject,TECH.Iterator</Super>
+<ClassDefinitionError>0</ClassDefinitionError>
+
+<Property name="TeVerwerken">
+<Type>DOM.ProdRes.Reservatie</Type>
+<Collection>list</Collection>
+<Private>1</Private>
+</Property>
+
+<Property name="Volgende">
+<Type>DOM.ProdRes.Reservatie</Type>
+<Private>1</Private>
+</Property>
+
+<Property name="ProductID">
+<Type>%String</Type>
+<Private>1</Private>
+</Property>
+
+<Method name="%OnNew">
+<FormalSpec>Reservatie:DOM.ProdRes.Reservatie,ProductID:%String</FormalSpec>
+<Private>1</Private>
+<ProcedureBlock>1</ProcedureBlock>
+<ReturnType>%Status</ReturnType>
+<Implementation><![CDATA[
+	Set ..ProductID = ProductID
+	Do ..TeVerwerken.Insert(Reservatie)
+	Do ..BepaalVolgende()
+	Quit $$$OK
+]]></Implementation>
+</Method>
+
+<Method name="HasNext">
+<Description>
+Returns true if the iteration has more elements.</Description>
+<ReturnType>%Boolean</ReturnType>
+<Implementation><![CDATA[	Quit $IsObject(..Volgende)
+]]></Implementation>
+</Method>
+
+<Method name="Next">
+<ReturnType>%CacheString</ReturnType>
+<Implementation><![CDATA[
+	Set Huidige = ..Volgende
+	Set ..Volgende = ""
+	Do ..BepaalVolgende()
+	Quit Huidige
+]]></Implementation>
+</Method>
+
+<Method name="BepaalVolgende">
+<Private>1</Private>
+<Implementation><![CDATA[
+	If (..TeVerwerken.Count() > 0)
+	{
+		Set Reservatie = ..TeVerwerken.GetAt(..TeVerwerken.Count())
+		Do ..TeVerwerken.RemoveAt(..TeVerwerken.Count())
+		Set KindReservatieIterator = Reservatie.GeefKindReservatieIterator()
+		While (KindReservatieIterator.HasNext())
+		{
+			Do ..TeVerwerken.Insert(KindReservatieIterator.Next())
+		}
+		If (Reservatie.GeefProductID() = ..ProductID)
+		{
+			Set ..Volgende = Reservatie
+		}
+		Else
+		{
+			Do ..BepaalVolgende()
+		}
+	}
+]]></Implementation>
+</Method>
+</Class>
+</Export>
Index: vhUnitTest/DOM/ProdRes/TestVerwachteUitvoerAPI.cls.xml
===================================================================
diff -u -r2135 -r2161
--- vhUnitTest/DOM/ProdRes/TestVerwachteUitvoerAPI.cls.xml	(.../TestVerwachteUitvoerAPI.cls.xml)	(revision 2135)
+++ vhUnitTest/DOM/ProdRes/TestVerwachteUitvoerAPI.cls.xml	(.../TestVerwachteUitvoerAPI.cls.xml)	(revision 2161)
@@ -16,10 +16,10 @@
 <Implementation><![CDATA[
 	Set VerwachteUitvoerAPI = ##class(DOM.DomeinContext).Instance().GeefVerwachteUitvoerAPI()
 	
-	Set ReservatieVoorVerwachteInvoer = ##class(DOM.ProdRes.dto.ReservatieVoorVerwachteUitvoer).%New()
-	Set ReservatieVoorVerwachteInvoer.TransactieReferentie = "Unittest referentie"
-	Set ReservatieVoorVerwachteInvoer.TransactieLijnReferentie = "Unittest lijnreferentie"
-	Set ReservatieVoorVerwachteInvoer.Bedrijf = ##class(DOM.common.enu.Bedrijf).VanHoecke()
+	Set ReservatieVoorVerwachteUitvoer = ##class(DOM.ProdRes.dto.ReservatieVoorVerwachteUitvoer).%New()
+	Set ReservatieVoorVerwachteUitvoer.TransactieReferentie = "Unittest referentie"
+	Set ReservatieVoorVerwachteUitvoer.TransactieLijnReferentie = "Unittest lijnreferentie"
+	Set ReservatieVoorVerwachteUitvoer.Bedrijf = ##class(DOM.common.enu.Bedrijf).VanHoecke()
 	
 	// Reservatiestructuur:
 	// - product 1
@@ -34,7 +34,7 @@
 	Set Reservatie.PrioriteitGroep = ##class(DOM.ProdRes.enu.PrioriteitGroep).Halux()
 	Set Reservatie.IsTransferReservatie = 0
 	
-	Set ReservatieVoorVerwachteInvoer.Reservatie = Reservatie
+	Set ReservatieVoorVerwachteUitvoer.Reservatie = Reservatie
 	
 	Set Reservatie = ##class(DOM.ProdRes.dto.Reservatie).%New()
 	Set Reservatie.ProductID = "Unittest product 2"
@@ -43,7 +43,7 @@
 	Set Reservatie.PrioriteitGroep = ##class(DOM.ProdRes.enu.PrioriteitGroep).Halux()
 	Set Reservatie.IsTransferReservatie = 0
 	
-	Do ReservatieVoorVerwachteInvoer.Reservatie.Reservaties.Insert(Reservatie)
+	Do ReservatieVoorVerwachteUitvoer.Reservatie.Reservaties.Insert(Reservatie)
 	
 	Set Reservatie = ##class(DOM.ProdRes.dto.Reservatie).%New()
 	Set Reservatie.ProductID = "Unittest product 3"
@@ -52,7 +52,7 @@
 	Set Reservatie.PrioriteitGroep = ##class(DOM.ProdRes.enu.PrioriteitGroep).Halux()
 	Set Reservatie.IsTransferReservatie = 0
 	
-	Do ReservatieVoorVerwachteInvoer.Reservatie.Reservaties.GetAt(1).Reservaties.Insert(Reservatie)
+	Do ReservatieVoorVerwachteUitvoer.Reservatie.Reservaties.GetAt(1).Reservaties.Insert(Reservatie)
 	
 	Set Reservatie = ##class(DOM.ProdRes.dto.Reservatie).%New()
 	Set Reservatie.ProductID = "Unittest product 4"
@@ -61,9 +61,9 @@
 	Set Reservatie.PrioriteitGroep = ##class(DOM.ProdRes.enu.PrioriteitGroep).Halux()
 	Set Reservatie.IsTransferReservatie = 0
 	
-	Do ReservatieVoorVerwachteInvoer.Reservatie.Reservaties.Insert(Reservatie)
+	Do ReservatieVoorVerwachteUitvoer.Reservatie.Reservaties.Insert(Reservatie)
 
-	Set VerwachteUitvoer = VerwachteUitvoerAPI.RegistreerReservaties(ReservatieVoorVerwachteInvoer)
+	Set VerwachteUitvoer = VerwachteUitvoerAPI.RegistreerReservaties(ReservatieVoorVerwachteUitvoer)
 	
 	// GeefVerwachteUitvoer eventjes testen
 	Set VerwachteUitvoerOpgehaald = VerwachteUitvoerAPI.GeefVerwachteUitvoer(VerwachteUitvoer.%Id())
@@ -107,8 +107,8 @@
 	Do $$$AssertEquals(Reservatie3.GeefProductID(),"Unittest product 3")
 	Do $$$AssertTrue(Reservatie3.IsLeaf,"De reservatie is een blad")
 	
-	Set ReservatieVoorVerwachteInvoer2 = ..MaakReservatieVerwachteInvoer()
-	Set VerwachteUitvoer2 = VerwachteUitvoerAPI.RegistreerReservaties(ReservatieVoorVerwachteInvoer2)
+	Set ReservatieVoorVerwachteUitvoer2 = ..MaakReservatieVerwachteUitvoer()
+	Set VerwachteUitvoer2 = VerwachteUitvoerAPI.RegistreerReservaties(ReservatieVoorVerwachteUitvoer2)
 	
 	Set VerwachteUitvoerIDs = ##class(%ListOfDataTypes).%New()
 	Do VerwachteUitvoerIDs.Insert(VerwachteUitvoer.%Id())
@@ -134,16 +134,16 @@
 <Implementation><![CDATA[
 	Set VerwachteUitvoerAPI = ##class(DOM.DomeinContext).Instance().GeefVerwachteUitvoerAPI()
 	
-	Set ReservatieVoorVerwachteInvoer = ..MaakReservatieVerwachteInvoer()
+	Set ReservatieVoorVerwachteUitvoer = ..MaakReservatieVerwachteUitvoer()
 	
-	Set VerwachteUitvoer = VerwachteUitvoerAPI.RegistreerReservaties(ReservatieVoorVerwachteInvoer)
+	Set VerwachteUitvoer = VerwachteUitvoerAPI.RegistreerReservaties(ReservatieVoorVerwachteUitvoer)
 	
-	Set VerwachteUitvoerenGevonden = VerwachteUitvoerAPI.ZoekUitvoerenViaTransactieRef(ReservatieVoorVerwachteInvoer.TransactieReferentie, ReservatieVoorVerwachteInvoer.Bedrijf)
+	Set VerwachteUitvoerenGevonden = VerwachteUitvoerAPI.ZoekUitvoerenViaTransactieRef(ReservatieVoorVerwachteUitvoer.TransactieReferentie, ReservatieVoorVerwachteUitvoer.Bedrijf)
 	
 	Do $$$AssertEquals(VerwachteUitvoerenGevonden.Count(),1,"Er werd 1 uitvoer gevonden")
 	Do $$$AssertEquals(VerwachteUitvoer, VerwachteUitvoerenGevonden.GetAt(1), "De zoek via transactieref geeft hetzelfde resultaat")
 	
-	Set VerwachteUitvoerGevonden = VerwachteUitvoerAPI.ZoekUitvoerViaTransactieLijnRef(ReservatieVoorVerwachteInvoer.TransactieReferentie, ReservatieVoorVerwachteInvoer.TransactieLijnReferentie, ReservatieVoorVerwachteInvoer.Bedrijf)
+	Set VerwachteUitvoerGevonden = VerwachteUitvoerAPI.ZoekUitvoerViaTransactieLijnRef(ReservatieVoorVerwachteUitvoer.TransactieReferentie, ReservatieVoorVerwachteUitvoer.TransactieLijnReferentie, ReservatieVoorVerwachteUitvoer.Bedrijf)
 	
 	Do $$$AssertEquals(VerwachteUitvoer, VerwachteUitvoerGevonden, "De zoek via transactielijnref geeft hetzelfde resultaat")
 	
@@ -157,9 +157,9 @@
 <Implementation><![CDATA[
 	Set VerwachteUitvoerAPI = ##class(DOM.DomeinContext).Instance().GeefVerwachteUitvoerAPI()
 	
-	Set ReservatieVoorVerwachteInvoer = ..MaakReservatieVerwachteInvoer()
+	Set ReservatieVoorVerwachteUitvoer = ..MaakReservatieVerwachteUitvoer()
 	
-	Set VerwachteUitvoer = VerwachteUitvoerAPI.RegistreerReservaties(ReservatieVoorVerwachteInvoer)
+	Set VerwachteUitvoer = VerwachteUitvoerAPI.RegistreerReservaties(ReservatieVoorVerwachteUitvoer)
 	
 	Set VerwachteUitvoerID = VerwachteUitvoer.%Id()
 	Set Reservatie = VerwachteUitvoer.GeefReservatie()
@@ -176,9 +176,9 @@
 <Implementation><![CDATA[
 	Set VerwachteUitvoerAPI = ##class(DOM.DomeinContext).Instance().GeefVerwachteUitvoerAPI()
 	
-	Set ReservatieVoorVerwachteInvoer = ..MaakReservatieVerwachteInvoer()
+	Set ReservatieVoorVerwachteUitvoer = ..MaakReservatieVerwachteUitvoer()
 	
-	Set VerwachteUitvoer = VerwachteUitvoerAPI.RegistreerReservaties(ReservatieVoorVerwachteInvoer)
+	Set VerwachteUitvoer = VerwachteUitvoerAPI.RegistreerReservaties(ReservatieVoorVerwachteUitvoer)
 	
 	Set VerwachteUitvoerID = VerwachteUitvoer.%Id()
 	Set Reservatie = VerwachteUitvoer.GeefReservatie()
@@ -191,12 +191,12 @@
 ]]></Implementation>
 </Method>
 
-<Method name="MaakReservatieVerwachteInvoer">
+<Method name="MaakReservatieVerwachteUitvoer">
 <Implementation><![CDATA[
-	Set ReservatieVoorVerwachteInvoer = ##class(DOM.ProdRes.dto.ReservatieVoorVerwachteUitvoer).%New()
-	Set ReservatieVoorVerwachteInvoer.TransactieReferentie = "Unittest referentie 2"
-	Set ReservatieVoorVerwachteInvoer.TransactieLijnReferentie = "Unittest lijnreferentie 2"
-	Set ReservatieVoorVerwachteInvoer.Bedrijf = ##class(DOM.common.enu.Bedrijf).VanHoecke()
+	Set ReservatieVoorVerwachteUitvoer = ##class(DOM.ProdRes.dto.ReservatieVoorVerwachteUitvoer).%New()
+	Set ReservatieVoorVerwachteUitvoer.TransactieReferentie = "Unittest referentie 2"
+	Set ReservatieVoorVerwachteUitvoer.TransactieLijnReferentie = "Unittest lijnreferentie 2"
+	Set ReservatieVoorVerwachteUitvoer.Bedrijf = ##class(DOM.common.enu.Bedrijf).VanHoecke()
 	
 	Set Reservatie = ##class(DOM.ProdRes.dto.Reservatie).%New()
 	Set Reservatie.ProductID = "Unittest product 3"
@@ -205,12 +205,44 @@
 	Set Reservatie.PrioriteitGroep = ##class(DOM.ProdRes.enu.PrioriteitGroep).Halux()
 	Set Reservatie.IsTransferReservatie = 0
 	
-	Set ReservatieVoorVerwachteInvoer.Reservatie = Reservatie
+	Set ReservatieVoorVerwachteUitvoer.Reservatie = Reservatie
 	
-	Quit ReservatieVoorVerwachteInvoer
+	Quit ReservatieVoorVerwachteUitvoer
 ]]></Implementation>
 </Method>
 
+<Method name="TestProductReservatieIterator">
+<Implementation><![CDATA[
+	// Reservatiestructuur:
+	// - Product1
+	// 		- Product2
+	// 			- Product 3
+	// 		- Product 4
+	// 			- Product 3
+	// 				- Product7
+	
+	Set Reservatie1 = ##class(DOM.ProdRes.impl.ReservatieImpl).%New("","Product1","","","","")
+	Set Reservatie2 = ##class(DOM.ProdRes.impl.ReservatieImpl).%New("","Product2","","","","")
+	Set Reservatie3 = ##class(DOM.ProdRes.impl.ReservatieImpl).%New("","Product3","","","","")
+	Set Reservatie4 = ##class(DOM.ProdRes.impl.ReservatieImpl).%New("","Product4","","","","")
+	Set Reservatie5 = ##class(DOM.ProdRes.impl.ReservatieImpl).%New("","Product3","","","","")
+	Set Reservatie6 = ##class(DOM.ProdRes.impl.ReservatieImpl).%New("","Product7","","","","")
+	Do Reservatie1.VoegToeReservatie(Reservatie2)
+	Do Reservatie2.VoegToeReservatie(Reservatie3)
+	Do Reservatie1.VoegToeReservatie(Reservatie4)
+	Do Reservatie4.VoegToeReservatie(Reservatie5)
+	Do Reservatie5.VoegToeReservatie(Reservatie6)
+	
+	Set ProductReservatieIterator = ##class(DOM.ProdRes.impl.ReservatieIterator).%New(Reservatie1, ##class(DOM.ProdRes.impl.ProductReservatieEvaluator).%New("Product3"))
+	
+	Set ReservatieGevonden = ProductReservatieIterator.Next()
+	Do $$$AssertEquals(Reservatie5,ReservatieGevonden,"De eerste reservatie voor product 3 werd gevonden")
+	Set ReservatieGevonden = ProductReservatieIterator.Next()
+	Do $$$AssertEquals(Reservatie3,ReservatieGevonden,"De tweede reservatie voor product 3 werd gevonden")
+	Do $$$AssertFalse(ProductReservatieIterator.HasNext(),"Er zijn geen reservaties meer voor product 3")
+]]></Implementation>
+</Method>
+
 <Method name="OnBeforeAllTests">
 <ReturnType>%Status</ReturnType>
 <Implementation><![CDATA[
Index: DOM/ProdRes/Reservatie.cls.xml
===================================================================
diff -u -r2138 -r2161
--- DOM/ProdRes/Reservatie.cls.xml	(.../Reservatie.cls.xml)	(revision 2138)
+++ DOM/ProdRes/Reservatie.cls.xml	(.../Reservatie.cls.xml)	(revision 2161)
@@ -66,6 +66,11 @@
 <ReturnType>TECH.Iterator</ReturnType>
 </Method>
 
+<Method name="GeefAantalGelinkt">
+<Abstract>1</Abstract>
+<ReturnType>%Float</ReturnType>
+</Method>
+
 <Storage name="Default">
 <Type>%Library.CacheStorage</Type>
 <DataLocation>^DOM.ProdRes.ReservatieD</DataLocation>
Index: DOM/ProdRes/dto/SamenvoegVoorstellen.cls.xml
===================================================================
diff -u
--- DOM/ProdRes/dto/SamenvoegVoorstellen.cls.xml	(revision 0)
+++ DOM/ProdRes/dto/SamenvoegVoorstellen.cls.xml	(revision 2161)
@@ -0,0 +1,17 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="9">
+<Class name="DOM.ProdRes.dto.SamenvoegVoorstellen">
+<ClassType>serial</ClassType>
+<ProcedureBlock>1</ProcedureBlock>
+<Super>%ListOfObjects</Super>
+<ClassDefinitionError>0</ClassDefinitionError>
+
+<Parameter name="ELEMENTTYPE">
+<Default>DOM.ProdRes.dto.SamenvoegVoorstel</Default>
+</Parameter>
+
+<Storage name="Custom">
+<Type>%Library.CompleteCustomStorage</Type>
+</Storage>
+</Class>
+</Export>
Index: vhUnitTest/DOM/ProdRes/TestVerwachteInvoerAPI.cls.xml
===================================================================
diff -u
--- vhUnitTest/DOM/ProdRes/TestVerwachteInvoerAPI.cls.xml	(revision 0)
+++ vhUnitTest/DOM/ProdRes/TestVerwachteInvoerAPI.cls.xml	(revision 2161)
@@ -0,0 +1,235 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="9">
+<Class name="vhUnitTest.DOM.ProdRes.TestVerwachteInvoerAPI">
+<Description>
+Do ##class(vhUnitTest.Manager).RunTest("/debug/display=all","DOM.ProdRes.TestVerwachteInvoerAPI")</Description>
+<ProcedureBlock>1</ProcedureBlock>
+<Super>vhUnitTest.TestCase</Super>
+<ClassDefinitionError>0</ClassDefinitionError>
+
+<Method name="TestDomeinContext">
+<Implementation><![CDATA[	Do $$$AssertTrue($IsObject(##class(DOM.DomeinContext).Instance().GeefVerwachteInvoerAPI()),"De API werd teruggegeven")
+]]></Implementation>
+</Method>
+
+<Method name="TestAnnuleerVerwachteInvoer">
+<Implementation><![CDATA[
+	Set Service = ##class(DOM.DomeinContext).Instance().GeefVerwachteInvoerAPI()
+	Set VerwachteInvoer = Service.RegistreerVerwachteInvoer(..GeefVerwachteInvoerInfo())
+	Set VerwachteInvoerID = VerwachteInvoer.%Id()
+	Do Service.AnnuleerVerwachteInvoer(VerwachteInvoerID)
+	Do $$$AssertFalse(##class(DOM.ProdRes.VerwachteInvoer).%ExistsId(VerwachteInvoerID),"De verwachte invoer werd verwijderd")
+]]></Implementation>
+</Method>
+
+<Method name="TestRegistreerVerwachteInvoer">
+<Implementation><![CDATA[
+	Set Service = ##class(DOM.DomeinContext).Instance().GeefVerwachteInvoerAPI()
+	
+	Set VerwachteInvoerInfo = ##class(DOM.ProdRes.dto.VerwachteInvoerInfo).%New()
+	Set VerwachteInvoerInfo.Aantal = 3
+	Set VerwachteInvoerInfo.Bedrijf = ##class(DOM.common.enu.Bedrijf).Halux()
+	Set VerwachteInvoerInfo.DueIn = ##class(TECH.DateTime).CurrentTimeStamp()
+	Set VerwachteInvoerInfo.ProductID = "Product1"
+	Set VerwachteInvoerInfo.TransactieReferentie = "UT Transactieref"
+	Set VerwachteInvoerInfo.TransactieLijnReferentie = "UT Transactielijnref"
+	
+	Set VerwachteInvoer = Service.RegistreerVerwachteInvoer(VerwachteInvoerInfo)
+	
+	Set VerwachteInvoerGevonden = Service.GeefVerwachteInvoer(VerwachteInvoer.%Id())
+	
+	Do $$$AssertEquals(VerwachteInvoer, VerwachteInvoerGevonden, "Het verkregen object is dezelfde")
+	
+	Do $$$AssertTrue($IsObject(VerwachteInvoer),"Het object werd teruggegeven")
+	Do $$$AssertEquals(VerwachteInvoer.GeefAantal(),3,"3 stuks")
+	Do VerwachteInvoer.ZetAantal(4)
+	Do $$$AssertEquals(VerwachteInvoer.GeefAantal(),4,"4 stuks na wijzigen")
+	Do $$$AssertEquals(VerwachteInvoer.GeefBedrijf(),##class(DOM.common.enu.Bedrijf).Halux(),"Bedrijf halux")
+	Do $$$AssertTrue($Length(VerwachteInvoer.GeefDueIn())>0,"De due in is ingesteld")
+	Do $$$AssertEquals(VerwachteInvoer.GeefProductID(),"Product1","De product id")
+	Do $$$AssertEquals(VerwachteInvoer.GeefTransactieReferentie(),"UT Transactieref","De transactiereferentie")
+	Do VerwachteInvoer.ZetTransactieReferentie("UT Transactieref gewijzigd")
+	Do $$$AssertEquals(VerwachteInvoer.GeefTransactieReferentie(),"UT Transactieref gewijzigd","De transactiereferentie gewijzigd")
+	Do $$$AssertEquals(VerwachteInvoer.GeefTransactieLijnReferentie(),"UT Transactielijnref","De transactielijnreferentie")
+	Do VerwachteInvoer.ZetTransactieLijnReferentie("UT Transactielijnref gewijzigd")
+	Do $$$AssertEquals(VerwachteInvoer.GeefTransactieLijnReferentie(),"UT Transactielijnref gewijzigd","De transactielijnreferentie gewijzigd")
+	
+	Do VerwachteInvoer.%DeleteId(VerwachteInvoer.%Id())
+]]></Implementation>
+</Method>
+
+<Method name="TestZoekInvoerViaTransactieRef">
+<Implementation><![CDATA[
+	Set Service = ##class(DOM.DomeinContext).Instance().GeefVerwachteInvoerAPI()
+	Set VerwachteInvoer = Service.RegistreerVerwachteInvoer(..GeefVerwachteInvoerInfo())
+	Set VerwachteInvoerID = VerwachteInvoer.%Id()
+	Set VerwachteInvoerGevonden = Service.ZoekInvoerViaTransactieRef("UT Transactieref","UT Transactielijnref",##class(DOM.common.enu.Bedrijf).Halux())
+	Do $$$AssertEquals(VerwachteInvoer,VerwachteInvoerGevonden,"Het correcte invoerobject werd gevonden")
+	Do Service.AnnuleerVerwachteInvoer(VerwachteInvoerID)
+]]></Implementation>
+</Method>
+
+<Method name="TestInvoerUitvoerLink">
+<Implementation><![CDATA[
+	// Volgende structuur moet opgebouwd worden:
+	// 
+	//  Uitvoer						Invoer
+	//  +------------+				+------------+
+	//  | P1      50 |	---40---->	| P1     210 |
+	//  | P1     170 |  ---170--->	|            |
+	//  |            |				+------------+
+	//  |            |  		    +------------+
+	//  | P2      30 |  ----15--->  | P2      15 |
+	//  +------------+              +------------+ 
+	//  				\			+------------+
+	//  				 \--15--->	| P2      18 |
+	//  							+------------+
+	
+	// Opbouw uitvoer objecten
+	
+	Set VerwachteUitvoerAPI = ##class(DOM.DomeinContext).Instance().GeefVerwachteUitvoerAPI()
+	
+	Set ReservatieVoorVerwachteUitvoer = ##class(DOM.ProdRes.dto.ReservatieVoorVerwachteUitvoer).%New()
+	Set ReservatieVoorVerwachteUitvoer.TransactieReferentie = "UT uitvoer1"
+	Set ReservatieVoorVerwachteUitvoer.TransactieLijnReferentie = "UT uitvoer1 lijn1"
+	Set ReservatieVoorVerwachteUitvoer.Bedrijf = ##class(DOM.common.enu.Bedrijf).VanHoecke()
+	Set ReservatieMoeder = ##class(DOM.ProdRes.dto.Reservatie).%New()
+	Set ReservatieVoorVerwachteUitvoer.Reservatie = ReservatieMoeder
+	Set ReservatieMoeder.ProductID = "MoederProduct"
+	Set ReservatieMoeder.Aantal = 1 // Aantal maakt hier niet uit
+	Set Reservatie1 = ##class(DOM.ProdRes.dto.Reservatie).%New()
+	Set Reservatie1.ProductID = "P1"
+	Set Reservatie1.Aantal = 50
+	Do ReservatieMoeder.Reservaties.Insert(Reservatie1)
+	Set Reservatie2 = ##class(DOM.ProdRes.dto.Reservatie).%New()
+	Set Reservatie2.ProductID = "P1"
+	Set Reservatie2.Aantal = 170
+	Do ReservatieMoeder.Reservaties.Insert(Reservatie2)
+	Set Reservatie3 = ##class(DOM.ProdRes.dto.Reservatie).%New()
+	Set Reservatie3.ProductID = "P2"
+	Set Reservatie3.Aantal = 30
+	Do ReservatieMoeder.Reservaties.Insert(Reservatie3)
+	Set VerwachteUitvoer = VerwachteUitvoerAPI.RegistreerReservaties(ReservatieVoorVerwachteUitvoer)
+	
+	// Opbouw invoer objecten
+	
+	Set VerwachteInvoerAPI = ##class(DOM.DomeinContext).Instance().GeefVerwachteInvoerAPI()
+	
+	Set VerwachteInvoerInfo = ##class(DOM.ProdRes.dto.VerwachteInvoerInfo).%New()
+	Set VerwachteInvoerInfo.Aantal = 210
+	Set VerwachteInvoerInfo.ProductID = "P1"
+	Set VerwachteInvoerInfo.TransactieReferentie = "UT invoer1"
+	Set VerwachteInvoerInfo.TransactieLijnReferentie = "UT invoer1 lijn1"
+	Set VerwachteInvoer1 = VerwachteInvoerAPI.RegistreerVerwachteInvoer(VerwachteInvoerInfo)
+	
+	Set VerwachteInvoerInfo = ##class(DOM.ProdRes.dto.VerwachteInvoerInfo).%New()
+	Set VerwachteInvoerInfo.Aantal = 15
+	Set VerwachteInvoerInfo.ProductID = "P2"
+	Set VerwachteInvoerInfo.TransactieReferentie = "UT invoer2"
+	Set VerwachteInvoerInfo.TransactieLijnReferentie = "UT invoer2 lijn1"
+	Set VerwachteInvoer2 = VerwachteInvoerAPI.RegistreerVerwachteInvoer(VerwachteInvoerInfo)
+	
+	Set VerwachteInvoerInfo = ##class(DOM.ProdRes.dto.VerwachteInvoerInfo).%New()
+	Set VerwachteInvoerInfo.Aantal = 18
+	Set VerwachteInvoerInfo.ProductID = "P2"
+	Set VerwachteInvoerInfo.TransactieReferentie = "UT invoer3"
+	Set VerwachteInvoerInfo.TransactieLijnReferentie = "UT invoer3 lijn1"
+	Set VerwachteInvoer3 = VerwachteInvoerAPI.RegistreerVerwachteInvoer(VerwachteInvoerInfo)
+	
+	// Registreren van invoer/uitvoer links
+	
+	Do VerwachteInvoerAPI.RegistreerInvoerUitvoerLinken(VerwachteInvoer1.%Id(),VerwachteUitvoer.%Id())
+	
+	Do $$$AssertEquals(VerwachteInvoer1.GeefAantalGelinkt(),210,"Er zijn 210 producten gelinkt")
+	
+	Set ReservatieIterator = VerwachteUitvoer.GeefReservatie().GeefKindReservatieIterator()
+	Set Reservatie1 = ReservatieIterator.Next()
+	Set Reservatie2 = ReservatieIterator.Next()
+	Set Reservatie3 = ReservatieIterator.Next()
+	
+	Do $$$AssertEquals(Reservatie1.GeefAantalGelinkt(),40,"40 van de 50 producten zijn gelinkt")
+	Do $$$AssertEquals(Reservatie2.GeefAantalGelinkt(),170,"Alle producten zijn gelinkt")
+	Do $$$AssertEquals(Reservatie3.GeefAantalGelinkt(),0,"Er zijn nog geen producten gelinkt")
+	Do $$$AssertEquals(VerwachteInvoer1.GeefAantalGelinkt(),210,"Alle producten zijn gelinkt")
+	
+	Do VerwachteInvoerAPI.RegistreerInvoerUitvoerLinken(VerwachteInvoer2.%Id(),VerwachteUitvoer.%Id())
+	
+	Do $$$AssertEquals(Reservatie1.GeefAantalGelinkt(),40,"40 van de 50 producten zijn gelinkt")
+	Do $$$AssertEquals(Reservatie2.GeefAantalGelinkt(),170,"Alle producten zijn gelinkt")
+	Do $$$AssertEquals(Reservatie3.GeefAantalGelinkt(),15,"Er zijn 15 producten gelinkt")
+	Do $$$AssertEquals(VerwachteInvoer2.GeefAantalGelinkt(),15,"Alle producten zijn gelinkt")
+	
+	Do VerwachteInvoerAPI.RegistreerInvoerUitvoerLinken(VerwachteInvoer3.%Id(),VerwachteUitvoer.%Id())
+	
+	Do $$$AssertEquals(Reservatie1.GeefAantalGelinkt(),40,"40 van de 50 producten zijn gelinkt")
+	Do $$$AssertEquals(Reservatie2.GeefAantalGelinkt(),170,"Alle producten zijn gelinkt")
+	Do $$$AssertEquals(Reservatie3.GeefAantalGelinkt(),30,"Alle producten zijn gelinkt")
+	Do $$$AssertEquals(VerwachteInvoer3.GeefAantalGelinkt(),15,"15 van de 18 producten zijn gelinkt")
+	
+	// Verwachte invoer iterator controleren
+	
+	Set VerwachteInvoerIterator = VerwachteUitvoer.GeefVerwachteInvoerIterator()
+	Do $$$AssertTrue(VerwachteInvoerIterator.HasNext(),"Element 1 is aanwezig")
+	Do VerwachteInvoerIterator.Next()
+	Do $$$AssertTrue(VerwachteInvoerIterator.HasNext(),"Element 2 is aanwezig")
+	Do VerwachteInvoerIterator.Next()
+	Do $$$AssertTrue(VerwachteInvoerIterator.HasNext(),"Element 3 is aanwezig")
+	Do VerwachteInvoerIterator.Next()
+	Do $$$AssertFalse(VerwachteInvoerIterator.HasNext(),"Er is geen 4de element aanwezig")
+	
+	// Samenvoegvoorstel nagaan
+	
+	Set VerwachteUitvoerIDs = ##class(%ListOfDataTypes).%New()
+	Do VerwachteUitvoerIDs.Insert(VerwachteUitvoer.%Id())
+	Set SamenvoegVoorstellen = VerwachteInvoerAPI.GeefSamenvoegVoorstellen(VerwachteUitvoerIDs)
+	Do $$$AssertEquals(SamenvoegVoorstellen.Count(),1,"Er is 1 samenvoeg voorstel")
+	Set SamenvoegVoorstel = SamenvoegVoorstellen.GetAt(1)
+	Do $$$AssertEquals(SamenvoegVoorstel.Aantal,15+18,"33 producten kunnen samengevoegd worden")
+	Do $$$AssertEquals(SamenvoegVoorstel.ProductID,"P2","P2 kan worden samengevoegd")
+	
+	// Opkuis data
+	
+	Do VerwachteUitvoer.%DeleteId(VerwachteUitvoer.%Id())
+	Do VerwachteInvoer1.%DeleteId(VerwachteInvoer1.%Id())
+	Do VerwachteInvoer2.%DeleteId(VerwachteInvoer2.%Id())
+	Do VerwachteInvoer3.%DeleteId(VerwachteInvoer3.%Id())
+]]></Implementation>
+</Method>
+
+<Method name="GeefVerwachteInvoerInfo">
+<Private>1</Private>
+<Implementation><![CDATA[
+	Set VerwachteInvoerInfo = ##class(DOM.ProdRes.dto.VerwachteInvoerInfo).%New()
+	Set VerwachteInvoerInfo.Aantal = 3
+	Set VerwachteInvoerInfo.Bedrijf = ##class(DOM.common.enu.Bedrijf).Halux()
+	Set VerwachteInvoerInfo.DueIn = ##class(TECH.DateTime).CurrentTimeStamp()
+	Set VerwachteInvoerInfo.ProductID = "Product1"
+	Set VerwachteInvoerInfo.TransactieReferentie = "UT Transactieref"
+	Set VerwachteInvoerInfo.TransactieLijnReferentie = "UT Transactielijnref"
+	Quit VerwachteInvoerInfo
+]]></Implementation>
+</Method>
+
+<Method name="OnBeforeAllTests">
+<ReturnType>%Status</ReturnType>
+<Implementation><![CDATA[
+	// eventueel resterende data proberen wissen
+	Set ResultSet = ##class(%ResultSet).%New()
+	Do ResultSet.Prepare("SELECT ID FROM DOM_ProdRes_impl.VerwachteInvoerImpl WHERE TransactieReferentie Like 'UT%'")
+	Do ResultSet.Execute()
+	If (ResultSet.Next())
+	{
+		Do ##class(DOM.ProdRes.impl.VerwachteInvoerImpl).%DeleteId(ResultSet.Data("ID"))
+	}
+	Set ResultSet = ##class(%ResultSet).%New()
+	Do ResultSet.Prepare("SELECT ID FROM DOM_ProdRes_impl.VerwachteUitvoerImpl WHERE TransactieReferentie Like 'UT%'")
+	Do ResultSet.Execute()
+	If (ResultSet.Next())
+	{
+		Do ##class(DOM.ProdRes.impl.VerwachteUitvoerImpl).%DeleteId(ResultSet.Data("ID"))
+	}
+	Quit $$$OK
+]]></Implementation>
+</Method>
+</Class>
+</Export>
Index: DOM/ProdRes/impl/VerwachteUitvoerImpl.cls.xml
===================================================================
diff -u -r2135 -r2161
--- DOM/ProdRes/impl/VerwachteUitvoerImpl.cls.xml	(.../VerwachteUitvoerImpl.cls.xml)	(revision 2135)
+++ DOM/ProdRes/impl/VerwachteUitvoerImpl.cls.xml	(.../VerwachteUitvoerImpl.cls.xml)	(revision 2161)
@@ -107,6 +107,33 @@
 ]]></Implementation>
 </Method>
 
+<Method name="GeefVerwachteInvoerIterator">
+<ReturnType>TECH.Iterator</ReturnType>
+<Implementation><![CDATA[
+	Set VerwachteInvoeren = ##class(%ListOfObjects).%New()
+	Set ResultSet = ##class(%ResultSet).%New()
+	Do ResultSet.Prepare("SELECT Distinct VIL.VerwachteInvoerImpl As VerwachteInvoerID FROM DOM_ProdRes_impl.ReservatieImpl_InvoerUitvoerLinken RIL"
+							_" JOIN DOM_ProdRes_impl.ReservatieImpl RI ON RIL.ReservatieImpl = RI.ID "
+							_" JOIN DOM_ProdRes_impl.VerwachteInvoerImpl_InvoerUitvoerLinken VIL ON VIL.Element_Key = RIL.Element_Key"
+							_" WHERE RI.VerwachteUitvoer = ?")
+	Do ResultSet.Execute(..%Id())
+	While (ResultSet.Next())
+	{
+		Do VerwachteInvoeren.Insert(##class(DOM.ProdRes.impl.VerwachteInvoerImpl).%OpenId(ResultSet.Data("VerwachteInvoerID")))
+	}
+	Quit ##class(TECH.ListIterator).%New(VerwachteInvoeren)
+]]></Implementation>
+</Method>
+
+<Method name="GeefProductReservatieIterator">
+<Description>
+Geeft een iterator terug die reservaties teruggeeft voor het opgegeven product id (incl alle subniveaus)</Description>
+<FormalSpec>ProductID:%String</FormalSpec>
+<ReturnType>TECH.Iterator</ReturnType>
+<Implementation><![CDATA[	Quit ##class(DOM.ProdRes.impl.ReservatieIterator).%New(..Reservatie, ##class(DOM.ProdRes.impl.ProductReservatieEvaluator).%New(ProductID))
+]]></Implementation>
+</Method>
+
 <Method name="%OnDelete">
 <ClassMethod>1</ClassMethod>
 <FormalSpec>oid:%ObjectIdentity</FormalSpec>
Index: DOM/ProdRes/impl/TrueReservatieEvaluator.cls.xml
===================================================================
diff -u
--- DOM/ProdRes/impl/TrueReservatieEvaluator.cls.xml	(revision 0)
+++ DOM/ProdRes/impl/TrueReservatieEvaluator.cls.xml	(revision 2161)
@@ -0,0 +1,15 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="9">
+<Class name="DOM.ProdRes.impl.TrueReservatieEvaluator">
+<ProcedureBlock>1</ProcedureBlock>
+<Super>%RegisteredObject,DOM.ProdRes.impl.IReservatieIteratorEvaluator</Super>
+<ClassDefinitionError>0</ClassDefinitionError>
+
+<Method name="IsGeldigeReservatie">
+<FormalSpec>Reservatie:DOM.ProdRes.Reservatie</FormalSpec>
+<ReturnType>%Boolean</ReturnType>
+<Implementation><![CDATA[	Quit 1
+]]></Implementation>
+</Method>
+</Class>
+</Export>
Index: DOM/ProdRes/InvoerUitvoerLink.cls.xml
===================================================================
diff -u
--- DOM/ProdRes/InvoerUitvoerLink.cls.xml	(revision 0)
+++ DOM/ProdRes/InvoerUitvoerLink.cls.xml	(revision 2161)
@@ -0,0 +1,45 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="9">
+<Class name="DOM.ProdRes.InvoerUitvoerLink">
+<ClassType>persistent</ClassType>
+<ProcedureBlock>1</ProcedureBlock>
+<Super>%Persistent</Super>
+<ClassDefinitionError>0</ClassDefinitionError>
+
+<Method name="GeefAantalProducten">
+<Abstract>1</Abstract>
+<ReturnType>%Float</ReturnType>
+</Method>
+
+<Method name="ZetAantalProducten">
+<Abstract>1</Abstract>
+<FormalSpec>AantalProducten:%Float</FormalSpec>
+</Method>
+
+<Method name="GeefVerwachteInvoer">
+<Abstract>1</Abstract>
+<ReturnType>DOM.ProdRes.VerwachteInvoer</ReturnType>
+</Method>
+
+<Method name="GeefVerwachteUitvoerReservatie">
+<Abstract>1</Abstract>
+<ReturnType>DOM.ProdRes.Reservatie</ReturnType>
+</Method>
+
+<Storage name="Default">
+<Type>%Library.CacheStorage</Type>
+<DataLocation>^DOM.ProdRes.InvoerUitvoerLinkD</DataLocation>
+<DefaultData>InvoerUitvoerLinkDefaultData</DefaultData>
+<IdLocation>^DOM.ProdRes.InvoerUitvoerLinkD</IdLocation>
+<IndexLocation>^DOM.ProdRes.InvoerUitvoerLinkI</IndexLocation>
+<StreamLocation>^DOM.ProdRes.InvoerUitvoerLinkS</StreamLocation>
+<Data name="InvoerUitvoerLinkDefaultData">
+<Structure>listnode</Structure>
+<Subscript/>
+<Value name="1">
+<Value>%%CLASSNAME</Value>
+</Value>
+</Data>
+</Storage>
+</Class>
+</Export>
Index: DOM/ProdRes/VerwachteInvoerAPI.cls.xml
===================================================================
diff -u -r2048 -r2161
--- DOM/ProdRes/VerwachteInvoerAPI.cls.xml	(.../VerwachteInvoerAPI.cls.xml)	(revision 2048)
+++ DOM/ProdRes/VerwachteInvoerAPI.cls.xml	(.../VerwachteInvoerAPI.cls.xml)	(revision 2161)
@@ -1,9 +1,54 @@
 <?xml version="1.0" encoding="UTF-8"?>
 <Export generator="Cache" version="9">
 <Class name="DOM.ProdRes.VerwachteInvoerAPI">
-<Description>
-</Description>
 <Abstract>1</Abstract>
 <ProcedureBlock>1</ProcedureBlock>
+<ClassDefinitionError>0</ClassDefinitionError>
+
+<Method name="AnnuleerVerwachteInvoer">
+<Abstract>1</Abstract>
+<FormalSpec>VerwachteInvoerID:%String</FormalSpec>
+</Method>
+
+<Method name="RegistreerVerwachteInvoer">
+<Description>
+Voert ook de save uit van de verwachte invoer</Description>
+<Abstract>1</Abstract>
+<FormalSpec>VerwachteInvoerInfo:DOM.ProdRes.dto.VerwachteInvoerInfo</FormalSpec>
+<ReturnType>DOM.ProdRes.VerwachteInvoer</ReturnType>
+</Method>
+
+<Method name="GeefVerwachteInvoer">
+<Description>
+Gaat zelf na of een ID bestaat en gooit een exceptie indien dit niet het geval is</Description>
+<Abstract>1</Abstract>
+<FormalSpec>VerwachteInvoerID:%String</FormalSpec>
+</Method>
+
+<Method name="WisBeschikbareInvoer">
+<Abstract>1</Abstract>
+<FormalSpec>VerwachteInvoerID:%String</FormalSpec>
+</Method>
+
+<Method name="ZoekInvoerViaTransactieRef">
+<Abstract>1</Abstract>
+<FormalSpec>TransactieReferentie:%String,TransactieLijnReferentie:%String,Bedrijf:DOM.common.enu.Bedrijf</FormalSpec>
+<ReturnType>DOM.ProdRes.VerwachteInvoer</ReturnType>
+</Method>
+
+<Method name="RegistreerInvoerUitvoerLinken">
+<Description>
+Registreert de nodige invoer-uitvoer-links en doet ook de nodige saves.</Description>
+<Abstract>1</Abstract>
+<FormalSpec>VerwachteInvoerID:%String,VerwachteUitvoerID:%String</FormalSpec>
+</Method>
+
+<Method name="GeefSamenvoegVoorstellen">
+<Description>
+Geeft aan voor welke producten bepaalde verwachte invoeren kunnen samengevoegd worden.</Description>
+<Abstract>1</Abstract>
+<FormalSpec>VerwachteUitvoerIDs:%ListOfDataTypes</FormalSpec>
+<ReturnType>DOM.ProdRes.dto.SamenvoegVoorstellen</ReturnType>
+</Method>
 </Class>
 </Export>
Index: CSC Reservaties.prj.xml
===================================================================
diff -u -r2138 -r2161
--- CSC Reservaties.prj.xml	(.../CSC Reservaties.prj.xml)	(revision 2138)
+++ CSC Reservaties.prj.xml	(.../CSC Reservaties.prj.xml)	(revision 2161)
@@ -1,8 +1,9 @@
 <?xml version="1.0" encoding="UTF-8"?>
 <Export generator="Cache" version="9">
-<Project name="CSC Reservaties" LastModified="2011-09-19 16:13:37">
+<Project name="CSC Reservaties" LastModified="2011-09-22 10:42:24">
   <Items>
     <ProjectItem name="DOM.DomeinContext" type="CLS"/>
+    <ProjectItem name="DOM.ProdRes.InvoerUitvoerLink" type="CLS"/>
     <ProjectItem name="DOM.ProdRes.Reservatie" type="CLS"/>
     <ProjectItem name="DOM.ProdRes.Reservaties" type="CLS"/>
     <ProjectItem name="DOM.ProdRes.VerwachteInvoer" type="CLS"/>
@@ -14,13 +15,26 @@
     <ProjectItem name="DOM.ProdRes.dto.GereserveerdeProducten" type="CLS"/>
     <ProjectItem name="DOM.ProdRes.dto.Reservatie" type="CLS"/>
     <ProjectItem name="DOM.ProdRes.dto.ReservatieVoorVerwachteUitvoer" type="CLS"/>
+    <ProjectItem name="DOM.ProdRes.dto.SamenvoegVoorstel" type="CLS"/>
+    <ProjectItem name="DOM.ProdRes.dto.SamenvoegVoorstellen" type="CLS"/>
+    <ProjectItem name="DOM.ProdRes.dto.VerwachteInvoerInfo" type="CLS"/>
     <ProjectItem name="DOM.ProdRes.enu.InvoerUitvoerLinkStatus" type="CLS"/>
     <ProjectItem name="DOM.ProdRes.enu.PrioriteitGroep" type="CLS"/>
     <ProjectItem name="DOM.ProdRes.enu.ReservatieFase" type="CLS"/>
+    <ProjectItem name="DOM.ProdRes.impl.IReservatieIteratorEvaluator" type="CLS"/>
+    <ProjectItem name="DOM.ProdRes.impl.InvoerUitvoerGekoppeld" type="CLS"/>
+    <ProjectItem name="DOM.ProdRes.impl.InvoerUitvoerLinkImpl" type="CLS"/>
+    <ProjectItem name="DOM.ProdRes.impl.ProductReservatieEvaluator" type="CLS"/>
+    <ProjectItem name="DOM.ProdRes.impl.ProductReservatieIterator" type="CLS"/>
     <ProjectItem name="DOM.ProdRes.impl.ReservatieImpl" type="CLS"/>
+    <ProjectItem name="DOM.ProdRes.impl.ReservatieIterator" type="CLS"/>
+    <ProjectItem name="DOM.ProdRes.impl.TrueReservatieEvaluator" type="CLS"/>
+    <ProjectItem name="DOM.ProdRes.impl.VerwachteInvoerAPIimpl" type="CLS"/>
+    <ProjectItem name="DOM.ProdRes.impl.VerwachteInvoerImpl" type="CLS"/>
     <ProjectItem name="DOM.ProdRes.impl.VerwachteUitvoerAPIimpl" type="CLS"/>
     <ProjectItem name="DOM.ProdRes.impl.VerwachteUitvoerImpl" type="CLS"/>
     <ProjectItem name="DOM.common.enu.Bedrijf" type="CLS"/>
+    <ProjectItem name="vhUnitTest.DOM.ProdRes.TestVerwachteInvoerAPI" type="CLS"/>
     <ProjectItem name="vhUnitTest.DOM.ProdRes.TestVerwachteUitvoerAPI" type="CLS"/>
   </Items>
 </Project>
Index: DOM/ProdRes/impl/InvoerUitvoerLinkImpl.cls.xml
===================================================================
diff -u
--- DOM/ProdRes/impl/InvoerUitvoerLinkImpl.cls.xml	(revision 0)
+++ DOM/ProdRes/impl/InvoerUitvoerLinkImpl.cls.xml	(revision 2161)
@@ -0,0 +1,79 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="9">
+<Class name="DOM.ProdRes.impl.InvoerUitvoerLinkImpl">
+<ClassType>persistent</ClassType>
+<ProcedureBlock>1</ProcedureBlock>
+<Super>DOM.ProdRes.InvoerUitvoerLink</Super>
+<ClassDefinitionError>0</ClassDefinitionError>
+
+<Property name="AantalProducten">
+<Type>%Integer</Type>
+<Private>1</Private>
+</Property>
+
+<Method name="%OnNew">
+<FormalSpec>AantalProducten:%Integer</FormalSpec>
+<Private>1</Private>
+<ProcedureBlock>1</ProcedureBlock>
+<ReturnType>%Status</ReturnType>
+<Implementation><![CDATA[
+	Set ..AantalProducten = AantalProducten
+	Quit $$$OK
+]]></Implementation>
+</Method>
+
+<Method name="GeefAantalProducten">
+<ReturnType>%Float</ReturnType>
+<Implementation><![CDATA[	Quit ..AantalProducten
+]]></Implementation>
+</Method>
+
+<Method name="ZetAantalProducten">
+<FormalSpec>AantalProducten:%Float</FormalSpec>
+<Implementation><![CDATA[	Set ..AantalProducten = AantalProducten
+]]></Implementation>
+</Method>
+
+<Method name="GeefVerwachteInvoer">
+<ReturnType>DOM.ProdRes.VerwachteInvoer</ReturnType>
+<Implementation><![CDATA[
+	Set VerwachteInvoer = ""
+	Set ResultSet = ##class(%ResultSet).%New()
+	Do ResultSet.Prepare("SELECT VerwachteInvoerImpl FROM DOM_ProdRes_impl.VerwachteInvoerImpl_InvoerUitvoerLinken WHERE element_key = ?")
+	Do ResultSet.Execute(..%Id())
+	If (ResultSet.Next())
+	{
+		Set VerwachteInvoer = ##class(DOM.ProdRes.impl.VerwachteInvoerImpl).%OpenId(ResultSet.Data("VerwachteInvoerImpl"))
+	}
+	Quit VerwachteInvoer
+]]></Implementation>
+</Method>
+
+<Method name="GeefVerwachteUitvoerReservatie">
+<ReturnType>DOM.ProdRes.Reservatie</ReturnType>
+<Implementation><![CDATA[
+	Set VerwachteUitvoer = ""
+	Set ResultSet = ##class(%ResultSet).%New()
+	Do ResultSet.Prepare("SELECT ReservatieImpl FROM DOM_ProdRes_impl.ReservatieImpl_InvoerUitvoerLinken WHERE element_key = ?")
+	Do ResultSet.Execute(..%Id())
+	If (ResultSet.Next())
+	{
+		Set Reservatie = ##class(DOM.ProdRes.impl.ReservatieImpl).%OpenId(ResultSet.Data("ReservatieImpl"))
+	}
+	Quit VerwachteUitvoer
+]]></Implementation>
+</Method>
+
+<Storage name="Default">
+<Type>%Library.CacheStorage</Type>
+<DefaultData>InvoerUitvoerLinkImplDefaultData</DefaultData>
+<Data name="InvoerUitvoerLinkImplDefaultData">
+<Structure>listnode</Structure>
+<Subscript>"InvoerUitvoerLinkImpl"</Subscript>
+<Value name="1">
+<Value>AantalProducten</Value>
+</Value>
+</Data>
+</Storage>
+</Class>
+</Export>
Index: DOM/ProdRes/VerwachteUitvoer.cls.xml
===================================================================
diff -u -r2049 -r2161
--- DOM/ProdRes/VerwachteUitvoer.cls.xml	(.../VerwachteUitvoer.cls.xml)	(revision 2049)
+++ DOM/ProdRes/VerwachteUitvoer.cls.xml	(.../VerwachteUitvoer.cls.xml)	(revision 2161)
@@ -31,16 +31,24 @@
 <ReturnType>DOM.common.enu.Bedrijf</ReturnType>
 </Method>
 
-<Method name="GeefVerwachteInvoer">
+<Method name="GeefVerwachteInvoerIterator">
 <Abstract>1</Abstract>
-<ReturnType>DOM.ProdRes.VerwachteInvoer</ReturnType>
+<ReturnType>TECH.Iterator</ReturnType>
 </Method>
 
 <Method name="GeefReservatie">
 <Abstract>1</Abstract>
 <ReturnType>DOM.ProdRes.Reservatie</ReturnType>
 </Method>
 
+<Method name="GeefProductReservatieIterator">
+<Description>
+Geeft een iterator terug die reservaties teruggeeft voor het opgegeven product id (incl alle kindreservaties)</Description>
+<Abstract>1</Abstract>
+<FormalSpec>ProductID:%String</FormalSpec>
+<ReturnType>TECH.Iterator</ReturnType>
+</Method>
+
 <Storage name="Default">
 <Type>%Library.CacheStorage</Type>
 <DataLocation>^DOM.ProdRes.VerwachteUitvoerD</DataLocation>
Index: DOM/DomeinContext.cls.xml
===================================================================
diff -u -r2048 -r2161
--- DOM/DomeinContext.cls.xml	(.../DomeinContext.cls.xml)	(revision 2048)
+++ DOM/DomeinContext.cls.xml	(.../DomeinContext.cls.xml)	(revision 2161)
@@ -55,6 +55,11 @@
 <Private>1</Private>
 </Property>
 
+<Property name="VerwachteInvoerAPINamen">
+<Type>TECH.Stack</Type>
+<Private>1</Private>
+</Property>
+
 <Property name="OrderAPI">
 <Type>DOM.OV.OrderAPI</Type>
 <Private>1</Private>
@@ -100,6 +105,11 @@
 <Private>1</Private>
 </Property>
 
+<Property name="VerwachteInvoerAPI">
+<Type>DOM.ProdRes.VerwachteInvoerAPI</Type>
+<Private>1</Private>
+</Property>
+
 <Method name="Instance">
 <ClassMethod>1</ClassMethod>
 <ReturnType>DOM.DomeinContext</ReturnType>
@@ -125,6 +135,7 @@
 	Set ..VKPPrijsUitzAPINamen = ##class(TECH.Stack).%New()
 	Set ..IngegevenKenmerkenAPINamen = ##class(TECH.Stack).%New()
 	Set ..VerwachteUitvoerAPINamen = ##class(TECH.Stack).%New()
+	Set ..VerwachteInvoerAPINamen = ##class(TECH.Stack).%New()
 	// Initialize the stacks
 	Do ..Reset()
 	Quit $$$OK
@@ -239,6 +250,18 @@
 ]]></Implementation>
 </Method>
 
+<Method name="GeefVerwachteInvoerAPI">
+<ReturnType>DOM.ProdRes.VerwachteInvoerAPI</ReturnType>
+<Implementation><![CDATA[
+	If (..VerwachteInvoerAPI = "")
+	{
+		Set ClassName = ..VerwachteInvoerAPINamen.Peek()
+		Set ..VerwachteInvoerAPI = $ZOBJCLASSMETHOD(ClassName, "%New")
+	}
+	Quit ..VerwachteInvoerAPI
+]]></Implementation>
+</Method>
+
 <Method name="Reset">
 <Implementation><![CDATA[
 	Do ..ProductAPINamen.Clear()
@@ -252,6 +275,7 @@
 	Do ..PushVKPPrijsUitzAPIClassName("DOM.VKP.impl.DataM.DataMPrijsUitzAPI")
 	Do ..PushIngegKenmerkenAPIClassName("DOM.PM.impl.IngegevenKenmerkenAPIimpl")
 	Do ..PushVerwachtUitvoerAPIClassName("DOM.ProdRes.impl.VerwachteUitvoerAPIimpl")
+	Do ..PushVerwachtInvoerAPIClassName("DOM.ProdRes.impl.VerwachteInvoerAPIimpl")
 ]]></Implementation>
 </Method>
 
@@ -319,6 +343,14 @@
 ]]></Implementation>
 </Method>
 
+<Method name="PopVerwachteInvoerAPIClassName">
+<ReturnType>%String</ReturnType>
+<Implementation><![CDATA[
+	Do ..VerwachteInvoerAPINamen.Pop()
+	Set ..VerwachteInvoerAPI = ""
+]]></Implementation>
+</Method>
+
 <Method name="PushOrderAPIClassName">
 <FormalSpec>Naam:%String</FormalSpec>
 <Implementation><![CDATA[
@@ -390,5 +422,13 @@
 	Set ..VerwachteUitvoerAPI = ""
 ]]></Implementation>
 </Method>
+
+<Method name="PushVerwachtInvoerAPIClassName">
+<FormalSpec>Naam:%String</FormalSpec>
+<Implementation><![CDATA[
+	Do ..VerwachteInvoerAPINamen.Push(Naam)
+	Set ..VerwachteInvoerAPI = ""
+]]></Implementation>
+</Method>
 </Class>
 </Export>
Index: DOM/ProdRes/impl/ReservatieImpl.cls.xml
===================================================================
diff -u -r2145 -r2161
--- DOM/ProdRes/impl/ReservatieImpl.cls.xml	(.../ReservatieImpl.cls.xml)	(revision 2145)
+++ DOM/ProdRes/impl/ReservatieImpl.cls.xml	(.../ReservatieImpl.cls.xml)	(revision 2161)
@@ -3,7 +3,7 @@
 <Class name="DOM.ProdRes.impl.ReservatieImpl">
 <ClassType>persistent</ClassType>
 <ProcedureBlock>1</ProcedureBlock>
-<Super>DOM.ProdRes.Reservatie</Super>
+<Super>DOM.ProdRes.Reservatie,DOM.ProdRes.impl.InvoerUitvoerGekoppeld</Super>
 <ClassDefinitionError>0</ClassDefinitionError>
 
 <Property name="VerwachteUitvoer">
@@ -177,6 +177,21 @@
 			Set Reservatie = ReservatieIterator.Next()
 			Set Status = Reservatie.%DeleteId(Reservatie.%Id())
 		}
+		Set InvoerUitvoerLinkIterator = Object.GeefInvoerUitvoerLinkIterator()
+		While ($$$ISOK(Status) && InvoerUitvoerLinkIterator.HasNext())
+		{
+			Set InvoerUitvoerLink = InvoerUitvoerLinkIterator.Next()
+			Set VerwachteInvoer = InvoerUitvoerLink.GeefVerwachteInvoer()
+			If ($IsObject(VerwachteInvoer))
+			{
+				Do VerwachteInvoer.VerwijderInvoerUitvoerLink(InvoerUitvoerLink)
+				Set Status = VerwachteInvoer.%Save()
+			}
+			If ($$$ISOK(Status))
+			{
+				Set Status = InvoerUitvoerLink.%DeleteId(InvoerUitvoerLink.%Id())
+			}
+		}
 	}
 	Quit Status
 ]]></Implementation>
@@ -185,8 +200,12 @@
 <Storage name="Default">
 <Type>%Library.CacheStorage</Type>
 <DefaultData>ReservatieImplDefaultData</DefaultData>
+<Data name="InvoerUitvoerLinken">
+<Attribute>InvoerUitvoerLinken</Attribute>
+<Structure>subnode</Structure>
+<Subscript>"InvoerUitvoerLinken"</Subscript>
+</Data>
 <Data name="ReservatieImplDefaultData">
-<Structure>listnode</Structure>
 <Subscript>"ReservatieImpl"</Subscript>
 <Value name="1">
 <Value>Aantal</Value>
Index: DOM/ProdRes/impl/ReservatieIterator.cls.xml
===================================================================
diff -u
--- DOM/ProdRes/impl/ReservatieIterator.cls.xml	(revision 0)
+++ DOM/ProdRes/impl/ReservatieIterator.cls.xml	(revision 2161)
@@ -0,0 +1,79 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="9">
+<Class name="DOM.ProdRes.impl.ReservatieIterator">
+<ProcedureBlock>1</ProcedureBlock>
+<Super>%RegisteredObject,TECH.Iterator</Super>
+<ClassDefinitionError>0</ClassDefinitionError>
+
+<Property name="TeVerwerken">
+<Type>DOM.ProdRes.Reservatie</Type>
+<Collection>list</Collection>
+<Private>1</Private>
+</Property>
+
+<Property name="Volgende">
+<Type>DOM.ProdRes.Reservatie</Type>
+<Private>1</Private>
+</Property>
+
+<Property name="ReservatieIteratorEvaluator">
+<Type>DOM.ProdRes.impl.IReservatieIteratorEvaluator</Type>
+<Private>1</Private>
+</Property>
+
+<Method name="%OnNew">
+<FormalSpec>Reservatie:DOM.ProdRes.Reservatie,ReservatieIteratorEvaluator:DOM.ProdRes.impl.IReservatieIteratorEvaluator</FormalSpec>
+<Private>1</Private>
+<ProcedureBlock>1</ProcedureBlock>
+<ReturnType>%Status</ReturnType>
+<Implementation><![CDATA[
+	Set ..ReservatieIteratorEvaluator = ReservatieIteratorEvaluator
+	Do ..TeVerwerken.Insert(Reservatie)
+	Do ..BepaalVolgende()
+	Quit $$$OK
+]]></Implementation>
+</Method>
+
+<Method name="HasNext">
+<Description>
+Returns true if the iteration has more elements.</Description>
+<ReturnType>%Boolean</ReturnType>
+<Implementation><![CDATA[	Quit $IsObject(..Volgende)
+]]></Implementation>
+</Method>
+
+<Method name="Next">
+<ReturnType>%CacheString</ReturnType>
+<Implementation><![CDATA[
+	Set Huidige = ..Volgende
+	Set ..Volgende = ""
+	Do ..BepaalVolgende()
+	Quit Huidige
+]]></Implementation>
+</Method>
+
+<Method name="BepaalVolgende">
+<Private>1</Private>
+<Implementation><![CDATA[
+	If (..TeVerwerken.Count() > 0)
+	{
+		Set Reservatie = ..TeVerwerken.GetAt(..TeVerwerken.Count())
+		Do ..TeVerwerken.RemoveAt(..TeVerwerken.Count())
+		Set KindReservatieIterator = Reservatie.GeefKindReservatieIterator()
+		While (KindReservatieIterator.HasNext())
+		{
+			Do ..TeVerwerken.Insert(KindReservatieIterator.Next())
+		}
+		If (..ReservatieIteratorEvaluator.IsGeldigeReservatie(Reservatie))
+		{
+			Set ..Volgende = Reservatie
+		}
+		Else
+		{
+			Do ..BepaalVolgende()
+		}
+	}
+]]></Implementation>
+</Method>
+</Class>
+</Export>
Index: DOM/ProdRes/impl/IReservatieIteratorEvaluator.cls.xml
===================================================================
diff -u
--- DOM/ProdRes/impl/IReservatieIteratorEvaluator.cls.xml	(revision 0)
+++ DOM/ProdRes/impl/IReservatieIteratorEvaluator.cls.xml	(revision 2161)
@@ -0,0 +1,13 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="9">
+<Class name="DOM.ProdRes.impl.IReservatieIteratorEvaluator">
+<Abstract>1</Abstract>
+<ProcedureBlock>1</ProcedureBlock>
+<ClassDefinitionError>0</ClassDefinitionError>
+
+<Method name="IsGeldigeReservatie">
+<FormalSpec>Reservatie:DOM.ProdRes.Reservatie</FormalSpec>
+<ReturnType>%Boolean</ReturnType>
+</Method>
+</Class>
+</Export>
Index: DOM/ProdRes/dto/VerwachteInvoerInfo.cls.xml
===================================================================
diff -u
--- DOM/ProdRes/dto/VerwachteInvoerInfo.cls.xml	(revision 0)
+++ DOM/ProdRes/dto/VerwachteInvoerInfo.cls.xml	(revision 2161)
@@ -0,0 +1,32 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="9">
+<Class name="DOM.ProdRes.dto.VerwachteInvoerInfo">
+<ProcedureBlock>1</ProcedureBlock>
+<Super>%RegisteredObject,%XML.Adaptor</Super>
+<ClassDefinitionError>0</ClassDefinitionError>
+
+<Property name="Aantal">
+<Type>%Float</Type>
+</Property>
+
+<Property name="Bedrijf">
+<Type>DOM.common.enu.Bedrijf</Type>
+</Property>
+
+<Property name="DueIn">
+<Type>%TimeStamp</Type>
+</Property>
+
+<Property name="ProductID">
+<Type>%String</Type>
+</Property>
+
+<Property name="TransactieReferentie">
+<Type>%String</Type>
+</Property>
+
+<Property name="TransactieLijnReferentie">
+<Type>%String</Type>
+</Property>
+</Class>
+</Export>
Index: DOM/ProdRes/VerwachteInvoer.cls.xml
===================================================================
diff -u -r2048 -r2161
--- DOM/ProdRes/VerwachteInvoer.cls.xml	(.../VerwachteInvoer.cls.xml)	(revision 2048)
+++ DOM/ProdRes/VerwachteInvoer.cls.xml	(.../VerwachteInvoer.cls.xml)	(revision 2161)
@@ -6,11 +6,56 @@
 <Super>%Persistent</Super>
 <ClassDefinitionError>0</ClassDefinitionError>
 
-<Method name="GeefVerwachteUitvoer">
+<Method name="GeefAantal">
 <Abstract>1</Abstract>
-<ReturnType>DOM.ProdRes.VerwachteUitvoer</ReturnType>
+<ReturnType>%Float</ReturnType>
 </Method>
 
+<Method name="ZetAantal">
+<Abstract>1</Abstract>
+<FormalSpec>Aantal:%Float</FormalSpec>
+</Method>
+
+<Method name="GeefBedrijf">
+<Abstract>1</Abstract>
+<ReturnType>DOM.common.enu.Bedrijf</ReturnType>
+</Method>
+
+<Method name="GeefDueIn">
+<Abstract>1</Abstract>
+<ReturnType>%TimeStamp</ReturnType>
+</Method>
+
+<Method name="GeefProductID">
+<Abstract>1</Abstract>
+<ReturnType>%String</ReturnType>
+</Method>
+
+<Method name="GeefTransactieReferentie">
+<Abstract>1</Abstract>
+<ReturnType>%String</ReturnType>
+</Method>
+
+<Method name="ZetTransactieReferentie">
+<Abstract>1</Abstract>
+<FormalSpec>TransactieReferentie:%String</FormalSpec>
+</Method>
+
+<Method name="GeefTransactieLijnReferentie">
+<Abstract>1</Abstract>
+<ReturnType>%String</ReturnType>
+</Method>
+
+<Method name="ZetTransactieLijnReferentie">
+<Abstract>1</Abstract>
+<FormalSpec>TransactieLijnReferentie:%String</FormalSpec>
+</Method>
+
+<Method name="GeefAantalGelinkt">
+<Abstract>1</Abstract>
+<ReturnType>%Float</ReturnType>
+</Method>
+
 <Storage name="Default">
 <Type>%Library.CacheStorage</Type>
 <DataLocation>^DOM.ProdRes.VerwachteInvoerD</DataLocation>
Index: DOM/ProdRes/impl/ProductReservatieEvaluator.cls.xml
===================================================================
diff -u
--- DOM/ProdRes/impl/ProductReservatieEvaluator.cls.xml	(revision 0)
+++ DOM/ProdRes/impl/ProductReservatieEvaluator.cls.xml	(revision 2161)
@@ -0,0 +1,31 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="9">
+<Class name="DOM.ProdRes.impl.ProductReservatieEvaluator">
+<ProcedureBlock>1</ProcedureBlock>
+<Super>%RegisteredObject,DOM.ProdRes.impl.IReservatieIteratorEvaluator</Super>
+<ClassDefinitionError>0</ClassDefinitionError>
+
+<Property name="ProductID">
+<Type>%String</Type>
+<Private>1</Private>
+</Property>
+
+<Method name="%OnNew">
+<FormalSpec>ProductID:%String</FormalSpec>
+<Private>1</Private>
+<ProcedureBlock>1</ProcedureBlock>
+<ReturnType>%Status</ReturnType>
+<Implementation><![CDATA[
+	Set ..ProductID = ProductID
+	Quit $$$OK
+]]></Implementation>
+</Method>
+
+<Method name="IsGeldigeReservatie">
+<FormalSpec>Reservatie:DOM.ProdRes.Reservatie</FormalSpec>
+<ReturnType>%Boolean</ReturnType>
+<Implementation><![CDATA[	Quit Reservatie.GeefProductID() = ..ProductID
+]]></Implementation>
+</Method>
+</Class>
+</Export>
Index: DOM/ProdRes/impl/VerwachteInvoerImpl.cls.xml
===================================================================
diff -u
--- DOM/ProdRes/impl/VerwachteInvoerImpl.cls.xml	(revision 0)
+++ DOM/ProdRes/impl/VerwachteInvoerImpl.cls.xml	(revision 2161)
@@ -0,0 +1,176 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="9">
+<Class name="DOM.ProdRes.impl.VerwachteInvoerImpl">
+<ClassType>persistent</ClassType>
+<ProcedureBlock>1</ProcedureBlock>
+<Super>DOM.ProdRes.VerwachteInvoer,DOM.ProdRes.impl.InvoerUitvoerGekoppeld</Super>
+<ClassDefinitionError>0</ClassDefinitionError>
+
+<Property name="Aantal">
+<Type>%Float</Type>
+<Private>1</Private>
+</Property>
+
+<Property name="Bedrijf">
+<Type>DOM.common.enu.Bedrijf</Type>
+<Private>1</Private>
+</Property>
+
+<Property name="DueIn">
+<Type>%TimeStamp</Type>
+<Private>1</Private>
+</Property>
+
+<Property name="ProductID">
+<Type>%String</Type>
+<Private>1</Private>
+</Property>
+
+<Property name="TransactieReferentie">
+<Type>%String</Type>
+<Private>1</Private>
+</Property>
+
+<Property name="TransactieLijnReferentie">
+<Type>%String</Type>
+<Private>1</Private>
+</Property>
+
+<Index name="UniekeTransactie">
+<Properties>Bedrijf,TransactieReferentie,TransactieLijnReferentie</Properties>
+<Unique>1</Unique>
+</Index>
+
+<Method name="%OnNew">
+<FormalSpec>Aantal:%Float,Bedrijf:DOM.common.enu.Bedrijf,DueIn:%TimeStamp,ProductID:%String,TransactieReferentie:%String="",TransactieLijnReferentie:%String=""</FormalSpec>
+<Private>1</Private>
+<ProcedureBlock>1</ProcedureBlock>
+<ReturnType>%Status</ReturnType>
+<Implementation><![CDATA[
+	Do ..ZetAantal(Aantal)
+	Set ..Bedrijf = Bedrijf
+	Set ..DueIn = DueIn
+	Set ..ProductID = ProductID
+	Do ..ZetTransactieReferentie(TransactieReferentie)
+	Do ..ZetTransactieLijnReferentie(TransactieLijnReferentie)
+	Quit $$$OK
+]]></Implementation>
+</Method>
+
+<Method name="GeefAantal">
+<ReturnType>%Float</ReturnType>
+<Implementation><![CDATA[	Quit ..Aantal
+]]></Implementation>
+</Method>
+
+<Method name="ZetAantal">
+<FormalSpec>Aantal:%Float</FormalSpec>
+<Implementation><![CDATA[	Set ..Aantal = Aantal
+]]></Implementation>
+</Method>
+
+<Method name="GeefBedrijf">
+<ReturnType>DOM.common.enu.Bedrijf</ReturnType>
+<Implementation><![CDATA[	Quit ..Bedrijf
+]]></Implementation>
+</Method>
+
+<Method name="GeefDueIn">
+<ReturnType>%TimeStamp</ReturnType>
+<Implementation><![CDATA[	Quit ..DueIn
+]]></Implementation>
+</Method>
+
+<Method name="GeefProductID">
+<ReturnType>%String</ReturnType>
+<Implementation><![CDATA[	Quit ..ProductID
+]]></Implementation>
+</Method>
+
+<Method name="GeefTransactieReferentie">
+<ReturnType>%String</ReturnType>
+<Implementation><![CDATA[	Quit ..TransactieReferentie
+]]></Implementation>
+</Method>
+
+<Method name="ZetTransactieReferentie">
+<FormalSpec>TransactieReferentie:%String</FormalSpec>
+<Implementation><![CDATA[	Set ..TransactieReferentie = TransactieReferentie
+]]></Implementation>
+</Method>
+
+<Method name="GeefTransactieLijnReferentie">
+<ReturnType>%String</ReturnType>
+<Implementation><![CDATA[	Quit ..TransactieLijnReferentie
+]]></Implementation>
+</Method>
+
+<Method name="ZetTransactieLijnReferentie">
+<FormalSpec>TransactieLijnReferentie:%String</FormalSpec>
+<Implementation><![CDATA[	Set ..TransactieLijnReferentie = TransactieLijnReferentie
+]]></Implementation>
+</Method>
+
+<Method name="%OnDelete">
+<ClassMethod>1</ClassMethod>
+<FormalSpec>oid:%ObjectIdentity</FormalSpec>
+<Private>1</Private>
+<ReturnType>%Status</ReturnType>
+<Implementation><![CDATA[
+	Set Status = $$$OK
+	Set Object = ..%Open(oid)
+	If ($IsObject(Object))
+	{
+		Set InvoerUitvoerLinkIterator = Object.GeefInvoerUitvoerLinkIterator()
+		While ($$$ISOK(Status) && InvoerUitvoerLinkIterator.HasNext())
+		{
+			Set InvoerUitvoerLink = InvoerUitvoerLinkIterator.Next()
+			Set Reservatie = InvoerUitvoerLink.GeefVerwachteUitvoerReservatie()
+			If ($IsObject(Reservatie))
+			{
+				Do Reservatie.VerwijderInvoerUitvoerLink(InvoerUitvoerLink)
+				Set Status = Reservatie.%Save()
+			}
+			If ($$$ISOK(Status))
+			{
+				Set Status = InvoerUitvoerLink.%DeleteId(InvoerUitvoerLink.%Id())
+			}
+		}
+	}
+	
+	Quit Status
+]]></Implementation>
+</Method>
+
+<Storage name="Default">
+<Type>%Library.CacheStorage</Type>
+<DefaultData>VerwachteInvoerImplDefaultData</DefaultData>
+<Data name="InvoerUitvoerLinken">
+<Attribute>InvoerUitvoerLinken</Attribute>
+<Structure>subnode</Structure>
+<Subscript>"InvoerUitvoerLinken"</Subscript>
+</Data>
+<Data name="VerwachteInvoerImplDefaultData">
+<Subscript>"VerwachteInvoerImpl"</Subscript>
+<Value name="1">
+<Value>Aantal</Value>
+</Value>
+<Value name="2">
+<Value>Bedrijf</Value>
+</Value>
+<Value name="3">
+<Value>DueIn</Value>
+</Value>
+<Value name="4">
+<Value>ProductID</Value>
+</Value>
+<Value name="5">
+<Value>TransactieReferentie</Value>
+</Value>
+<Value name="6">
+<Value>TransactieLijnReferentie</Value>
+</Value>
+</Data>
+</Storage>
+</Class>
+</Export>
Index: DOM/ProdRes/impl/VerwachteUitvoerAPIimpl.cls.xml
===================================================================
diff -u -r2145 -r2161
--- DOM/ProdRes/impl/VerwachteUitvoerAPIimpl.cls.xml	(.../VerwachteUitvoerAPIimpl.cls.xml)	(revision 2145)
+++ DOM/ProdRes/impl/VerwachteUitvoerAPIimpl.cls.xml	(.../VerwachteUitvoerAPIimpl.cls.xml)	(revision 2161)
@@ -27,7 +27,7 @@
 	Set Status = VerwachteUitvoer.%Save()
 	If ($$$ISERR(Status))
 	{
-		Do ##class(TECH.ExceptionHandler).Throw(##class(TECH.Exceptions.SaveFailedException).%New("Kon de reservaties niet opslaan voor transactiereferentie '"_ReservatieVoorVerwachteUitvoer.TransactieReferentie_"' en transactielijnreferentie '"_ReservatieVoorVerwachteInvoer.TransactieLijnReferentie_"'",Status))
+		Do ##class(TECH.ExceptionHandler).Throw(##class(TECH.Exceptions.SaveFailedException).%New("Kon de reservaties niet opslaan voor transactiereferentie '"_ReservatieVoorVerwachteUitvoer.TransactieReferentie_"' en transactielijnreferentie '"_ReservatieVoorVerwachteUitvoer.TransactieLijnReferentie_"'",Status))
 	}
 	
 	Quit VerwachteUitvoer
@@ -73,7 +73,7 @@
 	Set Status = ##class(DOM.ProdRes.VerwachteUitvoer).%DeleteId(VerwachteUitvoerID)
 	If ($$$ISERR(Status))
 	{
-		Do ##class(TECH.ExceptionHandler).Throw(##class(TECH.Exceptions.StatusException).%New("Kon verwachte uitvoer "_VerwachteUitvoerID_" niet verwijderen",Status))
+		Do ##class(TECH.ExceptionHandler).Throw(##class(TECH.Exceptions.StatusException).%New(##class(TECH.enu.ExceptionCode).GeneralError(),"Kon verwachte uitvoer "_VerwachteUitvoerID_" niet verwijderen",Status))
 	}
 ]]></Implementation>
 </Method>
@@ -84,7 +84,7 @@
 	Set Status = ##class(DOM.ProdRes.VerwachteUitvoer).%DeleteId(VerwachteUitvoerID)
 	If ($$$ISERR(Status))
 	{
-		Do ##class(TECH.ExceptionHandler).Throw(##class(TECH.Exceptions.StatusException).%New("Kon verwachte uitvoer "_VerwachteUitvoerID_" niet verwijderen",Status))
+		Do ##class(TECH.ExceptionHandler).Throw(##class(TECH.Exceptions.StatusException).%New(##class(TECH.enu.ExceptionCode).GeneralError(),"Kon verwachte uitvoer "_VerwachteUitvoerID_" niet verwijderen",Status))
 	}
 ]]></Implementation>
 </Method>
Index: DOM/ProdRes/dto/SamenvoegVoorstel.cls.xml
===================================================================
diff -u
--- DOM/ProdRes/dto/SamenvoegVoorstel.cls.xml	(revision 0)
+++ DOM/ProdRes/dto/SamenvoegVoorstel.cls.xml	(revision 2161)
@@ -0,0 +1,21 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="9">
+<Class name="DOM.ProdRes.dto.SamenvoegVoorstel">
+<ProcedureBlock>1</ProcedureBlock>
+<Super>%RegisteredObject,%XML.Adaptor</Super>
+<ClassDefinitionError>0</ClassDefinitionError>
+
+<Property name="Aantal">
+<Type>%Float</Type>
+</Property>
+
+<Property name="ProductID">
+<Type>%String</Type>
+</Property>
+
+<Property name="VerwachteInvoerIDs">
+<Type>%String</Type>
+<Collection>list</Collection>
+</Property>
+</Class>
+</Export>
Index: DOM/ProdRes/impl/InvoerUitvoerGekoppeld.cls.xml
===================================================================
diff -u
--- DOM/ProdRes/impl/InvoerUitvoerGekoppeld.cls.xml	(revision 0)
+++ DOM/ProdRes/impl/InvoerUitvoerGekoppeld.cls.xml	(revision 2161)
@@ -0,0 +1,48 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="9">
+<Class name="DOM.ProdRes.impl.InvoerUitvoerGekoppeld">
+<Abstract>1</Abstract>
+<ProcedureBlock>1</ProcedureBlock>
+<ClassDefinitionError>0</ClassDefinitionError>
+
+<Property name="InvoerUitvoerLinken">
+<Type>DOM.ProdRes.InvoerUitvoerLink</Type>
+<Collection>array</Collection>
+<Private>1</Private>
+</Property>
+
+<Method name="RegistreerInvoerUitvoerLink">
+<Description>
+Een invoeruitvoerlink kan pas geregistreerd worden indien deze vooraf werd opgeslagen</Description>
+<FormalSpec>InvoerUitvoerLink:DOM.ProdRes.InvoerUitvoerLink</FormalSpec>
+<Implementation><![CDATA[	Do ..InvoerUitvoerLinken.SetAt(InvoerUitvoerLink,InvoerUitvoerLink.%Id())
+]]></Implementation>
+</Method>
+
+<Method name="VerwijderInvoerUitvoerLink">
+<FormalSpec>InvoerUitvoerLink:DOM.ProdRes.InvoerUitvoerLink</FormalSpec>
+<Implementation><![CDATA[	Do ..InvoerUitvoerLinken.RemoveAt(InvoerUitvoerLink.%Id())
+]]></Implementation>
+</Method>
+
+<Method name="GeefAantalGelinkt">
+<ReturnType>%Float</ReturnType>
+<Implementation><![CDATA[
+	Set Aantal = 0
+	Set InvoerUitvoerLinkIterator = ##class(TECH.ListIterator).%New(..InvoerUitvoerLinken)
+	While (InvoerUitvoerLinkIterator.HasNext())
+	{
+		Set InvoerUitvoerLink = InvoerUitvoerLinkIterator.Next()
+		Set Aantal = Aantal + InvoerUitvoerLink.GeefAantalProducten()
+	}
+	Quit Aantal
+]]></Implementation>
+</Method>
+
+<Method name="GeefInvoerUitvoerLinkIterator">
+<ReturnType>TECH.ListIterator</ReturnType>
+<Implementation><![CDATA[	Quit ##class(TECH.ListIterator).%New(..InvoerUitvoerLinken)
+]]></Implementation>
+</Method>
+</Class>
+</Export>
Index: DOM/ProdRes/impl/VerwachteInvoerAPIimpl.cls.xml
===================================================================
diff -u
--- DOM/ProdRes/impl/VerwachteInvoerAPIimpl.cls.xml	(revision 0)
+++ DOM/ProdRes/impl/VerwachteInvoerAPIimpl.cls.xml	(revision 2161)
@@ -0,0 +1,172 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="9">
+<Class name="DOM.ProdRes.impl.VerwachteInvoerAPIimpl">
+<ProcedureBlock>1</ProcedureBlock>
+<Super>%RegisteredObject,DOM.ProdRes.VerwachteInvoerAPI</Super>
+<ClassDefinitionError>0</ClassDefinitionError>
+
+<Method name="AnnuleerVerwachteInvoer">
+<FormalSpec>VerwachteInvoerID:%String</FormalSpec>
+<Implementation><![CDATA[
+	Set Status = ##class(DOM.ProdRes.VerwachteInvoer).%DeleteId(VerwachteInvoerID)
+	If ($$$ISERR(Status))
+	{
+		Do ##class(TECH.ExceptionHandler).Throw(##class(TECH.Exceptions.StatusException).%New(##class(TECH.enu.ExceptionCode).GeneralError(),"Kon verwachte invoer "_VerwachteInvoerID_" niet verwijderen",Status))
+	}
+]]></Implementation>
+</Method>
+
+<Method name="RegistreerVerwachteInvoer">
+<FormalSpec>VerwachteInvoerInfo:DOM.ProdRes.dto.VerwachteInvoerInfo</FormalSpec>
+<ReturnType>DOM.ProdRes.VerwachteInvoer</ReturnType>
+<Implementation><![CDATA[
+	Set VerwachteInvoer = ##class(DOM.ProdRes.impl.VerwachteInvoerImpl).%New(VerwachteInvoerInfo.Aantal,VerwachteInvoerInfo.Bedrijf, VerwachteInvoerInfo.DueIn, VerwachteInvoerInfo.ProductID, VerwachteInvoerInfo.TransactieReferentie, VerwachteInvoerInfo.TransactieLijnReferentie)
+	Set Status = VerwachteInvoer.%Save()
+	If ($$$ISERR(Status))
+	{
+		Do ##class(TECH.ExceptionHandler).Throw(##class(TECH.Exceptions.SaveFailedException).%New("Kon de verwachte invoer niet registreren",Status))
+	}
+	
+	Quit VerwachteInvoer
+]]></Implementation>
+</Method>
+
+<Method name="GeefVerwachteInvoer">
+<FormalSpec>VerwachteInvoerID:%String</FormalSpec>
+<Implementation><![CDATA[
+	Set VerwachteInvoer = ##class(DOM.ProdRes.VerwachteInvoer).%OpenId(VerwachteInvoerID)
+	
+	If ('$IsObject(VerwachteInvoer))
+	{
+		Do ##class(TECH.ExceptionHandler).Throw(##class(TECH.Exceptions.GeneralErrorException).%New("Verwachte invoer "_VerwachteInvoerID_" bestaat niet"))
+	}
+	
+	Quit VerwachteInvoer
+]]></Implementation>
+</Method>
+
+<Method name="WisBeschikbareInvoer">
+<FormalSpec>VerwachteInvoerID:%String</FormalSpec>
+<Implementation><![CDATA[
+	Set Status = ##class(DOM.ProdRes.VerwachteInvoer).%DeleteId(VerwachteInvoerID)
+	If ($$$ISERR(Status))
+	{
+		Do ##class(TECH.ExceptionHandler).Throw(##class(TECH.Exceptions.StatusException).%New(##class(TECH.enu.ExceptionCode).GeneralError(),"Kon verwachte invoer "_VerwachteInvoerID_" niet verwijderen",Status))
+	}
+]]></Implementation>
+</Method>
+
+<Method name="ZoekInvoerViaTransactieRef">
+<FormalSpec>TransactieReferentie:%String,TransactieLijnReferentie:%String,Bedrijf:DOM.common.enu.Bedrijf</FormalSpec>
+<ReturnType>DOM.ProdRes.VerwachteInvoer</ReturnType>
+<Implementation><![CDATA[
+	Set VerwachteInvoer = ""
+	Set ResultSet = ##class(%ResultSet).%New()
+	Do ResultSet.Prepare("SELECT ID FROM DOM_ProdRes_impl.VerwachteInvoerImpl WHERE TransactieReferentie = ? AND TransactieLijnReferentie = ? AND Bedrijf = ?")
+	Do ResultSet.Execute(TransactieReferentie, TransactieLijnReferentie, Bedrijf)
+	If (ResultSet.Next())
+	{
+		Set VerwachteInvoer = ##class(DOM.ProdRes.impl.VerwachteInvoerImpl).%OpenId(ResultSet.Data("ID"))
+	}
+	Quit VerwachteInvoer
+]]></Implementation>
+</Method>
+
+<Method name="RegistreerInvoerUitvoerLinken">
+<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 ProductID = VerwachteInvoer.GeefProductID()
+	Set AantalTeLinkenInvoer = VerwachteInvoer.GeefAantal() - VerwachteInvoer.GeefAantalGelinkt()
+	
+	
+	Set $ZTRAP = "RegistreerFout"
+	Set OperatieScope = ##class(TECH.OperatieScope).StartMetTx()
+	Set ProductReservatieIterator = VerwachteUitvoer.GeefProductReservatieIterator(ProductID)
+	While (AantalTeLinkenInvoer > 0 && ProductReservatieIterator.HasNext())
+	{
+		Set Reservatie = ProductReservatieIterator.Next()
+		Set AantalTeLinkenReservatie = Reservatie.GeefAantal() - Reservatie.GeefAantalGelinkt()
+		If (AantalTeLinkenReservatie > AantalTeLinkenInvoer)
+		{
+			Set AantalTeLinkenReservatie = AantalTeLinkenInvoer
+		}
+		If (AantalTeLinkenReservatie > 0)
+		{
+			Set InvoerUitvoerLink = ##class(DOM.ProdRes.impl.InvoerUitvoerLinkImpl).%New(AantalTeLinkenReservatie)
+			Set Status = InvoerUitvoerLink.%Save()
+			If ($$$ISERR(Status)) { Do ##class(TECH.ExceptionHandler).Throw(##class(TECH.Exceptions.SaveFailedException).%New("Kon de invoeruitvoerlink niet opslaan",Status)) }
+			Do VerwachteInvoer.RegistreerInvoerUitvoerLink(InvoerUitvoerLink)
+			Do Reservatie.RegistreerInvoerUitvoerLink(InvoerUitvoerLink)
+			Set AantalTeLinkenInvoer = AantalTeLinkenInvoer - AantalTeLinkenReservatie
+			Set Status = VerwachteInvoer.%Save()
+			If ($$$ISERR(Status)) { Do ##class(TECH.ExceptionHandler).Throw(##class(TECH.Exceptions.SaveFailedException).%New("Kon de verwachte invoer niet opslaan",Status)) }
+			Set Status = Reservatie.%Save()
+			If ($$$ISERR(Status)) { Do ##class(TECH.ExceptionHandler).Throw(##class(TECH.Exceptions.SaveFailedException).%New("Kon de reservatie niet opslaan",Status)) }
+		}
+	}
+	Do OperatieScope.Gelukt()
+	Quit
+RegistreerFout
+	Set $ZTRAP = ""
+	Do OperatieScope.Gefaald()
+	Do ##class(TECH.ExceptionHandler).Rethrow()
+]]></Implementation>
+</Method>
+
+<Method name="GeefSamenvoegVoorstellen">
+<Description>
+Geeft aan voor welke producten bepaalde verwachte invoeren kunnen samengevoegd worden.</Description>
+<FormalSpec>VerwachteUitvoerIDs:%ListOfDataTypes</FormalSpec>
+<ReturnType>DOM.ProdRes.dto.SamenvoegVoorstellen</ReturnType>
+<Implementation><![CDATA[
+	Set SamenvoegVoorstellen = ##class(DOM.ProdRes.dto.SamenvoegVoorstellen).%New()
+	Set VerwachteUitvoerAPI = ##class(DOM.DomeinContext).Instance().GeefVerwachteUitvoerAPI()
+	Set ProductArray = ##class(%ArrayOfObjects).%New()
+	Set VerwachteUitvoerIDIterator = ##class(TECH.ListIterator).%New(VerwachteUitvoerIDs)
+	While (VerwachteUitvoerIDIterator.HasNext())
+	{
+		Set VerwachteUitvoerID = VerwachteUitvoerIDIterator.Next()
+		Set VerwachteUitvoer = VerwachteUitvoerAPI.GeefVerwachteUitvoer(VerwachteUitvoerID)
+		Set VerwachteInvoerIterator = VerwachteUitvoer.GeefVerwachteInvoerIterator()
+		While (VerwachteInvoerIterator.HasNext())
+		{
+			Set VerwachteInvoer = VerwachteInvoerIterator.Next()
+			Set ProductID = VerwachteInvoer.GeefProductID()
+			If ('ProductArray.IsDefined(ProductID))
+			{
+				Do ProductArray.SetAt(##class(%ArrayOfDataTypes).%New(),ProductID)
+			}
+			Set VerwachteInvoerLijst = ProductArray.GetAt(ProductID)
+			Do VerwachteInvoerLijst.SetAt(VerwachteInvoer,VerwachteInvoer.%Id())
+		}
+	}
+	
+	Set VerwachteInvoerLijstIterator = ##class(TECH.ListIterator).%New(ProductArray)
+	While (VerwachteInvoerLijstIterator.HasNext())
+	{
+		Set VerwachteInvoerLijst = VerwachteInvoerLijstIterator.Next()
+		If (VerwachteInvoerLijst.Count() > 1)
+		{
+			Set SamenvoegVoorstel = ##class(DOM.ProdRes.dto.SamenvoegVoorstel).%New()
+			Set SamenvoegVoorstel.Aantal = 0
+			Set SamenvoegVoorstel.ProductID = VerwachteInvoerLijstIterator.Key()
+			Set VerwachteInvoerIterator = ##class(TECH.ListIterator).%New(VerwachteInvoerLijst)
+			While (VerwachteInvoerIterator.HasNext())
+			{
+				Set VerwachteInvoer = VerwachteInvoerIterator.Next()
+				Do SamenvoegVoorstel.VerwachteInvoerIDs.Insert(VerwachteInvoer.%Id())
+				Set SamenvoegVoorstel.Aantal = SamenvoegVoorstel.Aantal + VerwachteInvoer.GeefAantal()
+			}
+			Do SamenvoegVoorstellen.Insert(SamenvoegVoorstel)
+		}
+	}
+	
+	Quit SamenvoegVoorstellen
+]]></Implementation>
+</Method>
+</Class>
+</Export>
Index: DOM/ProdRes/VerwachteUitvoerAPI.cls.xml
===================================================================
diff -u -r2136 -r2161
--- DOM/ProdRes/VerwachteUitvoerAPI.cls.xml	(.../VerwachteUitvoerAPI.cls.xml)	(revision 2136)
+++ DOM/ProdRes/VerwachteUitvoerAPI.cls.xml	(.../VerwachteUitvoerAPI.cls.xml)	(revision 2161)
@@ -28,8 +28,6 @@
 </Method>
 
 <Method name="ZoekUitvoerViaTransactieLijnRef">
-<Description>
-Gooit een exceptie indien meerdere resultaten werden gevonden.</Description>
 <Abstract>1</Abstract>
 <FormalSpec>TransactieReferentie:%String,TransactieLijnReferentie:%String,Bedrijf:DOM.common.enu.Bedrijf</FormalSpec>
 <ReturnType>DOM.ProdRes.VerwachteUitvoer</ReturnType>