Index: vhUnitTest/APPS/TRANSP/Offerte/impl/DHL/OfferteBerekenaar/Test.cls.xml
===================================================================
diff -u -r41647 -r52975
--- vhUnitTest/APPS/TRANSP/Offerte/impl/DHL/OfferteBerekenaar/Test.cls.xml (.../Test.cls.xml) (revision 41647)
+++ vhUnitTest/APPS/TRANSP/Offerte/impl/DHL/OfferteBerekenaar/Test.cls.xml (.../Test.cls.xml) (revision 52975)
@@ -81,6 +81,15 @@
]]>
+
+
+
+
OfferteDataResult:APPS.TRANSP.OfferteService.dto.OfferteData
1
@@ -139,6 +148,16 @@
]]>
+
+OfferteDataResult:APPS.TRANSP.OfferteService.dto.OfferteData,AantalLades:%Integer
+1
+
+
+
LandCode:%String="DE"
1
@@ -161,8 +180,20 @@
Set TransportduurRepositoryFake = ##class(vhTest.Fake.APPS.TRANSP.Offerte.impl.DHL.TransportduurRepository).%New()
Set TariefBepalerFake = ##class(vhTest.Fake.APPS.TRANSP.Offerte.impl.DHL.TariefBepaler).%New()
Set PallettenBepalerFake = ##class(vhTest.Fake.APPS.TRANSP.Offerte.impl.DHL.StapelingBepaler).%New()
+
+ Set WinkelkarServiceMock = ##class(vhTest.Mock.APPS.EC.Winkelkar.WinkelkarService).%New()
+ Set WinkelkarUtilsMock = ##class(vhTest.Mock.APPS.EC.Winkelkar.impl.WinkelkarUtils).%New()
+ Set OfferteRepositoryMock = ##class(vhTest.Mock.APPS.VKP.Offerte.OfferteRepository).%New()
+
+ Do OfferteRepositoryMock.IndienMethodCall("GeefViaID",$$$ElkeWaarde).DanReturn(##class(vhTest.Utils.APPS.VKP.Offerte).StandaardOfferte())
+ Do WinkelkarServiceMock.IndienMethodCall("GeefWinkelkar",$$$ElkeWaarde).DanReturn(##class(vhTest.Utils.DOM.EC.Winkelkar.Winkelkar).LegeWinkelkar())
+ #dim MaatwerkLijnx as DOM.EC.Winkelkar.MaatwerkLijn = ##class(vhTest.Utils.DOM.EC.Winkelkar.MaatwerkLijn).TaxStandaardLade(4,100,400)
+ #dim MaatwerkLijn as APPS.EC.Winkelkar.dto.MaatwerkLijn = ##class(vhTest.Utils.APPS.EC.Winkelkar.dto.MaatwerkLijn).StandaardLBXMaatwerkLijn()
+ Set MaatwerkLijn.Aantal = 4
+ Do WinkelkarUtilsMock.IndienMethodCall("GeefMaatwerkLijnIterator",$$$ElkeWaarde).DanReturn(##class(TECH.ListUtils).CreateIteratorOfObjects(MaatwerkLijn))
+
Do PallettenBepalerFake.ZetAantalPalletten(AantalPalletten)
- Quit ##class(APPS.TRANSP.Offerte.impl.DHL.OfferteBerekenaar).%New(TransportduurRepositoryFake, TariefBepalerFake, PallettenBepalerFake)
+ Quit ##class(APPS.TRANSP.Offerte.impl.DHL.OfferteBerekenaar).%New(TransportduurRepositoryFake, TariefBepalerFake, PallettenBepalerFake,WinkelkarServiceMock,WinkelkarUtilsMock,OfferteRepositoryMock)
]]>
Index: APPS/TRANSP/Offerte/impl/DHL/OfferteBerekenaar.cls.xml
===================================================================
diff -u -r46643 -r52975
--- APPS/TRANSP/Offerte/impl/DHL/OfferteBerekenaar.cls.xml (.../OfferteBerekenaar.cls.xml) (revision 46643)
+++ APPS/TRANSP/Offerte/impl/DHL/OfferteBerekenaar.cls.xml (.../OfferteBerekenaar.cls.xml) (revision 52975)
@@ -23,6 +23,21 @@
1
+
+DOM.EC.Winkelkar.WinkelkarService
+1
+
+
+
+DOM.EC.Winkelkar.impl.WinkelkarUtils
+1
+
+
+
+APPS.VKP.Offerte.OfferteRepository
+1
+
+
APPS.TRANSP.Offerte.impl.DHL.Transportduur
1
@@ -49,7 +64,7 @@
-TransportduurRepository:APPS.TRANSP.Offerte.impl.DHL.TransportduurRepository,TariefBepaler:APPS.TRANSP.Offerte.impl.DHL.TariefBepaler,StapelingBepaler:APPS.TRANSP.Offerte.impl.DHL.StapelingBepaler
+TransportduurRepository:APPS.TRANSP.Offerte.impl.DHL.TransportduurRepository,TariefBepaler:APPS.TRANSP.Offerte.impl.DHL.TariefBepaler,StapelingBepaler:APPS.TRANSP.Offerte.impl.DHL.StapelingBepaler,WinkelkarService:APPS.EC.Winkelkar.WinkelkarService,WinkelkarUtils:DOM.EC.Winkelkar.impl.WinkelkarUtils,OfferteRepository:APPS.VKP.Offerte.OfferteRepository
1
1
%Status
@@ -58,6 +73,10 @@
Set ..TransportduurRepository = $$$Inject(TransportduurRepository, ##class(APPS.TRANSP.Offerte.impl.DHL.TransportduurRepository).%New())
Set ..TariefBepaler = $$$Inject(TariefBepaler,##class(APPS.TRANSP.Offerte.impl.DHL.TariefBepaler).%New())
Set ..StapelingBepaler = $$$Inject(StapelingBepaler, ##class(APPS.TRANSP.Offerte.impl.DHL.StapelingBepaler).%New())
+ Set ..WinkelkarService = $$$Inject(WinkelkarService,##class(APPS.EC.Winkelkar.impl.WinkelkarService).%New())
+ Set ..WinkelkarUtils = $$$Inject(WinkelkarUtils,##class(APPS.EC.Winkelkar.impl.WinkelkarUtils).%New())
+ Set ..OfferteRepository = $$$Inject(OfferteRepository,##class(APPS.VKP.Offerte.impl.OfferteRepository).%New())
+
Set ..OfferteData = ##class(APPS.TRANSP.OfferteService.dto.OfferteData).%New()
set ..QueryAPI = ##class(TECH.Context).Instance().GeefQueryAPI()
@@ -130,6 +149,7 @@
Set OfferteItem.CarbonNeutralPrijs = 0
Set OfferteItem.Kostprijs = ..TransportTarief
Set OfferteItem.AantalPalletten = ..AantalPalletten
+ Set OfferteItem.AantalLades = ..GeefAantalLadesVanOfferte(..BerekenInput.Referentie)
#dim VroegsteAfhaalDag As TECH.enu.Day = ##class(TECH.DateUtils).DayNumber(..BerekenInput.VroegsteAfhaalDatum)
@@ -145,6 +165,23 @@
]]>
+
+OfferteId:%String
+1
+%Numeric
+
+
+
AfhaalDatum:%Date,DuurtijdInWerkDagen:%Integer
1