Index: vhUnitTest/AXimpl/Dynamics/SalesOrderIn/Converter/SalesOrderConverter/Convert/Base.cls.xml
===================================================================
diff -u -r50662 -r52732
--- vhUnitTest/AXimpl/Dynamics/SalesOrderIn/Converter/SalesOrderConverter/Convert/Base.cls.xml (.../Base.cls.xml) (revision 50662)
+++ vhUnitTest/AXimpl/Dynamics/SalesOrderIn/Converter/SalesOrderConverter/Convert/Base.cls.xml (.../Base.cls.xml) (revision 52732)
@@ -70,7 +70,8 @@
Do OrderMock.IndienMethodCall("ZetTekstVoorAfdrukDocumentType", $$$ElkeWaarde, $$$ElkeWaarde).DanDoeNiks()
Do OrderMock.IndienMethodCall("HerlaadLijnen").DanDoeNiks()
Do OrderMock.IndienMethodCall("GeefTypeOrderLijnIterator", $$$ElkeWaarde).DanReturn(..GeefDummyIterator($$$True))
-
+ Do OrderMock.IndienMethodCall("GeefAxSalesId").DanReturn("VO1600010000")
+
Quit OrderMock
]]>
Index: vhUnitTest/AXimpl/Dynamics/SalesOrderIn/Converter/SalesOrderConverter/Convert/TestVerwijderOrderLijn.cls.xml
===================================================================
diff -u -r48269 -r52732
--- vhUnitTest/AXimpl/Dynamics/SalesOrderIn/Converter/SalesOrderConverter/Convert/TestVerwijderOrderLijn.cls.xml (.../TestVerwijderOrderLijn.cls.xml) (revision 48269)
+++ vhUnitTest/AXimpl/Dynamics/SalesOrderIn/Converter/SalesOrderConverter/Convert/TestVerwijderOrderLijn.cls.xml (.../TestVerwijderOrderLijn.cls.xml) (revision 52732)
@@ -29,6 +29,7 @@
Do OrderMock.VerwachtMethodCall("BestaatOrderLijnViaAxInventTransId", "000019541").ExactAantalKeer(1).DanReturn($$$True)
Do OrderMock.VerwachtMethodCall("VerwijderOrderLijnViaAxInventTransId", "000019541").ExactAantalKeer(1).DanDoeNiks()
+ Do OrderMock.VerwachtMethodCall("GeefAxSalesId").DanReturn("VO1600010000")
Set SalesOrderConverter = ##class(AXimpl.Dynamics.SalesOrderIn.Converter.SalesOrderConverter).%New(..GeefOrderApi(OrderMock) ,,,,..GeefDocumentReferentie(), ..GeefOrderLijnenSorteerder(),, ..GeefToeleveringService(), ,,..GeefSalesOrderLineStatusRepository())
Do SalesOrderConverter.Convert(StandaardOrder)
Index: vhUnitTest/AXimpl/Dynamics/SalesOrderIn/Converter/SalesOrderConverter/Convert/TestUpdate.cls.xml
===================================================================
diff -u -r50024 -r52732
--- vhUnitTest/AXimpl/Dynamics/SalesOrderIn/Converter/SalesOrderConverter/Convert/TestUpdate.cls.xml (.../TestUpdate.cls.xml) (revision 50024)
+++ vhUnitTest/AXimpl/Dynamics/SalesOrderIn/Converter/SalesOrderConverter/Convert/TestUpdate.cls.xml (.../TestUpdate.cls.xml) (revision 52732)
@@ -25,6 +25,7 @@
Do OrderMock.VerwachtMethodCall("ZetAxSalesId", "VO1600010000").ExactAantalKeer(1)
Do OrderMock.VerwachtMethodCall("ZetTekstVoorAfdrukDocumentType", "PackingSlipBody", ##class(DOM.VKP.enu.TekstAfdrukDocumentType).LeverBon()).DanDoeNiks()
Do OrderMock.VerwachtMethodCall("HerlaadLijnen").ExactAantalKeer(3).DanDoeNiks()
+ Do OrderMock.VerwachtMethodCall("GeefAxSalesId").DanReturn("VO1600010000")
Do OrderMock.IndienMethodCall("GeefTypeOrderLijnIterator", $$$ElkeWaarde).DanReturn(..GeefDummyIterator($$$False))
Do OrderMock.IndienMethodCall("GeefID").DanReturn("DummyOrderID")
@@ -77,6 +78,7 @@
Do OrderMock.VerwachtMethodCall("BestaatOrderLijnViaAxInventTransId","000019541").DanReturn($$$True)
Do OrderMock.VerwachtMethodCall("GeefOrderLijnViaAxInventTransId","000019541").DanReturn(ProductOrderlijnMock)
+ Do OrderMock.VerwachtMethodCall("GeefAxSalesId").DanReturn("VO1600010000")
#dim ToeleveringServiceMock As vhTest.Mock.AXimpl.Dynamics.SalesOrderIn.Converter.ToeleveringService = ##class(vhTest.Mock.AXimpl.Dynamics.SalesOrderIn.Converter.ToeleveringService).%New()
Do ToeleveringServiceMock.VerwachtMethodCall("VerwijderToeleveringenViaOrder" , OrderMock).ExactAantalKeer(1).DanDoeNiks()
@@ -115,6 +117,7 @@
Do OrderMock.VerwachtMethodCall("BestaatOrderLijnViaAxInventTransId","000019541").DanReturn($$$True)
Do OrderMock.VerwachtMethodCall("GeefOrderLijnViaAxInventTransId","000019541").DanReturn(ProductOrderlijnMock)
Do OrderMock.VerwachtMethodCall("GeefKlantID").DanReturn(##class(DOM.VKP.enu.Klant).SFS())
+ Do OrderMock.VerwachtMethodCall("GeefAxSalesId").DanReturn("VO1600010000")
#dim ToeleveringServiceMock As vhTest.Mock.AXimpl.Dynamics.SalesOrderIn.Converter.ToeleveringService = ##class(vhTest.Mock.AXimpl.Dynamics.SalesOrderIn.Converter.ToeleveringService).%New()
@@ -139,6 +142,7 @@
Do OrderMock.VerwachtMethodCall("BestaatOrderLijnViaAxInventTransId", $$$ElkeWaarde).ExactAantalKeer(0)
Do OrderMock.VerwachtMethodCall("GeefOrderLijnViaAxInventTransId", $$$ElkeWaarde).ExactAantalKeer(0)
Do OrderMock.VerwachtMethodCall("VerwijderOrderLijnViaAxInventTransId", $$$ElkeWaarde).ExactAantalKeer(0)
+ Do OrderMock.VerwachtMethodCall("GeefAxSalesId").DanReturn("VO1600010000")
Set SalesOrderLineStatusRepositoryMock = ##class(vhTest.Mock.AXdata.Dynamics.SalesLineStatus.SalesOrderLineStatusRepository).%New()
Do SalesOrderLineStatusRepositoryMock.VerwachtMethodCall("IsVrijVoorUpdateViaAxInventTransId", "000019541").DanReturn($$$False)
@@ -167,6 +171,7 @@
Do OrderMock.VerwachtMethodCall("BestaatOrderLijnViaAxInventTransId", $$$ElkeWaarde).ExactAantalKeer(0)
Do OrderMock.VerwachtMethodCall("GeefOrderLijnViaAxInventTransId", $$$ElkeWaarde).ExactAantalKeer(0)
Do OrderMock.VerwachtMethodCall("VerwijderOrderLijnViaAxInventTransId", $$$ElkeWaarde).ExactAantalKeer(0)
+ Do OrderMock.VerwachtMethodCall("GeefAxSalesId").DanReturn("VO1600010000")
Set SalesOrderConverter = ##class(AXimpl.Dynamics.SalesOrderIn.Converter.SalesOrderConverter).%New(..GeefOrderApi(OrderMock),,,,..GeefDocumentReferentie(), ..GeefOrderLijnenSorteerder(), ,..GeefToeleveringService())
Do SalesOrderConverter.Convert(StandaardOrder)
@@ -186,6 +191,7 @@
Do OrderMock.VerwachtMethodCall("BestaatOrderLijnViaAxInventTransId", $$$ElkeWaarde).ExactAantalKeer(0)
Do OrderMock.VerwachtMethodCall("GeefOrderLijnViaAxInventTransId", $$$ElkeWaarde).ExactAantalKeer(0)
Do OrderMock.VerwachtMethodCall("VerwijderOrderLijnViaAxInventTransId", $$$ElkeWaarde).ExactAantalKeer(0)
+ Do OrderMock.VerwachtMethodCall("GeefAxSalesId").DanReturn("VO1600010000")
Set SalesOrderConverter = ##class(AXimpl.Dynamics.SalesOrderIn.Converter.SalesOrderConverter).%New(..GeefOrderApi(OrderMock),,,,..GeefDocumentReferentie(), ..GeefOrderLijnenSorteerder(), ,..GeefToeleveringService())
Do SalesOrderConverter.Convert(StandaardOrder)
Index: AXimpl/Dynamics/SalesOrderIn/Converter/SalesOrderConverter.cls.xml
===================================================================
diff -u -r51851 -r52732
--- AXimpl/Dynamics/SalesOrderIn/Converter/SalesOrderConverter.cls.xml (.../SalesOrderConverter.cls.xml) (revision 51851)
+++ AXimpl/Dynamics/SalesOrderIn/Converter/SalesOrderConverter.cls.xml (.../SalesOrderConverter.cls.xml) (revision 52732)
@@ -440,6 +440,9 @@
If ..UpdateBestaandOrder {
Do ..Logger.Debug("SalesOrderIn - Update bestaand order", "Bestaand order met OrderID '" _..OrderID _"' wordt geupdatet." )
#dim Order As DOM.VKP.Order = ..OrderAPI.GeefOrder(..OrderID)
+
+ Do ..ValideerSalesId(OrderHeader.SalesId, Order.GeefAxSalesId())
+
Do Order.HerlaadLijnen()
Do ..Logger.Debug("SalesOrderIn - Toeleveringen verwijderen", "Toeleveringen voor order met OrderID '" _..OrderID _"' worden verwijderd." )
@@ -557,6 +560,17 @@
]]>
+
+InkomendSalesId:%String,OrderSalesId:%String
+1
+
+
+
OrderID:%Integer
1
Index: vhUnitTest/AXimpl/Dynamics/SalesOrderIn/Converter/SalesOrderConverter/Convert/Test.cls.xml
===================================================================
diff -u -r50038 -r52732
--- vhUnitTest/AXimpl/Dynamics/SalesOrderIn/Converter/SalesOrderConverter/Convert/Test.cls.xml (.../Test.cls.xml) (revision 50038)
+++ vhUnitTest/AXimpl/Dynamics/SalesOrderIn/Converter/SalesOrderConverter/Convert/Test.cls.xml (.../Test.cls.xml) (revision 52732)
@@ -95,6 +95,7 @@
Do OrderMock.VerwachtMethodCall("BestaatOrderLijnViaAxInventTransId","000019541").DanReturn($$$False)
Do OrderMock.VerwachtMethodCall("GeefKlantID").DanReturn("DummyKlantID")
+ Do OrderMock.VerwachtMethodCall("GeefAxSalesId").DanReturn("VO1600010000")
#dim ProductOrderlijnMock As vhTest.Mock.DOM.VKP.impl.DataM.DataMProductOrderlijn = ##class(vhTest.Utils.DOM.VKP.ProductOrderlijn).StandaardProductLijn()
Do ProductOrderlijnMock.VerwachtMethodCall("ZetAxInventTransId",StandaardOrder.Body.MessageParts.ADUMsgSalesOrderOutQuery.OrderHeader.GetAt(1).OrderLine.GetAt(1).InventTransId).DanDoeNiks()
@@ -135,6 +136,7 @@
Do OrderMock.VerwachtMethodCall("BestaatOrderLijnViaAxInventTransId","000019541").DanReturn($$$False)
Do OrderMock.VerwachtMethodCall("GeefKlantID").DanReturn("DummyKlantID")
+ Do OrderMock.VerwachtMethodCall("GeefAxSalesId").DanReturn("VO1600010000")
#dim ProductOrderlijnMock As vhTest.Mock.DOM.VKP.impl.DataM.DataMProductOrderlijn = ##class(vhTest.Utils.DOM.VKP.ProductOrderlijn).StandaardProductLijn()
Do ProductOrderlijnMock.IndienMethodCall("ZetAxInventTransId",StandaardOrder.Body.MessageParts.ADUMsgSalesOrderOutQuery.OrderHeader.GetAt(1).OrderLine.GetAt(1).InventTransId).DanDoeNiks()
@@ -175,6 +177,7 @@
Do OrderMock.VerwachtMethodCall("BestaatOrderLijnViaAxInventTransId","000019541").DanReturn($$$False)
Do OrderMock.VerwachtMethodCall("GeefKlantID").DanReturn("DummyKlantID")
+ Do OrderMock.VerwachtMethodCall("GeefAxSalesId").DanReturn("VO1600010000")
#dim ProductOrderlijnMock As vhTest.Mock.DOM.VKP.impl.DataM.DataMProductOrderlijn = ##class(vhTest.Utils.DOM.VKP.ProductOrderlijn).StandaardProductLijn()
Do ProductOrderlijnMock.VerwachtMethodCall("ZetAxInventTransId",StandaardOrder.Body.MessageParts.ADUMsgSalesOrderOutQuery.OrderHeader.GetAt(1).OrderLine.GetAt(1).InventTransId).DanDoeNiks()
@@ -220,6 +223,7 @@
Do OrderMock.VerwachtMethodCall("BestaatOrderLijnViaAxInventTransId","000019541").DanReturn($$$False)
Do OrderMock.VerwachtMethodCall("GeefKlantID").DanReturn(##class(DOM.VKP.enu.Klant).NewSobelwood())
+ Do OrderMock.VerwachtMethodCall("GeefAxSalesId").DanReturn("VO1600010000")
#dim ProductOrderlijnMock As vhTest.Mock.DOM.VKP.impl.DataM.DataMProductOrderlijn = ##class(vhTest.Utils.DOM.VKP.ProductOrderlijn).StandaardProductLijn()
Do ProductOrderlijnMock.VerwachtMethodCall("ZetAxInventTransId",StandaardOrder.Body.MessageParts.ADUMsgSalesOrderOutQuery.OrderHeader.GetAt(1).OrderLine.GetAt(1).InventTransId).DanDoeNiks()
@@ -269,6 +273,7 @@
Do OrderMock.VerwachtMethodCall("BestaatOrderLijnViaAxInventTransId","000019541").DanReturn($$$False)
Do OrderMock.VerwachtMethodCall("GeefKlantID").DanReturn("DummyKlantID")
+ Do OrderMock.VerwachtMethodCall("GeefAxSalesId").DanReturn("VO1600010000")
#dim ProductOrderlijnMock As vhTest.Mock.DOM.VKP.impl.DataM.DataMProductOrderlijn = ##class(vhTest.Utils.DOM.VKP.ProductOrderlijn).StandaardProductLijn()
Do ProductOrderlijnMock.VerwachtMethodCall("ZetAxInventTransId",StandaardOrder.Body.MessageParts.ADUMsgSalesOrderOutQuery.OrderHeader.GetAt(1).OrderLine.GetAt(1).InventTransId).DanDoeNiks()