Index: vhTest/Fake/APPS/EC/Transport/impl/VerzendingMogelijkheidRepository.cls.xml =================================================================== diff -u --- vhTest/Fake/APPS/EC/Transport/impl/VerzendingMogelijkheidRepository.cls.xml (revision 0) +++ vhTest/Fake/APPS/EC/Transport/impl/VerzendingMogelijkheidRepository.cls.xml (revision 41353) @@ -0,0 +1,46 @@ + + + + +Deze klasse werd automatisch gegenereerd en onderhouden, nieuwe methodes worden automatisch bijgevoegd, bestaande blijven zoals ze zijn. +Een hercompilatie van de basis interface - met een correct werkende studiohook ( v2.20 ++ ) - zorgt ervoor dat deze klasse aangepast wordt +1 +APPS.EC.Transport.impl.VerzendingMogelijkheidRepository + + +OfferteID:%String,VerzendingMogelijkheidID:%Integer +TECH.Persistent + + + + +OfferteID:%String + + + + +Data:TECH.Persistent + + + + +ID:%String +%Boolean + + + + +ID:%String +TECH.Persistent + + + + +ID:%String + + + + + + Index: WS/EC/ExterneVerkoopService.cls.xml =================================================================== diff -u -r41345 -r41353 --- WS/EC/ExterneVerkoopService.cls.xml (.../ExterneVerkoopService.cls.xml) (revision 41345) +++ WS/EC/ExterneVerkoopService.cls.xml (.../ExterneVerkoopService.cls.xml) (revision 41353) @@ -110,7 +110,7 @@ Do ##class(APPS.EC.Verkoop.impl.Externe.VerkoopService).%New().BestelOfferte(OfferteID,..GeefKlantID(),..GeefPersonalityID()) - Do ##class(WSimpl.EC.ExterneVerkoop.VerzendingMogelijkheidRepository).%New().VerwijderViaOfferteID(OfferteID) + Do ##class(APPS.EC.Transport.impl.VerzendingMogelijkheidRepository).%New().VerwijderViaOfferteID(OfferteID) Do ##class(APPS.EC.Transport.Service).%New().VerzendBerekenFoutenIndienNodig(OfferteID) ]]> Index: vhUnitTest/APPS/EC/Transport/impl/VerzendingMogelijkheidRepository/Test.cls.xml =================================================================== diff -u --- vhUnitTest/APPS/EC/Transport/impl/VerzendingMogelijkheidRepository/Test.cls.xml (revision 0) +++ vhUnitTest/APPS/EC/Transport/impl/VerzendingMogelijkheidRepository/Test.cls.xml (revision 41353) @@ -0,0 +1,73 @@ + + + +vhUnitTest.TestCase + + + + + + + + + + + + + + + + + + + + + + + + Index: vhUnitTest/APPS/EC/Transport/Service/Test.cls.xml =================================================================== diff -u -r41352 -r41353 --- vhUnitTest/APPS/EC/Transport/Service/Test.cls.xml (.../Test.cls.xml) (revision 41352) +++ vhUnitTest/APPS/EC/Transport/Service/Test.cls.xml (.../Test.cls.xml) (revision 41353) @@ -84,7 +84,7 @@ Set VerzendingMogelijkheidDummy = ##class(WSdata.EC.ExterneVerkoop.VerzendingMogelijkheid.VerzendingMogelijkheid).%New() - Set VerzendingMogelijkheidRepositoryMock = ##class(vhTest.Mock.WSimpl.EC.ExterneVerkoop.VerzendingMogelijkheidRepository).%New() + Set VerzendingMogelijkheidRepositoryMock = ##class(vhTest.Mock.APPS.EC.Transport.impl.VerzendingMogelijkheidRepository).%New() Do VerzendingMogelijkheidRepositoryMock.VerwachtMethodCall("GeefViaOfferteIDEnVerzendingMogelijkheidID", OfferteID, VerzendingMogelijkheidID).DanReturn(VerzendingMogelijkheidDummy) #dim OptieKeuze As %Integer = 0 @@ -112,7 +112,7 @@ do ..ZetVerwachteExceptie(##class(Tools.Test.VerwachteExceptie).%New("TECH.Exceptions.GeneralErrorException",Substrings)) Set VerzendingMogelijkheidDummy = ##class(WSdata.EC.ExterneVerkoop.VerzendingMogelijkheid.VerzendingMogelijkheid).%New() - Set VerzendingMogelijkheidRepositoryMock = ##class(vhTest.Mock.WSimpl.EC.ExterneVerkoop.VerzendingMogelijkheidRepository).%New() + Set VerzendingMogelijkheidRepositoryMock = ##class(vhTest.Mock.APPS.EC.Transport.impl.VerzendingMogelijkheidRepository).%New() Set Service = ##class(APPS.EC.Transport.Service).%New(VerkoopOfferteServiceMock,"","",VerzendingMogelijkheidRepositoryMock) Do Service.ZetGekozenVerzendingMogelijkheid(OfferteID,VerzendingMogelijkheidID,"") @@ -142,7 +142,7 @@ Do VerkoopOfferteServiceMock.IndienMethodCall("GeefOfferteBewaarder").DanReturn(OfferteBewaarderDummy) Set VerzendingMogelijkheidDummy = ##class(WSdata.EC.ExterneVerkoop.VerzendingMogelijkheid.VerzendingMogelijkheid).%New() - Set VerzendingMogelijkheidRepositoryMock = ##class(vhTest.Mock.WSimpl.EC.ExterneVerkoop.VerzendingMogelijkheidRepository).%New() + Set VerzendingMogelijkheidRepositoryMock = ##class(vhTest.Mock.APPS.EC.Transport.impl.VerzendingMogelijkheidRepository).%New() Do VerzendingMogelijkheidRepositoryMock.IndienMethodCall("GeefViaOfferteIDEnVerzendingMogelijkheidID", OfferteID, VerzendingMogelijkheidID).DanReturn(VerzendingMogelijkheidDummy) #dim OptieKeuze As %Integer = 0 Index: vhUnitTest/APPS/EC/Transport/impl/ZendingDetails/Test.cls.xml =================================================================== diff -u -r41345 -r41353 --- vhUnitTest/APPS/EC/Transport/impl/ZendingDetails/Test.cls.xml (.../Test.cls.xml) (revision 41345) +++ vhUnitTest/APPS/EC/Transport/impl/ZendingDetails/Test.cls.xml (.../Test.cls.xml) (revision 41353) @@ -27,7 +27,7 @@ Do TransportOfferteServiceStub.IndienMethodCall("BerekenOfferte",##class(APPS.TRANSP.enu.TransportFirma).UPS(),$$$ElkeWaarde).DanReturn(..GeenOfferteData()) Do TransportOfferteServiceStub.IndienMethodCall("BerekenOfferte",##class(APPS.TRANSP.enu.TransportFirma).DHL(),$$$ElkeWaarde).DanReturn(..GeenOfferteData()) - Set VerzendingMogelijkheidRepositorySpy = ##class(vhTest.Spy.WSimpl.EC.ExterneVerkoop.VerzendingMogelijkheidRepository).%New() + Set VerzendingMogelijkheidRepositorySpy = ##class(vhTest.Spy.APPS.EC.Transport.impl.VerzendingMogelijkheidRepository).%New() Set VerzendingMogelijkhedenBepaler = ##class(APPS.EC.Transport.impl.ZendingDetails).%New(TransportOfferteServiceStub, VerzendingMogelijkheidRepositorySpy) #dim DummyVerzendingMogelijkheden As WS.EC.ExterneVerkoop.dto.VerzendingMogelijkheden = VerzendingMogelijkhedenBepaler.GeefZendingDetails(..StandaardBerekenInput, ,..SessieDummy) @@ -42,7 +42,7 @@ Do TransportOfferteServiceStub.IndienMethodCall("BerekenOfferte",##class(APPS.TRANSP.enu.TransportFirma).UPS(),$$$ElkeWaarde).DanReturn(##class(vhTest.Utils.APPS.TRANSP.OfferteService.dto.OfferteData).GeefOfferteDataTransporteur("UPS")) Do TransportOfferteServiceStub.IndienMethodCall("BerekenOfferte",##class(APPS.TRANSP.enu.TransportFirma).DHL(),$$$ElkeWaarde).DanReturn(..GeenOfferteData()) - Set VerzendingMogelijkheidRepositorySpy = ##class(vhTest.Spy.WSimpl.EC.ExterneVerkoop.VerzendingMogelijkheidRepository).%New() + Set VerzendingMogelijkheidRepositorySpy = ##class(vhTest.Spy.APPS.EC.Transport.impl.VerzendingMogelijkheidRepository).%New() Set VerzendingMogelijkhedenBepaler = ##class(APPS.EC.Transport.impl.ZendingDetails).%New(TransportOfferteServiceStub, VerzendingMogelijkheidRepositorySpy) #dim DummyVerzendingMogelijkheden As WS.EC.ExterneVerkoop.dto.VerzendingMogelijkheden = VerzendingMogelijkhedenBepaler.GeefZendingDetails(..StandaardBerekenInput,,..SessieDummy) @@ -60,7 +60,7 @@ Do TransportOfferteServiceStub.IndienMethodCall("BerekenOfferte",##class(APPS.TRANSP.enu.TransportFirma).DHL(),$$$ElkeWaarde).DanReturn(OfferteData) Do TransportOfferteServiceStub.IndienMethodCall("BerekenOfferte",##class(APPS.TRANSP.enu.TransportFirma).UPS(),$$$ElkeWaarde).DanReturn(..GeenOfferteData()) - Set VerzendingMogelijkheidRepositorySpy = ##class(vhTest.Spy.WSimpl.EC.ExterneVerkoop.VerzendingMogelijkheidRepository).%New() + Set VerzendingMogelijkheidRepositorySpy = ##class(vhTest.Spy.APPS.EC.Transport.impl.VerzendingMogelijkheidRepository).%New() Set VerzendingMogelijkhedenBepaler = ##class(APPS.EC.Transport.impl.ZendingDetails).%New(TransportOfferteServiceStub, VerzendingMogelijkheidRepositorySpy) #dim VerzendingMogelijkheden As WS.EC.ExterneVerkoop.dto.VerzendingMogelijkheden = VerzendingMogelijkhedenBepaler.GeefZendingDetails(..StandaardBerekenInput,,..SessieDummy) @@ -77,7 +77,7 @@ Do TransportOfferteServiceStub.IndienMethodCall("BerekenOfferte",##class(APPS.TRANSP.enu.TransportFirma).DHL(),$$$ElkeWaarde).DanReturn(OfferteData) Do TransportOfferteServiceStub.IndienMethodCall("BerekenOfferte",##class(APPS.TRANSP.enu.TransportFirma).UPS(),$$$ElkeWaarde).DanReturn(..GeenOfferteData()) - Set VerzendingMogelijkheidRepositoryStub = ##class(vhTest.Spy.WSimpl.EC.ExterneVerkoop.VerzendingMogelijkheidRepository).%New() + Set VerzendingMogelijkheidRepositoryStub = ##class(vhTest.Spy.APPS.EC.Transport.impl.VerzendingMogelijkheidRepository).%New() Set VerkoopprijsBerekenaarMock = ##class(vhTest.Mock.APPS.EC.Transport.VerkoopprijsBerekenaar).%New() Do VerkoopprijsBerekenaarMock.VerwachtMethodCall("BerekenVerkoopPrijs",OfferteData.Items.GetAt(1)).DanReturn(40.00) @@ -100,7 +100,7 @@ Do TransportOfferteServiceStub.IndienMethodCall("BerekenOfferte",##class(APPS.TRANSP.enu.TransportFirma).DHL(),$$$ElkeWaarde).DanReturn(OfferteData) Do TransportOfferteServiceStub.IndienMethodCall("BerekenOfferte",##class(APPS.TRANSP.enu.TransportFirma).UPS(),$$$ElkeWaarde).DanReturn(..GeenOfferteData()) - Set VerzendingMogelijkheidRepositoryStub = ##class(vhTest.Spy.WSimpl.EC.ExterneVerkoop.VerzendingMogelijkheidRepository).%New() + Set VerzendingMogelijkheidRepositoryStub = ##class(vhTest.Spy.APPS.EC.Transport.impl.VerzendingMogelijkheidRepository).%New() Set VerkoopprijsBerekenaarMock = ##class(vhTest.Mock.APPS.EC.Transport.VerkoopprijsBerekenaar).%New() Do VerkoopprijsBerekenaarMock.IndienMethodCall("BerekenVerkoopPrijs",OfferteData.Items.GetAt(1)).DanReturn(40.00) @@ -123,7 +123,7 @@ Do TransportOfferteServiceStub.IndienMethodCall("BerekenOfferte",##class(APPS.TRANSP.enu.TransportFirma).DHL(),$$$ElkeWaarde).DanReturn(OfferteData) Do TransportOfferteServiceStub.IndienMethodCall("BerekenOfferte",##class(APPS.TRANSP.enu.TransportFirma).UPS(),$$$ElkeWaarde).DanReturn(..GeenOfferteData()) - Set VerzendingMogelijkheidRepositoryStub = ##class(vhTest.Spy.WSimpl.EC.ExterneVerkoop.VerzendingMogelijkheidRepository).%New() + Set VerzendingMogelijkheidRepositoryStub = ##class(vhTest.Spy.APPS.EC.Transport.impl.VerzendingMogelijkheidRepository).%New() Set TransportFirmaBepalerMock = ##class(vhTest.Mock.APPS.EC.Transport.TransportFirmaBepaler).%New() Do TransportFirmaBepalerMock.VerwachtMethodCall("GeefTransportFirmas").DanReturn(##class(APPS.TRANSP.enu.TransportFirma).ValueListIterator()) @@ -146,7 +146,7 @@ Do TransportOfferteServiceStub.IndienMethodCall("BerekenOfferte",##class(APPS.TRANSP.enu.TransportFirma).DHL(),$$$ElkeWaarde).DanReturn(OfferteData) Do TransportOfferteServiceStub.IndienMethodCall("BerekenOfferte",##class(APPS.TRANSP.enu.TransportFirma).UPS(),$$$ElkeWaarde).DanReturn(..GeenOfferteData()) - Set VerzendingMogelijkheidRepositoryStub = ##class(vhTest.Spy.WSimpl.EC.ExterneVerkoop.VerzendingMogelijkheidRepository).%New() + Set VerzendingMogelijkheidRepositoryStub = ##class(vhTest.Spy.APPS.EC.Transport.impl.VerzendingMogelijkheidRepository).%New() Set TransportFirmaBepalerMock = ##class(vhTest.Mock.APPS.EC.Transport.TransportFirmaBepaler).%New() Do TransportFirmaBepalerMock.IndienMethodCall("GeefTransportFirmas").DanReturn(##class(APPS.TRANSP.enu.TransportFirma).ValueListIterator()) @@ -169,7 +169,7 @@ Do TransportOfferteServiceStub.IndienMethodCall("BerekenOfferte",##class(APPS.TRANSP.enu.TransportFirma).UPS(),$$$ElkeWaarde).DanReturn(OfferteData) Do TransportOfferteServiceStub.IndienMethodCall("BerekenOfferte",##class(APPS.TRANSP.enu.TransportFirma).DHL(),$$$ElkeWaarde).DanReturn(..GeenOfferteData()) - Set VerzendingMogelijkheidRepositoryDummy = ##class(vhTest.Fake.WSimpl.EC.ExterneVerkoop.VerzendingMogelijkheidRepository).%New() + Set VerzendingMogelijkheidRepositoryDummy = ##class(vhTest.Fake.APPS.EC.Transport.impl.VerzendingMogelijkheidRepository).%New() Set VerzendingMogelijkhedenBepaler = ##class(APPS.EC.Transport.impl.ZendingDetails).%New(TransportOfferteServiceStub, VerzendingMogelijkheidRepositoryDummy) #dim VerzendingMogelijkheden As WS.EC.ExterneVerkoop.dto.VerzendingMogelijkheden = VerzendingMogelijkhedenBepaler.GeefZendingDetails(..StandaardBerekenInput, ,..SessieDummy) @@ -195,7 +195,7 @@ Do TransportOfferteServiceStub.IndienMethodCall("BerekenOfferte",##class(APPS.TRANSP.enu.TransportFirma).UPS(),$$$ElkeWaarde).DanReturn(OfferteData) Do TransportOfferteServiceStub.IndienMethodCall("BerekenOfferte",##class(APPS.TRANSP.enu.TransportFirma).DHL(),$$$ElkeWaarde).DanReturn(..GeenOfferteData()) - Set VerzendingMogelijkheidRepositoryDummy = ##class(vhTest.Fake.WSimpl.EC.ExterneVerkoop.VerzendingMogelijkheidRepository).%New() + Set VerzendingMogelijkheidRepositoryDummy = ##class(vhTest.Fake.APPS.EC.Transport.impl.VerzendingMogelijkheidRepository).%New() Set VerzendingMogelijkhedenBepaler = ##class(APPS.EC.Transport.impl.ZendingDetails).%New(TransportOfferteServiceStub, VerzendingMogelijkheidRepositoryDummy) #dim VerzendingMogelijkheden As WS.EC.ExterneVerkoop.dto.VerzendingMogelijkheden = VerzendingMogelijkhedenBepaler.GeefZendingDetails(..StandaardBerekenInput, ,..SessieDummy) @@ -213,7 +213,7 @@ Do TransportOfferteServiceStub.IndienMethodCall("BerekenOfferte",##class(APPS.TRANSP.enu.TransportFirma).UPS(),$$$ElkeWaarde).DanReturn(OfferteData) Do TransportOfferteServiceStub.IndienMethodCall("BerekenOfferte",##class(APPS.TRANSP.enu.TransportFirma).DHL(),$$$ElkeWaarde).DanReturn(..GeenOfferteData()) - Set VerzendingMogelijkheidRepositoryDummy = ##class(vhTest.Fake.WSimpl.EC.ExterneVerkoop.VerzendingMogelijkheidRepository).%New() + Set VerzendingMogelijkheidRepositoryDummy = ##class(vhTest.Fake.APPS.EC.Transport.impl.VerzendingMogelijkheidRepository).%New() #Dim Taal As DOM.enu.Taal = ##class(DOM.enu.Taal).Nederlands() #Dim VertalerStub As vhTest.Utils.Vertaler = ##class(vhTest.Utils.Vertaler).%New("", Taal) @@ -235,7 +235,7 @@ Do TransportOfferteServiceStub.IndienMethodCall("BerekenOfferte",##class(APPS.TRANSP.enu.TransportFirma).UPS(),$$$ElkeWaarde).DanReturn(OfferteDataUPS) Do TransportOfferteServiceStub.IndienMethodCall("BerekenOfferte",##class(APPS.TRANSP.enu.TransportFirma).DHL(),$$$ElkeWaarde).DanReturn(OfferteDataDHL) - Set VerzendingMogelijkheidRepositoryDummy = ##class(vhTest.Fake.WSimpl.EC.ExterneVerkoop.VerzendingMogelijkheidRepository).%New() + Set VerzendingMogelijkheidRepositoryDummy = ##class(vhTest.Fake.APPS.EC.Transport.impl.VerzendingMogelijkheidRepository).%New() #Dim Taal As DOM.enu.Taal = ##class(DOM.enu.Taal).Nederlands() #Dim VertalerStub As vhTest.Utils.Vertaler = ##class(vhTest.Utils.Vertaler).%New("", Taal) @@ -258,7 +258,7 @@ Do TransportOfferteServiceStub.IndienMethodCall("BerekenOfferte",##class(APPS.TRANSP.enu.TransportFirma).UPS(),$$$ElkeWaarde).DanReturn(..GeenOfferteData()) Do TransportOfferteServiceStub.IndienMethodCall("BerekenOfferte",##class(APPS.TRANSP.enu.TransportFirma).DHL(),$$$ElkeWaarde).DanReturn(OfferteData) - Set VerzendingMogelijkheidRepositoryDummy = ##class(vhTest.Fake.WSimpl.EC.ExterneVerkoop.VerzendingMogelijkheidRepository).%New() + Set VerzendingMogelijkheidRepositoryDummy = ##class(vhTest.Fake.APPS.EC.Transport.impl.VerzendingMogelijkheidRepository).%New() #Dim Taal As DOM.enu.Taal = ##class(DOM.enu.Taal).Nederlands() #Dim VertalerStub As vhTest.Utils.Vertaler = ##class(vhTest.Utils.Vertaler).%New("", Taal) @@ -281,7 +281,7 @@ Do TransportOfferteServiceStub.IndienMethodCall("BerekenOfferte",##class(APPS.TRANSP.enu.TransportFirma).UPS(),$$$ElkeWaarde).DanReturn(OfferteData) Do TransportOfferteServiceStub.IndienMethodCall("BerekenOfferte",##class(APPS.TRANSP.enu.TransportFirma).DHL(),$$$ElkeWaarde).DanReturn(..GeenOfferteData()) - Set VerzendingMogelijkheidRepositoryDummy = ##class(vhTest.Fake.WSimpl.EC.ExterneVerkoop.VerzendingMogelijkheidRepository).%New() + Set VerzendingMogelijkheidRepositoryDummy = ##class(vhTest.Fake.APPS.EC.Transport.impl.VerzendingMogelijkheidRepository).%New() #Dim Taal As DOM.enu.Taal = ##class(DOM.enu.Taal).Nederlands() #Dim VertalerStub As vhTest.Utils.Vertaler = ##class(vhTest.Utils.Vertaler).%New("", Taal) @@ -304,7 +304,7 @@ Do TransportOfferteServiceStub.IndienMethodCall("BerekenOfferte",##class(APPS.TRANSP.enu.TransportFirma).UPS(),$$$ElkeWaarde).DanReturn(OfferteData) Do TransportOfferteServiceStub.IndienMethodCall("BerekenOfferte",##class(APPS.TRANSP.enu.TransportFirma).DHL(),$$$ElkeWaarde).DanReturn(..GeenOfferteData()) - Set VerzendingMogelijkheidRepositoryDummy = ##class(vhTest.Fake.WSimpl.EC.ExterneVerkoop.VerzendingMogelijkheidRepository).%New() + Set VerzendingMogelijkheidRepositoryDummy = ##class(vhTest.Fake.APPS.EC.Transport.impl.VerzendingMogelijkheidRepository).%New() Set VerzendingMogelijkhedenBepaler = ##class(APPS.EC.Transport.impl.ZendingDetails).%New(TransportOfferteServiceStub, VerzendingMogelijkheidRepositoryDummy) #dim VerzendingMogelijkheden As WS.EC.ExterneVerkoop.dto.VerzendingMogelijkheden = VerzendingMogelijkhedenBepaler.GeefZendingDetails(..StandaardBerekenInput, ,..SessieDummy) @@ -327,7 +327,7 @@ Do TransportOfferteServiceStub.IndienMethodCall("BerekenOfferte",##class(APPS.TRANSP.enu.TransportFirma).UPS(),$$$ElkeWaarde).DanReturn(OfferteData) Do TransportOfferteServiceStub.IndienMethodCall("BerekenOfferte",##class(APPS.TRANSP.enu.TransportFirma).DHL(),$$$ElkeWaarde).DanReturn(..GeenOfferteData()) - Set VerzendingMogelijkheidRepositoryDummy = ##class(vhTest.Fake.WSimpl.EC.ExterneVerkoop.VerzendingMogelijkheidRepository).%New() + Set VerzendingMogelijkheidRepositoryDummy = ##class(vhTest.Fake.APPS.EC.Transport.impl.VerzendingMogelijkheidRepository).%New() Set VerzendingMogelijkhedenBepaler = ##class(APPS.EC.Transport.impl.ZendingDetails).%New(TransportOfferteServiceStub,VerzendingMogelijkheidRepositoryDummy) #dim VerzendingMogelijkheden As WS.EC.ExterneVerkoop.dto.VerzendingMogelijkheden = VerzendingMogelijkhedenBepaler.GeefZendingDetails(..StandaardBerekenInput, ,..SessieDummy) @@ -346,7 +346,7 @@ Do TransportOfferteServiceStub.IndienMethodCall("BerekenOfferte",##class(APPS.TRANSP.enu.TransportFirma).UPS(),$$$ElkeWaarde).DanReturn(##class(vhTest.Utils.APPS.TRANSP.OfferteService.dto.OfferteData).GeefOfferteDataTransporteur("UPS")) Do TransportOfferteServiceStub.IndienMethodCall("BerekenOfferte",##class(APPS.TRANSP.enu.TransportFirma).DHL(),$$$ElkeWaarde).DanReturn(##class(vhTest.Utils.APPS.TRANSP.OfferteService.dto.OfferteData).GeefOfferteDataTransporteur("DHL")) - Set VerzendingMogelijkheidRepositoryDummy = ##class(vhTest.Fake.WSimpl.EC.ExterneVerkoop.VerzendingMogelijkheidRepository).%New() + Set VerzendingMogelijkheidRepositoryDummy = ##class(vhTest.Fake.APPS.EC.Transport.impl.VerzendingMogelijkheidRepository).%New() Set VerzendingMogelijkhedenBepaler = ##class(APPS.EC.Transport.impl.ZendingDetails).%New(TransportOfferteServiceStub, VerzendingMogelijkheidRepositoryDummy) #dim VerzendingMogelijkheden As WS.EC.ExterneVerkoop.dto.VerzendingMogelijkheden = VerzendingMogelijkhedenBepaler.GeefZendingDetails(..StandaardBerekenInput, ,..SessieDummy) @@ -364,7 +364,7 @@ Do TransportOfferteServiceStub.IndienMethodCall("BerekenOfferte",##class(APPS.TRANSP.enu.TransportFirma).UPS(),$$$ElkeWaarde).DanReturn(##class(vhTest.Utils.APPS.TRANSP.OfferteService.dto.OfferteData).GeefOfferteDataTransporteur("UPS",2)) Do TransportOfferteServiceStub.IndienMethodCall("BerekenOfferte",##class(APPS.TRANSP.enu.TransportFirma).DHL(),$$$ElkeWaarde).DanReturn(##class(vhTest.Utils.APPS.TRANSP.OfferteService.dto.OfferteData).GeefOfferteDataTransporteur("DHL")) - Set VerzendingMogelijkheidRepositoryDummy = ##class(vhTest.Fake.WSimpl.EC.ExterneVerkoop.VerzendingMogelijkheidRepository).%New() + Set VerzendingMogelijkheidRepositoryDummy = ##class(vhTest.Fake.APPS.EC.Transport.impl.VerzendingMogelijkheidRepository).%New() Set VerzendingMogelijkhedenBepaler = ##class(APPS.EC.Transport.impl.ZendingDetails).%New(TransportOfferteServiceStub, VerzendingMogelijkheidRepositoryDummy) #dim VerzendingMogelijkheden As WS.EC.ExterneVerkoop.dto.VerzendingMogelijkheden = VerzendingMogelijkhedenBepaler.GeefZendingDetails(..StandaardBerekenInput, ,..SessieDummy) @@ -383,7 +383,7 @@ Do TransportOfferteServiceStub.IndienMethodCall("BerekenOfferte",##class(APPS.TRANSP.enu.TransportFirma).UPS(),$$$ElkeWaarde).DanReturn(##class(vhTest.Utils.APPS.TRANSP.OfferteService.dto.OfferteData).GeefOfferteDataTransporteur("UPS")) Do TransportOfferteServiceStub.IndienMethodCall("BerekenOfferte",##class(APPS.TRANSP.enu.TransportFirma).DHL(),$$$ElkeWaarde).DanReturn(##class(vhTest.Utils.APPS.TRANSP.OfferteService.dto.OfferteData).GeefOfferteDataTransporteur("DHL",2)) - Set VerzendingMogelijkheidRepositoryDummy = ##class(vhTest.Fake.WSimpl.EC.ExterneVerkoop.VerzendingMogelijkheidRepository).%New() + Set VerzendingMogelijkheidRepositoryDummy = ##class(vhTest.Fake.APPS.EC.Transport.impl.VerzendingMogelijkheidRepository).%New() Set VerzendingMogelijkhedenBepaler = ##class(APPS.EC.Transport.impl.ZendingDetails).%New(TransportOfferteServiceStub, VerzendingMogelijkheidRepositoryDummy) @@ -403,7 +403,7 @@ Do TransportOfferteServiceStub.IndienMethodCall("BerekenOfferte",##class(APPS.TRANSP.enu.TransportFirma).UPS(),$$$ElkeWaarde).DanReturn(##class(vhTest.Utils.APPS.TRANSP.OfferteService.dto.OfferteData).GeefOfferteDataTransporteur("UPS",3)) Do TransportOfferteServiceStub.IndienMethodCall("BerekenOfferte",##class(APPS.TRANSP.enu.TransportFirma).DHL(),$$$ElkeWaarde).DanReturn(##class(vhTest.Utils.APPS.TRANSP.OfferteService.dto.OfferteData).GeefOfferteDataTransporteur("DHL",2)) - Set VerzendingMogelijkheidRepositoryDummy = ##class(vhTest.Fake.WSimpl.EC.ExterneVerkoop.VerzendingMogelijkheidRepository).%New() + Set VerzendingMogelijkheidRepositoryDummy = ##class(vhTest.Fake.APPS.EC.Transport.impl.VerzendingMogelijkheidRepository).%New() Set VerzendingMogelijkhedenBepaler = ##class(APPS.EC.Transport.impl.ZendingDetails).%New(TransportOfferteServiceStub, VerzendingMogelijkheidRepositoryDummy) @@ -428,7 +428,7 @@ #dim Substrings = ##class(TECH.ListUtils).CreateListOfDataTypes("DummyException") Do ..ZetVerwachteExceptie(##class(Tools.Test.VerwachteExceptie).%New(..E.GeneralErrorException, Substrings)) - Set VerzendingMogelijkheidRepositoryDummy = ##class(vhTest.Fake.WSimpl.EC.ExterneVerkoop.VerzendingMogelijkheidRepository).%New() + Set VerzendingMogelijkheidRepositoryDummy = ##class(vhTest.Fake.APPS.EC.Transport.impl.VerzendingMogelijkheidRepository).%New() Set VerzendingMogelijkhedenBepaler = ##class(APPS.EC.Transport.impl.ZendingDetails).%New(TransportOfferteServiceStub, VerzendingMogelijkheidRepositoryDummy) #dim DummyVerzendingMogelijkheden As WS.EC.ExterneVerkoop.dto.VerzendingMogelijkheden = VerzendingMogelijkhedenBepaler.GeefZendingDetails(..StandaardBerekenInput, ,..SessieDummy) Index: vhTest/Mock/APPS/EC/Transport/impl/VerzendingMogelijkheidRepository.cls.xml =================================================================== diff -u --- vhTest/Mock/APPS/EC/Transport/impl/VerzendingMogelijkheidRepository.cls.xml (revision 0) +++ vhTest/Mock/APPS/EC/Transport/impl/VerzendingMogelijkheidRepository.cls.xml (revision 41353) @@ -0,0 +1,27 @@ + + + + +Deze klasse werd automatisch gegenereerd en onderhouden - lokale aanpassingen zijn niet nodig. +Een hercompilatie van de basis interface - met een correct werkende studiohook ( v2.20 ++ ) - zorgt ervoor dat deze klasse aangepast wordt +Inheritance van meerdere TECH.Interface interfaces resulteert nog niet in een mockklasse met overeenkomstige inheritance-structuur. +1 +vhTest.Mock.TECH.Persistentie.Repository,APPS.EC.Transport.impl.VerzendingMogelijkheidRepository +right + + +OfferteID:%String,VerzendingMogelijkheidID:%Integer +TECH.Persistent + + + + +OfferteID:%String + + + + + + Index: APPS/EC/Transport/Service.cls.xml =================================================================== diff -u -r41352 -r41353 --- APPS/EC/Transport/Service.cls.xml (.../Service.cls.xml) (revision 41352) +++ APPS/EC/Transport/Service.cls.xml (.../Service.cls.xml) (revision 41353) @@ -24,7 +24,7 @@ -WSimpl.EC.ExterneVerkoop.VerzendingMogelijkheidRepository +APPS.EC.Transport.impl.VerzendingMogelijkheidRepository 1 @@ -39,7 +39,7 @@ -OfferteService:APPS.VKP.OfferteService,NaarBerekenInputConverter:APPS.VKP.OfferteService.impl.NaarBerekenInputConverter,ZendingDetails:APPS.EC.Transport.impl.ZendingDetails,VerzendingMogelijkheidRepository:WSimpl.EC.ExterneVerkoop.VerzendingMogelijkheidRepository,WinkelKarService:APPS.EC.Winkelkar.WinkelkarService,StapelingBepaler:APPS.TRANSP.Offerte.impl.DHL.StapelingBepaler,BerekeningFoutenRepository:APPS.EC.Transport.impl.BerekeningFoutenRepository +OfferteService:APPS.VKP.OfferteService,NaarBerekenInputConverter:APPS.VKP.OfferteService.impl.NaarBerekenInputConverter,ZendingDetails:APPS.EC.Transport.impl.ZendingDetails,VerzendingMogelijkheidRepository:APPS.EC.Transport.impl.VerzendingMogelijkheidRepository,WinkelKarService:APPS.EC.Winkelkar.WinkelkarService,StapelingBepaler:APPS.TRANSP.Offerte.impl.DHL.StapelingBepaler,BerekeningFoutenRepository 1 1 %Status @@ -48,7 +48,7 @@ Set ..OfferteService = $$$Inject(OfferteService,##class(APPS.VKP.impl.OfferteService).%New()) Set ..NaarBerekenInputConverter = $$$Inject(NaarBerekenInputConverter, ##class(APPS.VKP.OfferteService.impl.NaarBerekenInputConverter).%New()) Set ..ZendingDetails = $$$Inject(ZendingDetails, ##class(APPS.EC.Transport.impl.ZendingDetails).%New()) - Set ..VerzendingMogelijkheidRepository = $$$Inject(VerzendingMogelijkheidRepository, ##class(WSimpl.EC.ExterneVerkoop.VerzendingMogelijkheidRepository).%New()) + Set ..VerzendingMogelijkheidRepository = $$$Inject(VerzendingMogelijkheidRepository, ##class(APPS.EC.Transport.impl.VerzendingMogelijkheidRepository).%New()) Set ..WinkelKarService = $$$Inject(WinkelKarService, ##class(APPS.EC.Winkelkar.impl.WinkelkarService).%New()) Set ..StapelingBepaler = $$$Inject(StapelingBepaler, ##class(APPS.TRANSP.Offerte.impl.DHL.StapelingBepaler).%New()) Set ..BerekeningFoutenRepository = $$$Inject(BerekeningFoutenRepository, ##class(APPS.EC.Transport.impl.BerekeningFoutenRepository).%New()) Index: vhTest/Spy/APPS/EC/Transport/impl/VerzendingMogelijkheidRepository.cls.xml =================================================================== diff -u --- vhTest/Spy/APPS/EC/Transport/impl/VerzendingMogelijkheidRepository.cls.xml (revision 0) +++ vhTest/Spy/APPS/EC/Transport/impl/VerzendingMogelijkheidRepository.cls.xml (revision 41353) @@ -0,0 +1,102 @@ + + + +1 +APPS.EC.Transport.impl.VerzendingMogelijkheidRepository + + +%Integer +0 +1 + + + +%Integer +0 +1 + + + +%Integer +0 +1 + + + +WSdata.EC.ExterneVerkoop.VerzendingMogelijkheid.VerzendingMogelijkheid +1 + + + +OfferteID:%String,VerzendingMogelijkheidID:%Integer +TECH.Persistent + + + + +OfferteID:%String + + + + +TECH.Persistent + + + + +Data:TECH.Persistent + + + + +ID:%String +%Boolean + + + + +ID:%String +TECH.Persistent + + + + +ID:%String + + + + +%Integer + + + + +%Integer + + + + +%Integer + + + + +WSdata.EC.ExterneVerkoop.VerzendingMogelijkheid.VerzendingMogelijkheid + + + + + + Index: APPS/EC/Transport/impl/ZendingDetails.cls.xml =================================================================== diff -u -r41345 -r41353 --- APPS/EC/Transport/impl/ZendingDetails.cls.xml (.../ZendingDetails.cls.xml) (revision 41345) +++ APPS/EC/Transport/impl/ZendingDetails.cls.xml (.../ZendingDetails.cls.xml) (revision 41353) @@ -14,7 +14,7 @@ -WSimpl.EC.ExterneVerkoop.VerzendingMogelijkheidRepository +APPS.EC.Transport.impl.VerzendingMogelijkheidRepository 1 @@ -39,14 +39,14 @@ -TransportOfferteService:APPS.TRANSP.OfferteService,VerzendingMogelijkheidRepository:WSimpl.EC.ExterneVerkoop.VerzendingMogelijkheidRepository,VertaalAPI:DOM.common.Transl.VertaalAPI,VerkoopprijsBerekenaarFactory:APPS.EC.Transport.impl.VerkoopprijsBerekenaarFactory,TransportFirmaBepalerFactory:APPS.EC.Transport.impl.TransportFirmaBepalerFactory +TransportOfferteService:APPS.TRANSP.OfferteService,VerzendingMogelijkheidRepository:APPS.EC.Transport.impl.VerzendingMogelijkheidRepository,VertaalAPI:DOM.common.Transl.VertaalAPI,VerkoopprijsBerekenaarFactory:APPS.EC.Transport.impl.VerkoopprijsBerekenaarFactory,TransportFirmaBepalerFactory:APPS.EC.Transport.impl.TransportFirmaBepalerFactory 1 1 %Status 1 - + TECH.Persistentie.impl.Repository Index: vhUnitTest/WSimpl/EC/ExterneVerkoop/VerzendingMogelijkheidRepository/Test.cls.xml =================================================================== diff -u -r36331 -r41353 --- vhUnitTest/WSimpl/EC/ExterneVerkoop/VerzendingMogelijkheidRepository/Test.cls.xml (.../Test.cls.xml) (revision 36331) +++ vhUnitTest/WSimpl/EC/ExterneVerkoop/VerzendingMogelijkheidRepository/Test.cls.xml (.../Test.cls.xml) (revision 41353) @@ -9,7 +9,7 @@ #dim MockGateway As vhTest.Mock.TECH.Persistent.impl.Gateway = ##class(vhTest.Mock.TECH.Persistent.impl.Gateway).%New(DataClassName) Do MockGateway.VerwachtMethodCall("New").DanDoeNiks() - #dim VerzendingMogelijkheidRepository As WSimpl.EC.ExterneVerkoop.VerzendingMogelijkheidRepository = ##class(WSimpl.EC.ExterneVerkoop.VerzendingMogelijkheidRepository).%New(MockGateway) + #dim VerzendingMogelijkheidRepository As APPS.EC.Transport.impl.VerzendingMogelijkheidRepository = ##class(APPS.EC.Transport.impl.VerzendingMogelijkheidRepository).%New(MockGateway) do VerzendingMogelijkheidRepository.Maak() do MockGateway.Verifieer() ]]> @@ -22,7 +22,7 @@ #dim MockGateway As vhTest.Mock.TECH.Persistent.impl.Gateway = ##class(vhTest.Mock.TECH.Persistent.impl.Gateway).%New(DataClassName) Do MockGateway.VerwachtMethodCall("Save",DummyClass).DanDoeNiks() - #dim VerzendingMogelijkheidRepository As WSimpl.EC.ExterneVerkoop.VerzendingMogelijkheidRepository = ##class(WSimpl.EC.ExterneVerkoop.VerzendingMogelijkheidRepository).%New(MockGateway) + #dim VerzendingMogelijkheidRepository As APPS.EC.Transport.impl.VerzendingMogelijkheidRepository = ##class(APPS.EC.Transport.impl.VerzendingMogelijkheidRepository).%New(MockGateway) do VerzendingMogelijkheidRepository.Bewaar(DummyClass) do MockGateway.Verifieer() ]]> @@ -34,7 +34,7 @@ #dim MockGateway As vhTest.Mock.TECH.Persistent.impl.Gateway = ##class(vhTest.Mock.TECH.Persistent.impl.Gateway).%New(DataClassName) Do MockGateway.VerwachtMethodCall("OpenId",1).DanDoeNiks() - #dim VerzendingMogelijkheidRepository As WSimpl.EC.ExterneVerkoop.VerzendingMogelijkheidRepository = ##class(WSimpl.EC.ExterneVerkoop.VerzendingMogelijkheidRepository).%New(MockGateway) + #dim VerzendingMogelijkheidRepository As APPS.EC.Transport.impl.VerzendingMogelijkheidRepository = ##class(APPS.EC.Transport.impl.VerzendingMogelijkheidRepository).%New(MockGateway) do VerzendingMogelijkheidRepository.GeefViaID(1) do MockGateway.Verifieer() ]]> @@ -50,7 +50,7 @@ #dim VerwachtelbParams As %List = $LB(666) Do MockQueryAPI.VerwachtMethodCall("ExecuteDynamicQuery", VerwachteSqlStatement, VerwachtelbParams,$$$ElkeWaarde ).DanDoeNiks() - #dim VerzendingMogelijkheidRepository As WSimpl.EC.ExterneVerkoop.VerzendingMogelijkheidRepository = ##class(WSimpl.EC.ExterneVerkoop.VerzendingMogelijkheidRepository).%New(MockGateway, MockQueryAPI) + #dim VerzendingMogelijkheidRepository As APPS.EC.Transport.impl.VerzendingMogelijkheidRepository = ##class(APPS.EC.Transport.impl.VerzendingMogelijkheidRepository).%New(MockGateway, MockQueryAPI) do VerzendingMogelijkheidRepository.VerwijderViaOfferteID(666) do MockQueryAPI.Verifieer() ]]> @@ -62,7 +62,7 @@ #dim MockGateway As vhTest.Mock.TECH.Persistent.impl.Gateway = ##class(vhTest.Mock.TECH.Persistent.impl.Gateway).%New(DataClassName) Do MockGateway.VerwachtMethodCall("DeleteId",1).DanDoeNiks() - #dim VerzendingMogelijkheidRepository As WSimpl.EC.ExterneVerkoop.VerzendingMogelijkheidRepository = ##class(WSimpl.EC.ExterneVerkoop.VerzendingMogelijkheidRepository).%New(MockGateway) + #dim VerzendingMogelijkheidRepository As APPS.EC.Transport.impl.VerzendingMogelijkheidRepository = ##class(APPS.EC.Transport.impl.VerzendingMogelijkheidRepository).%New(MockGateway) do VerzendingMogelijkheidRepository.VerwijderViaID(1) Do MockGateway.Verifieer() ]]> FishEye: Tag 41353 refers to a dead (removed) revision in file `vhTest/Spy/WSimpl/EC/ExterneVerkoop/VerzendingMogelijkheidRepository.cls.xml'. FishEye: No comparison available. Pass `N' to diff? FishEye: Tag 41353 refers to a dead (removed) revision in file `WSimpl/EC/ExterneVerkoop/VerzendingMogelijkheidRepository.cls.xml'. FishEye: No comparison available. Pass `N' to diff?