Index: vhUnitTest/APPS/TRANSP/TransportService/GeefLeveringInfo/Rembours/Test.cls.xml
===================================================================
diff -u -r66251 -r72255
--- vhUnitTest/APPS/TRANSP/TransportService/GeefLeveringInfo/Rembours/Test.cls.xml (.../Test.cls.xml) (revision 66251)
+++ vhUnitTest/APPS/TRANSP/TransportService/GeefLeveringInfo/Rembours/Test.cls.xml (.../Test.cls.xml) (revision 72255)
@@ -33,6 +33,7 @@
Set BonMock = ##class(vhTest.Mock.DOM.VKP.Bon).%New()
Do BonMock.IndienMethodCall("GeefLeveringsDatum").DanReturn($h)
Do BonMock.IndienMethodCall("GeefVerzendwijze").DanReturn("DI1")
+ Do BonMock.IndienMethodCall("GeefEmailAddressTrackTrace").DanReturn("test@test.com")
Set ..OrderAPIMock = ##Class("vhTest.Mock.DOM.VKP.OrderAPI").MockInstance()
Do ..OrderAPIMock.IndienMethodCall("BestaatBon",$$$ElkeWaarde).DanReturn(BonMock)
Do ..OrderAPIMock.IndienMethodCall("GeefBon",$$$ElkeWaarde).DanReturn(BonMock)
Index: vhTest/Mock/DOM/VKP/Bon.cls.xml
===================================================================
diff -u -r61690 -r72255
--- vhTest/Mock/DOM/VKP/Bon.cls.xml (.../Bon.cls.xml) (revision 61690)
+++ vhTest/Mock/DOM/VKP/Bon.cls.xml (.../Bon.cls.xml) (revision 72255)
@@ -70,6 +70,12 @@
]]>
+
+%String
+
+
+
%String
+
+EmailAddressTrackTrace:%String
+
+
+
EmailAdresBesteller:%String
%String
1
+
+
+%String
+
Index: vhUnitTest/APPS/TRANSP/TransportService/GeefLeveringInfo/VerpakkingEenheden/Test.cls.xml
===================================================================
diff -u -r69226 -r72255
--- vhUnitTest/APPS/TRANSP/TransportService/GeefLeveringInfo/VerpakkingEenheden/Test.cls.xml (.../Test.cls.xml) (revision 69226)
+++ vhUnitTest/APPS/TRANSP/TransportService/GeefLeveringInfo/VerpakkingEenheden/Test.cls.xml (.../Test.cls.xml) (revision 72255)
@@ -242,6 +242,7 @@
Set BonMock = ##class(vhTest.Mock.DOM.VKP.Bon).%New()
Do BonMock.IndienMethodCall("GeefLeveringsDatum").DanReturn($h)
Do BonMock.IndienMethodCall("GeefVerzendwijze").DanReturn("DI1")
+ Do BonMock.IndienMethodCall("GeefEmailAddressTrackTrace").DanReturn("test@test.com")
#dim OrderAPIMock as DOM.VKP.OrderAPI = ##class(DOM.DomeinContext).Instance().GeefOrderAPI()
Do OrderAPIMock.IndienMethodCall("BestaatBon",$$$ElkeWaarde).DanReturn(BonMock)
Do OrderAPIMock.IndienMethodCall("GeefBon",$$$ElkeWaarde).DanReturn(BonMock)
Index: AXimpl/Dynamics/SalesOrderIn/Converter/SalesOrderConverter.cls.xml
===================================================================
diff -u -r68943 -r72255
--- AXimpl/Dynamics/SalesOrderIn/Converter/SalesOrderConverter.cls.xml (.../SalesOrderConverter.cls.xml) (revision 68943)
+++ AXimpl/Dynamics/SalesOrderIn/Converter/SalesOrderConverter.cls.xml (.../SalesOrderConverter.cls.xml) (revision 72255)
@@ -548,7 +548,7 @@
#dim SkipVerzendwijzeUpdatesFromTo As TECH.KeyValue.List = ##class(TECH.KeyValue.List).CreateKeyValueListFromListbuild( $LB("DD1","DI1"), $LB("DD1","GL4") )
Do Order.ZetVerzendingWijze(..MaakVerzendingWijze(OrderHeader), SkipVerzendwijzeUpdatesFromTo)
Do Order.ZetAxSalesId(OrderHeader.SalesId)
-
+ Do Order.ZetEmailAddressTrackTrace(OrderHeader.MailAddressTrackTrace)
#dim PackingSlipBody As %String = $Replace(OrderHeader.PackingSlipBody,$char(13),"")
#dim ProductieAansturingTekst As %String = $Replace(OrderHeader.ProdCmdBody,$char(13),"")
Index: vhUnitTest/APPS/TRANSP/Transsmart/impl/RequestDataBouwer/Test.cls.xml
===================================================================
diff -u -r71270 -r72255
--- vhUnitTest/APPS/TRANSP/Transsmart/impl/RequestDataBouwer/Test.cls.xml (.../Test.cls.xml) (revision 71270)
+++ vhUnitTest/APPS/TRANSP/Transsmart/impl/RequestDataBouwer/Test.cls.xml (.../Test.cls.xml) (revision 72255)
@@ -73,6 +73,7 @@
1
%String
+
+
+1
+%String
+
Index: DOM/VKP/impl/DataM/DataMBonAbstract.cls.xml
===================================================================
diff -u -r65150 -r72255
--- DOM/VKP/impl/DataM/DataMBonAbstract.cls.xml (.../DataMBonAbstract.cls.xml) (revision 65150)
+++ DOM/VKP/impl/DataM/DataMBonAbstract.cls.xml (.../DataMBonAbstract.cls.xml) (revision 72255)
@@ -489,6 +489,12 @@
+
+
+%String
+
+
Index: APPS/TRANSP/Transsmart/impl/RequestDataBouwer.cls.xml
===================================================================
diff -u -r71774 -r72255
--- APPS/TRANSP/Transsmart/impl/RequestDataBouwer.cls.xml (.../RequestDataBouwer.cls.xml) (revision 71774)
+++ APPS/TRANSP/Transsmart/impl/RequestDataBouwer.cls.xml (.../RequestDataBouwer.cls.xml) (revision 72255)
@@ -397,6 +397,8 @@
Set Bestemmeling.countryCode = ..BeperkLengteTot(LeveringInfo.LeverAdres.LandCode,3)
Set Bestemmeling.telNo = ..BepaalBestemmelingTelefoon(LeveringInfo,Rit)
Set Bestemmeling.state = ..BeperkLengteTot(LeveringInfo.LeverAdres.Provincie,16)
+ Set Bestemmeling.email = LeveringInfo.EmailAddressTrackTrace
+
Quit Bestemmeling
]]>
Index: DOM/VKP/Order.cls.xml
===================================================================
diff -u -r58776 -r72255
--- DOM/VKP/Order.cls.xml (.../Order.cls.xml) (revision 58776)
+++ DOM/VKP/Order.cls.xml (.../Order.cls.xml) (revision 72255)
@@ -564,6 +564,15 @@
1
%String
+
+
+1
+EmailAddressTrackTrace:%String
+
+
+
+%String
+
Index: AXif/Dynamics/SalesOrderIn/MessageParts/AxdExtTypeVHTrackTraceMailAddress.cls.xml
===================================================================
diff -u
--- AXif/Dynamics/SalesOrderIn/MessageParts/AxdExtTypeVHTrackTraceMailAddress.cls.xml (revision 0)
+++ AXif/Dynamics/SalesOrderIn/MessageParts/AxdExtTypeVHTrackTraceMailAddress.cls.xml (revision 72255)
@@ -0,0 +1,27 @@
+
+
+
+datatype
+
+1
+%String
+
+
+1
+
+
+
+200
+
+
+
+0
+
+
+
+http://schemas.microsoft.com/dynamics/2008/01/sharedtypes
+
+
+
+
+
Index: vhUnitTest/AXimpl/Dynamics/SalesOrderIn/Converter/SalesOrderConverter/Convert/TestVerzendwijze.cls.xml
===================================================================
diff -u -r56863 -r72255
--- vhUnitTest/AXimpl/Dynamics/SalesOrderIn/Converter/SalesOrderConverter/Convert/TestVerzendwijze.cls.xml (.../TestVerzendwijze.cls.xml) (revision 56863)
+++ vhUnitTest/AXimpl/Dynamics/SalesOrderIn/Converter/SalesOrderConverter/Convert/TestVerzendwijze.cls.xml (.../TestVerzendwijze.cls.xml) (revision 72255)
@@ -85,6 +85,7 @@
Do OrderMock.IndienMethodCall("GeefID").DanReturn("DummyOrderID")
Do OrderMock.VerwachtMethodCall("ZetAfleveradres", $$$ElkeWaarde).DanDoeNiks()
+ Do OrderMock.VerwachtMethodCall("ZetEmailAddressTrackTrace", $$$ElkeWaarde).DanDoeNiks()
Quit OrderMock
]]>
Index: vhUnitTest/AXimpl/Dynamics/SalesOrderIn/Converter/SalesOrderConverter/Convert/Base.cls.xml
===================================================================
diff -u -r56863 -r72255
--- vhUnitTest/AXimpl/Dynamics/SalesOrderIn/Converter/SalesOrderConverter/Convert/Base.cls.xml (.../Base.cls.xml) (revision 56863)
+++ vhUnitTest/AXimpl/Dynamics/SalesOrderIn/Converter/SalesOrderConverter/Convert/Base.cls.xml (.../Base.cls.xml) (revision 72255)
@@ -81,6 +81,8 @@
Do OrderMock.IndienMethodCall("ZetTekstVoorAfdrukDocumentType", $$$ElkeWaarde, $$$ElkeWaarde).DanDoeNiks()
Do OrderMock.IndienMethodCall("HerlaadLijnen").DanDoeNiks()
Do OrderMock.IndienMethodCall("GeefAxSalesId").DanReturn("VO1600010000")
+ Do OrderMock.IndienMethodCall("GeefEmailAddressTrackTrace").DanReturn("")
+ Do OrderMock.IndienMethodCall("ZetEmailAddressTrackTrace", $$$ElkeWaarde).DanDoeNiks()
Quit OrderMock
]]>
Index: DOM/VKP/impl/DataM/DataMOrder.cls.xml
===================================================================
diff -u -r69713 -r72255
--- DOM/VKP/impl/DataM/DataMOrder.cls.xml (.../DataMOrder.cls.xml) (revision 69713)
+++ DOM/VKP/impl/DataM/DataMOrder.cls.xml (.../DataMOrder.cls.xml) (revision 72255)
@@ -1333,6 +1333,20 @@
]]>
+
+%String
+
+
+
+
+EmailAddressTrackTrace:%String
+
+
+
%Library.CacheStorage
^DOM.VKP.impl.DataM.DataMOrderD
Index: AXif/Dynamics/SalesOrderIn/MessageParts/AxdEntityOrderHeader.cls.xml
===================================================================
diff -u -r66973 -r72255
--- AXif/Dynamics/SalesOrderIn/MessageParts/AxdEntityOrderHeader.cls.xml (.../AxdEntityOrderHeader.cls.xml) (revision 66973)
+++ AXif/Dynamics/SalesOrderIn/MessageParts/AxdEntityOrderHeader.cls.xml (.../AxdEntityOrderHeader.cls.xml) (revision 72255)
@@ -243,6 +243,11 @@
+
+AXif.Dynamics.SalesOrderIn.MessageParts.AxdExtTypeVHTrackTraceMailAddress
+
+
+
%Library.CacheSerialState
AxdEntityOrderHeaderState
@@ -371,6 +376,9 @@
DlvAddrStateName
+
+MailAddressTrackTrace
+
Index: vhUnitTest/APPS/TRANSP/TransportService/GeefLeveringInfo/BasisGegevens/Test.cls.xml
===================================================================
diff -u -r69971 -r72255
--- vhUnitTest/APPS/TRANSP/TransportService/GeefLeveringInfo/BasisGegevens/Test.cls.xml (.../Test.cls.xml) (revision 69971)
+++ vhUnitTest/APPS/TRANSP/TransportService/GeefLeveringInfo/BasisGegevens/Test.cls.xml (.../Test.cls.xml) (revision 72255)
@@ -38,6 +38,7 @@
Do ..ProjectSettingsAPI.IndienMethodCall("IsTranssmartActive").DanReturn($$$False)
Set BonMock = ##class(vhTest.Mock.DOM.VKP.Bon).%New()
Do BonMock.IndienMethodCall("GeefLeveringsDatum").DanReturn($h)
+ Do BonMock.IndienMethodCall("GeefEmailAddressTrackTrace").DanReturn("")
Do ..OrderAPIMock.IndienMethodCall("GeefBon",$$$ElkeWaarde).DanReturn(BonMock)
]]>
@@ -75,7 +76,6 @@
do LeveringStub.IndienMethodCall("GeefAantalLanggoed").DanReturn("0")
do LeveringStub.IndienMethodCall("GeefBedragRembours").DanReturn("0")
do LeveringStub.IndienMethodCall("GeefBonIterator").DanReturn(##class(TECH.ListIterator).%New(##class(%ListOfObjects).%New()))
-
set RitStub = ##class(vhUnitTest.APPS.TRANSP.TransportService.GeefLeveringInfo.RitMock).%New()
do RitStub.IndienMethodCall("GeefVoorzieneOphaalTimeStamp").DanReturn($$$VoorzieneOphaalTimeStamp)
Index: vhTestFiles/UnitTests/APPS.TRANSP.Transsmart.impl.RequestDataBouwer/Test/TestdoBookingSchenker/doBookingRequestSchenker.xml
===================================================================
diff -u -r71196 -r72255
--- vhTestFiles/UnitTests/APPS.TRANSP.Transsmart.impl.RequestDataBouwer/Test/TestdoBookingSchenker/doBookingRequestSchenker.xml (.../doBookingRequestSchenker.xml) (revision 71196)
+++ vhTestFiles/UnitTests/APPS.TRANSP.Transsmart.impl.RequestDataBouwer/Test/TestdoBookingSchenker/doBookingRequestSchenker.xml (.../doBookingRequestSchenker.xml) (revision 72255)
@@ -78,6 +78,7 @@
9100
BE
Telefoon
+ test@test.com