Index: AXimpl/Dynamics/InventoryOut/Converter/PickingCompleetConverter.cls.xml
===================================================================
diff -u -r58257 -r60874
--- AXimpl/Dynamics/InventoryOut/Converter/PickingCompleetConverter.cls.xml	(.../PickingCompleetConverter.cls.xml)	(revision 58257)
+++ AXimpl/Dynamics/InventoryOut/Converter/PickingCompleetConverter.cls.xml	(.../PickingCompleetConverter.cls.xml)	(revision 60874)
@@ -100,8 +100,18 @@
 				#dim ShippingDate as %Date = +..OrderWMSHoofdingRepository.GeefViaID(Bon.GeefID()).DueOutTime
 				; Je kan niet in het verleden goederen verzenden die vandaag geraapt zijn.
 				If ShippingDate<+##class(TECH.Context).Instance().GeefDateTimeAPI().CurrentHorolog() {
+					Do ##class(vhLib.Logger).%New("").Warning("PickingCompleetConverter - ShippingDate in verleden",
+						"ShippingDate in PickingCompleet-bericht was '"_ ShippingDate _ "', wordt gezet op '" _ +##class(TECH.Context).Instance().GeefDateTimeAPI().CurrentHorolog() _ "'."
+						_ "MessageId='" _ MessageId _ "', Bonnummer='" _ Bon.GeefID() _ "'.")
 					Set ShippingDate=+##class(TECH.Context).Instance().GeefDateTimeAPI().CurrentHorolog()
 				}
+				; Door vreemde kronkels geraakt soms een datum van 1 of 2 maanden in de toekomst als pickingdatum in ^ORDW. Dat is probleem voor facturatie en voorraad-boekingen.
+				If ShippingDate > (10 + +##class(TECH.Context).Instance().GeefDateTimeAPI().CurrentHorolog()) {
+					Do ##class(vhLib.Logger).%New("").Warning("PickingCompleetConverter - ShippingDate in toekomst",
+						"ShippingDate in PickingCompleet-bericht was '"_ ShippingDate _ "', wordt gezet op '" _ +##class(TECH.Context).Instance().GeefDateTimeAPI().CurrentHorolog() _ "'."
+						_ "MessageId='" _ MessageId _ "', Bonnummer='" _ Bon.GeefID() _ "'.")
+					Set ShippingDate=+##class(TECH.Context).Instance().GeefDateTimeAPI().CurrentHorolog()
+				}
 				Set Pick.ShippingDate = ##class(TECH.DateTime).HorologToDate(ShippingDate)
 				
 				If $$$Not(Pick.Qty = 0) {