Index: WSimpl/Halux/PPS/MatService.cls.xml
===================================================================
diff -u -r66525 -r66526
--- WSimpl/Halux/PPS/MatService.cls.xml	(.../MatService.cls.xml)	(revision 66525)
+++ WSimpl/Halux/PPS/MatService.cls.xml	(.../MatService.cls.xml)	(revision 66526)
@@ -31,7 +31,6 @@
 <FormalSpec>GeefAfmetingenRequest:WS.Halux.PPS.MatService.GeefAfmetingenRequest</FormalSpec>
 <ReturnType>WS.Halux.PPS.MatService.GeefAfmetingenResponse</ReturnType>
 <Implementation><![CDATA[
-	
 	Set Response = ##class(WS.Halux.PPS.MatService.GeefAfmetingenResponse).%New()
 	Try {
 		#dim BatchId As %Integer = GeefAfmetingenRequest.BatchId
@@ -50,10 +49,11 @@
 		}
 	} Catch {
 		#dim Exception As TECH.Exceptions.Exception = ##class(TECH.ExceptionHandler).Catch()
+		Do ##class(Tools.Wlip).%New(26).String("In Catch")
 		Set Response.Header.Status = Exception.GeefExceptionCode()
 		Set Response.Header.Omschrijving = Exception.GeefOmschrijving()
 	}
-	
+		
 	Quit Response
 ]]></Implementation>
 </Method>
@@ -91,17 +91,70 @@
 <Implementation><![CDATA[
 	Set WerklijstItemsUitvoerder = ##class(APPS.Halux.PPS.Activiteit.impl.WerklijstItemsUitvoerder).%New()
 	Set ActieUitvoerder = ##class(APPS.Halux.PPS.impl.AansturingActieVoorActiviteit).%New()
+	#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 ActieUitvoerder.ActiviteitGroepID = "34" 	//LBX productiegroepID
-	Set ActieUitvoerder.ActiviteitID = "100" 		//LBX klantetiketten aansturingsactieID
+	#dim ActiviteitGroepNaam As %String = ..ActiviteitGroepFactory(Categorie).Naam
+	#dim ActiviteitGroepId = ..GeefGroepActiviteitId(Categorie, ActiviteitGroepNaam)
 	
+	Set GekoppeldeIKMattenActiviteitCode = ##class(APPS.Halux.PPS.Activiteit.impl.GekoppeldeIK.Matten).%New().#Code
+	#dim ActiviteitId = ..GeefActiviteitId(Categorie, ActiviteitGroepId, GekoppeldeIKMattenActiviteitCode)
+
+	Set ActieUitvoerder.ActiviteitGroepID = ActiviteitGroepId
+	Set ActieUitvoerder.ActiviteitID = ActiviteitId
+	
 	#dim WerklijstItemIDLijst As %ListOfDataTypes = ActieUitvoerder.GeefWerklijstItemIDLijst(BatchId, $$$False)
 	#dim UitvoeringInfoLijstPerInformatieID As %ArrayOfObjects = WerklijstItemsUitvoerder.GeefUitvoeringInfoLijstPerInformatieID(WerklijstItemIDLijst)
 	
 	Quit ##class(TECH.ListIterator).%New(UitvoeringInfoLijstPerInformatieID)
 ]]></Implementation>
 </Method>
 
+<Method name="ActiviteitGroepFactory">
+<FormalSpec>Categorie:APPS.Halux.common.enu.Categorie</FormalSpec>
+<Private>1</Private>
+<ReturnType>APPS.Halux.PPS.Activiteit.ActiviteitGroep</ReturnType>
+<Implementation><![CDATA[
+	// Nog uitbreiden en verplaatsen naar aparte klasse
+	If (Categorie = ##class(APPS.Halux.common.enu.Categorie).Legrabox()) {
+		Quit ##class(APPS.Halux.PPS.Activiteit.impl.LBX.Groep.LBXVoormontage).%New()
+	} ElseIf (Categorie = ##class(APPS.Halux.common.enu.Categorie).Legrabox()) {
+		Quit ##class(APPS.Halux.PPS.Activiteit.impl.MVX.Groep.MVXVoormontage).%New()
+	}
+]]></Implementation>
+</Method>
+
+<Method name="GeefGroepActiviteitId">
+<FormalSpec>Categorie:APPS.Halux.common.enu.Categorie,ActiviteitGroepNaam:%String</FormalSpec>
+<Private>1</Private>
+<ReturnType>%Integer</ReturnType>
+<Implementation><![CDATA[
+	Set ActiviteitGroepRepository = ##class(APPS.Halux.PPS.Activiteit.ActiviteitGroepRepository).%New()
+	#dim GroepActiviteitIterator As TECH.Iterator = ActiviteitGroepRepository.ZoekViaCategorieEnNaam(Categorie, ActiviteitGroepNaam)
+
+	If ($$$Not(GroepActiviteitIterator.HasNext())) {
+		Do ##class(TECH.ExceptionHandler).Throw(##class(TECH.Exceptions.InvalidInputException).%New("Geen activiteit voor ActiviteitCode " _ ActiviteitGroepNaam_", Categorie:"_Categorie))
+	}
+	
+	#dim GroepActiviteit As APPS.Halux.PPS.Activiteit.ActiviteitGroep = GroepActiviteitIterator.Next()
+
+	If (GroepActiviteitIterator.HasNext()) {
+		Do ##class(TECH.ExceptionHandler).Throw(##class(TECH.Exceptions.InvalidInputException).%New("ActiviteitGroep " _ ActiviteitGroepNaam _ " niet eenduidig. Categorie:"_Categorie))
+	}	
+		
+	Quit GroepActiviteit.GeefID()
+]]></Implementation>
+</Method>
+
+<Method name="GeefActiviteitId">
+<FormalSpec>Categorie:APPS.Halux.common.enu.Categorie,GroepActiviteitId:%Integer,ActiviteitCode:%String</FormalSpec>
+<Private>1</Private>
+<Implementation><![CDATA[
+	Set ActivititeitRepository = ##class(APPS.Halux.PPS.Activiteit.impl.ActiviteitRepository).%New()
+	Quit ActivititeitRepository.GeefActiviteitIDVoorCode(ActiviteitCode, GroepActiviteitId, Categorie)
+]]></Implementation>
+</Method>
+
 <Method name="IsMat">
 <FormalSpec>UitvoeringInfo:APPS.Halux.PPS.dto.UitvoeringInfo</FormalSpec>
 <Private>1</Private>