Index: APPS/EC/Transport/Service.cls.xml =================================================================== diff -u -r46468 -r46515 --- APPS/EC/Transport/Service.cls.xml (.../Service.cls.xml) (revision 46468) +++ APPS/EC/Transport/Service.cls.xml (.../Service.cls.xml) (revision 46515) @@ -183,7 +183,7 @@ #dim Offerte As APPS.VKP.Offerte = ..OfferteService.GeefOfferte(OfferteID) #dim VerzendingMogelijkheid As APPS.EC.Transport.data.VerzendingMogelijkheid - Set VerzendingMogelijkheid = ..VerzendingMogelijkheidRepository.GeefViaOfferteIDEnVerzendingMogelijkheidID(OfferteID,VerzendingMogelijkheidID) + Set VerzendingMogelijkheid = ..VerzendingMogelijkheidRepository.GeefViaOfferteIDEnVerzendingMogelijkheidID(..GeefOrigineleOfferte(Offerte).GeefID(),VerzendingMogelijkheidID) Do Offerte.ZetVerzendingItem($$ConstructClone^vhLib.Class(VerzendingMogelijkheid.Verzending,##class(APPS.VKP.impl.Offerte.VerzendingItem).%ClassName(1))) #dim GeselecteerdeOptie As APPS.EC.Transport.dto.Selectie = ..GeefGeselecteerdeOptie(VerzendingMogelijkheid, OptieKeuze) @@ -195,6 +195,18 @@ ]]> + +Offerte:APPS.VKP.Offerte +1 +APPS.VKP.Offerte + + + VerzendingMogelijkheid:APPS.EC.Transport.data.VerzendingMogelijkheid,OptieKeuze:%Integer 1 Index: vhUnitTest/APPS/EC/Transport/Service/GeefMogelijkeZendingen/Test.cls.xml =================================================================== diff -u -r41693 -r46515 --- vhUnitTest/APPS/EC/Transport/Service/GeefMogelijkeZendingen/Test.cls.xml (.../Test.cls.xml) (revision 41693) +++ vhUnitTest/APPS/EC/Transport/Service/GeefMogelijkeZendingen/Test.cls.xml (.../Test.cls.xml) (revision 46515) @@ -74,6 +74,8 @@ Do VerkoopOfferteDummy.VerwachtMethodCall("ZetVerzendingItem",$$$ElkeWaarde).DanDoeNiks() Do VerkoopOfferteDummy.IndienMethodCall("ZetLeverDatum",$$$ElkeWaarde).DanDoeNiks() Do VerkoopOfferteDummy.VerwachtMethodCall("ZetCarbonNeutral",$$$ElkeWaarde).DanDoeNiks() + Do VerkoopOfferteDummy.IndienMethodCall("GeefOfferteVanHandel").DanReturn("") + Do VerkoopOfferteDummy.VerwachtMethodCall("GeefID").DanReturn(OfferteID) #dim OfferteBewaarderDummy As vhTest.Mock.APPS.VKP.OfferteBewaarder = ##class(vhTest.Mock.APPS.VKP.OfferteBewaarder).%New() Do OfferteBewaarderDummy.VerwachtMethodCall("Bewaar",$$$ElkeWaarde).ExactAantalKeer(1) @@ -130,6 +132,8 @@ Do VerkoopOfferteDummy.IndienMethodCall("ZetVerzendingItem",$$$ElkeWaarde).DanDoeNiks() Do VerkoopOfferteDummy.IndienMethodCall("ZetLeverDatum",$$$ElkeWaarde).DanDoeNiks() Do VerkoopOfferteDummy.IndienMethodCall("ZetCarbonNeutral",$$$ElkeWaarde).DanDoeNiks() + Do VerkoopOfferteDummy.IndienMethodCall("GeefOfferteVanHandel").DanReturn("") + Do VerkoopOfferteDummy.VerwachtMethodCall("GeefID").DanReturn(OfferteID) #dim OfferteBewaarderDummy As vhTest.Mock.APPS.VKP.OfferteBewaarder = ##class(vhTest.Mock.APPS.VKP.OfferteBewaarder).%New() Do OfferteBewaarderDummy.IndienMethodCall("Bewaar",$$$ElkeWaarde).DanException(DummyException)