Index: AXimpl/Dynamics/InventoryOut/BatchJobPakbonMagGeboektWorden.cls.xml
===================================================================
diff -u -r61192 -r61257
--- AXimpl/Dynamics/InventoryOut/BatchJobPakbonMagGeboektWorden.cls.xml	(.../BatchJobPakbonMagGeboektWorden.cls.xml)	(revision 61192)
+++ AXimpl/Dynamics/InventoryOut/BatchJobPakbonMagGeboektWorden.cls.xml	(.../BatchJobPakbonMagGeboektWorden.cls.xml)	(revision 61257)
@@ -18,8 +18,13 @@
 <Private>1</Private>
 </Property>
 
+<Property name="OrderWMSHoofdingRepository">
+<Type>Flow.OrderWMS.HoofdingRepository</Type>
+<Private>1</Private>
+</Property>
+
 <Method name="%OnNew">
-<FormalSpec>EventRaiser:DOM.MAG.event.EventRaiser="",OrderApi:DOM.VKP.OrderAPI="",UitleveringHoofdingRepository:Flow.Uitlevering.HoofdingRepository=""</FormalSpec>
+<FormalSpec>EventRaiser:DOM.MAG.event.EventRaiser="",OrderApi:DOM.VKP.OrderAPI="",UitleveringHoofdingRepository:Flow.Uitlevering.HoofdingRepository="",OrderWMSHoofdingRepository:Flow.OrderWMS.HoofdingRepository=""</FormalSpec>
 <Private>1</Private>
 <ProcedureBlock>1</ProcedureBlock>
 <ReturnType>%Status</ReturnType>
