Index: AXimpl/Controle/Order/Admin/AdminOrderLijnConverter.cls.xml =================================================================== diff -u -r49106 -r49225 --- AXimpl/Controle/Order/Admin/AdminOrderLijnConverter.cls.xml (.../AdminOrderLijnConverter.cls.xml) (revision 49106) +++ AXimpl/Controle/Order/Admin/AdminOrderLijnConverter.cls.xml (.../AdminOrderLijnConverter.cls.xml) (revision 49225) @@ -18,11 +18,6 @@ 1 - -Flow.OrderWMS.LijnRepository -1 - - TECH.Format.FormatAPI 1 @@ -39,7 +34,7 @@ -ProductApi:DOM.PM.ProductAPI,AxProductConvertor:AX.Uitgaand.PM.impl.Convertor.Sopr.ProductConvertor,PartijApi:DOM.PARTIJ.PartijAPI,OrderWMSLijnRepository:Flow.OrderWMS.LijnRepository +ProductApi:DOM.PM.ProductAPI,AxProductConvertor:AX.Uitgaand.PM.impl.Convertor.Sopr.ProductConvertor,PartijApi:DOM.PARTIJ.PartijAPI 1 1 %Status @@ -48,7 +43,6 @@ Set ..ProductApi = $$$Inject(ProductApi,##class(DOM.DomeinContext).Instance().GeefProductAPI()) Set ..AxProductConvertor = $$$Inject(AxProductConvertor,##class(AX.Uitgaand.PM.impl.Convertor.Sopr.ProductConvertor).%New()) Set ..PartijApi = $$$Inject(PartijApi,##class(DOM.DomeinContext).Instance().GeefPartijAPI()) - Set ..OrderWMSLijnRepository = $$$Inject(OrderWMSLijnRepository,##class(Flow.OrderWMS.LijnRepository).%New()) Set ..AdminToAxUtils = ##class(AXimpl.AdminToAxUtils).%New() Set ..Formatter = ##class(TECH.Context).Instance().GeefFormatAPI() Set ..SoprContractIdConverter = ##class(AX.Uitgaand.PM.impl.Convertor.Sopr.SoprContractIdConverter).%New() @@ -65,20 +59,19 @@ try { #dim Order As DOM.VKP.Order = AdminOrderLijn.GeefOrder() - #dim KlantNummer As %String = $Extract(Order.GeefKlantID(),4,*) #dim Klant As DOM.PARTIJ.Partij = ..PartijApi.GeefPartij(Order.GeefKlantID()) #dim Adres As DOM.common.Adres = Klant.GeefAdres() Set ConvertedAdminOrderLijn.Klant = ..AdminToAxUtils.ConvertCustomerID(Order.GeefKlantID()) Set ConvertedAdminOrderLijn.LeverDatum = ..Formatter.FormatHorolog(AdminOrderLijn.GeefLeverdag(),"JJJJ-MM-DD") - Set ConvertedAdminOrderLijn.Product = ..BepaalProduct(AdminOrderLijn.GeefProductID(), KlantNummer) Set ConvertedAdminOrderLijn.VerkoopOrderId = Order.GeefAxSalesId() Set ConvertedAdminOrderLijn.VerkoopOrderLijnId = AdminOrderLijn.GeefAxInventTransId() Set ConvertedAdminOrderLijn.ConfigId = AdminOrderLijn.GeefAxConfigId() + Set ConvertedAdminOrderLijn.Product = ..BepaalProduct(AdminOrderLijn, ConvertedAdminOrderLijn.ConfigId) Set ConvertedAdminOrderLijn.Hoeveelheid = Aantal Set ConvertedAdminOrderLijn.Land = Adres.GeefLand().GeefIso3() Set ConvertedAdminOrderLijn.Postcode = Adres.GeefPostcode() - Set ConvertedAdminOrderLijn.Sopr = ..BepaalSopr(AdminOrderLijn, KlantNummer) + Set ConvertedAdminOrderLijn.Sopr = ..BepaalSopr(AdminOrderLijn) Set ConvertedAdminOrderLijn.Stad = Adres.GeefGemeente() Set ConvertedAdminOrderLijn.Straat = Adres.GeefStraat() } catch { @@ -91,27 +84,31 @@ -ProductID:%String,KlantNummer:%String +AdminOrderLijn:DOM.VKP.ProductOrderlijn,ConfigId:%String 1 %String -AdminOrderLijn:DOM.VKP.ProductOrderlijn,KlantNummer:%String +AdminOrderLijn:DOM.VKP.ProductOrderlijn 1 %String -