Index: TAOR rework/TAOR rework/Rework/Slot.vb
===================================================================
diff -u -r1879 -r2097
--- TAOR rework/TAOR rework/Rework/Slot.vb	(.../Slot.vb)	(revision 1879)
+++ TAOR rework/TAOR rework/Rework/Slot.vb	(.../Slot.vb)	(revision 2097)
@@ -84,14 +84,24 @@
         If _type = SlotType.dubbel Then
             If _zijkanten.Count > 0 Then
                 'updaten van veld opslaan ardis in beide
-                If Not _zijkanten(1).opslaanArdis Then
-                    zijkanten(0).opslaanArdis = False
-                ElseIf Not _zijkanten(0).opslaanArdis Then
-                    zijkanten(1).opslaanArdis = False
+                If Not _zijkanten(1).OpslaanArdis Then
+                    zijkanten(0).OpslaanArdis = False
+                ElseIf Not _zijkanten(0).OpslaanArdis Then
+                    zijkanten(1).OpslaanArdis = False
                 End If
-                'duidelijk maken dat beide tot een paar behoren
-                _zijkanten(0).onderdeel = "ZIJKANT LR"
-                _zijkanten(1).onderdeel = "ZIJKANT LR"
+                'Duidelijk maken dat beide tot een paar behoren
+                ' Uitbreiding 09/07/21 zorgen dat LL en RR ook geldig zijn
+                If _zijkanten(0).GeefLinksOfRechts().Equals("L") And _zijkanten(1).GeefLinksOfRechts().Equals("L") Then
+                    _zijkanten(0).Onderdeel = "ZIJKANT LL"
+                    _zijkanten(1).Onderdeel = "ZIJKANT LL"
+                ElseIf _zijkanten(0).GeefLinksOfRechts().Equals("R") And _zijkanten(1).GeefLinksOfRechts().Equals("R") Then
+                    _zijkanten(0).Onderdeel = "ZIJKANT RR"
+                    _zijkanten(1).Onderdeel = "ZIJKANT RR"
+                Else
+                    _zijkanten(0).Onderdeel = "ZIJKANT LR"
+                    _zijkanten(1).Onderdeel = "ZIJKANT LR"
+                End If
+
             End If
         End If
     End Sub
Index: TAOR rework/TAOR rework/Rework/HoofdAansturingRework.vb
===================================================================
diff -u -r2063 -r2097
--- TAOR rework/TAOR rework/Rework/HoofdAansturingRework.vb	(.../HoofdAansturingRework.vb)	(revision 2063)
+++ TAOR rework/TAOR rework/Rework/HoofdAansturingRework.vb	(.../HoofdAansturingRework.vb)	(revision 2097)
@@ -168,6 +168,14 @@
                     'Zo ja, Herzaag zowel voor links als voor rechts.
                     HerzaagZijkant(rework, "L", trayNummer, slotNummer)
                     HerzaagZijkant(rework, "R", trayNummer, slotNummer)
+
+                    'Uitbreiding 09/07/2021: LL en RR
+                ElseIf linksEnOfRechts.Contains("LL") Then
+                    HerzaagZijkant(rework, "L", trayNummer, slotNummer)
+                    HerzaagZijkant(rework, "L", trayNummer, slotNummer)
+                ElseIf linksEnOfRechts.Contains("RR") Then
+                    HerzaagZijkant(rework, "R", trayNummer, slotNummer)
+                    HerzaagZijkant(rework, "R", trayNummer, slotNummer)
                 ElseIf linksEnOfRechts.Contains("L") Then
                     'Herzaag links.
                     HerzaagZijkant(rework, "L", trayNummer, slotNummer)