Index: vhTestFiles/IntegratieTests/Productie.Planning.ActieveBatches.Taorbox.Aansturing/Test007BodemMelamineZijkantFineer/StartBatch/Productie_004_TAX_OnderdelenPickingLijst.txt
===================================================================
diff -u -r30010 -r30130
--- vhTestFiles/IntegratieTests/Productie.Planning.ActieveBatches.Taorbox.Aansturing/Test007BodemMelamineZijkantFineer/StartBatch/Productie_004_TAX_OnderdelenPickingLijst.txt	(.../Productie_004_TAX_OnderdelenPickingLijst.txt)	(revision 30010)
+++ vhTestFiles/IntegratieTests/Productie.Planning.ActieveBatches.Taorbox.Aansturing/Test007BodemMelamineZijkantFineer/StartBatch/Productie_004_TAX_OnderdelenPickingLijst.txt	(.../Productie_004_TAX_OnderdelenPickingLijst.txt)	(revision 30130)
@@ -1,7 +1,7 @@
 
     HALUX N.V.           TAX pickinglijst losse onderdelen V1     Blz:   1
     EUROPARK-NOORD 7    Lijn:T1 Batch:15000 Toelevering:222222    14-11-14
-    B-9100 SINT-NIKLAAS              Kar 1 (vak 1)                   09:15
+    B-9100 SINT-NIKLAAS               Kar 1: vak 1                   09:15
 
     -------------------------|--------------------------|----|-------|--------
     Product omschrijving     | Korttekst                | #  | Lengt | Control
Index: vhTestFiles/IntegratieTests/Productie.Planning.ActieveBatches.Taorbox.Aansturing/Test006Binnenlade/StartBatch/Productie_004_TAX_OnderdelenPickingLijst.txt
===================================================================
diff -u -r30010 -r30130
--- vhTestFiles/IntegratieTests/Productie.Planning.ActieveBatches.Taorbox.Aansturing/Test006Binnenlade/StartBatch/Productie_004_TAX_OnderdelenPickingLijst.txt	(.../Productie_004_TAX_OnderdelenPickingLijst.txt)	(revision 30010)
+++ vhTestFiles/IntegratieTests/Productie.Planning.ActieveBatches.Taorbox.Aansturing/Test006Binnenlade/StartBatch/Productie_004_TAX_OnderdelenPickingLijst.txt	(.../Productie_004_TAX_OnderdelenPickingLijst.txt)	(revision 30130)
@@ -1,7 +1,7 @@
 
     HALUX N.V.           TAX pickinglijst losse onderdelen V1     Blz:   1
     EUROPARK-NOORD 7    Lijn:T1 Batch:15000 Toelevering:222222    14-11-14
-    B-9100 SINT-NIKLAAS              Kar 1 (vak 1)                   09:15
+    B-9100 SINT-NIKLAAS               Kar 1: vak 1                   09:15
 
     -------------------------|--------------------------|----|-------|--------
     Product omschrijving     | Korttekst                | #  | Lengt | Control
Index: vhTestFiles/IntegratieTests/Productie.Planning.ActieveBatches.Taorbox.Aansturing/Test002ProboxMetOnderdelen/StartBatch/Productie_007_TAX_OnderdelenPickingLijst.txt
===================================================================
diff -u -r30010 -r30130
--- vhTestFiles/IntegratieTests/Productie.Planning.ActieveBatches.Taorbox.Aansturing/Test002ProboxMetOnderdelen/StartBatch/Productie_007_TAX_OnderdelenPickingLijst.txt	(.../Productie_007_TAX_OnderdelenPickingLijst.txt)	(revision 30010)
+++ vhTestFiles/IntegratieTests/Productie.Planning.ActieveBatches.Taorbox.Aansturing/Test002ProboxMetOnderdelen/StartBatch/Productie_007_TAX_OnderdelenPickingLijst.txt	(.../Productie_007_TAX_OnderdelenPickingLijst.txt)	(revision 30130)
@@ -1,7 +1,7 @@
 
     HALUX N.V.         TAX pickinglijst losse onderdelen Probox   Blz:   1
     EUROPARK-NOORD 7    Lijn:T1 Batch:15000 Toelevering:222222    14-11-14
