Index: BL/MB/UGLYPicking/OrderSel.cls.xml
===================================================================
diff -u -r70333 -r70447
--- BL/MB/UGLYPicking/OrderSel.cls.xml	(.../OrderSel.cls.xml)	(revision 70333)
+++ BL/MB/UGLYPicking/OrderSel.cls.xml	(.../OrderSel.cls.xml)	(revision 70447)
@@ -45,6 +45,8 @@
  . Do ##class(BL.MB.UGLYPicking.OrderSel).FBuildSortedMagViaConsNr(tmpRS.Get("ConsolidatieNr"))
  ; |-> ROW DEF QUERY OpenstaandePerMag: KlantNaam,KlantNr,ConsolidatieNr,AantalLijnen,Tijd,Magazijn
 
+ Do ##class(BL.MB.UGLYPicking.OrderSelOptimizedSorter).HersorteerMbSortedMagList()   ; ByRef %mbSortedMagList : deze wordt niet als param doorgegeven, want is een globale variabele. 
+ 
  Do tmpRS.%Close()
 
  $$$WriteToLog("FBuildSortedMagList success.")
@@ -105,7 +107,8 @@
 	..  Set SortTime = $Extract("00000"_$Piece(DueOutTime,",",2),$Length("00000"_$Piece(DueOutTime,",",2))-4,$Length("00000"_$Piece(DueOutTime,",",2)))
 	..  
 	..  If (Magazijn = "HALUX") Do
-	...   Set SortedMagKey = SortDate _ KlantNaam _ SortTime_Magazijn _ ConsNr   ; Sinds 09/01/2023 maatwerk sortering op klantnaam (maar nog wel eerst op datum) 
+	...   Set SortedMagKey = SortDate _ KlantNaam _ SortTime_Magazijn _ ConsNr   ; Sinds 09/01/2023 maatwerk sortering op klantnaam (maar nog wel eerst op datum) --> dit geeft een probleem voor de dringende pickings waaronder "AFH" 
+	...   Do ##class(BL.MB.UGLYPicking.OrderSelOptimizedSorter).VoegToeHersorteringData(SortDate, SortTime, Magazijn, ConsNr, KlantNr, KlantNaam, SortedMagKey)   ; ByRef %mbSortedMagList : deze wordt niet als param doorgegeven, want is een globale variabele. 
 	..  Else  Do
 	...   Set SortedMagKey = SortDate_SortTime_Magazijn _ ConsNr
 	..