Index: vhUnitTest/AXimpl/Dynamics/SalesOrderIn/Converter/SalesOrderConverter/Convert/TestUpdate.cls.xml =================================================================== diff -u -r48179 -r48187 --- vhUnitTest/AXimpl/Dynamics/SalesOrderIn/Converter/SalesOrderConverter/Convert/TestUpdate.cls.xml (.../TestUpdate.cls.xml) (revision 48179) +++ vhUnitTest/AXimpl/Dynamics/SalesOrderIn/Converter/SalesOrderConverter/Convert/TestUpdate.cls.xml (.../TestUpdate.cls.xml) (revision 48187) @@ -24,7 +24,7 @@ Do OrderMock.VerwachtMethodCall("ZetOorsprong", "").ExactAantalKeer(1) Do OrderMock.VerwachtMethodCall("ZetStatus", ##class(DOM.VKP.enu.OrderStatus).Open()).ExactAantalKeer(1) Do OrderMock.VerwachtMethodCall("ZetAxSalesId", "VO1600001000").ExactAantalKeer(1) - Do OrderMock.VerwachtMethodCall("ZetTextVoorAfdrukDocumentType", "ProductionBody", ##class(DOM.VKP.enu.TekstAfdrukDocumentType).Toelevering()).DanDoeNiks() + Do OrderMock.VerwachtMethodCall("ZetTekstVoorAfdrukDocumentType", "ProductionBody", ##class(DOM.VKP.enu.TekstAfdrukDocumentType).Toelevering()).DanDoeNiks() Do OrderMock.VerwachtMethodCall("HerlaadLijnen").ExactAantalKeer(4).DanDoeNiks() Do OrderMock.IndienMethodCall("GeefID").DanReturn("DummyOrderID") @@ -63,7 +63,7 @@ Do ProductOrderlijnMock.VerwachtMethodCall("ZetTotaalNettoExclBTW", 250).DanDoeNiks() Do ProductOrderlijnMock.VerwachtMethodCall("ZetAxConfigId", "").DanDoeNiks() Do ProductOrderlijnMock.VerwachtMethodCall("ZetAantal",10).DanDoeNiks() - Do ProductOrderlijnMock.VerwachtMethodCall("ZetTextVoorAfdrukDocumentType", "PackingSlipBody", ##class(DOM.VKP.enu.TekstAfdrukDocumentType).LeverBon()).DanDoeNiks() + Do ProductOrderlijnMock.VerwachtMethodCall("ZetTekstVoorAfdrukDocumentType", "PackingSlipBody", ##class(DOM.VKP.enu.TekstAfdrukDocumentType).LeverBon()).DanDoeNiks() #dim OrderMock As vhTest.Mock.DOM.VKP.Order = ..GeefOrder() Index: DOM/VKP/Order.cls.xml =================================================================== diff -u -r47503 -r48187 --- DOM/VKP/Order.cls.xml (.../Order.cls.xml) (revision 47503) +++ DOM/VKP/Order.cls.xml (.../Order.cls.xml) (revision 48187) @@ -456,24 +456,24 @@ DOM.VKP.impl.DataM.DataMOrderlijn - + 1 AfdrukDocumentType:DOM.VKP.enu.TekstAfdrukDocumentType %String - + 1 Tekst:%String,AfdrukDocumentType:DOM.VKP.enu.TekstAfdrukDocumentType - + 1 AfdrukDocumentType:DOM.VKP.enu.TekstAfdrukDocumentType="" %ListOfObjects - + 1 AfdrukDocumentType:DOM.VKP.enu.TekstAfdrukDocumentType,GekoppeldAanProductLijn:%String="" Index: DOM/VKP/ProductOrderlijn.cls.xml =================================================================== diff -u -r47070 -r48187 --- DOM/VKP/ProductOrderlijn.cls.xml (.../ProductOrderlijn.cls.xml) (revision 47070) +++ DOM/VKP/ProductOrderlijn.cls.xml (.../ProductOrderlijn.cls.xml) (revision 48187) @@ -159,13 +159,13 @@ AxMaatwerkGenerischItemId:%String - + 1 AfdrukDocumentType:DOM.VKP.enu.TekstAfdrukDocumentType %String - + 1 Tekst:%String,AfdrukDocumentType:DOM.VKP.enu.TekstAfdrukDocumentType Index: AXimpl/Dynamics/SalesOrderOut/Converter/OrderHoofdingConverteerder.cls.xml =================================================================== diff -u -r47866 -r48187 --- AXimpl/Dynamics/SalesOrderOut/Converter/OrderHoofdingConverteerder.cls.xml (.../OrderHoofdingConverteerder.cls.xml) (revision 47866) +++ AXimpl/Dynamics/SalesOrderOut/Converter/OrderHoofdingConverteerder.cls.xml (.../OrderHoofdingConverteerder.cls.xml) (revision 48187) @@ -31,9 +31,9 @@ Set OrderHeader.DlvAddrZipCode = Leveradres.GeefPostcode() Set OrderHeader.DlvAddrStreet1 = Leveradres.GeefStraat() - Set OrderHeader.InvoiceBody = Order.GeefTextVoorAfdrukDocumentType(##class(DOM.VKP.enu.TekstAfdrukDocumentType).Faktuur()) - Set OrderHeader.PackingSlipBody = Order.GeefTextVoorAfdrukDocumentType(##class(DOM.VKP.enu.TekstAfdrukDocumentType).LeverBon()) - Set OrderHeader.ProdBody = Order.GeefTextVoorAfdrukDocumentType(##class(DOM.VKP.enu.TekstAfdrukDocumentType).Toelevering()) + Set OrderHeader.InvoiceBody = Order.GeefTekstVoorAfdrukDocumentType(##class(DOM.VKP.enu.TekstAfdrukDocumentType).Faktuur()) + Set OrderHeader.PackingSlipBody = Order.GeefTekstVoorAfdrukDocumentType(##class(DOM.VKP.enu.TekstAfdrukDocumentType).LeverBon()) + Set OrderHeader.ProdBody = Order.GeefTekstVoorAfdrukDocumentType(##class(DOM.VKP.enu.TekstAfdrukDocumentType).Toelevering()) Quit OrderHeader ]]> Index: vhTest/Utils/DOM/VKP/Order.cls.xml =================================================================== diff -u -r47503 -r48187 --- vhTest/Utils/DOM/VKP/Order.cls.xml (.../Order.cls.xml) (revision 47503) +++ vhTest/Utils/DOM/VKP/Order.cls.xml (.../Order.cls.xml) (revision 48187) @@ -70,7 +70,7 @@ Order:vhTest.Mock.DOM.VKP.Order,AfdrukDocumentType:DOM.VKP.enu.TekstAfdrukDocumentType,Tekst:%String DOM.VKP.Order Index: vhTest/Fake/AXimpl/Dynamics/SalesOrderIn/Converter/SalesOrderConverter.cls.xml =================================================================== diff -u -r47991 -r48187 --- vhTest/Fake/AXimpl/Dynamics/SalesOrderIn/Converter/SalesOrderConverter.cls.xml (.../SalesOrderConverter.cls.xml) (revision 47991) +++ vhTest/Fake/AXimpl/Dynamics/SalesOrderIn/Converter/SalesOrderConverter.cls.xml (.../SalesOrderConverter.cls.xml) (revision 48187) @@ -14,8 +14,7 @@ OrderLijn:DOM.VKP.ProductOrderlijn - + Index: vhUnitTest/AXimpl/Dynamics/SalesOrderIn/Converter/SalesOrderConverter/Convert/Base.cls.xml =================================================================== diff -u -r48030 -r48187 --- vhUnitTest/AXimpl/Dynamics/SalesOrderIn/Converter/SalesOrderConverter/Convert/Base.cls.xml (.../Base.cls.xml) (revision 48030) +++ vhUnitTest/AXimpl/Dynamics/SalesOrderIn/Converter/SalesOrderConverter/Convert/Base.cls.xml (.../Base.cls.xml) (revision 48187) @@ -65,7 +65,7 @@ Do OrderMock.IndienMethodCall("ZetAxSalesId", $$$ElkeWaarde).DanDoeNiks() Do OrderMock.IndienMethodCall("GeefKlantID").DanReturn("DummyKlantID") Do OrderMock.IndienMethodCall("GeefID").DanReturn("DummyOrderID") - Do OrderMock.IndienMethodCall("ZetTextVoorAfdrukDocumentType", $$$ElkeWaarde, $$$ElkeWaarde).DanDoeNiks() + Do OrderMock.IndienMethodCall("ZetTekstVoorAfdrukDocumentType", $$$ElkeWaarde, $$$ElkeWaarde).DanDoeNiks() Do OrderMock.IndienMethodCall("HerlaadLijnen").DanDoeNiks() Quit OrderMock ]]> Index: vhUnitTest/AXimpl/Dynamics/SalesOrderIn/Converter/OrderlijnenSorteerder/Test.cls.xml =================================================================== diff -u -r47367 -r48187 --- vhUnitTest/AXimpl/Dynamics/SalesOrderIn/Converter/OrderlijnenSorteerder/Test.cls.xml (.../Test.cls.xml) (revision 47367) +++ vhUnitTest/AXimpl/Dynamics/SalesOrderIn/Converter/OrderlijnenSorteerder/Test.cls.xml (.../Test.cls.xml) (revision 48187) @@ -26,12 +26,12 @@ @@ -40,19 +40,19 @@ #dim ProductOrderLijn1 As DOM.VKP.impl.DataM.DataMProductOrderlijn = ..MaakProductLijn("1") #dim ProductOrderLijn2 As DOM.VKP.impl.DataM.DataMProductOrderlijn = ..MaakProductLijn("2") - Set OnGesorteerdeTextLijnen = ##class(%ListOfObjects).%New() + Set OnGesorteerdeTekstLijnen = ##class(%ListOfObjects).%New() Set OnGesorteerdeOrderLijnenLijst = ##class(%ListOfObjects).%New() Do OnGesorteerdeOrderLijnenLijst.Insert(ProductOrderLijn1) Do OnGesorteerdeOrderLijnenLijst.Insert(ProductOrderLijn2) - Set OnGesorteerdeOrderLijnenTextLijnen = ##class(%ListOfObjects).%New() + Set OnGesorteerdeOrderLijnenTekstLijnen = ##class(%ListOfObjects).%New() Set VerwachteGesorteerdeOrderLijnenLijst = ##class(%ListOfObjects).%New() Do VerwachteGesorteerdeOrderLijnenLijst.Insert(..MaakGesorteerdeOrderlijn(ProductOrderLijn1, "101")) Do VerwachteGesorteerdeOrderLijnenLijst.Insert(..MaakGesorteerdeOrderlijn(ProductOrderLijn2, "102")) - Do ..AssertSorteringOrderLijst(OnGesorteerdeOrderLijnenLijst, VerwachteGesorteerdeOrderLijnenLijst, OnGesorteerdeTextLijnen, OnGesorteerdeOrderLijnenTextLijnen) + Do ..AssertSorteringOrderLijst(OnGesorteerdeOrderLijnenLijst, VerwachteGesorteerdeOrderLijnenLijst, OnGesorteerdeTekstLijnen, OnGesorteerdeOrderLijnenTekstLijnen) ]]> @@ -70,7 +70,7 @@ Do OnGesorteerdeTekstLijnen.Insert(TekstOrderLijn2) Do OnGesorteerdeTekstLijnen.Insert(TekstOrderLijn3) - Set OnGesorteerdeOrderLijnenTextLijnen = ##class(%ListOfObjects).%New() + Set OnGesorteerdeOrderLijnenTekstLijnen = ##class(%ListOfObjects).%New() #dim ProductOrderLijn1 As DOM.VKP.impl.DataM.DataMProductOrderlijn = ..MaakProductLijn("101", OrderLijnID1) #dim ProductOrderLijn2 As DOM.VKP.impl.DataM.DataMProductOrderlijn = ..MaakProductLijn("102", OrderLijnID2) @@ -86,7 +86,7 @@ Do VerwachteGesorteerdeOrderLijnenLijst.Insert(..MaakGesorteerdeOrderlijn(ProductOrderLijn1, "104")) Do VerwachteGesorteerdeOrderLijnenLijst.Insert(..MaakGesorteerdeOrderlijn(ProductOrderLijn2, "105")) - Do ..AssertSorteringOrderLijst(OnGesorteerdeOrderLijnenLijst, VerwachteGesorteerdeOrderLijnenLijst, OnGesorteerdeTekstLijnen, OnGesorteerdeOrderLijnenTextLijnen) + Do ..AssertSorteringOrderLijst(OnGesorteerdeOrderLijnenLijst, VerwachteGesorteerdeOrderLijnenLijst, OnGesorteerdeTekstLijnen, OnGesorteerdeOrderLijnenTekstLijnen) ]]> @@ -101,10 +101,10 @@ #dim TekstOrderLijn2 As DOM.VKP.impl.DataM.DataMTekstOrderlijn = ..MaakTekstLijn("104", OrderLijnID1) #dim TekstOrderLijn3 As DOM.VKP.impl.DataM.DataMTekstOrderlijn = ..MaakTekstLijn("105", OrderLijnID1) - Set OnGesorteerdeOrderLijnenTextLijnen = ##class(%ListOfObjects).%New() - Do OnGesorteerdeOrderLijnenTextLijnen.Insert(TekstOrderLijn1) - Do OnGesorteerdeOrderLijnenTextLijnen.Insert(TekstOrderLijn2) - Do OnGesorteerdeOrderLijnenTextLijnen.Insert(TekstOrderLijn3) + Set OnGesorteerdeOrderLijnenTekstLijnen = ##class(%ListOfObjects).%New() + Do OnGesorteerdeOrderLijnenTekstLijnen.Insert(TekstOrderLijn1) + Do OnGesorteerdeOrderLijnenTekstLijnen.Insert(TekstOrderLijn2) + Do OnGesorteerdeOrderLijnenTekstLijnen.Insert(TekstOrderLijn3) #dim ProductOrderLijn1 As DOM.VKP.impl.DataM.DataMProductOrderlijn = ..MaakProductLijn("101", OrderLijnID1) #dim ProductOrderLijn2 As DOM.VKP.impl.DataM.DataMProductOrderlijn = ..MaakProductLijn("102", OrderLijnID2) @@ -119,7 +119,7 @@ Do VerwachteGesorteerdeOrderLijnenLijst.Insert(..MaakGesorteerdeOrderlijn(TekstOrderLijn3, "104")) Do VerwachteGesorteerdeOrderLijnenLijst.Insert(..MaakGesorteerdeOrderlijn(ProductOrderLijn2, "105")) - Do ..AssertSorteringOrderLijst(OnGesorteerdeOrderLijnenLijst, VerwachteGesorteerdeOrderLijnenLijst, OnGesorteerdeTekstLijnen, OnGesorteerdeOrderLijnenTextLijnen) + Do ..AssertSorteringOrderLijst(OnGesorteerdeOrderLijnenLijst, VerwachteGesorteerdeOrderLijnenLijst, OnGesorteerdeTekstLijnen, OnGesorteerdeOrderLijnenTekstLijnen) ]]> @@ -134,10 +134,10 @@ #dim TekstOrderLijn2 As DOM.VKP.impl.DataM.DataMTekstOrderlijn = ..MaakTekstLijn("104", OrderLijnID1) #dim TekstOrderLijn3 As DOM.VKP.impl.DataM.DataMTekstOrderlijn = ..MaakTekstLijn("105", OrderLijnID1) - Set OnGesorteerdeOrderLijnenTextLijnen = ##class(%ListOfObjects).%New() - Do OnGesorteerdeOrderLijnenTextLijnen.Insert(TekstOrderLijn1) - Do OnGesorteerdeOrderLijnenTextLijnen.Insert(TekstOrderLijn2) - Do OnGesorteerdeOrderLijnenTextLijnen.Insert(TekstOrderLijn3) + Set OnGesorteerdeOrderLijnenTekstLijnen = ##class(%ListOfObjects).%New() + Do OnGesorteerdeOrderLijnenTekstLijnen.Insert(TekstOrderLijn1) + Do OnGesorteerdeOrderLijnenTekstLijnen.Insert(TekstOrderLijn2) + Do OnGesorteerdeOrderLijnenTekstLijnen.Insert(TekstOrderLijn3) #dim ProductOrderLijn1 As DOM.VKP.impl.DataM.DataMProductOrderlijn = ..MaakProductLijn("101", OrderLijnID1) #dim ProductOrderLijn2 As DOM.VKP.impl.DataM.DataMProductOrderlijn = ..MaakProductLijn("102", OrderLijnID2) @@ -152,7 +152,7 @@ Do VerwachteGesorteerdeOrderLijnenLijst.Insert(..MaakGesorteerdeOrderlijn(ProductOrderLijn2, "104")) Do VerwachteGesorteerdeOrderLijnenLijst.Insert(..MaakGesorteerdeOrderlijn(TekstOrderLijn1, "105")) - Do ..AssertSorteringOrderLijst(OnGesorteerdeOrderLijnenLijst, VerwachteGesorteerdeOrderLijnenLijst, OnGesorteerdeTekstLijnen, OnGesorteerdeOrderLijnenTextLijnen) + Do ..AssertSorteringOrderLijst(OnGesorteerdeOrderLijnenLijst, VerwachteGesorteerdeOrderLijnenLijst, OnGesorteerdeTekstLijnen, OnGesorteerdeOrderLijnenTekstLijnen) ]]> @@ -169,9 +169,9 @@ #dim TekstOrderLijn2 As DOM.VKP.impl.DataM.DataMTekstOrderlijn = ..MaakTekstLijn("103", OrderLijnID2) #dim TekstOrderLijn3 As DOM.VKP.impl.DataM.DataMTekstOrderlijn = ..MaakTekstLijn("104", OrderLijnID1) - Set OnGesorteerdeOrderLijnenTextLijnen = ##class(%ListOfObjects).%New() - Do OnGesorteerdeOrderLijnenTextLijnen.Insert(TekstOrderLijn2) - Do OnGesorteerdeOrderLijnenTextLijnen.Insert(TekstOrderLijn3) + Set OnGesorteerdeOrderLijnenTekstLijnen = ##class(%ListOfObjects).%New() + Do OnGesorteerdeOrderLijnenTekstLijnen.Insert(TekstOrderLijn2) + Do OnGesorteerdeOrderLijnenTekstLijnen.Insert(TekstOrderLijn3) #dim ProductOrderLijn1 As DOM.VKP.impl.DataM.DataMProductOrderlijn = ..MaakProductLijn("101", OrderLijnID1) #dim ProductOrderLijn2 As DOM.VKP.impl.DataM.DataMProductOrderlijn = ..MaakProductLijn("102", OrderLijnID2) @@ -186,15 +186,15 @@ Do VerwachteGesorteerdeOrderLijnenLijst.Insert(..MaakGesorteerdeOrderlijn(ProductOrderLijn2, "104")) Do VerwachteGesorteerdeOrderLijnenLijst.Insert(..MaakGesorteerdeOrderlijn(TekstOrderLijn2, "105")) - Do ..AssertSorteringOrderLijst(OnGesorteerdeOrderLijnenLijst, VerwachteGesorteerdeOrderLijnenLijst, OnGesorteerdeTekstLijnen, OnGesorteerdeOrderLijnenTextLijnen) + Do ..AssertSorteringOrderLijst(OnGesorteerdeOrderLijnenLijst, VerwachteGesorteerdeOrderLijnenLijst, OnGesorteerdeTekstLijnen, OnGesorteerdeOrderLijnenTekstLijnen) ]]> -OnGesorteerdeOrderLijnenLijst:%ListOfObjects,VerwachteGesorteerdeOrderLijnenLijst:%ListOfObjects,OnGesorteerdeTextLijnen:%ListOfObjects,OnGesorteerdeOrderLijnenTextLijnen:%ListOfObjects +OnGesorteerdeOrderLijnenLijst:%ListOfObjects,VerwachteGesorteerdeOrderLijnenLijst:%ListOfObjects,OnGesorteerdeTekstLijnen:%ListOfObjects,OnGesorteerdeOrderLijnenTekstLijnen:%ListOfObjects 1 -OrderLijnen:%ListOfObjects,TextLijnen:%ListOfObjects,OrderLijnenTextLijnen:%ListOfObjects +OrderLijnen:%ListOfObjects,TekstLijnen:%ListOfObjects,OrderLijnenTekstLijnen:%ListOfObjects - -TextLijnen:%ListOfObjects + +TekstLijnen:%ListOfObjects 1 TECH.ListIterator Index: AXimpl/Dynamics/SalesOrderOut/Converter/OrderlijnConverteerder.cls.xml =================================================================== diff -u -r48186 -r48187 --- AXimpl/Dynamics/SalesOrderOut/Converter/OrderlijnConverteerder.cls.xml (.../OrderlijnConverteerder.cls.xml) (revision 48186) +++ AXimpl/Dynamics/SalesOrderOut/Converter/OrderlijnConverteerder.cls.xml (.../OrderlijnConverteerder.cls.xml) (revision 48187) @@ -92,9 +92,9 @@ Set AxOrderLine.TakePriceEDI = ..BepaalTakePriceEDI(ProductOrderlijn.GeefOrder().GeefOorsprong()) - Set AxOrderLine.InvoiceBody = ProductOrderlijn.GeefTextVoorAfdrukDocumentType(##class(DOM.VKP.enu.TekstAfdrukDocumentType).Faktuur()) - Set AxOrderLine.ConfirmBody = ProductOrderlijn.GeefTextVoorAfdrukDocumentType(##class(DOM.VKP.enu.TekstAfdrukDocumentType).OrderBevestiging()) - Set AxOrderLine.PackingSlipBody = ProductOrderlijn.GeefTextVoorAfdrukDocumentType(##class(DOM.VKP.enu.TekstAfdrukDocumentType).LeverBon()) + Set AxOrderLine.InvoiceBody = ProductOrderlijn.GeefTekstVoorAfdrukDocumentType(##class(DOM.VKP.enu.TekstAfdrukDocumentType).Faktuur()) + Set AxOrderLine.ConfirmBody = ProductOrderlijn.GeefTekstVoorAfdrukDocumentType(##class(DOM.VKP.enu.TekstAfdrukDocumentType).OrderBevestiging()) + Set AxOrderLine.PackingSlipBody = ProductOrderlijn.GeefTekstVoorAfdrukDocumentType(##class(DOM.VKP.enu.TekstAfdrukDocumentType).LeverBon()) if ..GeenKomLinkNaMigratie(ProductOrderlijn) { Set AxOrderLine.PackingSlipBody = "$#KOM#$" _ AxOrderLine.PackingSlipBody Index: vhTest/Mock/DOM/VKP/ProductOrderlijn.cls.xml =================================================================== diff -u -r48101 -r48187 --- vhTest/Mock/DOM/VKP/ProductOrderlijn.cls.xml (.../ProductOrderlijn.cls.xml) (revision 48101) +++ vhTest/Mock/DOM/VKP/ProductOrderlijn.cls.xml (.../ProductOrderlijn.cls.xml) (revision 48187) @@ -55,6 +55,12 @@ ]]> + +%Decimal + + + %String - + AfdrukDocumentType:DOM.VKP.enu.TekstAfdrukDocumentType %String - @@ -441,9 +447,9 @@ ]]> - + Tekst:%String,AfdrukDocumentType:DOM.VKP.enu.TekstAfdrukDocumentType - Index: AXimpl/Dynamics/SalesOrderIn/Converter/OrderlijnenSorteerder.cls.xml =================================================================== diff -u -r47360 -r48187 --- AXimpl/Dynamics/SalesOrderIn/Converter/OrderlijnenSorteerder.cls.xml (.../OrderlijnenSorteerder.cls.xml) (revision 47360) +++ AXimpl/Dynamics/SalesOrderIn/Converter/OrderlijnenSorteerder.cls.xml (.../OrderlijnenSorteerder.cls.xml) (revision 48187) @@ -71,7 +71,7 @@ Index: vhTest/Mock/DOM/VKP/Order.cls.xml =================================================================== diff -u -r47503 -r48187 --- vhTest/Mock/DOM/VKP/Order.cls.xml (.../Order.cls.xml) (revision 47503) +++ vhTest/Mock/DOM/VKP/Order.cls.xml (.../Order.cls.xml) (revision 48187) @@ -235,17 +235,17 @@ ]]> - + AfdrukDocumentType:DOM.VKP.enu.TekstAfdrukDocumentType %String - - + AfdrukDocumentType:DOM.VKP.enu.TekstAfdrukDocumentType="" %ListOfObjects - @@ -370,9 +370,9 @@ ]]> - + AfdrukDocumentType:DOM.VKP.enu.TekstAfdrukDocumentType,GekoppeldAanProductLijn:%String="" - @@ -502,9 +502,9 @@ ]]> - + Tekst:%String,AfdrukDocumentType:DOM.VKP.enu.TekstAfdrukDocumentType - Index: DOM/VKP/impl/DataM/DataMOrder.cls.xml =================================================================== diff -u -r47730 -r48187 --- DOM/VKP/impl/DataM/DataMOrder.cls.xml (.../DataMOrder.cls.xml) (revision 47730) +++ DOM/VKP/impl/DataM/DataMOrder.cls.xml (.../DataMOrder.cls.xml) (revision 48187) @@ -416,7 +416,7 @@ #dim OrderLijn As DOM.VKP.impl.DataM.DataMOrderlijn = ..ZoekOrderLijnViaAxInventTransId(AxInventTransId) #dim VolgNummer As %String = OrderLijn.GeefLijnVolgNr() - Do ..VerwijderTextVoorAfdrukDocumentType("", OrderLijn.GeefID()) + Do ..VerwijderTekstVoorAfdrukDocumentType("", OrderLijn.GeefID()) Do ..OrderLijnen.RemoveAt(VolgNummer) Do ..VerwijderdeOrderLijnen.Insert(VolgNummer) @@ -1061,12 +1061,12 @@ ]]> - + AfdrukDocumentType:DOM.VKP.enu.TekstAfdrukDocumentType %String - + AfdrukDocumentType:DOM.VKP.enu.TekstAfdrukDocumentType="" %ListOfObjects - + Tekst:%String="",AfdrukDocumentType:DOM.VKP.enu.TekstAfdrukDocumentType - + AfdrukDocumentType:DOM.VKP.enu.TekstAfdrukDocumentType,GekoppeldAanProductLijn:%String="" - + AfdrukDocumentType:DOM.VKP.enu.TekstAfdrukDocumentType %String - + AfdrukDocumentType:DOM.VKP.enu.TekstAfdrukDocumentType="" %ListOfObjects - + Tekst:%String="",AfdrukDocumentType:DOM.VKP.enu.TekstAfdrukDocumentType @@ -245,7 +245,7 @@ Do Order.ZetAfleveradres(..MaakLeverAdres(OrderHeader)) Do Order.ZetVerzendingWijze(..MaakVerzendingWijze(OrderHeader)) Do Order.ZetAxSalesId(OrderHeader.SalesId) - Do Order.ZetTextVoorAfdrukDocumentType(OrderHeader.ProductionBody, ##class(DOM.VKP.enu.TekstAfdrukDocumentType).Toelevering()) + Do Order.ZetTekstVoorAfdrukDocumentType(OrderHeader.ProductionBody, ##class(DOM.VKP.enu.TekstAfdrukDocumentType).Toelevering()) Do ..Logger.Debug("Aanmaken Order", "Hoofding op order gezet voor Order " _Order.GeefID()) ]]> Index: vhTest/Fake/AXimpl/Dynamics/SalesOrderIn/Converter/OrderlijnenSorteerder.cls.xml =================================================================== diff -u -r47334 -r48187 --- vhTest/Fake/AXimpl/Dynamics/SalesOrderIn/Converter/OrderlijnenSorteerder.cls.xml (.../OrderlijnenSorteerder.cls.xml) (revision 47334) +++ vhTest/Fake/AXimpl/Dynamics/SalesOrderIn/Converter/OrderlijnenSorteerder.cls.xml (.../OrderlijnenSorteerder.cls.xml) (revision 48187) @@ -9,8 +9,7 @@ Order:DOM.VKP.impl.DataM.DataMOrder - +