@@ -28,6 +33,7 @@
 	Set ..EventRaiser = $$$Inject(EventRaiser, ##class(DOM.MAG.event.EventRaiser).%New())
 	Set ..OrderApi = $$$Inject(OrderApi, ##class(DOM.DomeinContext).Instance().GeefOrderAPI())
 	Set ..UitleveringHoofdingRepository = $$$Inject(UitleveringHoofdingRepository,##class(Flow.Uitlevering.HoofdingRepository).%New())
+	Set ..OrderWMSHoofdingRepository = $$$Inject(OrderWMSHoofdingRepository, ##class(Flow.OrderWMS.HoofdingRepository).%New())
 	Quit $$$OK
 ]]></Implementation>
 </Method>
@@ -56,17 +62,41 @@
 
 <Method name="VerwerkBon">
 <FormalSpec>LeverbonNummer:%String</FormalSpec>
-<Private>1</Private>
 <ReturnType>%Boolean</ReturnType>
 <Implementation><![CDATA[
+	Do ##class(Tools.Wlip).%New(43).String("VerwerkBon")
 	Set PakbonMagGeboektWordenHelper = ##class(AXimpl.Dynamics.InventoryOut.EventHandler.PakbonMagGeboektWordenHelper).%New(..EventRaiser,..OrderApi)
-	
+	Do ##class(Tools.Wlip).%New(43).String("VerwerkBon "_PakbonMagGeboektWordenHelper.IsVerzendwijzeMetUitgesteldPakbonBoekenAx(LeverbonNummer))
 	If PakbonMagGeboektWordenHelper.IsVerzendwijzeMetUitgesteldPakbonBoekenAx(LeverbonNummer) {
 		#dim Bon As DOM.VKP.Bon = ..OrderApi.GeefBon(LeverbonNummer)
 		#dim Piece63PakbonReedsGeboekt as %String = Bon.IsTweedeBerichtPakbonMagGeboektWordenVerzondenAX()
-		
+		Do ##class(Tools.Wlip).%New(43).String("VerwerkBon "_Piece63PakbonReedsGeboekt)	
 		If ($$$Not($IsObject(Piece63PakbonReedsGeboekt)) || $$$HasLength(Piece63PakbonReedsGeboekt) = 0 ||Piece63PakbonReedsGeboekt = 0) {
-			Quit ##class(AXimpl.Dynamics.InventoryOut.EventHandler.PakbonMagGeboektWordenHelper).%New(..EventRaiser, ..OrderApi).ManualPakbonMagGeboektWordenAfhandelaar(LeverbonNummer)
+			#dim BestaatOrder As %Boolean = ..OrderWMSHoofdingRepository.BestaatViaID(Bon.GeefID())
+			Do ##class(vhLib.Logger).%New("").Info("Bon: "_Bon.GeefID()_" , Order gevonden: "_BestaatOrder)
+			Do ##class(Tools.Wlip).%New(43).String("Bon: "_Bon.GeefID()_" , Order gevonden: "_BestaatOrder)
+		
+			#dim ShippingDate As %String = ""
+			If BestaatOrder {
+				Set ShippingDate = ..OrderWMSHoofdingRepository.GeefViaID(Bon.GeefID()).DueOutTime
+				Do ##class(vhLib.Logger).%New("").Info("Bon: "_Bon.GeefID()_" , Order gevonden: "_BestaatOrder_"ShippingDate: "_ShippingDate_ "currentHorloge "_##class(TECH.Context).Instance().GeefDateTimeAPI().CurrentHorolog())
+				Do ##class(Tools.Wlip).%New(43).String("Bon: "_Bon.GeefID()_" , Order gevonden: "_BestaatOrder_"ShippingDate: "_ShippingDate_ "currentHorloge "_##class(TECH.Context).Instance().GeefDateTimeAPI().CurrentHorolog())
+			} Else {
+				Do ##class(vhLib.Logger).%New("").Info("Bon: "_Bon.GeefID()_" , Order niet gevonden: ShippingDate op vandaag gezet")
+				Set ShippingDate = ##class(TECH.Context).Instance().GeefDateTimeAPI().CurrentDate()
+			}
+			
+			Do ##class(Tools.Wlip).%New(43).String(##class(TECH.DateTime).HorologToDate(ShippingDate))
+			Do ##class(Tools.Wlip).%New(43).String(##class(TECH.Context).Instance().GeefDateTimeAPI().CurrentDate())
+			
+			
+			If (##class(TECH.DateTime).HorologToDate(ShippingDate) = ##class(TECH.Context).Instance().GeefDateTimeAPI().CurrentDate()) {
+				Do ##class(Tools.Wlip).%New(43).String("Trigger event")
+				Quit ##class(AXimpl.Dynamics.InventoryOut.EventHandler.PakbonMagGeboektWordenHelper).%New(..EventRaiser, ..OrderApi).ManualPakbonMagGeboektWordenAfhandelaar(LeverbonNummer)
+			} Else {
+				Do ##class(vhLib.Logger).%New("").Info("Bon: "_Bon.GeefID()_", Order gevonden maar DueOutTime ("_ShippingDate_") staat niet op vandaag. Het gaat dus om een order dat op voorhand gepicked werd."  )
+			}
+			
 		}
 	}
 
Index: vhUnitTest/AXimpl/Dynamics/InventoryOut/BatchJobPakbonMagGeboektWorden/SpyImplementatie.cls.xml
===================================================================
diff -u -r60837 -r61257
--- vhUnitTest/AXimpl/Dynamics/InventoryOut/BatchJobPakbonMagGeboektWorden/SpyImplementatie.cls.xml	(.../SpyImplementatie.cls.xml)	(revision 60837)
+++ vhUnitTest/AXimpl/Dynamics/InventoryOut/BatchJobPakbonMagGeboektWorden/SpyImplementatie.cls.xml	(.../SpyImplementatie.cls.xml)	(revision 61257)
@@ -18,8 +18,13 @@
 <Private>1</Private>
 </Property>
 
+<Property name="OrderWMSHoofdingRepository">
+<Type>Flow.OrderWMS.HoofdingRepository</Type>
+<Private>1</Private>
+</Property>
+
 <Method name="%OnNew">
-<FormalSpec>EventRaiser:DOM.MAG.event.EventRaiser="",OrderApi:DOM.VKP.OrderAPI="",UitleveringHoofdingRepository:Flow.Uitlevering.HoofdingRepository=""</FormalSpec>
+<FormalSpec>EventRaiser:DOM.MAG.event.EventRaiser="",OrderApi:DOM.VKP.OrderAPI="",UitleveringHoofdingRepository:Flow.Uitlevering.HoofdingRepository="",OrderWMSHoofdingRepository:Flow.OrderWMS.HoofdingRepository=""</FormalSpec>
 <Private>1</Private>
 <ProcedureBlock>1</ProcedureBlock>
 <ReturnType>%Status</ReturnType>
@@ -28,6 +33,7 @@
 	Set ..EventRaiser = $$$Inject(EventRaiser, ##class(DOM.MAG.event.EventRaiser).%New())
 	Set ..OrderApi = $$$Inject(OrderApi, ##class(DOM.DomeinContext).Instance().GeefOrderAPI())
 	Set ..UitleveringHoofdingRepository = $$$Inject(UitleveringHoofdingRepository,##class(Flow.Uitlevering.HoofdingRepository).%New())
+	Set ..OrderWMSHoofdingRepository = $$$Inject(OrderWMSHoofdingRepository, ##class(Flow.OrderWMS.HoofdingRepository).%New())
 	Quit $$$OK
 ]]></Implementation>
 </Method>
Index: vhUnitTest/AXimpl/Dynamics/InventoryOut/BatchJobPakbonMagGeboektWorden/Test.cls.xml
===================================================================
diff -u -r61149 -r61257
--- vhUnitTest/AXimpl/Dynamics/InventoryOut/BatchJobPakbonMagGeboektWorden/Test.cls.xml	(.../Test.cls.xml)	(revision 61149)
+++ vhUnitTest/AXimpl/Dynamics/InventoryOut/BatchJobPakbonMagGeboektWorden/Test.cls.xml	(.../Test.cls.xml)	(revision 61257)
@@ -54,16 +54,25 @@
 	#dim Node3Leverbon As %String = "LIMA"
 	
 	Set BonStub = ##class(vhTest.Mock.DOM.VKP.Bon).%New()
+	Do BonStub.IndienMethodCall("GeefID").DanReturn("123456")
 	Set OrderApiStub = ##class(vhTest.Mock.DOM.VKP.OrderAPI).%New()
 	
 	Do OrderApiStub.IndienMethodCall("GeefBon","LIMA").DanReturn(BonStub)
+	
 	Do BonStub.IndienMethodCall("GeefVerzendwijzeID").DanReturn(Verzendwijze)
 	Do BonStub.IndienMethodCall("IsTweedeBerichtPakbonMagGeboektWordenVerzondenAX").DanReturn(Piece63waarde)
 	
 	#dim EventRaiserMock As DOM.MAG.event.EventRaiser = ##class(vhTest.Mock.DOM.MAG.event.EventRaiser).%New()
 	Do EventRaiserMock.VerwachtMethodCall("RaisePakbonMagGeboektWordenEvent", Node3Leverbon).ExactAantalKeer(AantalKeerPakbonEvent)
 	
-	Set spyklasse = ##class(vhUnitTest.AXimpl.Dynamics.InventoryOut.BatchJobPakbonMagGeboektWorden.SpyImplementatie).%New(EventRaiserMock,OrderApiStub)
+	#dim OrderWMSHoofding As Flow.OrderWMS.Hoofding = ##class(Flow.OrderWMS.Hoofding).%New()
+	Set OrderWMSHoofding.DueOutTime = $$$CurrentDate
+	
+	Set OrderWMSHoofdingRepositoryStub = ##class(vhTest.Mock.Flow.OrderWMS.HoofdingRepository).%New()
+	Do OrderWMSHoofdingRepositoryStub.IndienMethodCall("GeefViaID","123456").DanReturn(OrderWMSHoofding)
+	Do OrderWMSHoofdingRepositoryStub.IndienMethodCall("BestaatViaID","123456").DanReturn($$$True)
+	
+	Set spyklasse = ##class(vhUnitTest.AXimpl.Dynamics.InventoryOut.BatchJobPakbonMagGeboektWorden.SpyImplementatie).%New(EventRaiserMock,OrderApiStub,OrderWMSHoofdingRepositoryStub)
 	#dim Resultaat As %String = spyklasse.VerwerkLeverbonnenStuurAxBerichtPakbonMagGeboektWorden(Node3Leverbon)
 	
 	
Index: vhTest/Fake/Flow/OrderWMS/HoofdingRepository.cls.xml
===================================================================
diff -u -r60144 -r61257
--- vhTest/Fake/Flow/OrderWMS/HoofdingRepository.cls.xml	(.../HoofdingRepository.cls.xml)	(revision 60144)
+++ vhTest/Fake/Flow/OrderWMS/HoofdingRepository.cls.xml	(.../HoofdingRepository.cls.xml)	(revision 61257)
@@ -28,8 +28,7 @@
 
 <Method name="VerwijderViaObject">
 <FormalSpec>Data:TECH.Persistent</FormalSpec>
-<Implementation><![CDATA[
-]]></Implementation>
+<Implementation><![CDATA[]]></Implementation>
 </Method>
 
 <Method name="ZoekVia2Verzendwijzen">
Index: AXimpl/Dynamics/InventoryOut/Converter/PakbonMagGeboektWordenConverter.cls.xml
===================================================================
diff -u -r61191 -r61257
--- AXimpl/Dynamics/InventoryOut/Converter/PakbonMagGeboektWordenConverter.cls.xml	(.../PakbonMagGeboektWordenConverter.cls.xml)	(revision 61191)
+++ AXimpl/Dynamics/InventoryOut/Converter/PakbonMagGeboektWordenConverter.cls.xml	(.../PakbonMagGeboektWordenConverter.cls.xml)	(revision 61257)
@@ -59,7 +59,8 @@
 	#dim BestaatOrder As %Boolean = ..OrderWMSHoofdingRepository.BestaatViaID(Bon.GeefID())
 	Do ##class(vhLib.Logger).%New("").Info("PickingCompleetConverter bon: "_Pick.PickId_" , Order gevonden: "_BestaatOrder)
 	
-	If ..PakbonMagGeboektWordenHelper.IsVerzendwijzeMetUitgesteldPakbonBoekenAx(Bon.GeefID()) {
+	If $$$Not(BestaatOrder) {
+		Do ##class(vhLib.Logger).%New("").Warning("PickingCompleetConverter bon: "_Pick.PickId_" , Order record niet gevonden, DueOutTime meegestuurd op datum vandaag.")
 		Set ShippingDate =+##class(TECH.Context).Instance().GeefDateTimeAPI().CurrentHorolog()
 	}Else {
 		Set ShippingDate = +..OrderWMSHoofdingRepository.GeefViaID(Bon.GeefID()).DueOutTime