Index: APPS/common/KlantKost/impl/KlantKostService.cls.xml
===================================================================
diff -u -r1426 -r1669
--- APPS/common/KlantKost/impl/KlantKostService.cls.xml	(.../KlantKostService.cls.xml)	(revision 1426)
+++ APPS/common/KlantKost/impl/KlantKostService.cls.xml	(.../KlantKostService.cls.xml)	(revision 1669)
@@ -76,7 +76,7 @@
 	If ($$$ISERR(Status)) w $$ParseStatus^vhLib(Status)	
 	
 	/// IP
-	For Regio = 2,3 {
+	For Regio = 2,3,4,5,6,8 {
 		Set Waarde = 53.05 
 		Set Factor = ##class(APPS.common.KlantKost.impl.data.Factor).%New(ContactFactor,"Regio"_Regio,Waarde,GeldigVanaf)
 		Do Factor.%Save()
@@ -86,7 +86,7 @@
 		Do Factor.%Save()
 	}
 	/// KS BE
-	For Regio = 11,12,14,15,16,17 {
+	For Regio = 10,11,12,14,15,16,17,18 {
 		Set Waarde = 36.52
 		Set Factor = ##class(APPS.common.KlantKost.impl.data.Factor).%New(ContactFactor,"Regio"_Regio,Waarde,GeldigVanaf)
 		Do Factor.%Save()
@@ -106,7 +106,7 @@
 		Do Factor.%Save()
 	}	
 	/// ARCH
-	For Regio = 30,31 {
+	For Regio = 30,31,38 {
 		Set Waarde = 39.88
 		Set Factor = ##class(APPS.common.KlantKost.impl.data.Factor).%New(ContactFactor,"Regio"_Regio,Waarde,GeldigVanaf)
 		Do Factor.%Save()