Index: APPS/Halux/Planning/impl/ToeleveringInfo.cls.xml
===================================================================
diff -u -r3701 -r3990
--- APPS/Halux/Planning/impl/ToeleveringInfo.cls.xml	(.../ToeleveringInfo.cls.xml)	(revision 3701)
+++ APPS/Halux/Planning/impl/ToeleveringInfo.cls.xml	(.../ToeleveringInfo.cls.xml)	(revision 3990)
@@ -62,12 +62,11 @@
 </Index>
 
 <Method name="VerplaatsToelevering">
-<FormalSpec>Gebruiker:%String,Opmerking:%String,Datum:%Date</FormalSpec>
+<FormalSpec>Gebruiker:%String,Opmerking:%String,VerplaatsNaar:%TimeStamp</FormalSpec>
 <Implementation><![CDATA[
-	Set NieuwGepland = $zdt(Datum_",61200",3) // 17 uur
 	Set ExplicietePlanning = ##class(APPS.Halux.Planning.impl.ExplicietePlanning).%New(Gebruiker, Opmerking, ..Gepland)
 	Do ..ExplicietePlanningen.Insert(ExplicietePlanning)
-	Set ..Gepland = NieuwGepland
+	Set ..Gepland = VerplaatsNaar
 ]]></Implementation>
 </Method>