-    B-9100 SINT-NIKLAAS              Kar 1 (vak 1)                   09:15
+    B-9100 SINT-NIKLAAS               Kar 1: vak 1                   09:15
 
     -------------------------|--------------------------|----|-------|--------
     Product omschrijving     | Korttekst                | #  | Lengt | Control
Index: vhTestFiles/IntegratieTests/Productie.Planning.ActieveBatches.Taorbox.Aansturing/Test003MetTiponSynchronisatieStang/StartBatch/Productie_006_TAX_OnderdelenPickingLijst.txt
===================================================================
diff -u -r30010 -r30130
--- vhTestFiles/IntegratieTests/Productie.Planning.ActieveBatches.Taorbox.Aansturing/Test003MetTiponSynchronisatieStang/StartBatch/Productie_006_TAX_OnderdelenPickingLijst.txt	(.../Productie_006_TAX_OnderdelenPickingLijst.txt)	(revision 30010)
+++ vhTestFiles/IntegratieTests/Productie.Planning.ActieveBatches.Taorbox.Aansturing/Test003MetTiponSynchronisatieStang/StartBatch/Productie_006_TAX_OnderdelenPickingLijst.txt	(.../Productie_006_TAX_OnderdelenPickingLijst.txt)	(revision 30130)
@@ -1,7 +1,7 @@
 
     HALUX N.V.         TAX pickinglijst losse onderdelen Probox   Blz:   1
     EUROPARK-NOORD 7    Lijn:T1 Batch:15000 Toelevering:222222    14-11-14
-    B-9100 SINT-NIKLAAS              Kar 1 (vak 1)                   09:15
+    B-9100 SINT-NIKLAAS               Kar 1: vak 1                   09:15
 
     -------------------------|--------------------------|----|-------|--------
     Product omschrijving     | Korttekst                | #  | Lengt | Control
Index: vhTestFiles/IntegratieTests/Productie.Planning.ActieveBatches.Taorbox.Aansturing/Test007BodemFineerZijkantMelamine/StartBatch/Productie_004_TAX_OnderdelenPickingLijst.txt
===================================================================
diff -u -r30010 -r30130
--- vhTestFiles/IntegratieTests/Productie.Planning.ActieveBatches.Taorbox.Aansturing/Test007BodemFineerZijkantMelamine/StartBatch/Productie_004_TAX_OnderdelenPickingLijst.txt	(.../Productie_004_TAX_OnderdelenPickingLijst.txt)	(revision 30010)
+++ vhTestFiles/IntegratieTests/Productie.Planning.ActieveBatches.Taorbox.Aansturing/Test007BodemFineerZijkantMelamine/StartBatch/Productie_004_TAX_OnderdelenPickingLijst.txt	(.../Productie_004_TAX_OnderdelenPickingLijst.txt)	(revision 30130)
@@ -1,7 +1,7 @@
 
     HALUX N.V.           TAX pickinglijst losse onderdelen V1     Blz:   1
     EUROPARK-NOORD 7    Lijn:T1 Batch:15000 Toelevering:222222    14-11-14
-    B-9100 SINT-NIKLAAS              Kar 1 (vak 1)                   09:15
+    B-9100 SINT-NIKLAAS               Kar 1: vak 1                   09:15
 
     -------------------------|--------------------------|----|-------|--------
     Product omschrijving     | Korttekst                | #  | Lengt | Control
