Index: WS/Halux/Planning/ActiviteitPerBatchService.cls.xml
===================================================================
diff -u -r57550 -r57566
--- WS/Halux/Planning/ActiviteitPerBatchService.cls.xml	(.../ActiviteitPerBatchService.cls.xml)	(revision 57550)
+++ WS/Halux/Planning/ActiviteitPerBatchService.cls.xml	(.../ActiviteitPerBatchService.cls.xml)	(revision 57566)
@@ -66,6 +66,37 @@
 ]]></Implementation>
 </Method>
 
+<Method name="GeefDataSetVoorQuery">
+<FormalSpec>AppNaam:%String,ComputerNaam:%String,QueryNaam:%String</FormalSpec>
+<ReturnType>%XML.DataSet</ReturnType>
+<WebMethod>1</WebMethod>
+<Implementation><![CDATA[
+	Do ..BepaalImplementatie()
+	Set DataSet = ..Service.GeefDataSetVoorQuery(AppNaam, ComputerNaam, ..GeefSQLViaQueryNaam(QueryNaam))
+	Set DataSet.DiffGram=1
+	Set DataSet.NeedSchema=1
+	Quit DataSet
+]]></Implementation>
+</Method>
+
+<Method name="GeefWerknemers">
+<FormalSpec>AppNaam:%String,ComputerNaam:%String</FormalSpec>
+<ReturnType>%XML.DataSet</ReturnType>
+<WebMethod>1</WebMethod>
+<Implementation><![CDATA[
+	Do ..BepaalImplementatie()
+	Quit ..Service.GeefWerknemers(AppNaam, ComputerNaam)
+]]></Implementation>
+</Method>
+
+<Method name="GeefSQLViaQueryNaam">
+<FormalSpec>QueryNaam:%String</FormalSpec>
+<Private>1</Private>
+<ReturnType>%String</ReturnType>
+<Implementation><![CDATA[	Quit ##class(WS.Halux.Planning.ActiviteitPerBatchService.Queries).GeefSQLViaQueryNaam(QueryNaam)
+]]></Implementation>
+</Method>
+
 <Method name="BepaalImplementatie">
 <Private>1</Private>
 <Implementation><![CDATA[	Set ..Service=##class(APPS.Halux.Planning.Activiteit.impl.ActiviteitPerBatchService).%New()