Index: AXimpl/Dynamics/SalesOrderIn/Converter/SalesOrderConverter.cls.xml
===================================================================
diff -u -r43688 -r43705
--- AXimpl/Dynamics/SalesOrderIn/Converter/SalesOrderConverter.cls.xml (.../SalesOrderConverter.cls.xml) (revision 43688)
+++ AXimpl/Dynamics/SalesOrderIn/Converter/SalesOrderConverter.cls.xml (.../SalesOrderConverter.cls.xml) (revision 43705)
@@ -67,22 +67,48 @@
Set OrderLineIterator = ##class(TECH.ListIterator).%New(OrderHeader.OrderLine)
While OrderLineIterator.HasNext() {
#dim OrderLine As AXif.Dynamics.SalesOrderIn.MessageParts.AxdEntityOrderLine = OrderLineIterator.Next()
- #dim ProductID As %String = ..ProductBepaler.GeefProductNummer(OrderLine.ItemId, Order.GeefKlantID())
- #dim ProductOrderLijn As DOM.VKP.impl.DataM.DataMProductOrderlijn = ..OrderLevenCyclusService.VoegToeProductVoorKlant(Order, Order.GeefKlantID(), ProductID, OrderLine.QtyOrdered)
- Do ProductOrderLijn.ZetAxInventTransId(OrderLine.InventTransId)
- Do ProductOrderLijn.ZetMunt(OrderLine.CurrencyCode)
- Do ProductOrderLijn.ZetLeverdag(..GeefLeverDatum(OrderLine))
- Do ProductOrderLijn.ZetEenheidPrijsExclBTW(OrderLine.LineAmount / OrderLine.QtyOrdered)
- Do ProductOrderLijn.ZetTotaalNettoExclBTW(OrderLine.LineAmount)
+ If ..IsProductLijn(OrderLine) {
+ Do ..VoegToeProductLijn(Order, OrderLine)
+ } Else {
+ Do ..VoegToeMaatwerkLijn(Order, OrderLine)
+ }
- ;Do ProductOrderLijn.ZetProjectReferentie(OrderLine. )
- ;Do ProductOrderLijn.ZetPakketReferentie(OrderLine. )
}
Do ..OrderAPI.Bewaar(Order)
]]>
+
+OrderLine:AXif.Dynamics.SalesOrderIn.MessageParts.AxdEntityOrderLine
+1
+%Boolean
+
+
+
+
+Order:DOM.VKP.Order,OrderLine:AXif.Dynamics.SalesOrderIn.MessageParts.AxdEntityOrderLine
+1
+
+
+
+
+Order:DOM.VKP.Order,OrderLine:AXif.Dynamics.SalesOrderIn.MessageParts.AxdEntityOrderLine
+1
+
+
OrderLine:AXif.Dynamics.SalesOrderIn.MessageParts.AxdEntityOrderLine
1