Index: vhTestFiles/IntegratieTests/Productie.Planning.ActieveBatches.Taorbox.Aansturing/Test007Melamine/StartBatch/Productie_004_TAX_OnderdelenPickingLijst.txt
===================================================================
diff -u -r30010 -r30130
--- vhTestFiles/IntegratieTests/Productie.Planning.ActieveBatches.Taorbox.Aansturing/Test007Melamine/StartBatch/Productie_004_TAX_OnderdelenPickingLijst.txt	(.../Productie_004_TAX_OnderdelenPickingLijst.txt)	(revision 30010)
+++ vhTestFiles/IntegratieTests/Productie.Planning.ActieveBatches.Taorbox.Aansturing/Test007Melamine/StartBatch/Productie_004_TAX_OnderdelenPickingLijst.txt	(.../Productie_004_TAX_OnderdelenPickingLijst.txt)	(revision 30130)
@@ -1,7 +1,7 @@
 
     HALUX N.V.           TAX pickinglijst losse onderdelen V1     Blz:   1
     EUROPARK-NOORD 7    Lijn:T1 Batch:15000 Toelevering:222222    14-11-14
-    B-9100 SINT-NIKLAAS              Kar 1 (vak 1)                   09:15
+    B-9100 SINT-NIKLAAS               Kar 1: vak 1                   09:15
 
     -------------------------|--------------------------|----|-------|--------
     Product omschrijving     | Korttekst                | #  | Lengt | Control
Index: vhTestFiles/IntegratieTests/Productie.Planning.ActieveBatches.Taorbox.Aansturing/Test001Valigne/StartBatch/Productie_005_TAX_OnderdelenPickingLijst.txt
===================================================================
diff -u -r30010 -r30130
--- vhTestFiles/IntegratieTests/Productie.Planning.ActieveBatches.Taorbox.Aansturing/Test001Valigne/StartBatch/Productie_005_TAX_OnderdelenPickingLijst.txt	(.../Productie_005_TAX_OnderdelenPickingLijst.txt)	(revision 30010)
+++ vhTestFiles/IntegratieTests/Productie.Planning.ActieveBatches.Taorbox.Aansturing/Test001Valigne/StartBatch/Productie_005_TAX_OnderdelenPickingLijst.txt	(.../Productie_005_TAX_OnderdelenPickingLijst.txt)	(revision 30130)
@@ -1,7 +1,7 @@
 
     HALUX N.V.           TAX pickinglijst losse onderdelen V1     Blz:   1
     EUROPARK-NOORD 7    Lijn:T1 Batch:15000 Toelevering:222222    14-11-14
-    B-9100 SINT-NIKLAAS    Kar 1 (vak 1-20) / Kar 2 (vak 1-6)        09:15
+    B-9100 SINT-NIKLAAS     Kar 1: vak 1 t.e.m. kar 2: vak 6         09:15
 
     -------------------------|--------------------------|----|-------|--------
     Product omschrijving     | Korttekst                | #  | Lengt | Control
Index: vhTestFiles/IntegratieTests/Productie.Planning.ActieveBatches.Taorbox.Aansturing/Test001/ResetBatch/Productie_005_TAX_OnderdelenPickingLijst.txt
===================================================================
diff -u -r30010 -r30130
--- vhTestFiles/IntegratieTests/Productie.Planning.ActieveBatches.Taorbox.Aansturing/Test001/ResetBatch/Productie_005_TAX_OnderdelenPickingLijst.txt	(.../Productie_005_TAX_OnderdelenPickingLijst.txt)	(revision 30010)
+++ vhTestFiles/IntegratieTests/Productie.Planning.ActieveBatches.Taorbox.Aansturing/Test001/ResetBatch/Productie_005_TAX_OnderdelenPickingLijst.txt	(.../Productie_005_TAX_OnderdelenPickingLijst.txt)	(revision 30130)
@@ -1,7 +1,7 @@
 
     HALUX N.V.           TAX pickinglijst losse onderdelen V1     Blz:   1
     EUROPARK-NOORD 7    Lijn:T1 Batch:15000 Toelevering:222222    14-11-14
-    B-9100 SINT-NIKLAAS    Kar 1 (vak 1-20) / Kar 2 (vak 1-6)        09:15
+    B-9100 SINT-NIKLAAS     Kar 1: vak 1 t.e.m. kar 2: vak 6         09:15
 
     -------------------------|--------------------------|----|-------|--------
     Product omschrijving     | Korttekst                | #  | Lengt | Control
