Index: WSimpl/Halux/PPS/MatService.cls.xml
===================================================================
diff -u -r66536 -r66537
--- WSimpl/Halux/PPS/MatService.cls.xml	(.../MatService.cls.xml)	(revision 66536)
+++ WSimpl/Halux/PPS/MatService.cls.xml	(.../MatService.cls.xml)	(revision 66537)
@@ -34,11 +34,14 @@
 	Set Response = ##class(WS.Halux.PPS.MatService.GeefAfmetingenResponse).%New()
 	Try {
 		#dim BatchId As %Integer = GeefAfmetingenRequest.BatchId
-		#dim MatAfmetingenIterator As TECH.Iterator = ..GeefMatAfmetingenIterator(BatchId)
+		#dim Batch As APPS.Halux.common.Batch = ##class(APPS.Halux.common.impl.BatchService).%New().GeefBatch(BatchId)
+		#dim Categorie As APPS.Halux.common.enu.Categorie = Batch.GeefCategorie()
+		#dim MatAfmetingenIterator As TECH.Iterator = ..GeefMatAfmetingenIterator(BatchId, Categorie)
 		
 		If MatAfmetingenIterator.HasNext() {
 			Set Response.Header.Status = "200"
 			Set Response.BatchId = BatchId
+			Set Response.Categorie = Categorie
 			While MatAfmetingenIterator.HasNext() {
 				Do Response.MatAfmetingen.Insert(..MatAfmetingenUitvoeringInfoNaarDto(MatAfmetingenIterator.Next()))	
 			}
@@ -58,11 +61,11 @@
 </Method>
 
 <Method name="GeefMatAfmetingenIterator">
-<FormalSpec>BatchId:%Integer</FormalSpec>
+<FormalSpec>BatchId:%Integer,Categorie:APPS.Halux.common.enu.Categorie</FormalSpec>
 <Private>1</Private>
 <ReturnType>TECH.ListIterator</ReturnType>
 <Implementation><![CDATA[
-	#dim UitvoeringLijstIterator As TECH.ListIterator = ..GeefUitvoeringIterator(BatchId)
+	#dim UitvoeringLijstIterator As TECH.ListIterator = ..GeefUitvoeringIterator(BatchId, Categorie)
 	#dim MatAfmetingenLijst As %ListOfObjects = ##class(%ListOfObjects).%New()
 	
 	While (UitvoeringLijstIterator.HasNext()) {
@@ -84,20 +87,19 @@
 </Method>
 
 <Method name="GeefUitvoeringIterator">
-<FormalSpec>BatchId:%Integer</FormalSpec>
+<FormalSpec>BatchId:%Integer,Categorie:APPS.Halux.common.enu.Categorie</FormalSpec>
 <Private>1</Private>
 <ReturnType>TECH.ListIterator</ReturnType>
 <Implementation><![CDATA[
-	#dim Batch As APPS.Halux.common.Batch = ##class(APPS.Halux.common.impl.BatchService).%New().GeefBatch(BatchId)
-	#dim Categorie As APPS.Halux.common.enu.Categorie = Batch.GeefCategorie()
 	Set ProductieSequentieRepository = ##class(APPS.Halux.common.impl.ProductieSequentieRepository).%New()
 	Set UitvoeringInfoLijstPerInformatieID = ##class(%ArrayOfObjects).%New()
 	
 	If (Categorie = ##class(APPS.Halux.common.enu.Categorie).Tandembox()) {	
 		Set DocsV1 = ##class(BL.PPS.TBX.DocsV1).%New()	
-		Set UitvoeringInfoLijst = ##class(APPS.Halux.PPS.dto.UitvoeringInfoLijst).%New()		
 		Do DocsV1.Init(BatchId)
 		
+		Set UitvoeringInfoLijst = ##class(APPS.Halux.PPS.dto.UitvoeringInfoLijst).%New()		
+		
 		#dim SequentieData As TECH.ResultSet = ProductieSequentieRepository.GeefSequentieDataVolgensSequenceVoorBatch(BatchId)
 		While (SequentieData.Next()) {
 			#dim InformatieId As %String = SequentieData.Data("ID")
@@ -126,8 +128,6 @@
 	
 		#dim WerklijstItemIDLijst As %ListOfDataTypes = ActieUitvoerder.GeefWerklijstItemIDLijst(BatchId, $$$False)
 		Set UitvoeringInfoLijstPerInformatieID = WerklijstItemsUitvoerder.GeefUitvoeringInfoLijstPerInformatieID(WerklijstItemIDLijst)
-
-		
 	}
 	Quit ##class(TECH.ListIterator).%New(UitvoeringInfoLijstPerInformatieID)
 ]]></Implementation>
@@ -218,6 +218,7 @@
 	Set MatAfmetingenDto.Toelevering = MatUitvoeringInfo.ToeleveringID
 	Set MatAfmetingenDto.DossierCode = MatUitvoeringInfo.DossierCode
 	Set MatAfmetingenDto.ProductId = MatUitvoeringInfo.ProductID
+	Set MatAfmetingenDto.Aantal = MatUitvoeringInfo.Aantal
 	Set MatAfmetingenDto.Diepte = MatUitvoeringInfo.Diepte
 	Set MatAfmetingenDto.BewerkingDiepte = MatUitvoeringInfo.BewerkingDiepte
 	Set MatAfmetingenDto.Breedte = MatUitvoeringInfo.Breedte
Index: WS/Halux/PPS/MatService/GeefAfmetingenResponse.cls.xml
===================================================================
diff -u -r66504 -r66537
--- WS/Halux/PPS/MatService/GeefAfmetingenResponse.cls.xml	(.../GeefAfmetingenResponse.cls.xml)	(revision 66504)
+++ WS/Halux/PPS/MatService/GeefAfmetingenResponse.cls.xml	(.../GeefAfmetingenResponse.cls.xml)	(revision 66537)
@@ -14,6 +14,12 @@
 <Parameter name="XMLPROJECTION" value="ELEMENT"/>
 </Property>
 
+<Property name="Categorie">
+<Type>APPS.Halux.common.enu.Categorie</Type>
+<Required>1</Required>
+<Parameter name="XMLPROJECTION" value="ELEMENT"/>
+</Property>
+
 <Property name="MatAfmetingen">
 <Type>WSimpl.Halux.PPS.dto.MatAfmeting</Type>
 <Collection>list</Collection>