Index: vhPowerTools/APPS/VKP/AanbrengerInformeerder.cls.xml
===================================================================
diff -u -r29059 -r40777
--- vhPowerTools/APPS/VKP/AanbrengerInformeerder.cls.xml	(.../AanbrengerInformeerder.cls.xml)	(revision 29059)
+++ vhPowerTools/APPS/VKP/AanbrengerInformeerder.cls.xml	(.../AanbrengerInformeerder.cls.xml)	(revision 40777)
@@ -10,21 +10,26 @@
 Voorbeeldgebruik:
 do ##class(vhPowertools.APPS.VKP.AanbrengerInformeerder).ForceerInformeerAanbrengerOverCommissies(4671,123456,123457)</Description>
 <ClassMethod>1</ClassMethod>
-<FormalSpec>AanbrengerKlantNr:%String,CommissieNrs...:%String</FormalSpec>
+<FormalSpec>AanbrengerKlantNr:%String,FactuurNrs...:%String</FormalSpec>
 <Implementation><![CDATA[
-	set AanbrengerInformeerder = ##class(APPS.VKP.Commissie.impl.AanbrengerInformeerder).%New() 
-	#dim CommissieIDs As %ListOfDataTypes = ##class(%ListOfDataTypes).%New()
-	#dim CommissieID As %String = ""
+	Try {
+		#dim CommissieIDs As %ListOfDataTypes = ##class(%ListOfDataTypes).%New()
+		#dim CommissieID As %String = ""
 	
-	set Iterator = ##class(TECH.ArrayOneDimIterator).%New(.CommissieNrs)
-	while Iterator.HasNext() {
-		Set CommissieID = Iterator.Next()_"||"_AanbrengerKlantNr
-		Do CommissieIDs.Insert(CommissieID)
-	}
+		set Iterator = ##class(TECH.ArrayOneDimIterator).%New(.FactuurNrs)
+		while Iterator.HasNext() {
+			Set CommissieID = Iterator.Next()_"||"_AanbrengerKlantNr
+			Do CommissieIDs.Insert(CommissieID)
+		}
 	
-	#dim CommissieService As APPS.VKP.Commissie.CommissieService = ##class(APPS.ApplicatieContext).Instance().GeefVerkoopAPI().GeefCommissieService()
-	Do CommissieService.KeurCommissiesGoed(CommissieIDs)	
-	Do AanbrengerInformeerder.InformeerAanbrengerOverCommissies(AanbrengerKlantNr, CommissieIDs)
+		#dim CommissieService As APPS.VKP.Commissie.CommissieService = ##class(APPS.ApplicatieContext).Instance().GeefVerkoopAPI().GeefCommissieService()
+		Do CommissieService.KeurCommissiesGoed(CommissieIDs)	
+		
+		set AanbrengerInformeerder = ##class(APPS.VKP.Commissie.impl.AanbrengerInformeerder).%New() 
+		Do AanbrengerInformeerder.InformeerAanbrengerOverCommissies(AanbrengerKlantNr, CommissieIDs)
+	} Catch {
+		Write ##class(TECH.ExceptionHandler).Catch().ToString()
+	}
 ]]></Implementation>
 </Method>
 </Class>
Index: APPS/VKP/Commissie/impl/AanbrengerInformeerder.cls.xml
===================================================================
diff -u -r29059 -r40777
--- APPS/VKP/Commissie/impl/AanbrengerInformeerder.cls.xml	(.../AanbrengerInformeerder.cls.xml)	(revision 29059)
+++ APPS/VKP/Commissie/impl/AanbrengerInformeerder.cls.xml	(.../AanbrengerInformeerder.cls.xml)	(revision 40777)
@@ -84,8 +84,9 @@
 </Method>
 
 <Method name="InformeerAanbrengerOverCommissies">
+<Description>
+Mag niet private, wegens powertool.</Description>
 <FormalSpec>AanbrengerKlantNr:%String,Commissies:%ListOfDataTypes</FormalSpec>
-<Private>1</Private>
 <Implementation><![CDATA[
 	#dim CommissieService As APPS.VKP.Commissie.CommissieService = ##class(APPS.ApplicatieContext).Instance().GeefVerkoopAPI().GeefCommissieService()
 
Index: APPS/VKP/Commissie/impl/CommissieService.cls.xml
===================================================================
diff -u -r40394 -r40777
--- APPS/VKP/Commissie/impl/CommissieService.cls.xml	(.../CommissieService.cls.xml)	(revision 40394)
+++ APPS/VKP/Commissie/impl/CommissieService.cls.xml	(.../CommissieService.cls.xml)	(revision 40777)
@@ -51,8 +51,9 @@
 </Method>
 
 <Method name="KeurCommissiesGoed">
+<Description>
+Deze wordt gebruikt door de powertool.</Description>
 <FormalSpec>CommissieIDs:%ListOfDataTypes</FormalSpec>
-<Private>1</Private>
 <Implementation><![CDATA[
 	Set itCommissies = ##class(TECH.ListIterator).%New(CommissieIDs)
 	While itCommissies.HasNext() {