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
-