Index: APPS/Halux/Planning/Pitching/impl/BerekenTijdenLeadingNotPitched.cls.xml
===================================================================
diff -u -r57548 -r58807
--- APPS/Halux/Planning/Pitching/impl/BerekenTijdenLeadingNotPitched.cls.xml	(.../BerekenTijdenLeadingNotPitched.cls.xml)	(revision 57548)
+++ APPS/Halux/Planning/Pitching/impl/BerekenTijdenLeadingNotPitched.cls.xml	(.../BerekenTijdenLeadingNotPitched.cls.xml)	(revision 58807)
@@ -130,11 +130,19 @@
 <Method name="GeefVroegsteDatum">
 <FormalSpec>rsToelev:%ResultSet</FormalSpec>
 <Implementation><![CDATA[
-	Set StartTijdstip=rsToelev.Data("DueOutTijdstip")
-	Quit:StartTijdstip'="" StartTijdstip
-	Set:StartTijdstip="" StartTijdstip=$zd(+rsToelev.Data("GeplandOp"),3)_" 17:00:00"
-	Set:StartTijdstip="" StartTijdstip=$zd(+$H,3)_" 17:00:00"
-	Quit StartTijdstip
+	Set DueOutTijdstip=rsToelev.Data("DueOutTijdstip")
+	Set:DueOutTijdstip="" DueOutTijdstip=$zd(+rsToelev.Data("GeplandOp"),3)_" 17:00:00"
+	Set:DueOutTijdstip="" DueOutTijdstip=$zd(+$H,3)_" 17:00:00"
+	
+	; Alle KLANTORDERS hebben volgende DUEOUTTIME regel
+	; Indien DueOutTijdstip voor VANDAAG (of vroeger) dan DueOutTijdstip is vandaag om 10:30 anders is het vandaag om 14:30
+	If +$zdth(DueOutTijdstip,3)>+$H
+	{
+		Set DueOutTijdstip=$zd(+$H,3)_" 14:30"
+	} Else {
+		Set DueOutTijdstip=$zd(+$H,3)_" 10:30"
+	}
+	Quit DueOutTijdstip
 ]]></Implementation>
 </Method>