Index: TAOR rework/TAOR rework/databases/Ardis/ArdisData.vb
===================================================================
diff -u -r1879 -r1881
--- TAOR rework/TAOR rework/databases/Ardis/ArdisData.vb	(.../ArdisData.vb)	(revision 1879)
+++ TAOR rework/TAOR rework/databases/Ardis/ArdisData.vb	(.../ArdisData.vb)	(revision 1881)
@@ -625,6 +625,9 @@
         'nieuwe barcode en etiketlijn4 instellen
         PartCalc = barcode
         PartExt04 = barcode
+
+        'Etiketlijn 2 op een hardcoded value instellen
+        PartExt02 = "0a/MAN(1)/KAR 1:1/1"
     End Sub
 
 #End Region
Index: TAOR rework/TAOR rework/formulieren/Specials/FormVoorraad.vb
===================================================================
diff -u -r1869 -r1881
--- TAOR rework/TAOR rework/formulieren/Specials/FormVoorraad.vb	(.../FormVoorraad.vb)	(revision 1869)
+++ TAOR rework/TAOR rework/formulieren/Specials/FormVoorraad.vb	(.../FormVoorraad.vb)	(revision 1881)
@@ -13,12 +13,27 @@
         refreshVoorraadItemsGrid()
         'tonen of de voorraadItems wel verwerkt worden
         lblVerwerking.Visible = Not Configs.geefVerwerkStatus
+
+        controleerToegang()
     End Sub
 
     Private Sub btnTerug_Click(sender As System.Object, e As System.EventArgs) Handles btnTerug.Click
         FormController.getInstance.laadFormSpecialMenu(Me)
     End Sub
 
+    ''' <summary>
+    ''' Elke keer controleren of er nog geen reworks in de repo zitten.
+    ''' Het gewone rework scherm en deze maken gebruik van hetzelfde onderliggende systeem.
+    ''' We willen niet dat de andere reworks plots ook verwerkt worden.
+    ''' </summary>
+    Sub controleerToegang()
+        if Domeincontroller.getInstance().geefAantalReworks() > 0 Then
+            'Er zijn al reworks aanwezig, afbreken
+            MessageBox.Show("Er zijn al reworks aanwezig. Deze moeten eerst verwerkt worden vooraleer deze functionaliteit kan gebruikt worden.")
+            FormController.getInstance().laadFormSpecialMenu(Me)
+        End If
+    End Sub
+
     Private Sub laadData()
         Try
             TextBoxLabelTekst.Text = "Stock"