Index: AX/Uitgaand/common/impl/AifGenerator.cls.xml
===================================================================
diff -u -r36470 -r38037
--- AX/Uitgaand/common/impl/AifGenerator.cls.xml	(.../AifGenerator.cls.xml)	(revision 36470)
+++ AX/Uitgaand/common/impl/AifGenerator.cls.xml	(.../AifGenerator.cls.xml)	(revision 38037)
@@ -57,6 +57,19 @@
 ]]></Implementation>
 </Method>
 
+<Method name="GenerateCrmCustomers">
+<Implementation><![CDATA[
+	#dim VerkoopAPI As DOM.VKP.VerkoopAPI = ##class(DOM.DomeinContext).Instance().GeefVerkoopAPI()
+	
+	#dim Filter As %String = $$$If(..FirmaBepaler.GeefInitialen() = ##class(AX.common.enu.InterneFirmaInitialen).VanHoeckeNv(),"(Item.GeefRegio()'[99) && (Item.GeefRegio()'[98)","")
+	
+	#dim KlantIterator As TECH.Iterator = ##class(TECH.DynamicIterator).%New(VerkoopAPI.GeefKlantIterator(),,Filter)
+	while KlantIterator.HasNext() {
+		do ..Generate(##class(AXimpl.AifMessage.Request).%New("Crm/Customer",KlantIterator.Next().GeefID()))	
+	}
+]]></Implementation>
+</Method>
+
 <Method name="GenerateSalesInvoices">
 <FormalSpec>Datum:%String</FormalSpec>
 <Implementation><![CDATA[