Index: vhUnitTest/APPS/TRANSP/Transsmart/impl/RequestDataBouwer/Test.cls.xml =================================================================== diff -u -r74232 -r74663 --- vhUnitTest/APPS/TRANSP/Transsmart/impl/RequestDataBouwer/Test.cls.xml (.../Test.cls.xml) (revision 74232) +++ vhUnitTest/APPS/TRANSP/Transsmart/impl/RequestDataBouwer/Test.cls.xml (.../Test.cls.xml) (revision 74663) @@ -77,7 +77,7 @@ Set LeveringInfo.EmailAddressTrackTrace ="test@test.com" #dim Datum as %Date = +(##class(TECH.Context).Instance().GeefDateTimeAPI().CurrentHorolog()) Set LeveringInfo.AfleverDatum = ##class(TECH.DateTime).BerekenWerkdag(Datum,1) - + Set LeveringInfo.LeverAdres.LandCode = "CZ" Set RitMock = ##class(vhTest.Mock.DOM.TRANSP.Rit).%New() Do RitMock.VerwachtMethodCall("GeefTransporteur").DanReturn(##class(DOM.TRANSP.enu.Transporteur).Schenker()) Do RitMock.VerwachtMethodCall("GeefID").DanReturn(12345) @@ -95,6 +95,7 @@ Set LeveringInfo.Gewicht = 2000 Set LeveringInfo.GeleverdAanKlantNummer = 37598 Set LeveringInfo.EmailAddressTrackTrace ="test@test.com" + Set LeveringInfo.LeverAdres.LandCode = "CZ" #dim Datum as %Date = +(##class(TECH.Context).Instance().GeefDateTimeAPI().CurrentHorolog()) Set LeveringInfo.AfleverDatum = ##class(TECH.DateTime).BerekenWerkdag(Datum,1) @@ -115,6 +116,7 @@ Set LeveringInfo.Gewicht = 2500 Set LeveringInfo.GeleverdAanKlantNummer = 37598 Set LeveringInfo.EmailAddressTrackTrace ="test@test.com" + Set LeveringInfo.LeverAdres.LandCode = "CZ" #dim Datum as %Date = +(##class(TECH.Context).Instance().GeefDateTimeAPI().CurrentHorolog()) Set LeveringInfo.AfleverDatum = ##class(TECH.DateTime).BerekenWerkdag(Datum,1) @@ -167,6 +169,50 @@ ]]> + + + + + + + + ander afzenderadres - Set BookingInfo.carrier = ..BepaalBookingInfoCarrier(Rit) + Set BookingInfo.carrier = ..BepaalBookingInfoCarrier(Rit,LeveringInfo) Quit BookingInfo ]]> @@ -177,7 +177,7 @@ } set it = ##class(TECH.ListIterator).%New(LeveringInfo.VerpakkingEenheden) #dim Linecounter as %Integer = 0 - #dim Carrier as %String = ..BepaalBookingInfoCarrier(Rit) + #dim Carrier as %String = ..BepaalBookingInfoCarrier(Rit,LeveringInfo) While (it.HasNext()){ Set Linecounter = Linecounter+ 1 #dim VerpakkingEenheid as APPS.TRANSP.dto.VerpakkingEenheid = it.Next() @@ -562,19 +562,25 @@ -Rit:DOM.TRANSP.Rit +Rit:DOM.TRANSP.Rit,LeveringInfo:APPS.TRANSP.dto.LeveringInfo 1 %String Index: vhTestFiles/UnitTests/APPS.TRANSP.Transsmart.impl.RequestDataBouwer/Test/TestdoBookingSchenkerPARTLOADviagewichtESchenkerEnabled/doBookingRequestSchenker.xml =================================================================== diff -u -r74490 -r74663 --- vhTestFiles/UnitTests/APPS.TRANSP.Transsmart.impl.RequestDataBouwer/Test/TestdoBookingSchenkerPARTLOADviagewichtESchenkerEnabled/doBookingRequestSchenker.xml (.../doBookingRequestSchenker.xml) (revision 74490) +++ vhTestFiles/UnitTests/APPS.TRANSP.Transsmart.impl.RequestDataBouwer/Test/TestdoBookingSchenkerPARTLOADviagewichtESchenkerEnabled/doBookingRequestSchenker.xml (.../doBookingRequestSchenker.xml) (revision 74663) @@ -76,7 +76,7 @@ Ankerstraat 91 Sint-Niklaas 9100 - BE + CZ Een Belg Telefoon test@test.com Index: vhTestFiles/UnitTests/APPS.TRANSP.Transsmart.impl.RequestDataBouwer/Test/TestdoBookingSchenkerPREMIUMESchenkerenabled/doBookingRequestSchenker.xml =================================================================== diff -u -r74490 -r74663 --- vhTestFiles/UnitTests/APPS.TRANSP.Transsmart.impl.RequestDataBouwer/Test/TestdoBookingSchenkerPREMIUMESchenkerenabled/doBookingRequestSchenker.xml (.../doBookingRequestSchenker.xml) (revision 74490) +++ vhTestFiles/UnitTests/APPS.TRANSP.Transsmart.impl.RequestDataBouwer/Test/TestdoBookingSchenkerPREMIUMESchenkerenabled/doBookingRequestSchenker.xml (.../doBookingRequestSchenker.xml) (revision 74663) @@ -76,7 +76,7 @@ Ankerstraat 91 Sint-Niklaas 9100 - BE + CZ Een Belg Telefoon test@test.com Index: vhTestFiles/UnitTests/APPS.TRANSP.Transsmart.impl.RequestDataBouwer/Test/TestdoBookingSchenkerPARTLOADviapalettenESchenkerenabled/doBookingRequestSchenker.xml =================================================================== diff -u -r74490 -r74663 --- vhTestFiles/UnitTests/APPS.TRANSP.Transsmart.impl.RequestDataBouwer/Test/TestdoBookingSchenkerPARTLOADviapalettenESchenkerenabled/doBookingRequestSchenker.xml (.../doBookingRequestSchenker.xml) (revision 74490) +++ vhTestFiles/UnitTests/APPS.TRANSP.Transsmart.impl.RequestDataBouwer/Test/TestdoBookingSchenkerPARTLOADviapalettenESchenkerenabled/doBookingRequestSchenker.xml (.../doBookingRequestSchenker.xml) (revision 74663) @@ -76,7 +76,7 @@ Ankerstraat 91 Sint-Niklaas 9100 - BE + CZ Een Belg Telefoon test@test.com