Index: APPS/VKP/OrderIngaveService.cls.xml
===================================================================
diff -u -r42396 -r42398
--- APPS/VKP/OrderIngaveService.cls.xml (.../OrderIngaveService.cls.xml) (revision 42396)
+++ APPS/VKP/OrderIngaveService.cls.xml (.../OrderIngaveService.cls.xml) (revision 42398)
@@ -68,8 +68,13 @@
1
+
+DOM.VKP.DocumentReferentiesRepository
+1
+
+
-TekstLijnenToevoeger:APPS.VKP.OrderIngaveService.TekstLijnenToevoeger="",DateTimeAPI:TECH.DateTime="",OfferteRepository:APPS.VKP.Offerte.impl.OfferteRepository,OrderAPI:DOM.VKP.OrderAPI,GebruikerBeheerder:DOM.common.VanHoeckeGebruikerBeheerder,OrderLevenCyclusService:APPS.VKP.OrderLevenCyclusService,WinkelkarRepository:DOM.EC.Winkelkar.impl.WinkelkarRepository,OrderPrijsValidator:APPS.VKP.impl.OrderPrijsValidatie,VroegsteLeverdatumBepaler:APPS.EC.impl.VroegsteLeverdatumBepaler
+TekstLijnenToevoeger:APPS.VKP.OrderIngaveService.TekstLijnenToevoeger="",DateTimeAPI:TECH.DateTime="",OfferteRepository:APPS.VKP.Offerte.impl.OfferteRepository,OrderAPI:DOM.VKP.OrderAPI,GebruikerBeheerder:DOM.common.VanHoeckeGebruikerBeheerder,OrderLevenCyclusService:APPS.VKP.OrderLevenCyclusService,WinkelkarRepository:DOM.EC.Winkelkar.impl.WinkelkarRepository,OrderPrijsValidator:APPS.VKP.impl.OrderPrijsValidatie,VroegsteLeverdatumBepaler:APPS.EC.impl.VroegsteLeverdatumBepaler,DocumentReferentiesRepository:DOM.VKP.DocumentReferentiesRepository
1
1
%Status
@@ -87,7 +92,8 @@
set ..AdresUtils = ##class(APPS.VKP.OrderIngave.impl.AdresUtils).%New()
set ..OrderPrijsValidator = $$$Inject(OrderPrijsValidator,##class(APPS.VKP.impl.OrderPrijsValidatie).%New())
Set ..VroegsteLeverdatumBepaler = $$$Inject(VroegsteLeverdatumBepaler,##class(APPS.EC.impl.VroegsteLeverdatumBepaler).%New())
-
+ Set ..DocumentReferentiesRepository = $$$Inject(DocumentReferentiesRepository,##class(DOM.VKP.DocumentReferentiesRepository).%New())
+
Quit $$$OK
]]>
@@ -174,7 +180,7 @@
Set Order = ..OrderLevenCyclusService.MaakOrderMetKlantGegevens(Offerte.KlantID)
Set OrderDocRef.OrderReferentie = ..FormatAPI.FormatHorolog(..DateTimeAPI.CurrentHorolog(), "DD.MM.JJ")_" "_OrderDocRef.OrderReferentie
- Do OrderDocRef.Save()
+ Do ..DocumentReferentiesRepository.Bewaar(OrderDocRef)
Do Order.ZetDocumentReferenties(OrderDocRef)
#Dim LeverAdres As DOM.VKP.LeverAdres = ..AdresUtils.ConverteerNaarLeverAdres(Offerte.KlantID, Offerte.LeverAdres)