Index: APPS/TRANSP/Transsmart/impl/RequestDataBouwer.cls.xml
===================================================================
diff -u -r71494 -r71774
--- APPS/TRANSP/Transsmart/impl/RequestDataBouwer.cls.xml	(.../RequestDataBouwer.cls.xml)	(revision 71494)
+++ APPS/TRANSP/Transsmart/impl/RequestDataBouwer.cls.xml	(.../RequestDataBouwer.cls.xml)	(revision 71774)
@@ -274,9 +274,14 @@
 		}
 	}
 	
-	If ((Rit.GeefTransporteur() = Transporteur.Dachser) && (GeleverdAanKlantNummer = ##class(DOM.DomeinContext).Instance().GeefLegacyPartijAPI().GeefKlantNummerVoorPartijID(Klant.OPO))) { ; Zet de pickup datum op vandaag plus 2 werkdagen
-		Set Datum = ##class(TECH.DateTime).BerekenWerkdag(Datum, 2)
+	If (Rit.GeefTransporteur() = Transporteur.Dachser){
+		if (GeleverdAanKlantNummer = ##class(DOM.DomeinContext).Instance().GeefLegacyPartijAPI().GeefKlantNummerVoorPartijID(Klant.OPO)) { ; Zet de pickup datum op vandaag plus 2 werkdagen
+			Set Datum = ##class(TECH.DateTime).BerekenWerkdag(Datum, 2)
+		} else { // alle Haefeles behalve CH
+			Set Datum = ##class(TECH.DateTime).BerekenWerkdag(Datum, 1)
+		}
 	}
+
 	If ((Rit.GeefTransporteur() = Transporteur.Schenker) && (GeleverdAanKlantNummer = ##class(DOM.DomeinContext).Instance().GeefLegacyPartijAPI().GeefKlantNummerVoorPartijID(Klant.BlumPolen))) { ; Zet de pickup datum op vandaag plus 2 werkdagen
 		Set Datum = ##class(TECH.DateTime).BerekenWerkdag(Datum, 1)
 	}