Index: TAOR rework/TAOR rework/controllers/Domeincontroller.vb
===================================================================
diff -u -r2087 -r2089
--- TAOR rework/TAOR rework/controllers/Domeincontroller.vb	(.../Domeincontroller.vb)	(revision 2087)
+++ TAOR rework/TAOR rework/controllers/Domeincontroller.vb	(.../Domeincontroller.vb)	(revision 2089)
@@ -1032,7 +1032,7 @@
     ''' </summary>
     ''' <param name="ladecode"></param>
     Public Sub UpdateRushMetLadeCode(ladecode As String)
-        Dim ardisDataList = ArdisMapper.OphalenDataPerBatch(ladecode).FindAll(Function(x) Not x.isRework()) ' Filter out reworks
+        Dim ardisDataList = ArdisMapper.OphalenDataPerLadeCode(ladecode).FindAll(Function(x) Not x.isRework()) ' Filter out reworks
         UpdateRush(ardisDataList)
     End Sub
 
Index: TAOR rework/TAOR rework/databases/Automilling/ZijkamerFreesProductieData.vb
===================================================================
diff -u -r2087 -r2089
--- TAOR rework/TAOR rework/databases/Automilling/ZijkamerFreesProductieData.vb	(.../ZijkamerFreesProductieData.vb)	(revision 2087)
+++ TAOR rework/TAOR rework/databases/Automilling/ZijkamerFreesProductieData.vb	(.../ZijkamerFreesProductieData.vb)	(revision 2089)
@@ -584,12 +584,12 @@
     Public Sub UpdateRush()
         Try
             Const rushString = "*RUSH*"
-            Dim aantalSpaties As Integer = Len(PrintTextLeft1) - PrintTextLeft1.LastIndexOf("/", StringComparison.Ordinal) - Len(rushString)
-            PrintTextLeft1 = PrintTextLeft1.Substring(0, PrintTextLeft1.LastIndexOf("/", StringComparison.Ordinal)) & rushString
+            Dim aantalSpaties As Integer = Len(PrintTextLeft1) - PrintTextLeft1.LastIndexOf("/", StringComparison.Ordinal) - Len(rushString) - 1
+            PrintTextLeft1 = PrintTextLeft1.Substring(0, PrintTextLeft1.LastIndexOf("/", StringComparison.Ordinal) + 1) & rushString
             PrintTextLeft1 &= If(aantalSpaties > 0, New String(" ", aantalSpaties), "") 'String even lang maken als daarvoor (automilling database quirks)
 
-            aantalSpaties = Len(PrintTextRight1) - PrintTextRight1.LastIndexOf("/", StringComparison.Ordinal) - Len(rushString)
-            PrintTextRight1 = PrintTextRight1.Substring(0, PrintTextRight1.LastIndexOf("/", StringComparison.Ordinal)) & rushString
+            aantalSpaties = Len(PrintTextRight1) - PrintTextRight1.LastIndexOf("/", StringComparison.Ordinal) - Len(rushString) - 1
+            PrintTextRight1 = PrintTextRight1.Substring(0, PrintTextRight1.LastIndexOf("/", StringComparison.Ordinal) + 1) & rushString
             PrintTextRight1 &= If(aantalSpaties > 0, New String(" ", aantalSpaties), "") 'String even lang maken als daarvoor (automilling database quirks)
         Catch ex As Exception
             Throw New Exception($"Kon PrintTextLeft1 of PrintTextRight1 niet updaten omdat ze ongeldig zijn.{vbNewLine}{ex.Message}")