Index: APPS/EC/Verkoop/ExterneVerkoopService.cls.xml =================================================================== diff -u -r39894 -r39991 --- APPS/EC/Verkoop/ExterneVerkoopService.cls.xml (.../ExterneVerkoopService.cls.xml) (revision 39894) +++ APPS/EC/Verkoop/ExterneVerkoopService.cls.xml (.../ExterneVerkoopService.cls.xml) (revision 39991) @@ -72,7 +72,7 @@ - + 1 OfferteID:%String %Boolean Index: vhTest/Mock/APPS/EC/Verkoop/ExterneVerkoopService.cls.xml =================================================================== diff -u -r39894 -r39991 --- vhTest/Mock/APPS/EC/Verkoop/ExterneVerkoopService.cls.xml (.../ExterneVerkoopService.cls.xml) (revision 39894) +++ vhTest/Mock/APPS/EC/Verkoop/ExterneVerkoopService.cls.xml (.../ExterneVerkoopService.cls.xml) (revision 39991) @@ -15,20 +15,20 @@ ]]> - -OfferteID:%String -%Boolean - - - OfferteID:%String,KlantID:DOM.VKP.VanHoeckeKlantID,PersonalityID:DOM.common.enu.Personality APPS.EC.dto.Bestelling + +OfferteID:%String +%Boolean + + + OfferteID:%String %ListOfObjects Index: APPS/EC/Winkelkar/impl/WinkelkarService.cls.xml =================================================================== diff -u -r39894 -r39991 --- APPS/EC/Winkelkar/impl/WinkelkarService.cls.xml (.../WinkelkarService.cls.xml) (revision 39894) +++ APPS/EC/Winkelkar/impl/WinkelkarService.cls.xml (.../WinkelkarService.cls.xml) (revision 39991) @@ -327,7 +327,7 @@ ]]> - + WinkelkarID:%String %Boolean 1) Index: WS/Vhisie4/Winkelkar/BereidVoorBestellingResponse.cls.xml =================================================================== diff -u -r39973 -r39991 --- WS/Vhisie4/Winkelkar/BereidVoorBestellingResponse.cls.xml (.../BereidVoorBestellingResponse.cls.xml) (revision 39973) +++ WS/Vhisie4/Winkelkar/BereidVoorBestellingResponse.cls.xml (.../BereidVoorBestellingResponse.cls.xml) (revision 39991) @@ -18,9 +18,8 @@ list - + %Boolean - Index: APPS/EC/Winkelkar/WinkelkarService.cls.xml =================================================================== diff -u -r39894 -r39991 --- APPS/EC/Winkelkar/WinkelkarService.cls.xml (.../WinkelkarService.cls.xml) (revision 39894) +++ APPS/EC/Winkelkar/WinkelkarService.cls.xml (.../WinkelkarService.cls.xml) (revision 39991) @@ -94,7 +94,7 @@ - + 1 WinkelkarID:%String %Boolean Index: WSimpl/Vhisie4/Winkelkar/WinkelkarService/BereidVoorBestelling.cls.xml =================================================================== diff -u -r39894 -r39991 --- WSimpl/Vhisie4/Winkelkar/WinkelkarService/BereidVoorBestelling.cls.xml (.../BereidVoorBestelling.cls.xml) (revision 39894) +++ WSimpl/Vhisie4/Winkelkar/WinkelkarService/BereidVoorBestelling.cls.xml (.../BereidVoorBestelling.cls.xml) (revision 39991) @@ -37,7 +37,7 @@ Set Response = ##class(WS.Vhisie4.Winkelkar.BereidVoorBestellingResponse).%New() Set Response.MogelijkeLeverdatums = ..VerkoopService.GeefMogelijkeLeverdatums(OfferteID) - Set Response.AsapIsMogelijk = ..VerkoopService.GeefAsapMogelijk(OfferteID) + Set Response.IsAsapMogelijk = ..VerkoopService.GeefIsAsapMogelijk(OfferteID) Quit Response ]]> Index: APPS/EC/impl/VroegsteLeverdatumBepaler.cls.xml =================================================================== diff -u -r39894 -r39991 --- APPS/EC/impl/VroegsteLeverdatumBepaler.cls.xml (.../VroegsteLeverdatumBepaler.cls.xml) (revision 39894) +++ APPS/EC/impl/VroegsteLeverdatumBepaler.cls.xml (.../VroegsteLeverdatumBepaler.cls.xml) (revision 39991) @@ -38,13 +38,13 @@ { Set VerzendWijze = ##class(APPS.EC.impl.VerzendWijzeBepaler).%New().GeefVerzendWijze(Winkelkar) } + #Dim VroegsteLeverDatumsPerLijn as %ListOfDataTypes - #Dim Datum as %Date - Set VroegsteLeverDatumsPerLijn = ..LeverDatumBepaler.GeefLeverdatumPerLijn(Winkelkar,VerzendWijze) #Dim DatumIterator as TECH.ArrayOneDimIterator = ##class(TECH.ArrayOneDimIterator).%New(VroegsteLeverDatumsPerLijn) if VroegsteLeverDatumsPerLijn.Count(){ + #Dim Datum as %Date Set ..VroegsteLeverdatum = DatumIterator.Next() While DatumIterator.HasNext(){ Set Datum = DatumIterator.Next() Index: vhUnitTest/WSimpl/Vhisie4/Winkelkar/WinkelkarService/BereidVoorBestelling/Test.cls.xml =================================================================== diff -u -r39894 -r39991 --- vhUnitTest/WSimpl/Vhisie4/Winkelkar/WinkelkarService/BereidVoorBestelling/Test.cls.xml (.../Test.cls.xml) (revision 39894) +++ vhUnitTest/WSimpl/Vhisie4/Winkelkar/WinkelkarService/BereidVoorBestelling/Test.cls.xml (.../Test.cls.xml) (revision 39991) @@ -9,21 +9,19 @@ Do WinkelkarRepositoryMock.VerwachtMethodCall("GeefOfferteIDViaID", 1).DanReturn("InterneId") #Dim Hoofding as APPS.EC.dto.Hoofding = ..GeefHoofding() - - set HoofdingMatcher = ##class(Tools.Mock.ArgumentMatchers.DataTransferObjectMatcher).%New(Hoofding) - + Set VerkoopServiceMock = ##class(vhTest.Mock.APPS.EC.Verkoop.ExterneVerkoopService).%New() - Do VerkoopServiceMock.VerwachtMethodCall("ZetOfferteHoofding","InterneId", HoofdingMatcher ).DanDoeNiks() - Do VerkoopServiceMock.VerwachtMethodCall("GeefMogelijkeLeverdatums","InterneId").DanReturn(..GeefMogelijkeLeverdatum()) - Do VerkoopServiceMock.VerwachtMethodCall("GeefAsapMogelijk","InterneId").DanReturn($$$False) + Do VerkoopServiceMock.VerwachtMethodCall("ZetOfferteHoofding","InterneId", ..Matches.DataTransferObject(Hoofding)).DanDoeNiks() + Do VerkoopServiceMock.VerwachtMethodCall("GeefMogelijkeLeverdatums","InterneId").DanReturn(..GeefEenMogelijkeLeverdatum()) + Do VerkoopServiceMock.VerwachtMethodCall("GeefIsAsapMogelijk","InterneId").DanReturn($$$False) Set Service = ##class(WSimpl.Vhisie4.Winkelkar.WinkelkarService.BereidVoorBestelling).%New(VerkoopServiceMock, WinkelkarRepositoryMock) #Dim Response As WS.Vhisie4.Winkelkar.BereidVoorBestellingResponse Set Response = Service.BereidVoorBestelling(##class(vhTest.Utils.WS.Vhisie4.Winkelkar.BereidVoorBestellingRequest).StandaardRequest()) If $$$AssertEquals(Response.MogelijkeLeverdatums.Count(), 1 ) { - Do $$$AssertFalse(Response.AsapIsMogelijk) + Do $$$AssertFalse(Response.IsAsapMogelijk) } Do VerkoopServiceMock.Verifieer() @@ -37,20 +35,18 @@ Do WinkelkarRepositoryMock.VerwachtMethodCall("GeefOfferteIDViaID", 1).DanReturn("InterneId") #Dim Hoofding as APPS.EC.dto.Hoofding = ..GeefHoofding() - - set HoofdingMatcher = ##class(Tools.Mock.ArgumentMatchers.DataTransferObjectMatcher).%New(Hoofding) - + Set VerkoopServiceMock = ##class(vhTest.Mock.APPS.EC.Verkoop.ExterneVerkoopService).%New() - Do VerkoopServiceMock.VerwachtMethodCall("ZetOfferteHoofding","InterneId", HoofdingMatcher ).DanDoeNiks() - Do VerkoopServiceMock.VerwachtMethodCall("GeefMogelijkeLeverdatums","InterneId").DanReturn(..GeefMogelijkeLeverdatums()) - Do VerkoopServiceMock.VerwachtMethodCall("GeefAsapMogelijk","InterneId").DanReturn($$$True) + Do VerkoopServiceMock.VerwachtMethodCall("ZetOfferteHoofding","InterneId", ..Matches.DataTransferObject(Hoofding) ).DanDoeNiks() + Do VerkoopServiceMock.VerwachtMethodCall("GeefMogelijkeLeverdatums","InterneId").DanReturn(..GeefTweeMogelijkeLeverdatums()) + Do VerkoopServiceMock.VerwachtMethodCall("GeefIsAsapMogelijk","InterneId").DanReturn($$$True) Set Service = ##class(WSimpl.Vhisie4.Winkelkar.WinkelkarService.BereidVoorBestelling).%New(VerkoopServiceMock, WinkelkarRepositoryMock) #Dim Response As WS.Vhisie4.Winkelkar.BereidVoorBestellingResponse Set Response = Service.BereidVoorBestelling(##class(vhTest.Utils.WS.Vhisie4.Winkelkar.BereidVoorBestellingRequest).StandaardRequest()) If $$$AssertEquals(Response.MogelijkeLeverdatums.Count(), 2 ) { - Do $$$AssertTrue(Response.AsapIsMogelijk) + Do $$$AssertTrue(Response.IsAsapMogelijk) } Do VerkoopServiceMock.Verifieer() @@ -65,20 +61,18 @@ #Dim Hoofding as APPS.EC.dto.Hoofding = ..GeefHoofding() - set HoofdingMatcher = ##class(Tools.Mock.ArgumentMatchers.DataTransferObjectMatcher).%New(Hoofding) - Set VerkoopServiceMock = ##class(vhTest.Mock.APPS.EC.Verkoop.ExterneVerkoopService).%New() - Do VerkoopServiceMock.VerwachtMethodCall("ZetOfferteHoofding","InterneId", HoofdingMatcher ).DanDoeNiks() - Do VerkoopServiceMock.VerwachtMethodCall("GeefMogelijkeLeverdatums","InterneId").DanReturn(..GeefMogelijkeLeverdatums()) - Do VerkoopServiceMock.IndienMethodCall("GeefAsapMogelijk","InterneId").DanDoeNiks() + Do VerkoopServiceMock.VerwachtMethodCall("ZetOfferteHoofding","InterneId", ..Matches.DataTransferObject(Hoofding) ).DanDoeNiks() + Do VerkoopServiceMock.VerwachtMethodCall("GeefMogelijkeLeverdatums","InterneId").DanReturn(..GeefTweeMogelijkeLeverdatums()) + Do VerkoopServiceMock.IndienMethodCall("GeefIsAsapMogelijk","InterneId").DanDoeNiks() Set Service = ##class(WSimpl.Vhisie4.Winkelkar.WinkelkarService.BereidVoorBestelling).%New(VerkoopServiceMock, WinkelkarRepositoryMock) #Dim Response As WS.Vhisie4.Winkelkar.BereidVoorBestellingResponse Set Response = Service.BereidVoorBestelling(##class(vhTest.Utils.WS.Vhisie4.Winkelkar.BereidVoorBestellingRequest).StandaardRequest()) If $$$AssertEquals(Response.MogelijkeLeverdatums.Count(), 2 ) { - Do $$$AssertEqualsList(Response.MogelijkeLeverdatums, ..GeefMogelijkeLeverdatums()) + Do $$$AssertEqualsList(Response.MogelijkeLeverdatums, ..GeefTweeMogelijkeLeverdatums()) Do $$$AssertEmptyList(Response.HerberekendeMaatwerklijnen) Do $$$AssertEmptyList(Response.MeldingenAanGebruiker) } @@ -101,7 +95,7 @@ ]]> - + 1 %ListOfDataTypes - + 1 %ListOfDataTypes - + OfferteID:%String %Boolean Index: vhTest/Mock/APPS/EC/Winkelkar/WinkelkarService.cls.xml =================================================================== diff -u -r39894 -r39991 --- vhTest/Mock/APPS/EC/Winkelkar/WinkelkarService.cls.xml (.../WinkelkarService.cls.xml) (revision 39894) +++ vhTest/Mock/APPS/EC/Winkelkar/WinkelkarService.cls.xml (.../WinkelkarService.cls.xml) (revision 39991) @@ -28,10 +28,10 @@ ]]> - + WinkelkarID:%String %Boolean - Index: APPS/VKP/impl/LeveringsTermijnFactory.cls.xml =================================================================== diff -u -r39894 -r39991 --- APPS/VKP/impl/LeveringsTermijnFactory.cls.xml (.../LeveringsTermijnFactory.cls.xml) (revision 39894) +++ APPS/VKP/impl/LeveringsTermijnFactory.cls.xml (.../LeveringsTermijnFactory.cls.xml) (revision 39991) @@ -6,7 +6,7 @@ RefDate:%Date="",blVerzendWijze:APPS.VKP.VerzendWijze APPS.VKP.LeveringsTermijn -