Index: vhUnitTest/BL/Legacy/EWORDS6.cls.xml
===================================================================
diff -u -r72365 -r72372
--- vhUnitTest/BL/Legacy/EWORDS6.cls.xml	(.../EWORDS6.cls.xml)	(revision 72365)
+++ vhUnitTest/BL/Legacy/EWORDS6.cls.xml	(.../EWORDS6.cls.xml)	(revision 72372)
@@ -10,18 +10,17 @@
 	#define Morgen      2
 
 	Do ##class(vhTest.Fake.TECH.DateTime.DateTimeAPI).Activeer()
-	#dim DateTimeApiFake as TECH.DateTime.DateTimeApi =  ##class(TECH.Context).Instance().GeefDateTimeAPI()
-
+	#dim DateTimeApiFake as TECH.DateTime.DateTimeAPI =  ##class(TECH.Context).Instance().GeefDateTimeAPI()
 	#dim Kantelpunt18h as %String = DateTimeApiFake.CurrentHorolog()
-	set $P(Kantelpunt18h,",",+2) = 18*3600
+	set $P(Kantelpunt18h,",",2) = 18*3600
 	do DateTimeApiFake.SetHorolog(Kantelpunt18h) // zet de tijd
 	
-	do ##class(vhUnitTest.BL.Legacy.EWORDS6Mock).ZetPickDatum(##class(TECH.Context).Instance().GeefDateTimeAPI().CurrentDate())
+	do ##class(vhUnitTest.BL.Legacy.EWORDS6Mock).ZetPickDatum(DateTimeApiFake.CurrentDate())
 	// doorgestuurd voor kantel -> vandaag
 	do $$$AssertEquals(##class(vhUnitTest.BL.Legacy.EWORDS6Mock).PickingVoorVandaagVolgendeArbeidsdagOfAndereDag(100000),$$$Vandaag,"Is voor vandaag .. 100000 heeft een vroeger kantel moment")
-	// doorgestuurd nag kantel -> Morgen
+	// doorgestuurd na kantel -> Morgen
 	do $$$AssertEquals(##class(vhUnitTest.BL.Legacy.EWORDS6Mock).PickingVoorVandaagVolgendeArbeidsdagOfAndereDag(100001),$$$Morgen,"Is voor andere dag .. 100001 heeft een langer kantel moment")
-	
+	 
 	do ##class(vhUnitTest.BL.Legacy.EWORDS6Mock).ZetPickDatum(..GeefVolgendeNietArbeidsdag())
 	do $$$AssertEquals(##class(vhUnitTest.BL.Legacy.EWORDS6Mock).PickingVoorVandaagVolgendeArbeidsdagOfAndereDag(100002),$$$AndereDag,"Is voor andere dag .. want morgen is zogezegd geen arbeidsdag")
 	
Index: BL/Legacy/EWORDS6.cls.xml
===================================================================
diff -u -r72356 -r72372
--- BL/Legacy/EWORDS6.cls.xml	(.../EWORDS6.cls.xml)	(revision 72356)
+++ BL/Legacy/EWORDS6.cls.xml	(.../EWORDS6.cls.xml)	(revision 72372)
@@ -22,14 +22,15 @@
  	#dim VandaagOfMorgen As %Integer =$$$AndereDag
  	if ##class(TECH.Context).Instance().GeefDateTimeAPI().IsVandaag(PickDatum){
  		set VandaagOfMorgen=$select( ##class(TECH.DateTime).HorologToTime(##class(TECH.Context).Instance().GeefDateTimeAPI().CurrentHorolog()) < ..GeefKantelPuntDoorsturenPicking(ORDNr):$$$Vandaag, 1:$$$Morgen)
- 	} elseif ..IsVolgendeArbeidsdag(PickDatum) { set VandaagOfMorgen = $$$Morgen }
+ 	} elseif (..IsVolgendeArbeidsdag(PickDatum)) { 
+ 		set VandaagOfMorgen = $$$Morgen 
+ 	}
  	
  	
  	If (VandaagOfMorgen=$$$Morgen) && ..VerzendwDD1(ORDNr)  ; Indien verzendwijze is DD1 maar moet normaal pas morgen vertrekken dan toch vandaag laten vertrekken - PV 02 05 2023
  	{
 	 	Set VandaagOfMorgen=$$$Vandaag
 	} 
-	;w !,##class(TECH.Context).Instance().GeefDateTimeAPI().CurrentHorolog()
  	If (VandaagOfMorgen=$$$Morgen) && ($P(##class(TECH.Context).Instance().GeefDateTimeAPI().CurrentHorolog(),",",2)/3600<18) && '$G(OLNr) ; Pas na 18 uur mogen de opdrachten voor de volgende werkdag actief worden - PV 02 05 2023
  	{
  		Set VandaagOfMorgen=$$$AndereDag
Index: vhUnitTest/BL/Legacy/EWORDS6Mock.cls.xml
===================================================================
diff -u -r72365 -r72372
--- vhUnitTest/BL/Legacy/EWORDS6Mock.cls.xml	(.../EWORDS6Mock.cls.xml)	(revision 72365)
+++ vhUnitTest/BL/Legacy/EWORDS6Mock.cls.xml	(.../EWORDS6Mock.cls.xml)	(revision 72372)
@@ -11,10 +11,10 @@
 	#define 1uur	3600
 	;#dim KantelPuntDoorsturenPicking As %Time = ##class(TECH.DateTime).CurrentTime()
 	#dim KantelPuntDoorsturenPicking As %Time = ##class(TECH.Context).Instance().GeefDateTimeAPI().CurrentTime()
-	; #dim KantelPuntDoorsturenPicking As %Time = 18*3600
 	
 	if ORDNr = 100000 set KantelPuntDoorsturenPicking = KantelPuntDoorsturenPicking + $$$1uur
 	if ORDNr = 100001 set KantelPuntDoorsturenPicking = KantelPuntDoorsturenPicking - $$$1uur
+		
 	quit KantelPuntDoorsturenPicking
 ]]></Implementation>
 </Method>