Index: vhUnitTest/AXimpl/Dynamics/SalesOrderOut/Converter/OrderHoofdingConverteerder/Test.cls.xml
===================================================================
diff -u -r43134 -r43139
--- vhUnitTest/AXimpl/Dynamics/SalesOrderOut/Converter/OrderHoofdingConverteerder/Test.cls.xml (.../Test.cls.xml) (revision 43134)
+++ vhUnitTest/AXimpl/Dynamics/SalesOrderOut/Converter/OrderHoofdingConverteerder/Test.cls.xml (.../Test.cls.xml) (revision 43139)
@@ -9,7 +9,7 @@
Set OrderHoofdingConverteerder = ##class(AXimpl.Dynamics.SalesOrderOut.Converter.OrderHoofdingConverteerder).%New()
- #dim OrderHeader as AXif.Dynamics.SalesOrderOut.MessageParts.AxdEntityOrderHeader = OrderHoofdingConverteerder.Converteer(Order)
+ #dim OrderHeader as AXif.Dynamics.SalesOrderOut.MessageParts.AxdEntityOrderHeader = OrderHoofdingConverteerder.Converteer(Order,"MessageId")
do $$$AssertEquals(OrderHeader.ConfirmBody,"CommissieReferentie")
do $$$AssertEquals(OrderHeader.CurrencyCode,"EUR")
@@ -19,6 +19,7 @@
do $$$AssertEquals(OrderHeader.ReceiptDateRequested,"")
do $$$AssertEquals(OrderHeader.SalesIdAX,"AXSalesId")
do $$$AssertEquals(OrderHeader.class,"entity")
+ do $$$AssertEquals(OrderHeader.MessageId,"MessageId")
]]>
Index: vhTest/Mock/AXimpl/Dynamics/SalesOrderOut/Converter/OrderHoofdingConverteerder.cls.xml
===================================================================
diff -u -r42905 -r43139
--- vhTest/Mock/AXimpl/Dynamics/SalesOrderOut/Converter/OrderHoofdingConverteerder.cls.xml (.../OrderHoofdingConverteerder.cls.xml) (revision 42905)
+++ vhTest/Mock/AXimpl/Dynamics/SalesOrderOut/Converter/OrderHoofdingConverteerder.cls.xml (.../OrderHoofdingConverteerder.cls.xml) (revision 43139)
@@ -9,9 +9,9 @@
right
-Order:DOM.VKP.Order
+Order:DOM.VKP.Order,MessageId:%String
AXif.Dynamics.SalesOrderOut.MessageParts.AxdEntityOrderHeader
-
Index: AXimpl/Dynamics/SalesOrderOut/Converter/SalesOrderConverter.cls.xml
===================================================================
diff -u -r43138 -r43139
--- AXimpl/Dynamics/SalesOrderOut/Converter/SalesOrderConverter.cls.xml (.../SalesOrderConverter.cls.xml) (revision 43138)
+++ AXimpl/Dynamics/SalesOrderOut/Converter/SalesOrderConverter.cls.xml (.../SalesOrderConverter.cls.xml) (revision 43139)
@@ -39,7 +39,7 @@
#dim Order as DOM.VKP.Order = ..OrderAPI.GeefOrder(Command.SubjectId)
Set MessageParts = ##class(AXif.Dynamics.SalesOrderOut.MessageParts).%New()
- Do MessageParts.MessagePart.OrderHeader.SetAt(..OrderHoofdingConverteerder.Converteer(Order),1)
+ Do MessageParts.MessagePart.OrderHeader.SetAt(..OrderHoofdingConverteerder.Converteer(Order,MessageId),1)
#dim it as TECH.Iterator = Order.GeefOrderLijnIterator()
While it.HasNext() {
Index: AXimpl/Dynamics/SalesOrderOut/Converter/OrderHoofdingConverteerder.cls.xml
===================================================================
diff -u -r42980 -r43139
--- AXimpl/Dynamics/SalesOrderOut/Converter/OrderHoofdingConverteerder.cls.xml (.../OrderHoofdingConverteerder.cls.xml) (revision 42980)
+++ AXimpl/Dynamics/SalesOrderOut/Converter/OrderHoofdingConverteerder.cls.xml (.../OrderHoofdingConverteerder.cls.xml) (revision 43139)
@@ -4,7 +4,7 @@
TECH.Mockable
-Order:DOM.VKP.Order
+Order:DOM.VKP.Order,MessageId:%String
AXif.Dynamics.SalesOrderOut.MessageParts.AxdEntityOrderHeader
Index: vhUnitTest/AXimpl/Dynamics/SalesOrderOut/Converter/SalesOrderConverter/Test.cls.xml
===================================================================
diff -u -r42930 -r43139
--- vhUnitTest/AXimpl/Dynamics/SalesOrderOut/Converter/SalesOrderConverter/Test.cls.xml (.../Test.cls.xml) (revision 42930)
+++ vhUnitTest/AXimpl/Dynamics/SalesOrderOut/Converter/SalesOrderConverter/Test.cls.xml (.../Test.cls.xml) (revision 43139)
@@ -11,11 +11,11 @@
Do OrderAPI.VerwachtMethodCall("GeefOrder",1000).DanReturn(Order)
Set OrderHoofdingConverteerderMock = ##class(vhTest.Mock.AXimpl.Dynamics.SalesOrderOut.Converter.OrderHoofdingConverteerder).%New()
- Do OrderHoofdingConverteerderMock.VerwachtMethodCall("Converteer",Order).DanDoeNiks()
+ Do OrderHoofdingConverteerderMock.VerwachtMethodCall("Converteer",Order,"MessageId").DanDoeNiks()
Set SalesOrderConvertor = ##class(AXimpl.Dynamics.SalesOrderOut.Converter.SalesOrderConverter).%New(OrderAPI,OrderHoofdingConverteerderMock)
- #dim Messageparts as AXif.Dynamics.SalesOrderOut.MessageParts = SalesOrderConvertor.Convert(..GeefRequest())
+ #dim Messageparts as AXif.Dynamics.SalesOrderOut.MessageParts = SalesOrderConvertor.Convert(..GeefRequest(),"MessageId")
Do OrderAPI.Verifieer()
Do OrderHoofdingConverteerderMock.Verifieer()
@@ -34,14 +34,14 @@
Do OrderAPI.VerwachtMethodCall("GeefOrder",1000).DanReturn(Order)
Set OrderHoofdingConverteerderMock = ##class(vhTest.Mock.AXimpl.Dynamics.SalesOrderOut.Converter.OrderHoofdingConverteerder).%New()
- Do OrderHoofdingConverteerderMock.VerwachtMethodCall("Converteer",Order).DanDoeNiks()
+ Do OrderHoofdingConverteerderMock.VerwachtMethodCall("Converteer",Order,"MessageId").DanDoeNiks()
Set OrderlijnConverteerderMock = ##class(vhTest.Mock.AXimpl.Dynamics.SalesOrderOut.Converter.OrderlijnConverteerder).%New()
Do OrderlijnConverteerderMock.VerwachtMethodCall("Converteer",Orderlijn).DanDoeNiks()
Set SalesOrderConvertor = ##class(AXimpl.Dynamics.SalesOrderOut.Converter.SalesOrderConverter).%New(OrderAPI,OrderHoofdingConverteerderMock,OrderlijnConverteerderMock)
- #dim Messageparts as AXif.Dynamics.SalesOrderOut.MessageParts = SalesOrderConvertor.Convert(..GeefRequest())
+ #dim Messageparts as AXif.Dynamics.SalesOrderOut.MessageParts = SalesOrderConvertor.Convert(..GeefRequest(),"MessageId")
Do OrderAPI.Verifieer()
Do OrderHoofdingConverteerderMock.Verifieer()