Index: vhTest/Fake/APPS/EC/Transport/Service.cls.xml =================================================================== diff -u -r41345 -r41409 --- vhTest/Fake/APPS/EC/Transport/Service.cls.xml (.../Service.cls.xml) (revision 41345) +++ vhTest/Fake/APPS/EC/Transport/Service.cls.xml (.../Service.cls.xml) (revision 41409) @@ -15,7 +15,7 @@ OfferteID:%String,Taal:DOM.enu.Taal="E",Sessie:WSimpl.Unishop.dto.Sessie -WS.EC.ExterneVerkoop.dto.VerzendingMogelijkheden +APPS.EC.Transport.dto.VerzendingMogelijkheden Index: vhUnitTest/APPS/EC/Transport/Service/Test.cls.xml =================================================================== diff -u -r41353 -r41409 --- vhUnitTest/APPS/EC/Transport/Service/Test.cls.xml (.../Test.cls.xml) (revision 41353) +++ vhUnitTest/APPS/EC/Transport/Service/Test.cls.xml (.../Test.cls.xml) (revision 41409) @@ -38,12 +38,12 @@ Set NaarBerekenInputConverterMock = ##class(vhTest.Mock.APPS.VKP.OfferteService.impl.NaarBerekenInputConverter).%New() Do NaarBerekenInputConverterMock.VerwachtMethodCall("Convert", DummyVerpakkingen, DummyLeverAdres, OfferteID, DummyDatum).DanReturn(DummyBerekenInput) - set ZendingDetails = ##class(WS.EC.ExterneVerkoop.dto.VerzendingMogelijkheden).%New() - set ZendingDetail = ##class(WS.EC.ExterneVerkoop.dto.VerzendingMogelijkheid).%New() + set ZendingDetails = ##class(APPS.EC.Transport.dto.VerzendingMogelijkheden).%New() + set ZendingDetail = ##class(APPS.EC.Transport.dto.VerzendingMogelijkheid).%New() Set ZendingDetail.LeverTijd = "12:00" Set ZendingDetail.Code = "1" Set ZendingDetail.TransportFirma = "UPS" - Set ZendingDetail.Optie = ##class(WS.EC.ExterneVerkoop.dto.Optie).%New() + Set ZendingDetail.Optie = ##class(APPS.EC.Transport.dto.Optie).%New() Do ZendingDetails.VerzendingMogelijkheden.Insert(ZendingDetail) Set HaalZendingDetailsMock = ##class(vhTest.Mock.APPS.EC.Transport.impl.ZendingDetails).%New() @@ -55,7 +55,7 @@ Do BerekeningFoutenRepositoryDummy.IndienMethodCall("Bewaar",$$$ElkeWaarde).DanDoeNiks() Set Service = ##class(APPS.EC.Transport.Service).%New(VerkoopOfferteServiceMock, NaarBerekenInputConverterMock, HaalZendingDetailsMock, , DummyWinkelKarService,,BerekeningFoutenRepositoryDummy) - #dim Resultaat As WS.EC.ExterneVerkoop.dto.VerzendingMogelijkheden = Service.GeefMogelijkeZendingen(OfferteID, ,..SessieDummy) + #dim Resultaat As APPS.EC.Transport.dto.VerzendingMogelijkheden = Service.GeefMogelijkeZendingen(OfferteID, ,..SessieDummy) Do VerkoopOfferteServiceMock.Verifieer() Do NaarBerekenInputConverterMock.Verifieer() Index: vhTest/Mock/APPS/EC/Transport/impl/ZendingDetails.cls.xml =================================================================== diff -u -r41345 -r41409 --- vhTest/Mock/APPS/EC/Transport/impl/ZendingDetails.cls.xml (.../ZendingDetails.cls.xml) (revision 41345) +++ vhTest/Mock/APPS/EC/Transport/impl/ZendingDetails.cls.xml (.../ZendingDetails.cls.xml) (revision 41409) @@ -11,7 +11,7 @@ BerekenInput:APPS.TRANSP.OfferteService.dto.BerekenInput,Taal:DOM.enu.Taal="N",Sessie:WSimpl.Unishop.dto.Sessie -WS.EC.ExterneVerkoop.dto.VerzendingMogelijkheden +APPS.EC.Transport.dto.VerzendingMogelijkheden FishEye: Tag 41409 refers to a dead (removed) revision in file `WS/EC/ExterneVerkoop/dto/Optie.cls.xml'. FishEye: No comparison available. Pass `N' to diff? FishEye: Tag 41409 refers to a dead (removed) revision in file `WS/EC/ExterneVerkoop/dto/VerzendingMogelijkheid.cls.xml'. FishEye: No comparison available. Pass `N' to diff? Index: zTryout/KCA/ExterneVerkoop.cls.xml =================================================================== diff -u -r34865 -r41409 --- zTryout/KCA/ExterneVerkoop.cls.xml (.../ExterneVerkoop.cls.xml) (revision 34865) +++ zTryout/KCA/ExterneVerkoop.cls.xml (.../ExterneVerkoop.cls.xml) (revision 41409) @@ -8,7 +8,7 @@ - + TECH.DataTransferObject @@ -12,7 +12,7 @@ -WS.EC.ExterneVerkoop.dto.Selectie +APPS.EC.Transport.dto.Selectie list Index: APPS/EC/Transport/impl/ZendingDetails.cls.xml =================================================================== diff -u -r41353 -r41409 --- APPS/EC/Transport/impl/ZendingDetails.cls.xml (.../ZendingDetails.cls.xml) (revision 41353) +++ APPS/EC/Transport/impl/ZendingDetails.cls.xml (.../ZendingDetails.cls.xml) (revision 41409) @@ -65,15 +65,15 @@ BerekenInput:APPS.TRANSP.OfferteService.dto.BerekenInput,Taal:DOM.enu.Taal="N",Sessie:WSimpl.Unishop.dto.Sessie -WS.EC.ExterneVerkoop.dto.VerzendingMogelijkheden +APPS.EC.Transport.dto.VerzendingMogelijkheden TransportFirma:%String,OfferteItem:APPS.TRANSP.OfferteService.dto.OfferteItem 1 -WS.EC.ExterneVerkoop.dto.VerzendingMogelijkheid +APPS.EC.Transport.dto.VerzendingMogelijkheid CarbonNeutralPrijs:TECH.Decimal 1 -WS.EC.ExterneVerkoop.dto.Optie +APPS.EC.Transport.dto.Optie -OfferteID:%String,VerzendingMogelijkheid:WS.EC.ExterneVerkoop.dto.VerzendingMogelijkheid,OfferteItem:APPS.TRANSP.OfferteService.dto.OfferteItem +OfferteID:%String,VerzendingMogelijkheid:APPS.EC.Transport.dto.VerzendingMogelijkheid,OfferteItem:APPS.TRANSP.OfferteService.dto.OfferteItem 1 WSdata.EC.ExterneVerkoop.VerzendingMogelijkheid.VerzendingMogelijkheid -VerzendingMogelijkheid:WS.EC.ExterneVerkoop.dto.VerzendingMogelijkheid,OfferteItem:APPS.TRANSP.OfferteService.dto.OfferteItem +VerzendingMogelijkheid:APPS.EC.Transport.dto.VerzendingMogelijkheid,OfferteItem:APPS.TRANSP.OfferteService.dto.OfferteItem 1 WSdata.EC.ExterneVerkoop.VerzendingMogelijkheid.VerzendingItem -CarbonNeutral:WS.EC.ExterneVerkoop.dto.Optie +CarbonNeutral:APPS.EC.Transport.dto.Optie 1 WSdata.EC.ExterneVerkoop.VerzendingMogelijkheid.Optie %ListOfObjects ELEMENTTYPE="WSdata.EC.ExterneVerkoop.VerzendingMogelijkheid.Selectie" OfferteID:%String -WS.EC.ExterneVerkoop.dto.VerzendingMogelijkheden +APPS.EC.Transport.dto.VerzendingMogelijkheden 1 OfferteID:%String,Taal:DOM.enu.Taal="E",Sessie:WSimpl.Unishop.dto.Sessie -WS.EC.ExterneVerkoop.dto.VerzendingMogelijkheden +APPS.EC.Transport.dto.VerzendingMogelijkheden VerzendingMogelijkheid:WSdata.EC.ExterneVerkoop.VerzendingMogelijkheid.VerzendingMogelijkheid,OptieKeuze:%Integer 1 -WS.EC.ExterneVerkoop.dto.Selectie +APPS.EC.Transport.dto.Selectie -OptieKeuze:WS.EC.ExterneVerkoop.dto.Selectie="" +OptieKeuze:APPS.EC.Transport.dto.Selectie="" 1 WSdata.EC.ExterneVerkoop.VerzendingMogelijkheid.Selectie + + +TECH.DataTransferObject + + +WS.EC.ExterneVerkoop.dto.Selectie + + + +TECH.String + + + +TECH.String + + + +TECH.Decimal + + + +ID:TECH.String="",Omschrijving:TECH.String="",Prijs:TECH.Decimal="" +1 +1 +%Status +1 + + + + + + Index: APPS/EC/Transport/dto/VerzendingMogelijkheid.cls.xml =================================================================== diff -u -r37279 -r41409 --- APPS/EC/Transport/dto/VerzendingMogelijkheid.cls.xml (.../WS/EC/ExterneVerkoop/dto/VerzendingMogelijkheid.cls.xml) (revision 37279) +++ APPS/EC/Transport/dto/VerzendingMogelijkheid.cls.xml (.../APPS/EC/Transport/dto/VerzendingMogelijkheid.cls.xml) (revision 41409) @@ -1,6 +1,6 @@ - + TECH.DataTransferObject @@ -40,7 +40,7 @@ -WS.EC.ExterneVerkoop.dto.Optie +APPS.EC.Transport.dto.Optie Index: vhUnitTest/APPS/EC/Transport/impl/ZendingDetails/Test.cls.xml =================================================================== diff -u -r41353 -r41409 --- vhUnitTest/APPS/EC/Transport/impl/ZendingDetails/Test.cls.xml (.../Test.cls.xml) (revision 41353) +++ vhUnitTest/APPS/EC/Transport/impl/ZendingDetails/Test.cls.xml (.../Test.cls.xml) (revision 41409) @@ -30,7 +30,7 @@ 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) + #dim DummyVerzendingMogelijkheden As APPS.EC.Transport.dto.VerzendingMogelijkheden = VerzendingMogelijkhedenBepaler.GeefZendingDetails(..StandaardBerekenInput, ,..SessieDummy) Do $$$AssertEquals(VerzendingMogelijkheidRepositorySpy.GeefVerwijderViaOfferteIDAangeroepen(),1) ]]> @@ -45,7 +45,7 @@ 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) + #dim DummyVerzendingMogelijkheden As APPS.EC.Transport.dto.VerzendingMogelijkheden = VerzendingMogelijkhedenBepaler.GeefZendingDetails(..StandaardBerekenInput,,..SessieDummy) Do $$$AssertEquals(VerzendingMogelijkheidRepositorySpy.GeefMaakAangeroepen(),1) Do $$$AssertEquals(VerzendingMogelijkheidRepositorySpy.GeefBewaarAangeroepen(),1) @@ -63,7 +63,7 @@ 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) + #dim VerzendingMogelijkheden As APPS.EC.Transport.dto.VerzendingMogelijkheden = VerzendingMogelijkhedenBepaler.GeefZendingDetails(..StandaardBerekenInput,,..SessieDummy) Do $$$AssertEquals(VerzendingMogelijkheidRepositorySpy.GeefLaatsteBewaardeVerzendingMogelijkheid().Verzending.AantalPalletten,2) ]]> @@ -86,7 +86,7 @@ Do VerkoopprijsBerekenaarFactoryMock.IndienMethodCall("GeefVerkoopprijsBerekenaar", $$$ElkeWaarde).DanReturn(VerkoopprijsBerekenaarMock) Set VerzendingMogelijkhedenBepaler = ##class(APPS.EC.Transport.impl.ZendingDetails).%New(TransportOfferteServiceStub, VerzendingMogelijkheidRepositoryStub,,VerkoopprijsBerekenaarFactoryMock) - #dim DummyVerzendingMogelijkheden As WS.EC.ExterneVerkoop.dto.VerzendingMogelijkheden = VerzendingMogelijkhedenBepaler.GeefZendingDetails(..StandaardBerekenInput,,..SessieDummy) + #dim DummyVerzendingMogelijkheden As APPS.EC.Transport.dto.VerzendingMogelijkheden = VerzendingMogelijkhedenBepaler.GeefZendingDetails(..StandaardBerekenInput,,..SessieDummy) Do VerkoopprijsBerekenaarMock.Verifieer() ]]> @@ -109,7 +109,7 @@ Do VerkoopprijsBerekenaarFactoryMock.VerwachtMethodCall("GeefVerkoopprijsBerekenaar", ..SessieDummy).DanReturn(VerkoopprijsBerekenaarMock) Set VerzendingMogelijkhedenBepaler = ##class(APPS.EC.Transport.impl.ZendingDetails).%New(TransportOfferteServiceStub, VerzendingMogelijkheidRepositoryStub,,VerkoopprijsBerekenaarFactoryMock) - #dim DummyVerzendingMogelijkheden As WS.EC.ExterneVerkoop.dto.VerzendingMogelijkheden = VerzendingMogelijkhedenBepaler.GeefZendingDetails(..StandaardBerekenInput,, ..SessieDummy) + #dim DummyVerzendingMogelijkheden As APPS.EC.Transport.dto.VerzendingMogelijkheden = VerzendingMogelijkhedenBepaler.GeefZendingDetails(..StandaardBerekenInput,, ..SessieDummy) Do VerkoopprijsBerekenaarFactoryMock.Verifieer() ]]> @@ -132,7 +132,7 @@ Do TransportFirmaBepalerFactoryMock.IndienMethodCall("GeefTransportFirmaBepaler", $$$ElkeWaarde).DanReturn(TransportFirmaBepalerMock) Set VerzendingMogelijkhedenBepaler = ##class(APPS.EC.Transport.impl.ZendingDetails).%New(TransportOfferteServiceStub, VerzendingMogelijkheidRepositoryStub,,,TransportFirmaBepalerFactoryMock) - #dim DummyVerzendingMogelijkheden As WS.EC.ExterneVerkoop.dto.VerzendingMogelijkheden = VerzendingMogelijkhedenBepaler.GeefZendingDetails(..StandaardBerekenInput,,..SessieDummy) + #dim DummyVerzendingMogelijkheden As APPS.EC.Transport.dto.VerzendingMogelijkheden = VerzendingMogelijkhedenBepaler.GeefZendingDetails(..StandaardBerekenInput,,..SessieDummy) Do TransportFirmaBepalerMock.Verifieer() ]]> @@ -155,7 +155,7 @@ Do TransportFirmaBepalerFactoryMock.VerwachtMethodCall("GeefTransportFirmaBepaler",..SessieDummy).DanReturn(TransportFirmaBepalerMock) Set VerzendingMogelijkhedenBepaler = ##class(APPS.EC.Transport.impl.ZendingDetails).%New(TransportOfferteServiceStub, VerzendingMogelijkheidRepositoryStub,,,TransportFirmaBepalerFactoryMock) - #dim DummyVerzendingMogelijkheden As WS.EC.ExterneVerkoop.dto.VerzendingMogelijkheden = VerzendingMogelijkhedenBepaler.GeefZendingDetails(..StandaardBerekenInput,,..SessieDummy) + #dim DummyVerzendingMogelijkheden As APPS.EC.Transport.dto.VerzendingMogelijkheden = VerzendingMogelijkhedenBepaler.GeefZendingDetails(..StandaardBerekenInput,,..SessieDummy) Do TransportFirmaBepalerFactoryMock.Verifieer() ]]> @@ -172,7 +172,7 @@ 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) + #dim VerzendingMogelijkheden As APPS.EC.Transport.dto.VerzendingMogelijkheden = VerzendingMogelijkhedenBepaler.GeefZendingDetails(..StandaardBerekenInput, ,..SessieDummy) If $$$AssertEquals(VerzendingMogelijkheden.VerzendingMogelijkheden.Count(),1) { Do $$$AssertEquals(VerzendingMogelijkheden.VerzendingMogelijkheden.GetAt(1).Optie.Omschrijving ,"Wenst u de CO2-uitstoot van uw levering te compenseren ? ") @@ -198,7 +198,7 @@ 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) + #dim VerzendingMogelijkheden As APPS.EC.Transport.dto.VerzendingMogelijkheden = VerzendingMogelijkhedenBepaler.GeefZendingDetails(..StandaardBerekenInput, ,..SessieDummy) If $$$AssertEquals(VerzendingMogelijkheden.VerzendingMogelijkheden.Count(),1) { Do $$$AssertFalse($IsObject(VerzendingMogelijkheden.VerzendingMogelijkheden.GetAt(1).Optie)) @@ -221,7 +221,7 @@ Do VertaalAPIStub.IndienMethodCall("GeefVertaler",$$$ElkeWaarde,$$$ElkeWaarde,$$$ElkeWaarde).DanReturn(VertalerStub) Set VerzendingMogelijkhedenBepaler = ##class(APPS.EC.Transport.impl.ZendingDetails).%New(TransportOfferteServiceStub, VerzendingMogelijkheidRepositoryDummy, VertaalAPIStub) - #dim VerzendingMogelijkheden As WS.EC.ExterneVerkoop.dto.VerzendingMogelijkheden = VerzendingMogelijkhedenBepaler.GeefZendingDetails(..StandaardBerekenInput, ,..SessieDummy) + #dim VerzendingMogelijkheden As APPS.EC.Transport.dto.VerzendingMogelijkheden = VerzendingMogelijkhedenBepaler.GeefZendingDetails(..StandaardBerekenInput, ,..SessieDummy) Do $$$AssertEquals(VerzendingMogelijkheden.Titel,"[ZendingDetailsTitelVoorEenVerzendingMogelijkheid]") ]]> @@ -243,7 +243,7 @@ Do VertaalAPIStub.IndienMethodCall("GeefVertaler",$$$ElkeWaarde,$$$ElkeWaarde,$$$ElkeWaarde).DanReturn(VertalerStub) Set VerzendingMogelijkhedenBepaler = ##class(APPS.EC.Transport.impl.ZendingDetails).%New(TransportOfferteServiceStub, VerzendingMogelijkheidRepositoryDummy, VertaalAPIStub) - #dim VerzendingMogelijkheden As WS.EC.ExterneVerkoop.dto.VerzendingMogelijkheden = VerzendingMogelijkhedenBepaler.GeefZendingDetails(..StandaardBerekenInput, ,..SessieDummy) + #dim VerzendingMogelijkheden As APPS.EC.Transport.dto.VerzendingMogelijkheden = VerzendingMogelijkhedenBepaler.GeefZendingDetails(..StandaardBerekenInput, ,..SessieDummy) Do $$$AssertEquals(VerzendingMogelijkheden.Titel,"[ZendingDetailsTitel]") ]]> @@ -266,7 +266,7 @@ Do VertaalAPIStub.IndienMethodCall("GeefVertaler",$$$ElkeWaarde,$$$ElkeWaarde,$$$ElkeWaarde).DanReturn(VertalerStub) Set VerzendingMogelijkhedenBepaler = ##class(APPS.EC.Transport.impl.ZendingDetails).%New(TransportOfferteServiceStub, VerzendingMogelijkheidRepositoryDummy, VertaalAPIStub) - #dim VerzendingMogelijkheden As WS.EC.ExterneVerkoop.dto.VerzendingMogelijkheden = VerzendingMogelijkhedenBepaler.GeefZendingDetails(..StandaardBerekenInput, ,..SessieDummy) + #dim VerzendingMogelijkheden As APPS.EC.Transport.dto.VerzendingMogelijkheden = VerzendingMogelijkhedenBepaler.GeefZendingDetails(..StandaardBerekenInput, ,..SessieDummy) Do $$$AssertEquals(VerzendingMogelijkheden.VerzendingMogelijkheden.GetAt(1).Opmerking ,"([AantalPalletten] 2)") ]]> @@ -289,7 +289,7 @@ Do VertaalAPIStub.IndienMethodCall("GeefVertaler",$$$ElkeWaarde,$$$ElkeWaarde,$$$ElkeWaarde).DanReturn(VertalerStub) Set VerzendingMogelijkhedenBepaler = ##class(APPS.EC.Transport.impl.ZendingDetails).%New(TransportOfferteServiceStub, VerzendingMogelijkheidRepositoryDummy, VertaalAPIStub) - #dim VerzendingMogelijkheden As WS.EC.ExterneVerkoop.dto.VerzendingMogelijkheden = VerzendingMogelijkhedenBepaler.GeefZendingDetails(..StandaardBerekenInput, ,..SessieDummy) + #dim VerzendingMogelijkheden As APPS.EC.Transport.dto.VerzendingMogelijkheden = VerzendingMogelijkhedenBepaler.GeefZendingDetails(..StandaardBerekenInput, ,..SessieDummy) Do $$$AssertEquals(VerzendingMogelijkheden.VerzendingMogelijkheden.GetAt(1).Opmerking ,"") ]]> @@ -307,7 +307,7 @@ 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) + #dim VerzendingMogelijkheden As APPS.EC.Transport.dto.VerzendingMogelijkheden = VerzendingMogelijkhedenBepaler.GeefZendingDetails(..StandaardBerekenInput, ,..SessieDummy) If $$$AssertEquals(VerzendingMogelijkheden.VerzendingMogelijkheden.Count(),1) { Do $$$AssertEquals(VerzendingMogelijkheden.VerzendingMogelijkheden.GetAt(1).TransportKost, 44.5) @@ -330,7 +330,7 @@ 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) + #dim VerzendingMogelijkheden As APPS.EC.Transport.dto.VerzendingMogelijkheden = VerzendingMogelijkhedenBepaler.GeefZendingDetails(..StandaardBerekenInput, ,..SessieDummy) #dim LeverDatumDummy As %Date = ##class(TECH.DateTime).DatumBereken(..GeefHuidigeDatum(),10,##class(TECH.enu.DatePart).Dag()) If $$$AssertEquals(VerzendingMogelijkheden.VerzendingMogelijkheden.Count(),1) { @@ -349,7 +349,7 @@ 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) + #dim VerzendingMogelijkheden As APPS.EC.Transport.dto.VerzendingMogelijkheden = VerzendingMogelijkhedenBepaler.GeefZendingDetails(..StandaardBerekenInput, ,..SessieDummy) If $$$AssertEquals(VerzendingMogelijkheden.VerzendingMogelijkheden.Count(),2) { Do $$$AssertContains(VerzendingMogelijkheden.VerzendingMogelijkheden.GetAt(1).Omschrijving,"UPS") @@ -367,7 +367,7 @@ 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) + #dim VerzendingMogelijkheden As APPS.EC.Transport.dto.VerzendingMogelijkheden = VerzendingMogelijkhedenBepaler.GeefZendingDetails(..StandaardBerekenInput, ,..SessieDummy) If $$$AssertEquals(VerzendingMogelijkheden.VerzendingMogelijkheden.Count(),3) { Do $$$AssertContains(VerzendingMogelijkheden.VerzendingMogelijkheden.GetAt(1).Omschrijving,"UPS") @@ -387,7 +387,7 @@ Set VerzendingMogelijkhedenBepaler = ##class(APPS.EC.Transport.impl.ZendingDetails).%New(TransportOfferteServiceStub, VerzendingMogelijkheidRepositoryDummy) - #dim VerzendingMogelijkheden As WS.EC.ExterneVerkoop.dto.VerzendingMogelijkheden = VerzendingMogelijkhedenBepaler.GeefZendingDetails(..StandaardBerekenInput, ,..SessieDummy) + #dim VerzendingMogelijkheden As APPS.EC.Transport.dto.VerzendingMogelijkheden = VerzendingMogelijkhedenBepaler.GeefZendingDetails(..StandaardBerekenInput, ,..SessieDummy) If $$$AssertEquals(VerzendingMogelijkheden.VerzendingMogelijkheden.Count(),3) { Do $$$AssertContains(VerzendingMogelijkheden.VerzendingMogelijkheden.GetAt(1).Omschrijving,"UPS") @@ -407,7 +407,7 @@ Set VerzendingMogelijkhedenBepaler = ##class(APPS.EC.Transport.impl.ZendingDetails).%New(TransportOfferteServiceStub, VerzendingMogelijkheidRepositoryDummy) - #dim VerzendingMogelijkheden As WS.EC.ExterneVerkoop.dto.VerzendingMogelijkheden = VerzendingMogelijkhedenBepaler.GeefZendingDetails(..StandaardBerekenInput, ,..SessieDummy) + #dim VerzendingMogelijkheden As APPS.EC.Transport.dto.VerzendingMogelijkheden = VerzendingMogelijkhedenBepaler.GeefZendingDetails(..StandaardBerekenInput, ,..SessieDummy) If $$$AssertEquals(VerzendingMogelijkheden.VerzendingMogelijkheden.Count(),5) { Do $$$AssertContains(VerzendingMogelijkheden.VerzendingMogelijkheden.GetAt(1).Omschrijving,"UPS") @@ -431,7 +431,7 @@ 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) + #dim DummyVerzendingMogelijkheden As APPS.EC.Transport.dto.VerzendingMogelijkheden = VerzendingMogelijkhedenBepaler.GeefZendingDetails(..StandaardBerekenInput, ,..SessieDummy) ]]> Index: APPS/EC/Transport/dto/VerzendingMogelijkheden.cls.xml =================================================================== diff -u -r37114 -r41409 --- APPS/EC/Transport/dto/VerzendingMogelijkheden.cls.xml (.../WS/EC/ExterneVerkoop/dto/VerzendingMogelijkheden.cls.xml) (revision 37114) +++ APPS/EC/Transport/dto/VerzendingMogelijkheden.cls.xml (.../APPS/EC/Transport/dto/VerzendingMogelijkheden.cls.xml) (revision 41409) @@ -1,14 +1,14 @@ - + TECH.DataTransferObject %String -WS.EC.ExterneVerkoop.dto.VerzendingMogelijkheid +APPS.EC.Transport.dto.VerzendingMogelijkheid list FishEye: Tag 41409 refers to a dead (removed) revision in file `WS/EC/ExterneVerkoop/dto/VerzendingMogelijkheden.cls.xml'. FishEye: No comparison available. Pass `N' to diff? FishEye: Tag 41409 refers to a dead (removed) revision in file `WS/EC/ExterneVerkoop/dto/Selectie.cls.xml'. FishEye: No comparison available. Pass `N' to diff? Index: vhTest/Mock/APPS/EC/Transport/Service.cls.xml =================================================================== diff -u -r41345 -r41409 --- vhTest/Mock/APPS/EC/Transport/Service.cls.xml (.../Service.cls.xml) (revision 41345) +++ vhTest/Mock/APPS/EC/Transport/Service.cls.xml (.../Service.cls.xml) (revision 41409) @@ -17,7 +17,7 @@ OfferteID:%String,Taal:DOM.enu.Taal="E",Sessie:WSimpl.Unishop.dto.Sessie -WS.EC.ExterneVerkoop.dto.VerzendingMogelijkheden +APPS.EC.Transport.dto.VerzendingMogelijkheden Index: vhTest/Fake/APPS/EC/Transport/impl/ZendingDetails.cls.xml =================================================================== diff -u -r41345 -r41409 --- vhTest/Fake/APPS/EC/Transport/impl/ZendingDetails.cls.xml (.../ZendingDetails.cls.xml) (revision 41345) +++ vhTest/Fake/APPS/EC/Transport/impl/ZendingDetails.cls.xml (.../ZendingDetails.cls.xml) (revision 41409) @@ -9,7 +9,7 @@ BerekenInput:APPS.TRANSP.OfferteService.dto.BerekenInput,Taal:DOM.enu.Taal="N",Sessie:WSimpl.Unishop.dto.Sessie -WS.EC.ExterneVerkoop.dto.VerzendingMogelijkheden +APPS.EC.Transport.dto.VerzendingMogelijkheden