Index: APPS/VKP/Offerte/impl/KlantBestellingNaarLeverancierOfferteConverterVhisie4.cls.xml
===================================================================
diff -u -r45600 -r45659
--- APPS/VKP/Offerte/impl/KlantBestellingNaarLeverancierOfferteConverterVhisie4.cls.xml (.../KlantBestellingNaarLeverancierOfferteConverterVhisie4.cls.xml) (revision 45600)
+++ APPS/VKP/Offerte/impl/KlantBestellingNaarLeverancierOfferteConverterVhisie4.cls.xml (.../KlantBestellingNaarLeverancierOfferteConverterVhisie4.cls.xml) (revision 45659)
@@ -38,8 +38,13 @@
1
+
+DOM.VKP.DocumentReferentiesRepository
+1
+
+
-OfferteService:APPS.VKP.OfferteService,KlantBestellingNaarLeverancierOfferteKopieerder:APPS.VKP.Offerte.impl.KlantBestellingNaarLeverancierOfferteKopieerder,Vhisie4WinkelkarRepository:WSimpl.Vhisie4.Winkelkar.WinkelkarRepository,OfferteConverter:APPS.EC.Verkoop.impl.OfferteConverter,WinkelkarExportConverter:WSimpl.Vhisie4.Winkelkar.WinkelkarExport.Converter,OfferteRepository:APPS.VKP.Offerte.OfferteRepository,WinkelkarRepository:DOM.EC.Winkelkar.impl.WinkelkarRepository
+OfferteService:APPS.VKP.OfferteService,KlantBestellingNaarLeverancierOfferteKopieerder:APPS.VKP.Offerte.impl.KlantBestellingNaarLeverancierOfferteKopieerder,Vhisie4WinkelkarRepository:WSimpl.Vhisie4.Winkelkar.WinkelkarRepository,OfferteConverter:APPS.EC.Verkoop.impl.OfferteConverter,WinkelkarExportConverter:WSimpl.Vhisie4.Winkelkar.WinkelkarExport.Converter,OfferteRepository:APPS.VKP.Offerte.OfferteRepository,WinkelkarRepository:DOM.EC.Winkelkar.impl.WinkelkarRepository,DocumentReferentieRepository:DOM.VKP.DocumentReferentiesRepository
1
1
%Status
@@ -52,6 +57,7 @@
Set ..WinkelkarExportConverter = $$$Inject(WinkelkarExportConverter, ##class(WSimpl.Vhisie4.Winkelkar.WinkelkarExport.Converter).%New())
Set ..OfferteRepository = $$$Inject(OfferteRepository, ##class(APPS.VKP.Offerte.OfferteRepository).%New())
Set ..WinkelkarRepository = $$$Inject(WinkelkarRepository, ##class(DOM.EC.Winkelkar.impl.WinkelkarRepository).%New())
+ Set ..DocumentReferentieRepository = $$$Inject(DocumentReferentieRepository, ##class(DOM.VKP.DocumentReferentiesRepository).%New())
Quit $$$OK
]]>
@@ -67,6 +73,7 @@
Do ..WinkelkarRepository.VerwijderViaID(TijdelijkeLeverancierOfferte.GeefWinkelkarID())
Do ..OfferteRepository.VerwijderViaID(TijdelijkeLeverancierOfferte.GeefID())
+ Do ..DocumentReferentieRepository.VerwijderViaID(TijdelijkeLeverancierOfferte.GeefDocumentReferenties().GeefID())
#dim LeverancierOfferte As APPS.VKP.Offerte = ..Vhisie4WinkelkarRepository.GeefOfferteViaID(ExterneId)
Index: vhUnitTest/APPS/VKP/Offerte/impl/KlantBestellingNaarLeverancierOfferteConverterVhisie4/Converteer/Test.cls.xml
===================================================================
diff -u -r45600 -r45659
--- vhUnitTest/APPS/VKP/Offerte/impl/KlantBestellingNaarLeverancierOfferteConverterVhisie4/Converteer/Test.cls.xml (.../Test.cls.xml) (revision 45600)
+++ vhUnitTest/APPS/VKP/Offerte/impl/KlantBestellingNaarLeverancierOfferteConverterVhisie4/Converteer/Test.cls.xml (.../Test.cls.xml) (revision 45659)
@@ -34,13 +34,17 @@
Do Vhisie4WinkelkarRepositoryMock.VerwachtMethodCall("Bewaar",WinkelkarDto).DanReturn("42")
Do Vhisie4WinkelkarRepositoryMock.VerwachtMethodCall("GeefOfferteViaID","42").DanReturn(LeverancierOfferte)
- Set Converter = ##class(APPS.VKP.Offerte.impl.KlantBestellingNaarLeverancierOfferteConverterVhisie4).%New(OfferteServiceMock,KlantBestellingNaarLeverancierOfferteKopieerderStub,Vhisie4WinkelkarRepositoryMock,OfferteConverterStub,WinkelkarExportConverterStub,OfferteRepositoryMock,WinkelkarRepositoryMock)
+ Set DocumentReferentiesRepositoryMock = ##class(vhTest.Mock.DOM.VKP.DocumentReferentiesRepository).%New()
+ Do DocumentReferentiesRepositoryMock.VerwachtMethodCall("VerwijderViaID",GeconverteerdeOfferte.GeefDocumentReferenties().GeefID())
+
+ Set Converter = ##class(APPS.VKP.Offerte.impl.KlantBestellingNaarLeverancierOfferteConverterVhisie4).%New(OfferteServiceMock,KlantBestellingNaarLeverancierOfferteKopieerderStub,Vhisie4WinkelkarRepositoryMock,OfferteConverterStub,WinkelkarExportConverterStub,OfferteRepositoryMock,WinkelkarRepositoryMock,DocumentReferentiesRepositoryMock)
#dim Resultaat As APPS.VKP.Offerte = Converter.Converteer(TeConverterenOfferte)
Do Vhisie4WinkelkarRepositoryMock.Verifieer()
Do OfferteServiceMock.Verifieer()
Do OfferteRepositoryMock.Verifieer()
Do WinkelkarRepositoryMock.Verifieer()
+ Do DocumentReferentiesRepositoryMock.Verifieer()
do $$$AssertEquals(Resultaat,LeverancierOfferte)
]]>