Index: vhUnitTest/APPS/Halux/PPS/Document/impl/TAX/OnderdelenPicking/SubtitelBepaler/Bepaal/Test.cls.xml
===================================================================
diff -u
--- vhUnitTest/APPS/Halux/PPS/Document/impl/TAX/OnderdelenPicking/SubtitelBepaler/Bepaal/Test.cls.xml	(revision 0)
+++ vhUnitTest/APPS/Halux/PPS/Document/impl/TAX/OnderdelenPicking/SubtitelBepaler/Bepaal/Test.cls.xml	(revision 30130)
@@ -0,0 +1,50 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="vhUnitTest.APPS.Halux.PPS.Document.impl.TAX.OnderdelenPicking.SubtitelBepaler.Bepaal.Test">
+<Super>vhUnitTest.TestCase</Super>
+
+<Method name="Test 1 Kar met 1 vak">
+<Implementation><![CDATA[
+	Set VakkenPerKar = ##class(%ArrayOfDataTypes).%New()
+	Do VakkenPerKar.SetAt(##class(TECH.ListUtils).CreateListOfDataTypes(1), 1)
+	Do ..AssertSubtitel(VakkenPerKar, "Kar 1: vak 1")
+]]></Implementation>
+</Method>
+
+<Method name="Test 1 Kar met 2 vakken">
+<Implementation><![CDATA[
+	Set VakkenPerKar = ##class(%ArrayOfDataTypes).%New()
+	Do VakkenPerKar.SetAt(##class(TECH.ListUtils).CreateListOfDataTypes(1,2), 1)
+	Do ..AssertSubtitel(VakkenPerKar, "Kar 1: vak 1 t.e.m. vak 2")
+]]></Implementation>
+</Method>
+
+<Method name="Test toelevering gaat door over 2 karren, karren hebben fictief een grootte van 3">
+<Implementation><![CDATA[
+	Set VakkenPerKar = ##class(%ArrayOfDataTypes).%New()
+	Do VakkenPerKar.SetAt(##class(TECH.ListUtils).CreateListOfDataTypes(1,2,3), 1)
+	Do VakkenPerKar.SetAt(##class(TECH.ListUtils).CreateListOfDataTypes(1,2), 2)
+	Do ..AssertSubtitel(VakkenPerKar, "Kar 1: vak 1 t.e.m. kar 2: vak 2")
+]]></Implementation>
+</Method>
+
+<Method name="Test vakken zijn niet geordend bij input en kunnen meerdere keren voorkomen">
+<Implementation><![CDATA[
+	Set VakkenPerKar = ##class(%ArrayOfDataTypes).%New()
+	Do VakkenPerKar.SetAt(##class(TECH.ListUtils).CreateListOfDataTypes(1,2,3,1,2,3,1,2,3,1,2,3,1,2,3,1,2,3,1,2,3,1,2,3,1), 1)
+	Do ..AssertSubtitel(VakkenPerKar, "Kar 1: vak 1 t.e.m. vak 3")
+]]></Implementation>
+</Method>
+
+<Method name="AssertSubtitel">
+<FormalSpec>VakkenPerKar:%ArrayOfDataTypes,VerwachteSubtitel:TECH.String</FormalSpec>
+<Private>1</Private>
+<Implementation><![CDATA[
+	Set Bepaler = ##class(APPS.Halux.PPS.Document.impl.TAX.OnderdelenPicking.SubtitelBepaler).%New()
+	Do $$$AssertEquals(Bepaler.Bepaal(VakkenPerKar),VerwachteSubtitel)
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>
Index: vhTestFiles/IntegratieTests/Productie.Planning.ActieveBatches.Taorbox.Aansturing/Test001/StartBatch/Productie_005_TAX_OnderdelenPickingLijst.txt
===================================================================
diff -u -r30010 -r30130
--- vhTestFiles/IntegratieTests/Productie.Planning.ActieveBatches.Taorbox.Aansturing/Test001/StartBatch/Productie_005_TAX_OnderdelenPickingLijst.txt	(.../Productie_005_TAX_OnderdelenPickingLijst.txt)	(revision 30010)
+++ vhTestFiles/IntegratieTests/Productie.Planning.ActieveBatches.Taorbox.Aansturing/Test001/StartBatch/Productie_005_TAX_OnderdelenPickingLijst.txt	(.../Productie_005_TAX_OnderdelenPickingLijst.txt)	(revision 30130)
@@ -1,7 +1,7 @@
 
     HALUX N.V.           TAX pickinglijst losse onderdelen V1     Blz:   1
     EUROPARK-NOORD 7    Lijn:T1 Batch:15000 Toelevering:222222    14-11-14
-    B-9100 SINT-NIKLAAS    Kar 1 (vak 1-20) / Kar 2 (vak 1-6)        09:15
+    B-9100 SINT-NIKLAAS     Kar 1: vak 1 t.e.m. kar 2: vak 6         09:15
 
     -------------------------|--------------------------|----|-------|--------
     Product omschrijving     | Korttekst                | #  | Lengt | Control
Index: vhTestFiles/IntegratieTests/Productie.Planning.ActieveBatches.Taorbox.Aansturing/Test005MetZijstabilisering/StartBatch/Productie_004_TAX_OnderdelenPickingLijst.txt
===================================================================
diff -u -r30010 -r30130
--- vhTestFiles/IntegratieTests/Productie.Planning.ActieveBatches.Taorbox.Aansturing/Test005MetZijstabilisering/StartBatch/Productie_004_TAX_OnderdelenPickingLijst.txt	(.../Productie_004_TAX_OnderdelenPickingLijst.txt)	(revision 30010)
+++ vhTestFiles/IntegratieTests/Productie.Planning.ActieveBatches.Taorbox.Aansturing/Test005MetZijstabilisering/StartBatch/Productie_004_TAX_OnderdelenPickingLijst.txt	(.../Productie_004_TAX_OnderdelenPickingLijst.txt)	(revision 30130)
@@ -1,7 +1,7 @@
 
     HALUX N.V.           TAX pickinglijst losse onderdelen V1     Blz:   1
     EUROPARK-NOORD 7    Lijn:T1 Batch:15000 Toelevering:222222    14-11-14
-    B-9100 SINT-NIKLAAS              Kar 1 (vak 1)                   09:15
+    B-9100 SINT-NIKLAAS               Kar 1: vak 1                   09:15
 
     -------------------------|--------------------------|----|-------|--------
     Product omschrijving     | Korttekst                | #  | Lengt | Control
Index: vhTestFiles/IntegratieTests/Productie.Planning.ActieveBatches.Taorbox.Aansturing/Test001Valigne/ResetBatch/Productie_005_TAX_OnderdelenPickingLijst.txt
===================================================================
diff -u -r30010 -r30130
--- vhTestFiles/IntegratieTests/Productie.Planning.ActieveBatches.Taorbox.Aansturing/Test001Valigne/ResetBatch/Productie_005_TAX_OnderdelenPickingLijst.txt	(.../Productie_005_TAX_OnderdelenPickingLijst.txt)	(revision 30010)
+++ vhTestFiles/IntegratieTests/Productie.Planning.ActieveBatches.Taorbox.Aansturing/Test001Valigne/ResetBatch/Productie_005_TAX_OnderdelenPickingLijst.txt	(.../Productie_005_TAX_OnderdelenPickingLijst.txt)	(revision 30130)
@@ -1,7 +1,7 @@
 
     HALUX N.V.           TAX pickinglijst losse onderdelen V1     Blz:   1
     EUROPARK-NOORD 7    Lijn:T1 Batch:15000 Toelevering:222222    14-11-14
-    B-9100 SINT-NIKLAAS    Kar 1 (vak 1-20) / Kar 2 (vak 1-6)        09:15
+    B-9100 SINT-NIKLAAS     Kar 1: vak 1 t.e.m. kar 2: vak 6         09:15
 
     -------------------------|--------------------------|----|-------|--------
     Product omschrijving     | Korttekst                | #  | Lengt | Control
Index: vhTestFiles/IntegratieTests/Productie.Planning.ActieveBatches.Taorbox.Aansturing/Test004MetGekoppeldeMat/StartBatch/Productie_007_TAX_OnderdelenPickingLijst.txt
===================================================================
diff -u -r30010 -r30130
--- vhTestFiles/IntegratieTests/Productie.Planning.ActieveBatches.Taorbox.Aansturing/Test004MetGekoppeldeMat/StartBatch/Productie_007_TAX_OnderdelenPickingLijst.txt	(.../Productie_007_TAX_OnderdelenPickingLijst.txt)	(revision 30010)
+++ vhTestFiles/IntegratieTests/Productie.Planning.ActieveBatches.Taorbox.Aansturing/Test004MetGekoppeldeMat/StartBatch/Productie_007_TAX_OnderdelenPickingLijst.txt	(.../Productie_007_TAX_OnderdelenPickingLijst.txt)	(revision 30130)
@@ -1,7 +1,7 @@
 
     HALUX N.V.         TAX pickinglijst losse onderdelen Probox   Blz:   1
     EUROPARK-NOORD 7    Lijn:T1 Batch:15000 Toelevering:222222    14-11-14
-    B-9100 SINT-NIKLAAS              Kar 1 (vak 1)                   09:15
+    B-9100 SINT-NIKLAAS               Kar 1: vak 1                   09:15
 
     -------------------------|--------------------------|----|-------|--------
     Product omschrijving     | Korttekst                | #  | Lengt | Control
Index: APPS/Halux/PPS/Document/impl/TAX/OnderdelenPicking/SubtitelBepaler.cls.xml
===================================================================
diff -u
--- APPS/Halux/PPS/Document/impl/TAX/OnderdelenPicking/SubtitelBepaler.cls.xml	(revision 0)
+++ APPS/Halux/PPS/Document/impl/TAX/OnderdelenPicking/SubtitelBepaler.cls.xml	(revision 30130)
@@ -0,0 +1,39 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="APPS.Halux.PPS.Document.impl.TAX.OnderdelenPicking.SubtitelBepaler">
+<Super>TECH.RegisteredObject</Super>
+
+<Method name="Bepaal">
+<FormalSpec>VakkenPerKar:%ArrayOfDataTypes</FormalSpec>
+<Implementation><![CDATA[
+	Set ListIt = ##class(TECH.ListIterator).%New(VakkenPerKar)
+	#dim EersteKar, EersteVak, LaatsteKar, LaatsteVak As TECH.Integer = ""
+	While ListIt.HasNext() {
+		#dim Vakken As %ListOfDataTypes = ListIt.Next()
+		Do ##class(TECH.Algo.Sort.MergeSort).Sort(.Vakken, ##class(TECH.Comparator.IntegerComparator).%New())
+		If EersteKar = "" {
+			Set EersteKar = (+ListIt.Key())
+			Set EersteVak = Vakken.GetAt(1)
+		}
+		If $$$Not(ListIt.HasNext()) {
+			Set LaatsteKar = (+ListIt.Key())
+			Set LaatsteVak = Vakken.GetAt(Vakken.Count())
+		}
+	}
+	
+	#dim Subtitel As TECH.String = ""
+	If EersteKar = LaatsteKar {
+		Set Subtitel = "Kar "_EersteKar_": vak "_EersteVak
+		If EersteVak '= LaatsteVak {
+			Set Subtitel = Subtitel_" t.e.m. vak "_LaatsteVak
+		}
+	} Else {
+		Set Subtitel = "Kar "_EersteKar_": vak "_EersteVak_" t.e.m. kar "_LaatsteKar_": vak "_LaatsteVak
+	}
+	Quit Subtitel
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>
Index: APPS/Halux/PPS/Document/impl/TAX/OnderdelenPicking.cls.xml
===================================================================
diff -u -r30010 -r30130
--- APPS/Halux/PPS/Document/impl/TAX/OnderdelenPicking.cls.xml	(.../OnderdelenPicking.cls.xml)	(revision 30010)
+++ APPS/Halux/PPS/Document/impl/TAX/OnderdelenPicking.cls.xml	(.../OnderdelenPicking.cls.xml)	(revision 30130)
@@ -18,6 +18,11 @@
 <Private>1</Private>
 </Property>
 
+<Property name="SubTitelBepaler">
+<Type>APPS.Halux.PPS.Document.impl.TAX.OnderdelenPicking.SubtitelBepaler</Type>
+<Private>1</Private>
+</Property>
+
 <Method name="%OnNew">
 <FormalSpec>HalffabItemNaarKnoopVisitor:APPS.Halux.PPS.Activiteit.impl.common.OnderdelenPicking.HalffabItemNaarKnoopVisitor=""</FormalSpec>
 <Private>1</Private>
@@ -27,6 +32,7 @@
 <Implementation><![CDATA[
 	Do ##super(HalffabItemNaarKnoopVisitor)
 	Set ..AssemblageKarRepository = ##class(APPS.Halux.PPS.TAORProductie.impl.AssemblageKarRepository).%New()
+	Set ..SubTitelBepaler = ##class(APPS.Halux.PPS.Document.impl.TAX.OnderdelenPicking.SubtitelBepaler).%New()
 	Quit $$$OK
 ]]></Implementation>
 </Method>
@@ -80,17 +86,7 @@
 <Method name="GeefSubSubtitel">
 <Private>1</Private>
 <ReturnType>TECH.String</ReturnType>
-<Implementation><![CDATA[
-	#dim SubSubtitel As TECH.String = ""
-	Set ListIt = ##class(TECH.ListIterator).%New(..VakkenPerKar)
-	While ListIt.HasNext() {
-		#dim Vakken As %ListOfDataTypes = ListIt.Next()
-		Set SubSubtitel = SubSubtitel_"Kar "_(+ListIt.Key())_" (vak "_##class(TECH.ListUtils).ListToCompositeRangeString(Vakken)_")"
-		If ListIt.HasNext() {
-			Set SubSubtitel = SubSubtitel_" / "
-		}
-	}
-	Quit "  "_SubSubtitel
+<Implementation><![CDATA[	Quit "  "_..SubTitelBepaler.Bepaal(..VakkenPerKar)
 ]]></Implementation>
 </Method>
 
@@ -99,10 +95,11 @@
 <Private>1</Private>
 <Implementation><![CDATA[
 	#dim AssemblageKarVak As APPS.Halux.PPS.TAORProductie.data.AssemblageKar = ..AssemblageKarRepository.GeefKar(OnderdelenPickingUitvoeringInfo.BatchID,OnderdelenPickingUitvoeringInfo.SequentieNummer)
-	If $$$Not(..VakkenPerKar.IsDefined(AssemblageKarVak.Kar)) {
-		Do ..VakkenPerKar.SetAt(##class(%ListOfDataTypes).%New(), AssemblageKarVak.Kar)
+	#dim KarVolgnummer As TECH.String = ..AssemblageKarRepository.GeefKarVolgnummer(OnderdelenPickingUitvoeringInfo.BatchID, AssemblageKarVak.Kar)
+	If $$$Not(..VakkenPerKar.IsDefined(KarVolgnummer)) {
+		Do ..VakkenPerKar.SetAt(##class(%ListOfDataTypes).%New(), KarVolgnummer)
 	}
-	Do ..VakkenPerKar.GetAt(AssemblageKarVak.Kar).Insert(AssemblageKarVak.Vak)
+	Do ..VakkenPerKar.GetAt(KarVolgnummer).Insert(AssemblageKarVak.Vak)
 ]]></Implementation>
 </Method>