Index: TAOR rework/TAOR rework/databases/Automilling/ZijkamerFreesProductieData.vb
===================================================================
diff -u -r2169 -r2409
--- TAOR rework/TAOR rework/databases/Automilling/ZijkamerFreesProductieData.vb	(.../ZijkamerFreesProductieData.vb)	(revision 2169)
+++ TAOR rework/TAOR rework/databases/Automilling/ZijkamerFreesProductieData.vb	(.../ZijkamerFreesProductieData.vb)	(revision 2409)
@@ -273,7 +273,7 @@
         'pickplace op rework zetten
         PickPlace = "R"
     End Sub
-    Public Sub updateDataSifonLadeGegenereerd(trayNummer As String, slotNummer As Integer, nettoLengte As String, nettoHoogte As String, barcodeLeft As String, barcodeRight As String, materiaal As String)
+    Public Sub updateDataSifonLadeGegenereerd(trayNummer As String, slotNummer As Integer, nettoLengte As String, nettoHoogte As String, barcodeLeft As String, barcodeRight As String, materiaal As String, etiketLijn1 As String)
         PalletID = trayNummer
         PickSequence = slotNummer
         SlotNbr = slotNummer
@@ -288,12 +288,13 @@
         PrintTextLeft4 = barcodeLeft.Trim & "/D:" & NettoLength & "xH:" & NettoHeight
         PrintTextRight4 = barcodeRight.Trim & "/D:" & NettoLength & "xH:" & NettoHeight
 
-        updatePrintTextLeftAndRight1SpoelBakOfSifon("SY")
+        Dim voormontageInfo = etiketLijn1.Split("/")(6)
+        updatePrintTextLeftAndRight1SpoelBakOfSifon(voormontageInfo)
 
         'programma's aanpassen
         'Uitbreiding 06/10/2022: G en H toegevoegd
         Dim hoogteLetter = PrintBarcodeLeft.Substring(5, 1)
-        If hoogteletter.Equals("C") Or hoogteLetter.Equals("D") Or hoogteLetter.Equals("G") or hoogteLetter.Equals("H") Then
+        If hoogteLetter.Equals("C") Or hoogteLetter.Equals("D") Or hoogteLetter.Equals("G") Or hoogteLetter.Equals("H") Then
             Dim letterProgramma As String = barcodeLeft.Substring(1, 1)
             Dim programmas As List(Of String) = Configs.sifonLadeGeefAutoMillingProgrammasGegenereerdeZijkantenVerlaagdeRug(letterProgramma)
 
Index: TAOR rework/TAOR rework/laden/special laden/Sifonladen/HoofdAansturingSifonLade.vb
===================================================================
diff -u -r2066 -r2409
--- TAOR rework/TAOR rework/laden/special laden/Sifonladen/HoofdAansturingSifonLade.vb	(.../HoofdAansturingSifonLade.vb)	(revision 2066)
+++ TAOR rework/TAOR rework/laden/special laden/Sifonladen/HoofdAansturingSifonLade.vb	(.../HoofdAansturingSifonLade.vb)	(revision 2409)
@@ -1,6 +1,4 @@
-Imports TA_OR_rework.Rework
-
-Public Class HoofdAansturingSifonLade
+Public Class HoofdAansturingSifonLade
     Inherits HoofdAansturingSpecialLade
 
     Private _reworkTrayRepository As ReworkTrayRepository
@@ -46,7 +44,7 @@
 
         'kopie maken van de aangepaste productiedata en de velden verder updaten
         Dim productieDataGegenereerdeZijkanten As ZijkamerFreesProductieData = productieDataOrigineleZijkanten.ShallowCopy
-        productieDataGegenereerdeZijkanten.updateDataSifonLadeGegenereerd(trayNummer, slot2.nummer, gegenereerdeZijkantL.PartL, gegenereerdeZijkantL.PartW, gegenereerdeZijkantL.PartCalc, gegenereerdeZijkantR.PartCalc, gegenereerdeZijkantL.GeefKleurBinnen())
+        productieDataGegenereerdeZijkanten.updateDataSifonLadeGegenereerd(trayNummer, slot2.nummer, gegenereerdeZijkantL.PartL, gegenereerdeZijkantL.PartW, gegenereerdeZijkantL.PartCalc, gegenereerdeZijkantR.PartCalc, gegenereerdeZijkantL.GeefKleurBinnen(), origineleZijkantL.PartExt01)
         'kijken of het wel moet worden geüpdated
         If Configs.geefVerwerkStatus Then
             'de aangepaste originele productiedata opslaan als nieuw record