Index: APPS/Halux/Planning/Activiteit/impl/ActiviteitPerBatchService.cls.xml
===================================================================
diff -u -r67300 -r72230
--- APPS/Halux/Planning/Activiteit/impl/ActiviteitPerBatchService.cls.xml	(.../ActiviteitPerBatchService.cls.xml)	(revision 67300)
+++ APPS/Halux/Planning/Activiteit/impl/ActiviteitPerBatchService.cls.xml	(.../ActiviteitPerBatchService.cls.xml)	(revision 72230)
@@ -75,6 +75,23 @@
 	Quit DataSet
 ]]></Implementation>
 </Method>
+
+<Method name="GeefWerknemers">
+<FormalSpec>AppNaam:%String,ComputerNaam:%String</FormalSpec>
+<ReturnType>%XML.DataSet</ReturnType>
+<Implementation><![CDATA[
+	#dim Activiteit As %String = "Allen"
+	Set:AppNaam="Matten werkpost" Activiteit="Mattenpost"
+	Set:AppNaam="Voormontage" Activiteit="Voormont"
+	
+	set qHandler = ##class(%XML.DataSet).%New("%DynamicQuery:SQL")
+	#Dim Query As %String = "SELECT DISTINCT ProTimeID as PersNr,isnull(Foto,'') as Foto,isnull(FamilieNaam,'') as Achternaam,isnull(Voornaam,'') as Voornaam,isnull(Initialen,'') as Initialen "
+	do qHandler.Prepare(Query_" FROM APPS_HaLux_Planning_Activiteit_dto.Medewerker WHERE (Activiteit=? or 'Allen'=?) and Bekwaamheidsniveau>2")
+	do qHandler.Execute(Activiteit,Activiteit)
+	
+	quit qHandler
+]]></Implementation>
+</Method>
 </Class>