Index: AXimpl/Dynamics/InventoryOut/Converter/PickingCompleetConverter.cls.xml
===================================================================
diff -u -r55297 -r58234
--- AXimpl/Dynamics/InventoryOut/Converter/PickingCompleetConverter.cls.xml	(.../PickingCompleetConverter.cls.xml)	(revision 55297)
+++ AXimpl/Dynamics/InventoryOut/Converter/PickingCompleetConverter.cls.xml	(.../PickingCompleetConverter.cls.xml)	(revision 58234)
@@ -96,8 +96,14 @@
 				Set Pick.PickId = Bon.GeefID()
 				Set Pick.InventTransId = Lijn.GeefAxInventTransId()
 				Set Pick.Qty = Lijn.GeefAantal()
-				Set Pick.ShippingDate = ##class(TECH.DateTime).HorologToDate(..OrderWMSHoofdingRepository.GeefViaID(Bon.GeefID()).DueOutTime)
 				
+				#dim ShippingDate as %Date = +..OrderWMSHoofdingRepository.GeefViaID(Bon.GeefID()).DueOutTime
+				; Je kan niet in het verleden goederen verzenden die vandaag geraapt zijn.
+				If ShippingDate<+$H {
+					Set ShippingDate=+$H
+				}
+				Set Pick.ShippingDate = ##class(TECH.DateTime).HorologToDate(ShippingDate)
+				
 				If $$$Not(Pick.Qty = 0) {
 					Do ..AxdEntityHeader.Pick.Insert(Pick)
 				}