Index: vhTestFiles/IntegratieTests/Productie.Planning.ActieveBatches.Tandembox.Aansturing/Test002/StartBatch/Productie_016_GekoppeldeIK_MattenLijst.txt
===================================================================
diff -u -r60307 -r60309
--- vhTestFiles/IntegratieTests/Productie.Planning.ActieveBatches.Tandembox.Aansturing/Test002/StartBatch/Productie_016_GekoppeldeIK_MattenLijst.txt	(.../Productie_016_GekoppeldeIK_MattenLijst.txt)	(revision 60307)
+++ vhTestFiles/IntegratieTests/Productie.Planning.ActieveBatches.Tandembox.Aansturing/Test002/StartBatch/Productie_016_GekoppeldeIK_MattenLijst.txt	(.../Productie_016_GekoppeldeIK_MattenLijst.txt)	(revision 60309)
@@ -8,8 +8,7 @@
     ---------|----|------------------------|------|------|------------|-------|
     2221     |  2 |Antislip Zwart          |  473 | 1500 |          - |   360 |
              |    |                        |      |      |            |       |
-    2222     |  2 |Antislip Zwart          |  473 | 1500 |          - |   360 |
-    2222     |  2 |Antislip Zwart          |  473 | 1500 |          - |   360 |
+    2222     |  4 |Antislip Zwart          |  473 | 1500 |          - |   360 |
     2222     |  1 |Antislip Zwart          |  423 | 1500 |          - |   515 |
     2222     |  1 |Antislip Antraciet      |  323 | 1500 |          - |   984 |
     ---------|----|------------------------|------|------|------------|-------|
Index: BL/PPS/TBX/DocsV1.cls.xml
===================================================================
diff -u -r60116 -r60309
--- BL/PPS/TBX/DocsV1.cls.xml	(.../DocsV1.cls.xml)	(revision 60116)
+++ BL/PPS/TBX/DocsV1.cls.xml	(.../DocsV1.cls.xml)	(revision 60309)
@@ -1174,14 +1174,15 @@
 	
 	Set SamengesteldeLijst = ##class(APPS.Halux.PPS.dto.UitvoeringInfoLijst).%New()
 	#dim SamengesteldeLijstIterator AS TECH.ListIterator = ##class(TECH.ListIterator).%New(SamengesteldeLijst)
+	#dim LijstAantallen As %ListOfDataTypes = ##class(%ListOfDataTypes).%New("")
 		
 	#dim UitvoeringLijstIterator AS TECH.ListIterator = ##class(TECH.ListIterator).%New(UitvoeringInfoLijst)
-	while UitvoeringLijstIterator.HasNext() && 0 {		
+	while UitvoeringLijstIterator.HasNext() {		
 		#dim Mat As APPS.Halux.PPS.Activiteit.impl.common.dto.MattenUitvoeringInfo= UitvoeringLijstIterator.Next()			
 		#dim OvereenkomstigeMatGevonden As %Boolean = $$$False
 		#dim Batch As APPS.Halux.common.Batch = ..BatchService.GeefBatch(Mat.BatchID)
-		
 		If ( $IsObject(Mat) && ((..IsProductiegroepKast(Batch)) || (..IsProductiegroepProbox(Batch))) && (Mat.%ClassName(1)="APPS.Halux.PPS.Activiteit.impl.common.dto.MattenUitvoeringInfo")   ){
+			Do LijstAantallen.Insert(Mat.Aantal)
 			while (SamengesteldeLijstIterator.HasNext() & $$$Not(OvereenkomstigeMatGevonden)){			
 				#dim Mat2 As APPS.Halux.PPS.Activiteit.impl.common.dto.MattenUitvoeringInfo= SamengesteldeLijstIterator.Next()
 				If ((Mat.ToeDos = Mat2.ToeDos) &&(Mat.Diepte = Mat2.Diepte) && (Mat.Breedte = Mat2.Breedte) && (Mat.MateriaalId = Mat2.MateriaalId) && (Mat.KleurId = Mat2.KleurId) && (Mat.BewerkingBreedte = Mat2.BewerkingBreedte) && (Mat.BewerkingDiepte = Mat2.BewerkingDiepte)){
@@ -1196,15 +1197,24 @@
 		}
 	}
 	set ActiviteitParameters = ##class(APPS.Halux.PPS.Activiteit.ActiviteitParameters).%New()
-	set ActiviteitParameters.Printer = ..Printer	
+	set ActiviteitParameters.Printer = ..Printer
 	
 	set Afdrukker = ##class(APPS.Halux.PPS.Document.impl.GekoppeldeIK.Matten).%New()
-	If (0 && (SamengesteldeLijst.Count()>0) && (..IsProductiegroepKast(Batch) || (..IsProductiegroepProbox(Batch)))){
+	If ((SamengesteldeLijst.Count()>0) && (..IsProductiegroepKast(Batch) || (..IsProductiegroepProbox(Batch)))){
 		Do Afdrukker.VerwerkUitvoeringInfoLijst(SamengesteldeLijst,ActiviteitParameters)
+		
+		Do UitvoeringLijstIterator.Reset()
+		#dim i = 1
+		While UitvoeringLijstIterator.HasNext() {			
+			#dim TeCorrigerenMat As APPS.Halux.PPS.Activiteit.impl.common.dto.MattenUitvoeringInfo = UitvoeringLijstIterator.Next()		
+			Set TeCorrigerenMat.Aantal = LijstAantallen.GetAt(i)
+			Set i = i+1
+		}
 	}
 	else {
 		Do:UitvoeringInfoLijst.Count() Afdrukker.VerwerkUitvoeringInfoLijst(UitvoeringInfoLijst,ActiviteitParameters)	
 		}
+		
 	Quit MatCnt
 ]]></Implementation>
 </Method>
Index: vhTest/Fake/BL/PPS/TBX/DocsV1.cls.xml
===================================================================
diff -u -r59790 -r60309
--- vhTest/Fake/BL/PPS/TBX/DocsV1.cls.xml	(.../DocsV1.cls.xml)	(revision 59790)
+++ vhTest/Fake/BL/PPS/TBX/DocsV1.cls.xml	(.../DocsV1.cls.xml)	(revision 60309)
@@ -21,8 +21,7 @@
 
 <Method name="ProboxInhoudEtiket">
 <FormalSpec>DnaCodeIterator:TECH.Iterator</FormalSpec>
-<Implementation><![CDATA[
-]]></Implementation>
+<Implementation><![CDATA[]]></Implementation>
 </Method>
 
 <Method name="ProboxOverdoosInhoudEtiket">