Index: vhPowerTools/APPS/PM/Maatwerk/VhConfig.cls.xml
===================================================================
diff -u -r73884 -r73887
--- vhPowerTools/APPS/PM/Maatwerk/VhConfig.cls.xml	(.../VhConfig.cls.xml)	(revision 73884)
+++ vhPowerTools/APPS/PM/Maatwerk/VhConfig.cls.xml	(.../VhConfig.cls.xml)	(revision 73887)
@@ -14,17 +14,22 @@
 
 <Method name="GetAndSaveVhConfig">
 <Description>
-Do ##class(vhPowerTools.APPS.PM.Maatwerk.VhConfig).%New()GetAndSaveVhConfig(CID)</Description>
-<FormalSpec>CID:%String</FormalSpec>
+Do ##class(vhPowerTools.APPS.PM.Maatwerk.VhConfig).%New().GetAndSaveVhConfig(t)</Description>
+<FormalSpec>ListOfCIDs:%ListOfDataTypes</FormalSpec>
 <Implementation><![CDATA[
 	Set EncowayMaatwerkService = ##class(WSimpl.PM.Maatwerk.MaatwerkService.Encoway).%New()
-	#dim VhConfig As APPS.PM.Maatwerk.dto.VhConfig = EncowayMaatwerkService.GeefVhConfig(CID)
+	Set CIDIterator = ##class(TECH.ListIterator).%New(ListOfCIDs)
+	
+	While CIDIterator.HasNext() {	
+		#dim CID As %String = CIDIterator.Next()
+		#dim VhConfig As APPS.PM.Maatwerk.dto.VhConfig = EncowayMaatwerkService.GeefVhConfig(CID)
 
-	Set VhConfigRepository = ##class(APPS.PM.Maatwerk.impl.VhConfigRepository).%New()	
-	Do VhConfigRepository.VerwijderCID(CID)	
-	Do VhConfigRepository.SaveVhConfig(CID, VhConfig)
+		Set VhConfigRepository = ##class(APPS.PM.Maatwerk.impl.VhConfigRepository).%New()	
+		Do VhConfigRepository.VerwijderCID(CID)	
+		Do VhConfigRepository.SaveVhConfig(CID, VhConfig, "")
+	}
 	
-	Write "Succesvol vhconfig opgehaald en opgeslagen!"
+	Write "Succesvol vhconfigs opgehaald en opgeslagen!"
 ]]></Implementation>
 </Method>
 </Class>