Index: APPS/VKP/impl/RegioServiceBevolker.cls.xml
===================================================================
diff -u -r29209 -r29604
--- APPS/VKP/impl/RegioServiceBevolker.cls.xml	(.../RegioServiceBevolker.cls.xml)	(revision 29209)
+++ APPS/VKP/impl/RegioServiceBevolker.cls.xml	(.../RegioServiceBevolker.cls.xml)	(revision 29604)
@@ -5,44 +5,50 @@
 
 <Property name="BronRegioCodes">
 <Type>%ListOfDataTypes</Type>
+<Private>1</Private>
 </Property>
 
 <Property name="EersteKaraktersVanPostcodes">
 <Type>%ListOfDataTypes</Type>
+<Private>1</Private>
 </Property>
 
 <Property name="DoelRegioCode">
 <Type>%String</Type>
+<Private>1</Private>
 </Property>
 
 <Method name="VanRegioCodes">
 <FormalSpec>BronRegioCodes...:%String</FormalSpec>
+<ReturnType>APPS.VKP.impl.RegioServiceBevolker</ReturnType>
 <Implementation><![CDATA[
-		Set ..BronRegioCodes = ##class(TECH.ListUtils).MultiDimensionalToListOfDataTypes(.BronRegioCodes)
-		Quit ##This
+	Set ..BronRegioCodes = ##class(TECH.ListUtils).MultiDimensionalToListOfDataTypes(.BronRegioCodes)
+	Quit ##This
 ]]></Implementation>
 </Method>
 
 <Method name="MetPostCodePrefixen">
 <FormalSpec>EersteKaraktersVanPostcodes...:%String</FormalSpec>
+<ReturnType>APPS.VKP.impl.RegioServiceBevolker</ReturnType>
 <Implementation><![CDATA[
-		Set ..EersteKaraktersVanPostcodes = ##class(TECH.ListUtils).MultiDimensionalToListOfDataTypes(.EersteKaraktersVanPostcodes)
-		Quit ##This
+	Set ..EersteKaraktersVanPostcodes = ##class(TECH.ListUtils).MultiDimensionalToListOfDataTypes(.EersteKaraktersVanPostcodes)
+	Quit ##This
 ]]></Implementation>
 </Method>
 
 <Method name="NaarRegioCode">
 <FormalSpec>DoelRegioCode:%String</FormalSpec>
+<ReturnType>APPS.VKP.impl.RegioServiceBevolker</ReturnType>
 <Implementation><![CDATA[
-		Set ..DoelRegioCode = DoelRegioCode
-		Quit ##This
+	Set ..DoelRegioCode = DoelRegioCode
+	Quit ##This
 ]]></Implementation>
 </Method>
 
 <Method name="Bevolk">
 <Implementation><![CDATA[
-		Do ##class(APPS.VKP.RegioBeheerService).%New().BevolkCrmRegio( ..BronRegioCodes, ..EersteKaraktersVanPostcodes, ..DoelRegioCode )
-		Quit ##This
+	Do ##class(APPS.VKP.RegioBeheerService).%New().BevolkCrmRegio( ..BronRegioCodes, ..EersteKaraktersVanPostcodes, ..DoelRegioCode )
+	Quit ##This
 ]]></Implementation>
 </Method>
 </Class>