Index: DOM/ProdRes/impl/VerwachteInvoerImpl.cls.xml
===================================================================
diff -u -r2161 -r2169
--- DOM/ProdRes/impl/VerwachteInvoerImpl.cls.xml	(.../VerwachteInvoerImpl.cls.xml)	(revision 2161)
+++ DOM/ProdRes/impl/VerwachteInvoerImpl.cls.xml	(.../VerwachteInvoerImpl.cls.xml)	(revision 2169)
@@ -49,7 +49,7 @@
 <Implementation><![CDATA[
 	Do ..ZetAantal(Aantal)
 	Set ..Bedrijf = Bedrijf
-	Set ..DueIn = DueIn
+	Do ..ZetDueIn(DueIn)
 	Set ..ProductID = ProductID
 	Do ..ZetTransactieReferentie(TransactieReferentie)
 	Do ..ZetTransactieLijnReferentie(TransactieLijnReferentie)
@@ -81,6 +81,12 @@
 ]]></Implementation>
 </Method>
 
+<Method name="ZetDueIn">
+<FormalSpec>DueIn:%TimeStamp</FormalSpec>
+<Implementation><![CDATA[	Set ..DueIn = DueIn
+]]></Implementation>
+</Method>
+
 <Method name="GeefProductID">
 <ReturnType>%String</ReturnType>
 <Implementation><![CDATA[	Quit ..ProductID
@@ -125,16 +131,19 @@
 		While ($$$ISOK(Status) && InvoerUitvoerLinkIterator.HasNext())
 		{
 			Set InvoerUitvoerLink = InvoerUitvoerLinkIterator.Next()
-			Set Reservatie = InvoerUitvoerLink.GeefVerwachteUitvoerReservatie()
-			If ($IsObject(Reservatie))
+			If ($IsObject(InvoerUitvoerLink))
 			{
-				Do Reservatie.VerwijderInvoerUitvoerLink(InvoerUitvoerLink)
-				Set Status = Reservatie.%Save()
+				Set Reservatie = InvoerUitvoerLink.GeefVerwachteUitvoerReservatie()
+				If ($IsObject(Reservatie))
+				{
+					Do Reservatie.VerwijderInvoerUitvoerLink(InvoerUitvoerLink)
+					Set Status = Reservatie.%Save()
+				}
+				If ($$$ISOK(Status))
+				{
+					Set Status = InvoerUitvoerLink.%DeleteId(InvoerUitvoerLink.%Id())
+				}
 			}
-			If ($$$ISOK(Status))
-			{
-				Set Status = InvoerUitvoerLink.%DeleteId(InvoerUitvoerLink.%Id())
-			}
 		}
 	}