Index: APPS/Halux/common/ProductieSequentieGroepeerder.cls.xml
===================================================================
diff -u -r29059 -r41087
--- APPS/Halux/common/ProductieSequentieGroepeerder.cls.xml	(.../ProductieSequentieGroepeerder.cls.xml)	(revision 29059)
+++ APPS/Halux/common/ProductieSequentieGroepeerder.cls.xml	(.../ProductieSequentieGroepeerder.cls.xml)	(revision 41087)
@@ -39,6 +39,12 @@
 <Implementation><![CDATA[]]></Implementation>
 </Method>
 
+<Method name="GroepeerPerToeleveringPerKlant">
+<Abstract>1</Abstract>
+<FormalSpec>BatchID:%String</FormalSpec>
+<ReturnType>APPS.Halux.common.impl.ProductieSequentieGroepering</ReturnType>
+</Method>
+
 <Method name="GroepeerPerToeleveringPerProductPerKlant">
 <Abstract>1</Abstract>
 <FormalSpec>BatchID:%String</FormalSpec>
Index: vhUnitTest/APPS/Halux/common/impl/ProductieSequentieGroepeerderResultSetBased/TestGroepeerPerToeleveringPerProductPerKlant2.cls.xml
===================================================================
diff -u -r41084 -r41087
--- vhUnitTest/APPS/Halux/common/impl/ProductieSequentieGroepeerderResultSetBased/TestGroepeerPerToeleveringPerProductPerKlant2.cls.xml	(.../TestGroepeerPerToeleveringPerProductPerKlant2.cls.xml)	(revision 41084)
+++ vhUnitTest/APPS/Halux/common/impl/ProductieSequentieGroepeerderResultSetBased/TestGroepeerPerToeleveringPerProductPerKlant2.cls.xml	(.../TestGroepeerPerToeleveringPerProductPerKlant2.cls.xml)	(revision 41087)
@@ -24,18 +24,12 @@
 		If $$$AssertEquals(Groepering.Indices.Count(), 3) {
 			Do $$$AssertEquals(Groepering.Indices.GetAt(1), 1)
 		
-			If $$$AssertEquals(Groepering.Data.GetAt(1).Count(), 2) {
+			If $$$AssertEquals(Groepering.Data.GetAt(1).Count(), 1) {
 				Set SequenceInfo = Groepering.Data.GetAt(1).GetAt(1)
-				Do $$$AssertEquals(SequenceInfo.TotaalAantal, 2)
+				Do $$$AssertEquals(SequenceInfo.TotaalAantal, 4)
 				Do $$$AssertEquals(SequenceInfo.ProductID, ..#ProductID1)
 				Do $$$AssertEquals(SequenceInfo.DeelAantal, "")
 				Do $$$AssertEquals(SequenceInfo.QueueID, 1)
-				
-				Set SequenceInfo = Groepering.Data.GetAt(1).GetAt(2)
-				Do $$$AssertEquals(SequenceInfo.TotaalAantal, 2)
-				Do $$$AssertEquals(SequenceInfo.ProductID, ..#ProductID1)
-				Do $$$AssertEquals(SequenceInfo.DeelAantal, "")
-				Do $$$AssertEquals(SequenceInfo.QueueID, 3)
 			}
 			
 			If $$$AssertEquals(Groepering.Data.GetAt(2).Count(), 1) {
Index: vhUnitTest/APPS/Halux/common/impl/ProductieSequentieGroepeerderResultSetBased/TestGroepeerPerToeleveringPerKlant3.cls.xml
===================================================================
diff -u
--- vhUnitTest/APPS/Halux/common/impl/ProductieSequentieGroepeerderResultSetBased/TestGroepeerPerToeleveringPerKlant3.cls.xml	(revision 0)
+++ vhUnitTest/APPS/Halux/common/impl/ProductieSequentieGroepeerderResultSetBased/TestGroepeerPerToeleveringPerKlant3.cls.xml	(revision 41087)
@@ -0,0 +1,63 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="vhUnitTest.APPS.Halux.common.impl.ProductieSequentieGroepeerderResultSetBased.TestGroepeerPerToeleveringPerKlant3">
+<Super>vhUnitTest.APPS.Halux.common.impl.ProductieSequentieGroepeerderResultSetBased.Base</Super>
+
+<Method name="TestGroepeerPerToeleveringPerProductPerKlantxxxProducten">
+<Implementation><![CDATA[
+	Do ..AddToSequenceData(..#ToeleveringID1, ..#ProductID1, 2, 100)
+	Do ..AddToSequenceData(..#ToeleveringID2, ..#ProductID1, 2, 200)
+	Do ..AddToSequenceData(..#ToeleveringID1, ..#ProductID1, 2, 300)
+	Do ..AddToSequenceData(..#ToeleveringID1, ..#ProductID1, 2, 300)
+
+	Do ..AssertGroepering(..GeefGroepeerder().GroepeerPerToeleveringPerKlant(..#DummyBatchID))
+]]></Implementation>
+</Method>
+
+<Method name="AssertGroepering">
+<FormalSpec>Groepering:APPS.Halux.common.impl.ProductieSequentieGroepering</FormalSpec>
+<Private>1</Private>
+<Implementation><![CDATA[
+	#dim SequenceInfo As APPS.Halux.common.dto.ProductieSequentie
+	
+	If $$$AssertTrue(Groepering.IsValid()) {
+		If $$$AssertEquals(Groepering.Indices.Count(), 3) {
+			Do $$$AssertEquals(Groepering.Indices.GetAt(1), 1)
+		
+			If $$$AssertEquals(Groepering.Data.GetAt(1).Count(), 1) {
+				Set SequenceInfo = Groepering.Data.GetAt(1).GetAt(1)
+				Do $$$AssertEquals(SequenceInfo.TotaalAantal, 2)
+				Do $$$AssertEquals(SequenceInfo.ProductID, ..#ProductID1)
+				Do $$$AssertEquals(SequenceInfo.DeelAantal, "")
+				Do $$$AssertEquals(SequenceInfo.QueueID, 1)
+			}
+			
+			If $$$AssertEquals(Groepering.Data.GetAt(2).Count(), 1) {
+				Set SequenceInfo = Groepering.Data.GetAt(2).GetAt(1) 
+				Do $$$AssertEquals(SequenceInfo.TotaalAantal, 2)
+				Do $$$AssertEquals(SequenceInfo.ProductID, ..#ProductID1)
+				Do $$$AssertEquals(SequenceInfo.DeelAantal, "")
+				Do $$$AssertEquals(SequenceInfo.QueueID, 3)
+			}
+			
+			If $$$AssertEquals(Groepering.Data.GetAt(3).Count(), 2) {
+				Set SequenceInfo = Groepering.Data.GetAt(3).GetAt(1) 
+				Do $$$AssertEquals(SequenceInfo.TotaalAantal, 2)
+				Do $$$AssertEquals(SequenceInfo.ProductID, ..#ProductID1)
+				Do $$$AssertEquals(SequenceInfo.DeelAantal, "")
+				Do $$$AssertEquals(SequenceInfo.QueueID, 5)
+				
+				Set SequenceInfo = Groepering.Data.GetAt(3).GetAt(2) 
+				Do $$$AssertEquals(SequenceInfo.TotaalAantal, 2)
+				Do $$$AssertEquals(SequenceInfo.ProductID, ..#ProductID1)
+				Do $$$AssertEquals(SequenceInfo.DeelAantal, "")
+				Do $$$AssertEquals(SequenceInfo.QueueID, 7)
+			}
+		}
+	}
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>
Index: APPS/Halux/common/impl/ProductieSequentieGroepeerderResultSetBased.cls.xml
===================================================================
diff -u -r41084 -r41087
--- APPS/Halux/common/impl/ProductieSequentieGroepeerderResultSetBased.cls.xml	(.../ProductieSequentieGroepeerderResultSetBased.cls.xml)	(revision 41084)
+++ APPS/Halux/common/impl/ProductieSequentieGroepeerderResultSetBased.cls.xml	(.../ProductieSequentieGroepeerderResultSetBased.cls.xml)	(revision 41087)
@@ -151,7 +151,7 @@
 ]]></Implementation>
 </Method>
 
-<Method name="GroepeerPerToeleveringPerProductPerKlant">
+<Method name="GroepeerPerToeleveringPerKlant">
 <FormalSpec>BatchID:%String</FormalSpec>
 <ReturnType>APPS.Halux.common.impl.ProductieSequentieGroepering</ReturnType>
 <Implementation><![CDATA[
@@ -186,6 +186,45 @@
 ]]></Implementation>
 </Method>
 
+<Method name="GroepeerPerToeleveringPerProductPerKlant">
+<FormalSpec>BatchID:%String</FormalSpec>
+<ReturnType>APPS.Halux.common.impl.ProductieSequentieGroepering</ReturnType>
+<Implementation><![CDATA[
+	Set ..Groepering = ##class(APPS.Halux.common.impl.ProductieSequentieGroepering).%New()
+	
+	#dim ResultSet As TECH.ResultSet = ..ProductieSequentieRepository.GeefSequentieDataVolgensSequenceVoorBatch(BatchID)
+	#dim GroeperingID As %Integer = 0
+	#dim ToeleveringID As %String = ""
+	#dim ProductID As %String = ""
+	#dim SequentieInfo AS APPS.Halux.common.dto.ProductieSequentie = ""
+	#dim TotaalSequentieInfo AS APPS.Halux.common.dto.ProductieSequentie = ""
+	
+	While (ResultSet.Next()) {
+		#dim DeelAantal As %Integer = ResultSet.GetDataByName("DeelAantal")
+		
+		Continue:$$$Not(DeelAantal = 1)
+		
+		Set SequentieInfo = ..GeefSequentieInfo(ResultSet)
+		Set SequentieInfo.DeelAantal = ""
+		
+		If ((ToeleveringID = SequentieInfo.ToeleveringID ) && ( ProductID = SequentieInfo.ProductID)) {
+			Set TotaalSequentieInfo.TotaalAantal = TotaalSequentieInfo.TotaalAantal + SequentieInfo.TotaalAantal
+		} Else {
+			Do:$$$Not(ToeleveringID = "") ..Groepering.VoegToe(GroeperingID,TotaalSequentieInfo)
+			Set TotaalSequentieInfo = SequentieInfo
+			Set:$$$Not(ToeleveringID = SequentieInfo.ToeleveringID) GroeperingID = GroeperingID + 1
+			Set ProductID = SequentieInfo.ProductID
+			Set ToeleveringID = SequentieInfo.ToeleveringID
+		}
+
+	}
+	
+	Do ..Groepering.VoegToe(GroeperingID, TotaalSequentieInfo)
+	
+	Quit ..Groepering
+]]></Implementation>
+</Method>
+
 <Method name="GroepeerPerProduct">
 <FormalSpec>BatchID:%String</FormalSpec>
 <ReturnType>APPS.Halux.common.impl.ProductieSequentieGroepering</ReturnType>
Index: vhUnitTest/APPS/Halux/common/impl/ProductieSequentieGroepeerderResultSetBased/TestGroepeerPerToeleveringPerKlant2.cls.xml
===================================================================
diff -u
--- vhUnitTest/APPS/Halux/common/impl/ProductieSequentieGroepeerderResultSetBased/TestGroepeerPerToeleveringPerKlant2.cls.xml	(revision 0)
+++ vhUnitTest/APPS/Halux/common/impl/ProductieSequentieGroepeerderResultSetBased/TestGroepeerPerToeleveringPerKlant2.cls.xml	(revision 41087)
@@ -0,0 +1,63 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="vhUnitTest.APPS.Halux.common.impl.ProductieSequentieGroepeerderResultSetBased.TestGroepeerPerToeleveringPerKlant2">
+<Super>vhUnitTest.APPS.Halux.common.impl.ProductieSequentieGroepeerderResultSetBased.Base</Super>
+
+<Method name="TestGroepeerPerToeleveringPerProductPerKlantxxxProducten">
+<Implementation><![CDATA[
+	Do ..AddToSequenceData(..#ToeleveringID1, ..#ProductID1, 2, 100)
+	Do ..AddToSequenceData(..#ToeleveringID1, ..#ProductID1, 2, 100)
+	Do ..AddToSequenceData(..#ToeleveringID2, ..#ProductID1, 2, 200)
+	Do ..AddToSequenceData(..#ToeleveringID1, ..#ProductID1, 2, 300)
+	
+	Do ..AssertGroepering(..GeefGroepeerder().GroepeerPerToeleveringPerKlant(..#DummyBatchID))
+]]></Implementation>
+</Method>
+
+<Method name="AssertGroepering">
+<FormalSpec>Groepering:APPS.Halux.common.impl.ProductieSequentieGroepering</FormalSpec>
+<Private>1</Private>
+<Implementation><![CDATA[
+	#dim SequenceInfo As APPS.Halux.common.dto.ProductieSequentie
+	
+	If $$$AssertTrue(Groepering.IsValid()) {
+		If $$$AssertEquals(Groepering.Indices.Count(), 3) {
+			Do $$$AssertEquals(Groepering.Indices.GetAt(1), 1)
+		
+			If $$$AssertEquals(Groepering.Data.GetAt(1).Count(), 2) {
+				Set SequenceInfo = Groepering.Data.GetAt(1).GetAt(1)
+				Do $$$AssertEquals(SequenceInfo.TotaalAantal, 2)
+				Do $$$AssertEquals(SequenceInfo.ProductID, ..#ProductID1)
+				Do $$$AssertEquals(SequenceInfo.DeelAantal, "")
+				Do $$$AssertEquals(SequenceInfo.QueueID, 1)
+				
+				Set SequenceInfo = Groepering.Data.GetAt(1).GetAt(2)
+				Do $$$AssertEquals(SequenceInfo.TotaalAantal, 2)
+				Do $$$AssertEquals(SequenceInfo.ProductID, ..#ProductID1)
+				Do $$$AssertEquals(SequenceInfo.DeelAantal, "")
+				Do $$$AssertEquals(SequenceInfo.QueueID, 3)
+			}
+			
+			If $$$AssertEquals(Groepering.Data.GetAt(2).Count(), 1) {
+				Set SequenceInfo = Groepering.Data.GetAt(2).GetAt(1) 
+				Do $$$AssertEquals(SequenceInfo.TotaalAantal, 2)
+				Do $$$AssertEquals(SequenceInfo.ProductID, ..#ProductID1)
+				Do $$$AssertEquals(SequenceInfo.DeelAantal, "")
+				Do $$$AssertEquals(SequenceInfo.QueueID, 5)
+			}
+			
+			If $$$AssertEquals(Groepering.Data.GetAt(3).Count(), 1) {
+				Set SequenceInfo = Groepering.Data.GetAt(3).GetAt(1) 
+				Do $$$AssertEquals(SequenceInfo.TotaalAantal, 2)
+				Do $$$AssertEquals(SequenceInfo.ProductID, ..#ProductID1)
+				Do $$$AssertEquals(SequenceInfo.DeelAantal, "")
+				Do $$$AssertEquals(SequenceInfo.QueueID, 7)
+			}
+		}
+	}
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>
Index: APPS/Halux/PPS/impl/AansturingActie/Tandembox/GroeperingBepaler.cls.xml
===================================================================
diff -u -r32580 -r41087
--- APPS/Halux/PPS/impl/AansturingActie/Tandembox/GroeperingBepaler.cls.xml	(.../GroeperingBepaler.cls.xml)	(revision 32580)
+++ APPS/Halux/PPS/impl/AansturingActie/Tandembox/GroeperingBepaler.cls.xml	(.../GroeperingBepaler.cls.xml)	(revision 41087)
@@ -36,7 +36,7 @@
 	} ElseIf IsVhoss {
 		Set Groepering = ..ProductieSequentieGroepeerder.GeenGroeperingProductenSamentrekken(BatchID)
 	} Else {
-		Set Groepering = ..ProductieSequentieGroepeerder.GroepeerPerToeleveringPerProductPerKlant(BatchID)
+		Set Groepering = ..ProductieSequentieGroepeerder.GroepeerPerToeleveringPerKlant(BatchID)
 	}
 	Quit Groepering
 ]]></Implementation>
Index: vhUnitTest/APPS/Halux/common/impl/ProductieSequentieGroepeerderResultSetBased/TestGroepeerPerToeleveringPerKlant4.cls.xml
===================================================================
diff -u
--- vhUnitTest/APPS/Halux/common/impl/ProductieSequentieGroepeerderResultSetBased/TestGroepeerPerToeleveringPerKlant4.cls.xml	(revision 0)
+++ vhUnitTest/APPS/Halux/common/impl/ProductieSequentieGroepeerderResultSetBased/TestGroepeerPerToeleveringPerKlant4.cls.xml	(revision 41087)
@@ -0,0 +1,84 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="vhUnitTest.APPS.Halux.common.impl.ProductieSequentieGroepeerderResultSetBased.TestGroepeerPerToeleveringPerKlant4">
+<Super>vhUnitTest.APPS.Halux.common.impl.ProductieSequentieGroepeerderResultSetBased.Base</Super>
+
+<Method name="TestGroepeerPerToeleveringPerProductPerKlantxxxProducten">
+<Implementation><![CDATA[
+	Do ..AddToSequenceData(..#ToeleveringID1, ..#ProductID1, 2, 100)
+	Do ..AddToSequenceData(..#ToeleveringID1, ..#ProductID2, 2, 200)
+	Do ..AddToSequenceData(..#ToeleveringID2, ..#ProductID3, 2, 100)
+	Do ..AddToSequenceData(..#ToeleveringID2, ..#ProductID3, 2, 200)
+	Do ..AddToSequenceData(..#ToeleveringID2, ..#ProductID1, 2, 300)
+	Do ..AddToSequenceData(..#ToeleveringID2, ..#ProductID4, 2, 400)
+	Do ..AddToSequenceData(..#ToeleveringID3, ..#ProductID3, 2, 100)	
+	
+	Do ..AssertGroepering(..GeefGroepeerder().GroepeerPerToeleveringPerKlant(..#DummyBatchID))
+]]></Implementation>
+</Method>
+
+<Method name="AssertGroepering">
+<FormalSpec>Groepering:APPS.Halux.common.impl.ProductieSequentieGroepering</FormalSpec>
+<Private>1</Private>
+<Implementation><![CDATA[
+	#dim SequenceInfo As APPS.Halux.common.dto.ProductieSequentie
+	
+	If $$$AssertTrue(Groepering.IsValid()) {
+		If $$$AssertEquals(Groepering.Indices.Count(), 3) {
+			Do $$$AssertEquals(Groepering.Indices.GetAt(1), 1)
+		
+			If $$$AssertEquals(Groepering.Data.GetAt(1).Count(), 2) {
+				Set SequenceInfo = Groepering.Data.GetAt(1).GetAt(1) 
+				Do $$$AssertEquals(SequenceInfo.TotaalAantal, 2)
+				Do $$$AssertEquals(SequenceInfo.ProductID, ..#ProductID1)
+				Do $$$AssertEquals(SequenceInfo.DeelAantal, "")
+				Do $$$AssertEquals(SequenceInfo.QueueID, 1)
+				
+				Set SequenceInfo = Groepering.Data.GetAt(1).GetAt(2) 
+				Do $$$AssertEquals(SequenceInfo.TotaalAantal, 2)
+				Do $$$AssertEquals(SequenceInfo.ProductID, ..#ProductID2)
+				Do $$$AssertEquals(SequenceInfo.DeelAantal, "")
+				Do $$$AssertEquals(SequenceInfo.QueueID, 3)
+			}
+			
+			If $$$AssertEquals(Groepering.Data.GetAt(2).Count(), 4) {
+				Set SequenceInfo = Groepering.Data.GetAt(2).GetAt(1) 
+				Do $$$AssertEquals(SequenceInfo.TotaalAantal, 2)
+				Do $$$AssertEquals(SequenceInfo.ProductID, ..#ProductID3)
+				Do $$$AssertEquals(SequenceInfo.DeelAantal, "")
+				Do $$$AssertEquals(SequenceInfo.QueueID, 5)
+				
+				Set SequenceInfo = Groepering.Data.GetAt(2).GetAt(2) 
+				Do $$$AssertEquals(SequenceInfo.TotaalAantal, 2)
+				Do $$$AssertEquals(SequenceInfo.ProductID, ..#ProductID3)
+				Do $$$AssertEquals(SequenceInfo.DeelAantal, "")
+				Do $$$AssertEquals(SequenceInfo.QueueID, 7)
+				
+				Set SequenceInfo = Groepering.Data.GetAt(2).GetAt(3) 
+				Do $$$AssertEquals(SequenceInfo.TotaalAantal, 2)
+				Do $$$AssertEquals(SequenceInfo.ProductID, ..#ProductID1)
+				Do $$$AssertEquals(SequenceInfo.DeelAantal, "")
+				Do $$$AssertEquals(SequenceInfo.QueueID, 9)
+				
+				Set SequenceInfo = Groepering.Data.GetAt(2).GetAt(4) 
+				Do $$$AssertEquals(SequenceInfo.TotaalAantal, 2)
+				Do $$$AssertEquals(SequenceInfo.ProductID, ..#ProductID4)
+				Do $$$AssertEquals(SequenceInfo.DeelAantal, "")
+				Do $$$AssertEquals(SequenceInfo.QueueID, 11)
+			}
+			
+			If $$$AssertEquals(Groepering.Data.GetAt(3).Count(), 1) {
+				Set SequenceInfo = Groepering.Data.GetAt(3).GetAt(1) 
+				Do $$$AssertEquals(SequenceInfo.TotaalAantal, 2)
+				Do $$$AssertEquals(SequenceInfo.ProductID, ..#ProductID3)
+				Do $$$AssertEquals(SequenceInfo.DeelAantal, "")
+				Do $$$AssertEquals(SequenceInfo.QueueID, 13)
+			}
+		}
+	}
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>
Index: vhTest/Mock/APPS/Halux/common/ProductieSequentieGroepeerder.cls.xml
===================================================================
diff -u -r29059 -r41087
--- vhTest/Mock/APPS/Halux/common/ProductieSequentieGroepeerder.cls.xml	(.../ProductieSequentieGroepeerder.cls.xml)	(revision 29059)
+++ vhTest/Mock/APPS/Halux/common/ProductieSequentieGroepeerder.cls.xml	(.../ProductieSequentieGroepeerder.cls.xml)	(revision 41087)
@@ -43,6 +43,13 @@
 ]]></Implementation>
 </Method>
 
+<Method name="GroepeerPerToeleveringPerKlant">
+<FormalSpec>BatchID:%String</FormalSpec>
+<ReturnType>APPS.Halux.common.impl.ProductieSequentieGroepering</ReturnType>
+<Implementation><![CDATA[	quit ..VerwerkMethodCall("GroepeerPerToeleveringPerKlant",BatchID)
+]]></Implementation>
+</Method>
+
 <Method name="GroepeerPerToeleveringPerProduct">
 <FormalSpec>BatchID:%String</FormalSpec>
 <ReturnType>APPS.Halux.common.impl.ProductieSequentieGroepering</ReturnType>
Index: vhUnitTest/APPS/Halux/common/impl/ProductieSequentieGroepeerderResultSetBased/TestGroepeerPerToeleveringPerKlant1.cls.xml
===================================================================
diff -u
--- vhUnitTest/APPS/Halux/common/impl/ProductieSequentieGroepeerderResultSetBased/TestGroepeerPerToeleveringPerKlant1.cls.xml	(revision 0)
+++ vhUnitTest/APPS/Halux/common/impl/ProductieSequentieGroepeerderResultSetBased/TestGroepeerPerToeleveringPerKlant1.cls.xml	(revision 41087)
@@ -0,0 +1,83 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="vhUnitTest.APPS.Halux.common.impl.ProductieSequentieGroepeerderResultSetBased.TestGroepeerPerToeleveringPerKlant1">
+<Super>vhUnitTest.APPS.Halux.common.impl.ProductieSequentieGroepeerderResultSetBased.Base</Super>
+
+<Method name="TestGroepeerPerToeleveringPerProductPerKlantxxxProducten">
+<Implementation><![CDATA[
+	Do ..AddToSequenceData(..#ToeleveringID2, ..#ProductID3, 2, 100)
+	Do ..AddToSequenceData(..#ToeleveringID1, ..#ProductID2, 2, 200)
+	Do ..AddToSequenceData(..#ToeleveringID3, ..#ProductID3, 2, 100)
+	Do ..AddToSequenceData(..#ToeleveringID2, ..#ProductID1, 2, 200)
+	Do ..AddToSequenceData(..#ToeleveringID1, ..#ProductID1, 2, 100)
+	Do ..AddToSequenceData(..#ToeleveringID2, ..#ProductID4, 2, 300)
+
+	Do ..AssertGroepering(..GeefGroepeerder().GroepeerPerToeleveringPerKlant(..#DummyBatchID))
+]]></Implementation>
+</Method>
+
+<Method name="AssertGroepering">
+<FormalSpec>Groepering:APPS.Halux.common.impl.ProductieSequentieGroepering</FormalSpec>
+<Private>1</Private>
+<Implementation><![CDATA[
+	#dim SequenceInfo As APPS.Halux.common.dto.ProductieSequentie
+	
+	If $$$AssertTrue(Groepering.IsValid()) {
+		If $$$AssertEquals(Groepering.Indices.Count(), 6) {
+			Do $$$AssertEquals(Groepering.Indices.GetAt(1), 1)
+		
+			If $$$AssertEquals(Groepering.Data.GetAt(1).Count(), 1) {
+				Set SequenceInfo = Groepering.Data.GetAt(1).GetAt(1) 
+				Do $$$AssertEquals(SequenceInfo.TotaalAantal, 2)
+				Do $$$AssertEquals(SequenceInfo.ProductID, ..#ProductID3)
+				Do $$$AssertEquals(SequenceInfo.DeelAantal, "")
+				Do $$$AssertEquals(SequenceInfo.QueueID, 1)
+			}
+			
+			If $$$AssertEquals(Groepering.Data.GetAt(2).Count(), 1) {
+				Set SequenceInfo = Groepering.Data.GetAt(2).GetAt(1) 
+				Do $$$AssertEquals(SequenceInfo.TotaalAantal, 2)
+				Do $$$AssertEquals(SequenceInfo.ProductID, ..#ProductID2)
+				Do $$$AssertEquals(SequenceInfo.DeelAantal, "")
+				Do $$$AssertEquals(SequenceInfo.QueueID, 3)
+			}
+			
+			If $$$AssertEquals(Groepering.Data.GetAt(3).Count(), 1) {
+				Set SequenceInfo = Groepering.Data.GetAt(3).GetAt(1) 
+				Do $$$AssertEquals(SequenceInfo.TotaalAantal, 2)
+				Do $$$AssertEquals(SequenceInfo.ProductID, ..#ProductID3)
+				Do $$$AssertEquals(SequenceInfo.DeelAantal, "")
+				Do $$$AssertEquals(SequenceInfo.QueueID, 5)
+			}
+			
+			If $$$AssertEquals(Groepering.Data.GetAt(4).Count(), 1) {
+				Set SequenceInfo = Groepering.Data.GetAt(4).GetAt(1) 
+				Do $$$AssertEquals(SequenceInfo.TotaalAantal, 2)
+				Do $$$AssertEquals(SequenceInfo.ProductID, ..#ProductID1)
+				Do $$$AssertEquals(SequenceInfo.DeelAantal, "")
+				Do $$$AssertEquals(SequenceInfo.QueueID, 7)
+			}
+			
+			If $$$AssertEquals(Groepering.Data.GetAt(5).Count(), 1) {
+				Set SequenceInfo = Groepering.Data.GetAt(5).GetAt(1) 
+				Do $$$AssertEquals(SequenceInfo.TotaalAantal, 2)
+				Do $$$AssertEquals(SequenceInfo.ProductID, ..#ProductID1)
+				Do $$$AssertEquals(SequenceInfo.DeelAantal, "")
+				Do $$$AssertEquals(SequenceInfo.QueueID, 9)
+			}
+			
+			If $$$AssertEquals(Groepering.Data.GetAt(6).Count(), 1) {
+				Set SequenceInfo = Groepering.Data.GetAt(6).GetAt(1) 
+				Do $$$AssertEquals(SequenceInfo.TotaalAantal, 2)
+				Do $$$AssertEquals(SequenceInfo.ProductID, ..#ProductID4)
+				Do $$$AssertEquals(SequenceInfo.DeelAantal, "")
+				Do $$$AssertEquals(SequenceInfo.QueueID, 11)
+			}
+		}
+	}
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>
Index: vhUnitTest/APPS/Halux/common/impl/ProductieSequentieGroepeerderResultSetBased/TestGroepeerPerToeleveringPerProductPerKlant3.cls.xml
===================================================================
diff -u -r41084 -r41087
--- vhUnitTest/APPS/Halux/common/impl/ProductieSequentieGroepeerderResultSetBased/TestGroepeerPerToeleveringPerProductPerKlant3.cls.xml	(.../TestGroepeerPerToeleveringPerProductPerKlant3.cls.xml)	(revision 41084)
+++ vhUnitTest/APPS/Halux/common/impl/ProductieSequentieGroepeerderResultSetBased/TestGroepeerPerToeleveringPerProductPerKlant3.cls.xml	(.../TestGroepeerPerToeleveringPerProductPerKlant3.cls.xml)	(revision 41087)
@@ -40,18 +40,12 @@
 				Do $$$AssertEquals(SequenceInfo.QueueID, 3)
 			}
 			
-			If $$$AssertEquals(Groepering.Data.GetAt(3).Count(), 2) {
+			If $$$AssertEquals(Groepering.Data.GetAt(3).Count(), 1) {
 				Set SequenceInfo = Groepering.Data.GetAt(3).GetAt(1) 
-				Do $$$AssertEquals(SequenceInfo.TotaalAantal, 2)
+				Do $$$AssertEquals(SequenceInfo.TotaalAantal, 4)
 				Do $$$AssertEquals(SequenceInfo.ProductID, ..#ProductID1)
 				Do $$$AssertEquals(SequenceInfo.DeelAantal, "")
 				Do $$$AssertEquals(SequenceInfo.QueueID, 5)
-				
-				Set SequenceInfo = Groepering.Data.GetAt(3).GetAt(2) 
-				Do $$$AssertEquals(SequenceInfo.TotaalAantal, 2)
-				Do $$$AssertEquals(SequenceInfo.ProductID, ..#ProductID1)
-				Do $$$AssertEquals(SequenceInfo.DeelAantal, "")
-				Do $$$AssertEquals(SequenceInfo.QueueID, 7)
 			}
 		}
 	}
Index: vhUnitTest/APPS/Halux/common/impl/ProductieSequentieGroepeerderResultSetBased/TestGroepeerPerToeleveringPerProductPerKlant4.cls.xml
===================================================================
diff -u -r41084 -r41087
--- vhUnitTest/APPS/Halux/common/impl/ProductieSequentieGroepeerderResultSetBased/TestGroepeerPerToeleveringPerProductPerKlant4.cls.xml	(.../TestGroepeerPerToeleveringPerProductPerKlant4.cls.xml)	(revision 41084)
+++ vhUnitTest/APPS/Halux/common/impl/ProductieSequentieGroepeerderResultSetBased/TestGroepeerPerToeleveringPerProductPerKlant4.cls.xml	(.../TestGroepeerPerToeleveringPerProductPerKlant4.cls.xml)	(revision 41087)
@@ -41,26 +41,20 @@
 				Do $$$AssertEquals(SequenceInfo.QueueID, 3)
 			}
 			
-			If $$$AssertEquals(Groepering.Data.GetAt(2).Count(), 4) {
+			If $$$AssertEquals(Groepering.Data.GetAt(2).Count(), 3) {
 				Set SequenceInfo = Groepering.Data.GetAt(2).GetAt(1) 
-				Do $$$AssertEquals(SequenceInfo.TotaalAantal, 2)
+				Do $$$AssertEquals(SequenceInfo.TotaalAantal, 4)
 				Do $$$AssertEquals(SequenceInfo.ProductID, ..#ProductID3)
 				Do $$$AssertEquals(SequenceInfo.DeelAantal, "")
 				Do $$$AssertEquals(SequenceInfo.QueueID, 5)
 				
 				Set SequenceInfo = Groepering.Data.GetAt(2).GetAt(2) 
 				Do $$$AssertEquals(SequenceInfo.TotaalAantal, 2)
-				Do $$$AssertEquals(SequenceInfo.ProductID, ..#ProductID3)
-				Do $$$AssertEquals(SequenceInfo.DeelAantal, "")
-				Do $$$AssertEquals(SequenceInfo.QueueID, 7)
-				
-				Set SequenceInfo = Groepering.Data.GetAt(2).GetAt(3) 
-				Do $$$AssertEquals(SequenceInfo.TotaalAantal, 2)
 				Do $$$AssertEquals(SequenceInfo.ProductID, ..#ProductID1)
 				Do $$$AssertEquals(SequenceInfo.DeelAantal, "")
 				Do $$$AssertEquals(SequenceInfo.QueueID, 9)
 				
-				Set SequenceInfo = Groepering.Data.GetAt(2).GetAt(4) 
+				Set SequenceInfo = Groepering.Data.GetAt(2).GetAt(3) 
 				Do $$$AssertEquals(SequenceInfo.TotaalAantal, 2)
 				Do $$$AssertEquals(SequenceInfo.ProductID, ..#ProductID4)
 				Do $$$AssertEquals(SequenceInfo.DeelAantal, "")