Index: vhUnitTest/AXimpl/Dynamics/CustomerIn/Converter/CustomerInConverter/Test.cls.xml
===================================================================
diff -u -r50158 -r50171
--- vhUnitTest/AXimpl/Dynamics/CustomerIn/Converter/CustomerInConverter/Test.cls.xml	(.../Test.cls.xml)	(revision 50158)
+++ vhUnitTest/AXimpl/Dynamics/CustomerIn/Converter/CustomerInConverter/Test.cls.xml	(.../Test.cls.xml)	(revision 50171)
@@ -272,6 +272,7 @@
 	Do KlantMock.VerwachtMethodCall("ZetBetalingwijze","Rembours").DanDoeNiks()
 	Do KlantMock.VerwachtMethodCall("ZetBetalingTermijn","").DanDoeNiks()
 	Do KlantMock.VerwachtMethodCall("ZetRegio","41").DanDoeNiks()
+	Do KlantMock.VerwachtMethodCall("ZetActiviteit","Consument").DanDoeNiks()
 	Do KlantMock.VerwachtMethodCall("Save").DanDoeNiks()
 ]]></Implementation>
 </Method>
@@ -303,6 +304,7 @@
 	Do KlantMock.VerwachtMethodCall("ZetBetalingwijze","Rembours").DanDoeNiks()
 	Do KlantMock.VerwachtMethodCall("ZetBetalingTermijn","").DanDoeNiks()
 	Do KlantMock.VerwachtMethodCall("ZetRegio","41").DanDoeNiks()
+	Do KlantMock.VerwachtMethodCall("ZetActiviteit","Consument").DanDoeNiks()
 	Do KlantMock.VerwachtMethodCall("Save").DanDoeNiks()
 ]]></Implementation>
 </Method>
@@ -390,6 +392,7 @@
 	Set Cust.TaxGroup = "BUNIT"
 	Set Cust.PaymTermId = "REMBOURS"
 	Set Cust.CustClassificationId = "R41"
+	Set Cust.IsConsumer = "Yes"
 	Do Cust.ElectronicAddress.Insert(..GeefTelefoon1())	
 	Do Cust.ElectronicAddress.Insert(..GeefFax())	
 	Do Cust.ElectronicAddress.Insert(..GeefEmail())