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
+
+