Index: AXimpl/Dynamics/CustomerIn/Converter/CustomerInConverter.cls.xml
===================================================================
diff -u -r50213 -r50233
--- AXimpl/Dynamics/CustomerIn/Converter/CustomerInConverter.cls.xml (.../CustomerInConverter.cls.xml) (revision 50213)
+++ AXimpl/Dynamics/CustomerIn/Converter/CustomerInConverter.cls.xml (.../CustomerInConverter.cls.xml) (revision 50233)
@@ -94,6 +94,7 @@
Do ..ZetGemeenschappelijkeKlantProperties(.Klant, Cust)
If (Cust.IsConsumer="Yes") {
Do Klant.ZetActiviteit(##class(DOM.VKP.enu.KlantActiviteit).Consument())
+ Do Klant.ZetBusinessType(##class(DOM.VKP.enu.BusinessType).B2C())
}
Do Klant.Save()
@@ -129,7 +130,7 @@
#Dim Klant as DOM.VKP.VanHoeckeKlant = ..VerkoopApi.GeefKlant(PartijID)
Do ..ZetGemeenschappelijkeKlantProperties(.Klant, Cust)
- Do Klant.ZetActiviteit($$$If(Cust.IsConsumer="Yes",##class(DOM.VKP.enu.KlantActiviteit).Consument(),##class(DOM.VKP.enu.KlantActiviteit).Onbepaald()))
+ Do ..VerwerkIsConsumerNieuweKlant(.Klant, Cust.IsConsumer)
Do Klant.Save()
Do ..LeverAdresUtils.ZetLeverAdressen(Klant, Cust)
@@ -245,7 +246,7 @@
1
+
+
+
+1
+
+