Index: vhUnitTest/APPS/Halux/Planning/TestEventCatcher.cls.xml
===================================================================
diff -u -r1074 -r1397
--- vhUnitTest/APPS/Halux/Planning/TestEventCatcher.cls.xml	(.../TestEventCatcher.cls.xml)	(revision 1074)
+++ vhUnitTest/APPS/Halux/Planning/TestEventCatcher.cls.xml	(.../TestEventCatcher.cls.xml)	(revision 1397)
@@ -52,7 +52,7 @@
  	&SQL(SELECT DueOut,Gepland INTO :GevondenTijd,:GevondenGepland FROM APPS_Halux_Planning_impl.ToeleveringInfo WHERE ToeleveringNummer = :ToeleveringsNummer)
  	
  	Do $$$AssertEquals($zdt(NieuweDueOut,3),GevondenTijd,"De tijd werd niet overschreven bij het herberekenen")
- 	Do $$$AssertEquals($zdt(Gepland,3)_" 00:00:00",GevondenGepland,"De geplande tijd is niet gewijzigd")
+ 	Do $$$AssertEquals($zdt(NieuweDueOut,3),GevondenGepland,"De geplande tijd werd gewijzigd naar de nieuwe dueout")
  	
  	Set ToeleveringDeletedEventData = ##class(TECH.Events.ToeleveringDeletedEventData).%New(ToeleveringsNummer)
  	Set ToeleveringDeletedEvent = ##class(TECH.Events.ToeleveringDeletedEvent).%New(ToeleveringDeletedEventData)
Index: APPS/Halux/Planning/impl/ResourceGebruikCalculator.cls.xml
===================================================================
diff -u -r1348 -r1397
--- APPS/Halux/Planning/impl/ResourceGebruikCalculator.cls.xml	(.../ResourceGebruikCalculator.cls.xml)	(revision 1348)
+++ APPS/Halux/Planning/impl/ResourceGebruikCalculator.cls.xml	(.../ResourceGebruikCalculator.cls.xml)	(revision 1397)
@@ -56,10 +56,7 @@
 		Set ..ToeleveringInfo.ProductieStatus = ""
 	}
 	
-	If (..Toelevering.GeefDueOutTime() '= "")
-	{
-		Set ..ToeleveringInfo.DueOut = $zdt(..Toelevering.GeefDueOutTime(),3)
-	}
+	Set ..ToeleveringInfo.DueOut = $zdt(..Toelevering.GeefDueOutTime(),3)
 	
 	Set Order = ..Toelevering.GeefOrder()
 	If ($IsObject(Order))