Index: AXimpl/Dynamics/SalesOrderIn/Converter/SalesOrderConverter.cls.xml
===================================================================
diff -u -r72739 -r72870
--- AXimpl/Dynamics/SalesOrderIn/Converter/SalesOrderConverter.cls.xml (.../SalesOrderConverter.cls.xml) (revision 72739)
+++ AXimpl/Dynamics/SalesOrderIn/Converter/SalesOrderConverter.cls.xml (.../SalesOrderConverter.cls.xml) (revision 72870)
@@ -128,6 +128,11 @@
1
+
+APPS.PM.Maatwerk.impl.VhConfigRepository
+1
+
+
DOM.PM.impl.DataM.DataMProductRepository
1
@@ -172,6 +177,7 @@
Set ..VerkoopApi = $$$Inject(VerkoopApi, ##class(DOM.VKP.impl.VerkoopAPI).%New())
Set ..VhConfigHelper = ##class(APPS.PM.Maatwerk.impl.VhConfigHelper).%New()
+ Set ..VhConfigRepository = ##class(APPS.PM.Maatwerk.impl.VhConfigRepository).%New()
Set ..Logger = ##class(vhLib.Logger).%New()
@@ -552,6 +558,7 @@
If ($$$Not(OrderLine.CID = "{00000000-0000-0000-0000-000000000000}") && $$$Not(OrderLine.CID = "")) {
Set CID = ##class(TECH.StringUtils).Replace(##class(TECH.StringUtils).Replace(OrderLine.CID, "}", ""), "{", "")
+ Do ..VhConfigRepository.SaveVhConfig(OrderLine.CID, OrderLine.VhConfig)
Set ProductId = ..GeefProductIdVanVhConfigMaatwerkProduct(Order, OrderLine, CID, .ReedsGekendeProductId)
}
@@ -589,8 +596,6 @@
#dim VhConfig As APPS.PM.Maatwerk.dto.VhConfig = ..GeefJSONParsedVhConfig(OrderLine.VhConfig)
Set ReedsGekendeProductId = ..GeefProductIdVanDossierCodeVoorMaatwerkModel(OrderLine.DossierCode, VhConfig.Model)
- Set VhConfig.BerekendeKenmerken.Korttekst = ##class(TECH.StringUtils).Replace(VhConfig.BerekendeKenmerken.Korttekst, "%1", OrderLine.DossierCode)
-
Do ..VhConfigHelper.ZetVhConfig(VhConfig)
Set ProductData = ##class(DOM.PM.dto.ProductData).%New()
Set ProductData.CID = CID