Index: EWTOE.mac.rou
===================================================================
diff -u -r7986 -r49740
--- EWTOE.mac.rou	(.../EWTOE.mac.rou)	(revision 7986)
+++ EWTOE.mac.rou	(.../EWTOE.mac.rou)	(revision 49740)
@@ -513,7 +513,7 @@
  .....If ORDNr,OLNr Set KLNr=$P(^KO1(ORDNr,"F"),D),R=^KOD(KLNr,"F",ORDNr,OLNr),OLUNr=$P(R,D,15)
  .....Do RCPPAL^EWPAL(PRNr,$G(C("PALETID")),ORDNr,OLUNr,Aantal)
  .....Do TOELINE(,TOENr,TLUNr,,Aantal,BOAantal,"",1,.WMS)
- .....Do MARKTBXFINISHED(TOENr,TLUNr,Aantal,BOAantal,PRNr)
+ .....Do MARKTBXFINISHED(TOENr,TLUNr,Aantal,BOAantal,PRNr,ORDNr,OLUNr)
  .....Do CHKDEL^FLOWTOE(TOENr)
  .....If $G(KLNr),ORDNr,LEVNr=$$$LevHalux,'$D(^KTO1(TOENr)) Do
  ......If $$GetPickDatum^EWORDS6(ORDNr)'<$H Quit:$$IsVoorVandaagOfMorgen^EWORDS6(ORDNr)'=1
@@ -532,7 +532,7 @@
  Else  Do ERROR^EWLOG($T(UPTOEL))
  Quit
  
-MARKTBXFINISHED(TOENr,TLUNr,Aantal,BOAantal,PRNr)
+MARKTBXFINISHED(TOENr,TLUNr,Aantal,BOAantal,PRNr,ORDNr,OLUNr)
 	New rset,BatchID
 	Set rset = ##class(%ResultSet).%New("DOM.PM.Maatwerk.TBX.HaluxWerkoverzichtHelper:qGeefQueueIDs")
 	Do rset.Execute(TOENr,TLUNr)
@@ -546,7 +546,7 @@
 			GROUP BY TOENr)
 	For i=1:1:Aantal
 	{
-		Set LadeGerecepteerdEventData = ##class(TECH.Events.LadeGerecepteerdEventData).%New(TOENr,TLUNr,PRNr,BatchID,"-1")
+		Set LadeGerecepteerdEventData = ##class(TECH.Events.LadeGerecepteerdEventData).%New(TOENr,TLUNr,PRNr,BatchID,"-1",ORDNr,OLUNr)
 		Set LadeGerecepteerdEvent = ##class(TECH.Events.LadeGerecepteerdEvent).%New(LadeGerecepteerdEventData)
 		Do ##class(TECH.PubSub.OrchestrationContext).GetEventRaiser().RaiseEventAsync(LadeGerecepteerdEvent)
 	}