Index: AXimpl/Dynamics/SalesOrderIn/Converter/OrderLijnenUpdater.cls.xml =================================================================== diff -u -r47350 -r47921 --- AXimpl/Dynamics/SalesOrderIn/Converter/OrderLijnenUpdater.cls.xml (.../OrderLijnenUpdater.cls.xml) (revision 47350) +++ AXimpl/Dynamics/SalesOrderIn/Converter/OrderLijnenUpdater.cls.xml (.../OrderLijnenUpdater.cls.xml) (revision 47921) @@ -31,17 +31,21 @@ While OrderLijnenLijstIterator.HasNext() { #dim OrderLijn As DOM.VKP.impl.DataM.DataMOrder.OrderlijnenSorteerder.Orderlijn = OrderLijnenLijstIterator.Next() + + If $$$Not(OrderLijn.Orderlijn.%Extends("DOM.VKP.impl.DataM.DataMTekstOrderlijn")) { + Do ..KillWNode(Order, OrderLijn.Orderlijn.GeefID(), OrderLijn.Orderlijn.GeefLijnVolgNr()) + } Set @..#GlobalOrderLijnen(Order.GeefKlantNr(), ..#Facturatie, Order.GeefID(), OrderLijn.NieuwLijnVolgNr) = OrderLijn.Orderlijn.GeefRecord() + If $$$Not(OrderLijn.Orderlijn.%Extends("DOM.VKP.impl.DataM.DataMTekstOrderlijn")) { + Do ..SetWNode(Order, OrderLijn.Orderlijn.GeefID(), OrderLijn.NieuwLijnVolgNr) + } + If (OrderLijn.Orderlijn.GeefLijnVolgNr() > (..#OrderLijnVolgNrOffset + OrderLijnenLijst.Count())) { kill @..#GlobalOrderLijnen(Order.GeefKlantNr(), ..#Facturatie, Order.GeefID(), OrderLijn.Orderlijn.GeefLijnVolgNr()) } - If $$$Not(OrderLijn.Orderlijn.%Extends("DOM.VKP.impl.DataM.DataMTekstOrderlijn")) { - Set @..#GlobalOrderLijnenIndex("IU",Order.GeefID(),OrderLijn.Orderlijn.GeefID()) = OrderLijn.NieuwLijnVolgNr - } - } } Catch { #dim Exception As TECH.Exceptions.Exception = ##class(TECH.ExceptionHandler).Catch() @@ -50,6 +54,26 @@ } ]]> + + +Order:DOM.VKP.impl.DataM.DataMOrder,OrderLijnID:%String,LijnNr:%String +1 + + + + +Order:DOM.VKP.impl.DataM.DataMOrder,OrderLijnID:%String,LijnNr:%String +1 + +